H-15
Communications Processor CP 541
EWA 4NEB 812 6188-02
STL, continued
Explanation
OB 1
Segment 1
:JU FB 11
Name
:RECEIVE
:BE
Cyclic program processing
FB for sending to station 11
FB 11
Segment 1
Name
:RECEIVE
:Q F 10.1
:BEC
:
:Q DB 252
:L DW 1
:T QB 32
:
:AN F 10.1
:S F 10.1
:BE
Receive block
Test whether L1 message present
If not, block end
Open receive mailbox
Output DB1 at QB 32
Indication for operating system: ready
to receive again
OB 13
Segment 1
:Q I 32.0
:SPB FB 12
Name
:SEND
:BE
Send initiation with I 32.0
FB 12
Segment 1
Name
:SEND
:Q DB 252
:L IB 33
:T DW 33
:
:AN F 10.0
:S F 10.0
:BE
Send block
Open send mailbox
Store IB 33 in DR 33 for sending
Release send mailbox for operating
system
Program Examples