Table of Contents
Advertisement
CP 523
STL FB 200
0126
:L
=QLAE
0127
:L
KH 0000
0129
:>F
012A
:JC
=TELE
012B
:
012C
:
012D
:
012E
:
012F
:
0130 BLOC :
0131
:L
FW 244
0132
:ADD KF +3
0134
:T
FW 244
0135
:
0136
:T
FW 246
0137
:
0138
:L
FW 242
0139
:ADD KF +6
013B
:T
FW 250
013C
:
013D
:DO
=Q-DB
013E
:
013F WORT :
0140
:DO
FW 246
0141
:L
DW
0142
:T
FW 238
0143
:L
FY 238
0144
:DO
FW 250
0145
:T
PY
0146
:L
FW 250
0147
:I
0148
:T
FW 250
0149
:L
FY 239
014A
:DO
FW 250
014B
:T
PY
014C
:L
FW 250
014D
:D
014E
:T
FW 250
014F
:
0150
:L
FW 238
0151
:LW
=ENDZ
0152
:!=F
0153
:S
F 237.0
0154
:
0155
:L
FW 250
EWA 4NEB 811 6044-02a
0
0
1
0
1
Using the "SEND" and "Receive" Function Blocks
Explanation
Jump to Send with fixed length
*****************************************
SEND WITH END-OF-TEXT CHARACTERS
*
*****************************************
Increment QANF register by 3
and store
QANF register to DWINDEX register
Set pointer to base address +6
(byte 6)
and store
Open source DB
Load the data word to be transferred
into the ACCUM
and buffer
Transfer 1st word to CP 523
Check whether
word transferred is
EOT char.
Set aux. flag for EOT char.
recognition
Last word of message block
*
8-17
Advertisement
Chapters
Table of Contents
