New Circuit

Components used

SPICE netlist

* **************************************************
* Generated from CircuitSim Schematic
**************************************************
R_R1 N5 0 200
X_T1 N2 0 N4 0 Param1P1S_e1d792b5 PTurns=10 PNegativePolarity=1 STurns=5 SNegativePolarity=0
V_V1 N1 0 dc 0 ac 1 0 distof1 0 0 distof2 0 0 sin ( 0 4 1 0 0 0 )
E_VP1 VP1 0 N1 0 1
E_VP2 VP2 0 N4 0 1
E_VP3 VP3 0 0 0 1
V_IP1 N1 N2 0
V_IP2 N4 N5 0

**************************************************
* Models and supporting definitions follow
**************************************************
.model Resistor_1d9c8cf9a r(tc1=0 tc2=0 tnom=27)
.subckt Param1P1S_e1d792b5 p1pos p1neg s1pos s1neg params: PTurns=10 PNegativePolarity=0 STurns=1 SNegativePolarity=0
    .param PTurnsEffective = {PTurns * ((PNegativePolarity < 0.5) ? 1 : -1)}

    .param STurnsEffective = {STurns * ((SNegativePolarity < 0.5) ? 1 : -1)}

    G1 p1pos p1neg value={-1/PTurnsEffective*(STurnsEffective*I(Es1))}
    Es1 s1pos s1neg value={V(p1pos,p1neg)*STurnsEffective/PTurnsEffective}
.ENDS

**************************************************
* Simulation settings
**************************************************
.tran 20u 100m 0 20u
.save V(VP1) V(VP2) V(VP3) I(V_IP1) I(V_IP2)
.end