Specifications

Revision C 16/01/96

Chapter 8 "HP-GL2" 37

10 ' - Line Type -

20 WIDTH "LPT1:", 255

30 LPRINT CHR$(27); "E";

40 LPRINT CHR$(27); "%0B";

50 LPRINT "IN;IP1000,1000,9000,7000;SP1;";

60 LPRINT "PA2000,7100;PDPR400,0;PU;" 'REM DEFAULT LINE = 400

70 LPRINT "LT8;PA2000,7000;PD5000,7000;PU;"

80 LPRINT "LT8,4,0;PA2000,6900;PD5000,6900;PU;"

90 LPRINT "LT8,8,1;PA2000,6800;PD5000L6800;PU;"

100 '

110 LPRINT "LT4,PA2000,6600;PD5000,6600;PU;"

120 LPRINT "LT4,4,0;PA2000;6500;PD5000;6600;PU;"

130 LPRINT "LT4,10,1;PA2000,6400;PD5000,6400;PU;"

140 '

150 LPRINT "LT0;PA2000,6300;PD5000,6200; PU;"

160 LPRINT "LT0,4,0;PA2000,6100;PD5000,61000;PU;"

170 LPRINT "LT0,10,1;PA2000,6000;PD5000,6000;PU;"

180 '

190 LPRINT "LT-4;PA2000,5800;PD5000,5800;PU;"

200 LPRINT "LT-4,4,0;PA2000,5700;PD5000;5700;PU;"

210 LPRINT "LT-4,10,1;PA2000,5600;PD5000,5600;PU;"

220 '

230 LPRINT "LT-8;PA2000,5400;PD5000,5400;PU;"

240 LPRINT "LT-8,4,0;PA2000,5300;PD5000,5300;PU;"

250 LPRINT "LT08,10,1;PA2000,5200;PD5000,5200;PU;"

260 '

270 LPRINT "LT99;PA2000,5000;PD5000,5000;PU;"

280 LPRINT CHR$(27); "%0A";

290 LPRINT CHR$(27); "E";

300 END