• • • 3.0.0.1 6SC7-6AH4.cir
    • 3.0.0.2 6SC7.lib
    • 3.0.0.3 6AH4.lib
    • 3.0.0.4 F685.lib

3 シミュレーションプログラム

Spice3f5用のシミュレーションプログラムを以下に示します． グラフ表示等のコマンドは，使用するSPICEに合わせて適宜変更してください．

3.0.0.1 6SC7-6AH4.cir

    1 Mr. Perche's 6AH4 differential basic amplifier
    2 .INCLUDE 6SC7.lib
    3 .INCLUDE 6AH4.lib
    4 .INCLUDE F685.lib
    5 *
    6 Rg1 1 0 100k
    7 Rg2 2 0 100
    8 X1 4 1 3 6SC7
    9 X2 5 2 3 6SC7
   10 Ik1 3 0 1.1mA
   11 Rp1 4 6 220k
   12 Rp2 5 6 220k
   13 Vbb1 6 0 255V
   14 Cg1 4 11 0.22u
   15 Cg2 5 12 0.22u
   16 Rg3 11 0 470k
   17 Rg4 12 0 470k
   18 X3 14 11 13 6AH4
   19 X4 15 12 16 6AH4
   20 Rk1 13 17 1m
   21 Rk2 16 17 1m
   22 Ik2 17 0 62.5mA
   23 XOPT 24 20 20 25 30 0 F685
   24 RL 30 0 8ohm
   25 Vbb2 20 0 266V
   26 Vip1 24 14 DC 0V
   27 Vip2 25 15 DC 0V
   28 Vin 1 0 DC 0V AC 1V SIN(0 1.05V 1kHz)
   29 **Vin 1 0 DC 0V AC 1V PULSE(-0.918V 0.918V 0 0.1m 0.1m 5m 10m)
   30 *Rnfb 30 2 2.4k
   31 .NODESET V(3)=1.27V V(13)=20V V(16)=20V
   32 *
   33 .control
   34 set width=240
   35 *op
   36 *print v(4) v(1) v(3) v(4,3) v(1,3)
   37 *print v(14) v(11) v(13) v(14,13) v(11,13)
   38 *print v(20,24)
   39 *ac dec 10 1k 1k
   40 *print abs(v(4)) abs(v(30))
   41 *ac dec 10 1 1Meg
   42 *plot db(v(30))
   43 *plot ph(v(30))
   44 *print db(v(30)) ph(v(30))
   45 *tran 0.005ms 2ms 0 0.0025ms
   46 *plot v(11,13)
   47 *plot i(vip1)
   48 *fourier 1k v(30)
   49 *linearize v(4) v(5) v(3) v(11) v(12) v(13) v(16) v(30) i(vip1) i(vip2)
   50 *print v(4) v(5) v(3) v(11) v(12) v(13) v(16) v(30) i(vip1) i(vip2)
   51 *print sqrt(mean(v(30)^2)) mean(v(30)^2)/8
   52 .endc
   53 .END

3.0.0.2 6SC7.lib

    1 *
    2 * GENERIC: 6SC7
    3 *
    4 .SUBCKT 6SC7 A G K
    5 BGG   GG   0 V=V(G,K)+0.42675
    6 BEP   EP   0 V=URAMP(V(A,K))+1e-10
    7 BSTM  STM  0 V=URAMP(V(GG)+V(EP)/60.324)+1e-10
    8 BM1   M1   0 V=(0.00279159206949141*(URAMP(V(EP)-1e-10)+1e-10))^-0.303751803751804
    9 BM2   M2   0 V=(0.8316*V(STM))^1.80375180375180
   10 BM    M    0 V=V(M1)*V(M2)
   11 BSTP  STP  0 V=URAMP(V(GG)+V(EP)/72.5396825396825)+1e-10
   12 BP    P    0 V=1.62432850439450*V(STP)^1.5
   13 BIK   IK   0 V=U(V(GG))*V(P)+(1-U(V(GG)))*V(M)
   14 BLIM  LI   0 V=0.88*V(EP)^1.5
   15 BEG   EG   0 V=URAMP(V(G,K))+1e-10
   16 BIG   IG   0 V=0.88*(V(EG)/(V(EP)+V(EG))*1.2+0.4)*V(EG)^1.5
   17 BIP   IP   0 V=(V(IK,IG)-URAMP(V(IK,IG)-V(LI)))
   18 BIGK  G    K I=0.0004426*V(IG)
   19 BIAK   A    K I=0.0004426*V(IP)
   20 * CAPS
   21 CAK   A    K 3e-12
   22 CGK   G    K 2e-12
   23 CGA   G    A 2e-12
   24 .ENDS

3.0.0.3 6AH4.lib

    1 *
    2 * GENERIC: 6AH4
    3 *
    4 .SUBCKT 6AH4 A G K
    5 BGG   GG   0 V=V(G,K)+1.2375
    6 BEP   EP   0 V=URAMP(V(A,K))+1e-10
    7 BSTM  STM  0 V=URAMP(V(GG)+V(EP)/7.262)+1e-10
    8 BM1   M1   0 V=(0.040277471770862*(URAMP(V(EP)-1e-10)+1e-10))^-0.620126359531028
    9 BM2   M2   0 V=(0.707505*V(STM))^2.12012635953103
   10 BM    M    0 V=V(M1)*V(M2)
   11 BSTP  STP  0 V=URAMP(V(GG)+V(EP)/10.2642384152762)+1e-10
   12 BP    P    0 V=1.72936766471006*V(STP)^1.5
   13 BIK   IK   0 V=U(V(GG))*V(P)+(1-U(V(GG)))*V(M)
   14 BLIM  LI   0 V=0.88*V(EP)^1.5
   15 BEG   EG   0 V=URAMP(V(G,K))+1e-10
   16 BIG   IG   0 V=0.88*(V(EG)/(V(EP)+V(EG))*1.2+0.4)*V(EG)^1.5
   17 BIP   IP   0 V=(V(IK,IG)-URAMP(V(IK,IG)-V(LI)))
   18 BIGK  G    K I=0.0011961*V(IG)
   19 BIAK   A    K I=0.0011961*V(IP)
   20 * CAPS
   21 CAK   A    K 1.7e-12
   22 CGK   G    K 7e-12
   23 CGA   G    A 4.4e-12
   24 .ENDS

3.0.0.4 F685.lib

    1 *
    2 *   TAMURA OPT F685
    3 *
    4 .SUBCKT F685 P1 B1 B2 P2 S8 S0
    5 * 1次インダクタンス(p-p 8kohm 200H)
    6 L11 P1 12 50H
    7 L12 13 P2 50H
    8 * 1次巻線直流抵抗
    9 R11 12 B1 202
   10 R12 B2 13 202
   11 C11 P1 B1 1150p
   12 C12 P2 B2 1150p
   13 * 2次インダクタンス(8ohm)
   14 L13 S8 16 0.2206951H
   15 * 2次巻線抵抗
   16 R13 S0 16 0.382
   17 K1 L11 L13 0.99998
   18 K2 L12 L13 0.99998
   19 K3 L11 L12 0.99998
   20 .ENDS