.subckt MySwc swc swe ct G fb vcc osc drc
A1 ct G G G G G osc G SCHMITT Vt=0.5 Vh=0.4 Trise=100n
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
A2 N001 osc G G G G q G SRFLOP Trise=100n
Q1 drc drv N002 0 NP
Q2 swc N002 swe 0 NP2
R1 N002 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
.model D D(Is=2.52n Rs=0.568 N=1.752)
.model NP NPN(BF=120 Cje=15p Cjc=5p Rb=10)
.model NP2 NPN(BF=120 Cje=50p Cjc=16p Rb=2)
.ends