Envoy Application Programming Manual

ADM-2 Multipoint Supervisor Protocol
Envoy Application Programming Manual—427159-001
7-39
Programming Examples
Example 7-18 shows the declarations used in the programming examples:
Example 7-18. Declarations Used in the Programming Examples
INT .linename[0:11], ! name of communication line.
linefnum, ! file number of communication line.
line^count^read, ! number of bytes read.
line^write^count, ! number of bytes to write.
.linebuf[-1:999]; ! line buffer.
STRING
.slinebuf := @linebuf ’’ 1;
DEFINE
mcw = linebuf[-1]#;
LITERAL
addr^size = 3, ! address size in words.
num^entries = 6, ! number of address-list entries.
NULL = 0, ! ASCII NULL character.
EOT = 4, ! ASCII EOT character.
ENQ = 5, ! ASCII ENQ character.
poll^count = 3, ! number of poll-list entries.
poll^type = 0, ! poll type is continuous.
eot^rcvd = 163, ! error number for EOT received.
line^read^count = 1924; ! screen length + 4;
STRING
.saddr^list[ 0 : addr^size * num^entries * 2 - 1] :=
! address list.
[ NULL, EOT, "11p", ENQ, ! terminal 1 poll.
NULL, EOT, "22p", ENQ, ! terminal 2 poll.
NULL, EOT, "33p", ENQ, ! terminal 3 poll.
NULL, EOT, "11q", ENQ, ! terminal 1 select.
NULL, EOT, "22q", ENQ, ! terminal 2 select.
NULL, EOT, "33q", ENQ ] ; ! terminal 3 select.
INT .addr^list := @saddr^list ’>>’ 1; ! redefine as INT array.