.subckt MySwc2 swc swe ct G fb vcc osc drc
B1 ct G I=V(osc) - V(G) > 0.5 ? 100u : -25u
B2 N001 G V=V(Vcc)-V(G) >= 3.5 & V(osc)-V(G) < 0.5 & V(ct)-V(G) < 0.75 & V(ct)-V(G) > 150*(V(fb)-V(G) - (V(ref)-V(G))) ? 1 : 0
Q1 drc drv N004 0 NP
Q2 swc N004 swe 0 NP2
R1 N004 swe 100
B3 G drv I=((V(q)-V(G)-0.3)/0.7)*10m
D1 G drv D
B4 ref G V=V(Vcc) - V(G) >= 2 ? 1.25 : 0
XU1 ct osc G SCHMITT0504
XU2 N001 N002 N003 G 2NOR
XU3 N003 osc q G 2NOR
C1 N002 0 4.7n
R2 q N002 1
.include schmitt0504.sub
.include 2nor.sub
.model D D(Is=2.52n Rs=0.568 N=1.752 Cjo=.64p M=.4 Tt=5n)
.model NP NPN(BF=120 Cje=15p Cjc=5p Rb=10)
.model NP2 NPN(BF=120 Cje=50p Cjc=16p Rb=2)
.ends