The Integral Real-Time Clock
S5-95F
FB11 STL
Explanation
NAME :SET PROMPT TIME SETTING THE PROMPT TIME
DES :WDAY I/Q/D/B/T/C: I BI/BY/W/D: BY
DES :DATE I/Q/D/B/T/C: I BI/BY/W/D: BY
DES :MON I/Q/D/B/T/C: I BI/BY/W/D: BY
DES :HOUR I/Q/D/B/T/C: I BI/BY/W/D: BY
DES :AMPM I/Q/D/B/T/C: I BI/BY/W/D: BI
DES :MIN I/Q/D/B/T/C: I BI/BY/W/D: BY
DES :SEC I/Q/D/B/T/C: I BI/BY/W/D: BY
DES :ERR I/Q/D/B/T/C: Q BI/BY/W/D: BI
DES :ALRM I/Q/D/B/T/C: Q BI/BY/W/D: BI
DES :MODE I/Q/D/B/T/C: I BI/BY/W/D: BI
:C DB 200 CALL PARAMETER CONTROL DB
:AN =MODE 24 HOUR MODE = 0, 12 HOUR = 1
:JC =CONT
:SU D 22.1 CLOCK MODE: STATUS WORD BIT 1
CONT : SET CLOCK MODE
:TB D 22.13 DISPLAY PROMPT TIME REACHED
:S =ALRM (BIT 13 IN STATUS WORD)
:TBN D 22.13
:JC =W002
:RU D 22.13 RESET BIT AFTER EVALUATION
W002 :
:A F 20.1 START MONITORING TIME
:L KT 200.0
:SE T 11
:AN F 20.1 FLAG IS RESET IF SETTINGS
:JC =M001 HAVE ALREADY BEEN READ INTO THE
:R F 20.1 CLOCK DATA AREA
:
: CLOCK DATA AREA
:L =WDAY STORE VALUE FOR WEEKDAY
:T DR 8
:L =DAY STORE VALUE FOR DATE
:T DL 9
:L =MON STORE VALUE FOR MONTH
:T DR 9
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
10-16
EWA 4NEB 812 6210-02