Using the ”SEND” and ”RECEIVE” Function Blocks
CP 523
STL FB 201
Explanations
0150 JUM1 :
0151 :L FW 242
Last word of the message block
0152 :ADD KF +6
read?
0154 :L FW 234
0155 :!=F
0156 :JC =LWOR
”Y E S”
0157 :
0158 :ADD KF +2
Increment BADR index register by 2
015A :T FW 234
and store
015B :
015C :JU =NWOR
”N E X T W O R D”
015D :
015E LWOR :L FW 242
Set module index register
015F :T FW 234
to module base address
0160 :
0161 :L FW 238
Last message block?
0162 :L KB 0
0163 :><F
0164 :JC =NBLO
”N O” -> next message block
0165 :
0166 END :
0167 :
0168 :L FW 230
Output count register
0169 :T =ZLAE
016A :
016B :L FY 254
Output status
016C :T =STAT
016D :
016E :***
Segment 7 0170
016F :BE
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a 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-36
EWA 4NEB 811 6044-02a