* Latching DPDT dual-coil polarised relay * Model by Geoff Western (aka Alec_t) .SUBCKT DPDT_latch_dual_coil + in1 in2 s- r- a1 b1 a2 b2 .params Rcoil=240 Lcoil=0.1 Vnom=12 Tset=10m Treset=5m .params C1=0.0007*Tset C2=0.001*Treset Inom=Vnom/Rcoil A1 s r 0 0 0 N004 N003 0 SRFLOP Lset + s- {Lcoil} Rser={Rcoil} Cpar=1p Lreset + r- {Lcoil} Rser={Rcoil} Cpar=1p S1a a1 in1 p 0 sw1 S1b b1 in1 q 0 sw1 Ri1 in1 0 1e9 S2a a2 in2 p 0 sw1 S2b b2 in2 q 0 sw1 Ri2 in2 0 1e9 B1 N001 0 V=i(Lset)/Inom R1 N002 N001 1k Cd1 N002 0 {C1} B2 N005 0 V=i(Lreset)/Inom R2 N006 N005 1k Cd2 N006 0 {C2} A2 N002 0 0 0 0 0 s 0 BUF Vhigh=1.4 A3 N006 0 0 0 0 0 r 0 BUF Vhigh=1.1 R3 p N003 1k5 R4 q N004 1k5 C3 q 0 1µ C4 p 0 1µ D1 q N004 dx D2 p N003 dx .model D D .lib standard.dio .model sw1 sw(ron=5m roff=1e9 vt=.5 vh=0) .model dx d(vfwd=.1) .ENDS