Jetter JetWeb JetControl 24x Betriebsanleitung Seite 219

JetControl 24x
JetSym
TASK tRTC
LABEL RTCloop
GOTO RTCloop
LABEL DisplayTime
RETURN
Jetter AG
Anzeigeformat setzen: kein Vorzeichen, 2-stellige Zahlen
;
REGISTER_LOAD (2816, 1)
REGISTER_LOAD (2812, 3)
DISPLAY_TEXT [0, 1, "_The present time is:"]
CALL DisplayTime
DELAY 5
REGISTER_LOAD (rI, @2928)
DISPLAY_TEXT (0, 27, ".
; Anzeige von Datum
DISPLAY_REG (0, 25, 2925)
REG rI = REG 2926 + 100
DISPLAY_REG (0, 28, rI)
REG rI = REG 2927 + 100
DISPLAY_REG (0, 33, rI)
; Anzeige von Zeit
DISPLAY_REG (0, 37, 2923)
REG rI = REG 2922 + 100
DISPLAY_REG (0, 40, rI)
REG rI = REG 2921 + 100
DISPLAY_REG (0, 43, rI)
; Dummy Lesezugriff
.20 , : :")
; Tag
; führende Nullen hinzufü-
; gen
; Monat
; führende Nullen hinzufü-
; gen
; Jahr
; Stunde
; führende Nullen hinzufü-
; gen
; Minute
; führende Nullen hinzufü-
; gen
; Sekunde
10.3 Beispielprogramm
219