I

107

To demonstrate how to use the NLQ download characters, try this program.

1.0LPR1NT CHR$(27) ; “xl”;

20LF’RINT CHR$(27) ; “ : “ ;(;HR$(o ) ;CHR$(O) ; CHR$(0) ;

30LPRINT CHR$(27);“&”:CHR$(0);CHR$(60) ;CHR$(62) ;

40FOR N=60 TO 62

50FOR M=OTO 46

60READ MM

70LPRINT CHR$(MM);

80NEXT M

90 NEXTN

100LPRINT

110

DATA 128,

0,

0,

2,

4,

1,

8,

1,240,

1,

 

0,

1

 

 

 

 

 

 

 

 

 

1~0

DATA

0,

1,

0,

1.240,

1,

8,

1,

4,

2,

 

0,

0

 

 

 

 

0,

16,224,

0,

0,

130

DATA

O,

0,

4,

2.

8,

 

0,

0

 

 

 

 

 

 

2,

4,

0,

140

D.4TA

0,

0,

0,224.

16,

0.

8,

 

0

 

 

 

 

1,

70,

1,

70,

0,126,

150

DATA 128,

14,

16,

.38.

 

0,

0

 

 

 

 

 

 

 

 

 

1(,(!

DATA

70.

0,

38,

0,

22,

9,

6,

9,

6,

8.

 

6,

0

32,

1.4,

64,

14,

 

 

0,124,

0,

170

DATA

20.

0,

14,

 

0,

12

 

 

 

 

 

0.

14,

0,

12,

18(.) DATA

64,

12,

32,

14,

1.6,

14.

 

0

 

 

 

 

 

 

 

 

 

 

]C)OD.4TA 128,

0 ;

,24,

7,

5(>,

1,

56,

7,

8,

2,

 

8 ,

6

 

 

 

 

 

 

 

 

 

,2()[;

[)/1’1’!!

8,

z .

i~.

4.

H,

(J,

8,

32,

8.

0,

 

24,

0

 

[4, 48, 14. 48, 1.4,32,

 

 

21[: PATA

32,

16,,

0,

32,

 

0,

40

 

 

 

 

 

 

 

 

 

220

DATA

0,

36,

0..

40,

(),

32,

0,

32,

0,

48,

 

0

 

 

 

 

 

 

 

 

 

 

.Z31JLPRINl CHR$(27) ; “D”; CHR$( 11 ) : CHR$(O) ;

 

 

240LPRINT CHRS(27) ; “h”; CHR$( 1) :

250LPRINT “ U.S. EXPORTS” 2.6CILPRINT CHR$(27) ; “h” ;CHR.$(0) ;

270LPRINT CHR$(27) ; “%1”;

280LPRINT “AUTOS”;CHR$(9 ) :

290FOR I= .4 TL?9.3 STEP.4

300LPRINT CHR$(61) ;

Page 115
Image 115
Star Micronics NX-15 user manual Read MM