Using the ”SEND” and ”Receive” Function Blocks
CP 523
STL FB 200
Explanation
00F7 :T FW 242
00F8 :
00F9 :L KB 0
Error in status byte
00FA :L FY 254
00FB :!= F
00FC :JC = NEIN
”N O E R R O R”
00FD :
00FE :S F 254.3
Set error flag for STAT
00FF :L FY 254
0100 :T =STAT
Output STAT flags
0101 :
0102 :BEU
Program ”END”
0103 NEIN :
0104 :L FY 238
Contains CBS error flags
0105 :L KH 007F
(when computer link)
0107 :AW
0108 :L KB 0
0109 :!=F
010A :JC =KBOK
CBS ok
010B :L KH 0088
Output error ”Computer link
010D :T =STAT
error in CBS”
010E :
010F KBOK :
0110 :
0111 :L FW 242
Set pointer to base
0112 :ADD KF +6
a6
0114 :T FW 242
0115 :
0116 :DO FW 242
The CP loads and stores
0117 :L PY 0
no. of message blocks to be sent
0118 :T FW 240
0119 :
011A :L FW 242
Set pointer back to
011B :ADD KF -6
base address
011D :T FW 242
011E :
011F :***
NETWORK 7 0120
0120 :A F 237.0
Reset aux. flag for Send
0121 :R F 237.0
with EOT-characters
0122 :
0123 :LW =QANF
Load QANF parameter
0124 :T FW 244
and store (QANF register)
0125 :
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
8-16
EWA 4NEB 811 6044-02a