nw1:
L B#(31, 3)
L W#16#2000
L 'BY'
L 'VL'
//; Betriebsstundenzähler
//; Takt = Impuls für 1 Zyklus alle 60 Sekunden
nw2:
UN #Reset // alle Werte auf Null setzen
SPB m000
L 0
T #Min
T #Std
T #Tag
m000: UN #Takt // Takt
SPB ENDZ
//; // --------------------------------
//;
L #Min
L 1 // Minuten um 1 erhoehen
+I
T #Min
//;
L 60
>=I
SPB M001
SPA ENDZ
//; // --------------------------------
M001: L 0
T #Min
L #Std
L 1 // Stunden um 1 erhoehen
+I
T #Std
//;
L 24
>=I
SPB M002
SPA ENDZ
//; // --------------------------------
M002: L 0
T #Std
L #Tag
L 1 // Tage um 1 erhoehen
+I
T #Tag
//; // --------------------------------
//;
ENDZ: NOP 0