Communications Mode
CP 523
STL FB 123
Explanation
:C DB 2
:A F 100.1
:JC =M001
:LW =BADR
:L KF +4
:+F
:T FW 250
:LW =ENZE
:DO FW 250
:T PW 0
:L FW 250
:ADD KF -2
:T FW 250
:L KF +0
:DO FW 250
:T PW 0
:L FW 250
:ADD KF -2
:T FW 250
:L KH A001
:DO FW 250
:T PW 0
:L KH 0001
:DO FW 250
:L PW 0
:AW
:><F
:JC =M001
:S F 100.1
:LW =BADR
:T FW 250
:LW =ENZE
:T FW 254
:L KH FFFF
:T FW 242
:L KH FFFC
:T FW 244
Open source data block.
Has a message frame been sent?
If yes, Block End.
Load module start address,
Set byte 4 - address of the CP 523
and store.
Load end-of-text character
and transfer to CP 523
in bytes 4 and 5.
Set byte 2 - address of the CP 523
and store.
Load message frame length and
transfer to the CP 523 in bytes 2 and 3.
Set byte 0 - address of the CP 523 and
store.
Transfer "Send" coordination request
to the CP 523 in bytes 0 and 1.
Check acknowledgement of
coordination job from the CP 523.
Can data be sent?
If no,
Block End.
Set message frame flag.
Load module start address
and store.
Load end-of-text character
and store.
Preset data word pointer.
Preset auxiliary data word pointer.
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
FB 123
LEN=103
Segment 1 0000
NAME :SEND 3
DES :BADR I/Q/D/B/T/C: D KM/KH/KY/KC/KF/KT/KZ/KG: KF
DES :ENZE I/Q/D/B/T/C: D KM/KH/KY/KC/KF/KT/KZ/KG: KH
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
7-68
EWA 4NEB 811 6044-02a