Star Micronics NX-15 LPRINT CHR$27 “ “’ CHR$O CHR$O CHR$O, LPRINT CHRSMM 70 NEXT M 80 NEXT ?-i

Models: NX-15

1 210
Download 210 pages 57.72 Kb
Page 111
Image 111
10LPRINT CHR$(27) ; “ : “’; CHR$(O) ; CHR$(O) ; CHR$(O) ;

I

103

10LPRINT CHR$(27) ; “ : “’; CHR$(O) ; CHR$(O) ; CHR$(O) ;

20 LPRINT CHR$(27) ; “&”; CHR$(O) ;CHR$(60) ; CHR.$(6Z ) ; 30 FOR N=60 TO 62

40 FOR M=OTO 11

50 READMM

60LPRINT CHRS(MM);

70NEXT M

80NEXT ?-i

90

LPRINT

 

2,

5,

8,241,

0,

0,241,

8,

5,

100

DATA 139,

 

2,

0

 

0,

66,

4,

64,

36,

16,

2,

16,

11.() DATA 139,124,

 

12,

0

 

 

2,

60,

0,

48,

0,

48,

0,

12[1 DATA 139,

46,

16,

 

48,

0

 

 

 

 

 

 

 

 

 

130LPRINT CHR$(27) ;’’D’’;CHR$(11) ;CHR$(0)

140LPRINT CHR$(27) ;’’h’’;CHR$(l) ;

150LPRINT “ U.S. EXPORTS”

160LPRINT CHR$(27) ;’’h’’;CHR$(O);

170LPRINT CHR$(27);’’%1”;

180LPRINT “AUTOS’’;CHR$(9) ;

190FOR 1=.4 TO 9.3 STEP.4

200 LPRINT CHR$(61);

210 NEXT I

220 LPRINT

230 LPRINT “CHEMICALS’’;CHR$(~) ; ’24G FOR 1=.4 TO 8.7 STEP .4 250 LPRINT CHRS(60);

260 NEXT I

270 LPRINT

280LPRINT “GUNS’’;CHR$(’J) ;

290FOR 1=.4 TO 1.4 STEP .4

300 LPRINT cHR$(62);

310NEXT 1 :320 LPRINT

330LPRINT CHR$(9) ;’’+--”;

340 SCALE$=’’--+---

350FOR 1=2 TO 8 STEP 2

360LPRINT SCALE$;

370NEXTI

380LPRINT “--+”

390LPRINTCHR$(9);” “;

400 FOR 1=2 TO 8 STEP 2

410LPRINT n “;1;

420NEXTI

Page 111
Image 111
Star Micronics NX-15 LPRINT CHR$27 “ “’ CHR$O CHR$O CHR$O, LPRINT CHRSMM 70 NEXT M 80 NEXT ?-i, Lprint, 8,241, Data