6100 MPS-B Programming Manual

6100 MPS-B PROGRAMMING EXAMPLE
?SYMBOLS
?INSPECT
LITERAL config = 1, ! "function" codes
control = 67,
poll = 68,
readline = 65,
write^line = 66;
LITERAL connect^modem = 17, ! "modifier" codes
define^list = 0,
define^slow^list = 5,
enable^continuous = 1,
enable^all = 4,
reset = 13,
select^enable = 1,
sequential^poll = 0;
LITERAL EOT = 04, ! miscellaneous
ENQ = 05,
ETX = 03,
line^read^count = 1932,
max^retries = 3,
STX = 02;
STRUCT .req^buff; ! WRITEREAD buffer structure
BEGIN
STRING function,
modifier;
INT req^id,
text^out,
text^in;
STRING text [0:1923];
END;
STRING .slinebuff [0:1923],
.sp;
INT buff^len,
file^error,
.linebuff := @slinebuff ’>>’ 1,
line^count^read,
linefnum,
recvfnum,
termfnum;
B-5