Programming instructions

Intermec Fingerprint v7.61 Programmers Reference Manual Ed. 7176
Chapter 2 Program Instructions
ON COMSET GOSUB, cont.
Examples, cont.
The same example written without line numbers would look like this:
IMMEDIATE OFF
REM Exit program with #STOP&
COMSET1,"#","&","ZYX","=",50
ON COMSET 1 GOSUB QQQ
COMSET 1 ON
WWW: IF A$ <> "STOP" THEN GOTO WWW
COMSET 1 OFF
.....
.....
END
QQQ: A$=COMBUF$(1)
PRINT A$
COMSET 1 ON
RETURN
IMMEDIATE ON