SZ_1: A DBX [AR1,P#0.7] //Reset Zeit
R DBX [AR1,P#0.7] //Reset Zeit
R DBX [AR1,P#0.0] //Timer VKE
JC SZ_2
L D [AR1,P#2.0] //Restzeit in ms
L L#0
==D
= DBX [AR1,P#0.0] //Timer VKE
JCN SZ_N
SZ_2: L #LOK_SW_ZEIT_MS //Sollzeit in ms
T D [AR1,P#2.0] //Restzeit in ms
// z?hlen
SZ_N: ON "M_INTERUPT_AKT" //Interupt OB 1 aktiv
ON #VKE_IN
JC SZ_E
L D [AR1,P#2.0] //Restzeit in ms
L L#50 //Interupt alle 50 ms
-D
T D [AR1,P#2.0] //Restzeit in ms
JU SZ_E
SZ_E: BEU