home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / BUS / yLaplace.sit / yLaplace / Example / Bi-Quad < prev    next >
Text File  |  1996-08-18  |  740b  |  30 lines
  1. /********************************************************
  2. メニュー"Analysis" の "Freq.Analysis..." 実行後、 
  3. メニュー"View" の "Bode Diagram" を選択してください。
  4. ********************************************************/
  5. /**** Bi-Quad ****/
  6.     C1 = 1E-6;
  7.     C2 = 1E-6;
  8.     R1 = 1000;
  9.     R2 = 2000;
  10.     R3 = 1000;
  11.     R4 = 1000;
  12.     R5 = 1000;
  13.     R6 = 2000;
  14.  
  15.    LPF1(s)= 1/(R1*R4*C1*C2)
  16.             / (  s*s + s/(R2*C1) + 1/(R3*R4*C1*C2)*(R6/R5)  );
  17.  
  18.    LPF2(s)= -R6/R5 * 1/(R1*R4*C1*C2)
  19.             / (  s*s + s/(R2*C1) + 1/(R3*R4*C1*C2)*(R6/R5)  );
  20.  
  21.    BPF(s) = -s/(R1*C1)
  22.             / (  s*s + s/(R2*C1) + 1/(R3*R4*C1*C2)*(R6/R5)  );
  23.  
  24.    FREQ 1, 100000, 60, GEO;
  25.  
  26. /*    PROBE LPF1(s); */
  27. /* PROBE LPF2(s); */
  28.    PROBE BPF(s);
  29.         
  30.    END;