Programming Manual for Citizen BASIC Interpreter - MaRCo
Programming Manual for Citizen BASIC Interpreter - MaRCo
Programming Manual for Citizen BASIC Interpreter - MaRCo
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
<strong>Citizen</strong> <strong>BASIC</strong> <strong>Interpreter</strong><br />
1100 CLOSE #1<br />
(3) Example 3<br />
This example employs AUTOEXEC. It automatically activates the <strong>BASIC</strong> interpreter<br />
by AUTOEXEC.ZPL to execute the START.BAS program found in the E: drive.<br />
^XA<br />
^DFE:AUTOEXEC.ZPL^FS<br />
^JIE:START.BAS,Y,N,50K^FS<br />
^XZ<br />
(4) Example 4<br />
This example explains the <strong>BASIC</strong> program that extracts data. The <strong>BASIC</strong> interpreter<br />
is used by collecting data from the program not based on the CLP/CL-S command.<br />
30 OPEN #2 : NAME "SER"<br />
40 OPEN #1 : NAME "ZPL"<br />
50 DO<br />
60 INPUT #2 : A$<br />
70 IF A$ = "EXIT" THEN<br />
80 CLOSE #2<br />
90 CLOSE #1<br />
95 END<br />
100 END IF<br />
110 LOOP WHILE POS(A$,"START") = 0<br />
120 DECLARE STRING BS$(17)<br />
130 LET INDEX = 1<br />
140 DO WHILE INDEX