CP 523
Communications Mode
STL FB 126
Explanation
:DO FW 232
Store data bytes
:T DW 0
in destination DB.
:A F 101.2
Block End if
:JC =M001
end-of-text character detected.
:L FW 232
Has the message block
:L FW 234
been completely transferred?
:><F
If no, read in two further
:JC =M002
data bytes.
:L FW 234
Set auxiliary data word pointer
:ADD KF +4
for the next message block.
:T FW 234
:L FW 232
Set auxiliary data word pointer
:ADD KF +1
for the first two data bytes
:T FW 232
of the next message block.
:JU =M003
Read in next message block.
M002 :L FW 232
Increment data word pointer by 1.
:ADD KF +1
:T FW 232
:L FW 220
Increment current address
:ADD KF +2
on the CP by 2.
:T FW 220
:JC =M004
Read in next word
M001 :
of message block.
:BE
Block End
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
EWA 4NEB 811 6044-02a
7-81