Version 4
SHEET 1 1300 680
WIRE 256 -80 128 -80
WIRE 336 -80 256 -80
WIRE 448 -80 336 -80
WIRE 512 -80 448 -80
WIRE 128 -32 128 -80
WIRE 256 -32 256 -80
WIRE 336 32 336 -80
WIRE 128 48 128 32
WIRE 128 48 -192 48
WIRE 512 64 512 -80
WIRE -192 80 -192 48
WIRE 336 176 336 96
WIRE -192 192 -192 160
WIRE -80 192 -192 192
WIRE 256 192 256 32
WIRE 256 192 -80 192
WIRE -80 256 -80 192
WIRE 128 256 128 48
WIRE 256 256 256 192
WIRE -192 384 -192 192
WIRE -48 384 -192 384
WIRE 128 384 128 320
WIRE 128 384 32 384
WIRE 256 384 256 320
WIRE 256 384 128 384
WIRE 336 384 336 256
WIRE 336 384 256 384
WIRE 416 384 336 384
WIRE 512 384 512 144
WIRE 512 384 416 384
FLAG 448 -80 Udc
FLAG -80 256 0
FLAG 416 384 UdcGnd
SYMBOL diode 144 32 R180
WINDOW 0 24 64 Left 2
WINDOW 3 24 0 Left 2
SYMATTR InstName D1
SYMATTR Value 1N4148
SYMBOL diode 272 32 R180
WINDOW 0 24 64 Left 2
WINDOW 3 24 0 Left 2
SYMATTR InstName D2
SYMATTR Value 1N4148
SYMBOL diode 144 320 R180
WINDOW 0 24 64 Left 2
WINDOW 3 24 0 Left 2
SYMATTR InstName D3
SYMATTR Value 1N4148
SYMBOL diode 272 320 R180
WINDOW 0 24 64 Left 2
WINDOW 3 24 0 Left 2
SYMATTR InstName D4
SYMATTR Value 1N4148
SYMBOL voltage -192 64 R0
WINDOW 123 0 0 Left 2
WINDOW 39 0 0 Left 2
SYMATTR InstName V1
SYMATTR Value SINE(0 113 45)
SYMBOL Misc\\EuropeanResistor -64 400 R270
WINDOW 0 27 56 VTop 2
WINDOW 3 5 56 VBottom 2
SYMATTR InstName R1
SYMATTR Value 1g
SYMBOL cap 320 32 R0
SYMATTR InstName C1
SYMATTR Value 100µF
SYMBOL bi 512 64 R0
SYMATTR InstName B1
SYMATTR Value I=IF((V(udc,udcgnd)<20)|(time<40m), .4, p/V(udc,udcgnd))
SYMBOL Misc\\EuropeanResistor 320 160 R0
SYMATTR InstName R2
SYMATTR Value 0.03
TEXT -224 432 Left 2 !.tran 0.1
TEXT 192 -192 Left 2 !.param P=50
TEXT 184 -136 Left 2 !.optionen abstol=1u gmin=0.01 itl1=500 itl4=40
TEXT 192 -256 Left 2 !*I=IF(V(Udc,UdcGnd)<0.05, 1, P/V(Udc))