1 REM Ins{nd av Martin Sandberg <6882>    1988-02-07 19.30.13 (KERMIT)
100 REM *********************************
110 REM *           PRINT TEST          *"
120 REM *     Testar printern med       *"
130 REM *      grafik och tecken        *"
140 REM *     Testat p} en ABC802       *"
150 REM *     Med en Microline 82a      *"
160 REM *     [ndra rad 230 f|r din     *"
170 REM *           PRINTER.            *"
180 REM *                               *"
190 REM *      Av Martin Sandberg       *"
200 REM *            <6882>             *"
210 REM *********************************"
220 A=32
230 OPEN 'pr:vsa30c72.44' AS FILE 3
240 ; #3,"----------+-----------+------------"
250 ; #3,"!" A "     !     ";
260 ; #3,CHR$(14);
270 ; #3,CHR$(A);
280 ; #3,CHR$(15);
290 ; #3,"     !    ";
300 ; #3,CHR$(A) "      !"
310 IF CHR$(A)="" THEN 350
320 ; #3,"!---------+-----------+-----------!"
330 A=A+1
340 GOTO 250
350 CLOSE