2‘ SUBROUTINES

2‘ Define 24-dot download character

2LPRINT E$; ’’&’’;CHR$(O);CHR$(6O) ;CHR$(60);

2RESTORE 2510

2READ LS :LPRINT CHR$(LS);

2READ CW :LPRINT CHR$(CW);

2READ RS :LPRINT CHR$(RS);

2FOR M=l TO CW*3

2READ MM

2LPRINT CHR$(MM);

2NEXT M

2RETURN

2‘ Define 48-dot download character

2LPRINT CHR$(27) ;”{”;”&“;CHR$(192); CHR$(0) ;CHR$(0);

2LPRINT CHR$(60);CHR$(60) ;

2 RESTORE 2600

2READ LS :LPRINT CHR$(LS);

2 READ CW :LPRINT CHR$(CW);

2READ RS :LPRINT CHR$(RS);

2 FOR M=l TO CW*6

2READ MM

2 LPRINT CHR$(MM);

2NEXT M

2 RETURN

2‘ DATA

224–dot download character data

2 DATA 3, 31, 2

2DATA O, 0, 0, 7, 0, 0, 8, 0, 0, 23, 0, 0, 40, 0, 0

2

D

 

1

 

 

 

 

 

4

 

 

 

8

 

 

2

D

 

 

 

8

 

 

 

 

 

8

 

8

 

0

2

D

8

 

 

 

 

 

8

 

 

 

 

 

 

2

D

 

 

 

8

 

 

 

 

0,

80,

47,192,

40,

16,

0

2

D

 

1

 

 

 

0,

23,

0,

0,

8,

0,

0, 7,

0,

0

2

DATA

O,

0,

0

 

 

 

 

 

 

 

 

 

 

 

2

‘ 4

 

d

 

c

 

d

 

 

 

 

 

 

 

 

2

DATA

3,

31,

2

 

 

 

 

 

 

 

 

 

 

 

2

D

o,

20,

0,

0,

0,

0,

0,170,

0,

0,

0,

0

 

 

2

DATA

1,

84,

0,

0,

0,

0,

6,170,

0,

0,

0,

0

 

 

2

D

 

1

 

 

 

 

2

 

 

1

 

0

 

 

2

D

 

4

 

 

 

 

2

 

 

1

 

0

 

 

2

D

 

0

 

 

 

0,

22,

1,

85,

10,160,

0

 

 

2

D

4

 

 

3,

80,

0,

 

 

 

2

 

0

 

 

2

D

4

 

 

 

 

0,

22,

1,

80,

2

 

0

 

 

2

D

 

2,160,

 

5,

80,

0,

22,

1,

80,

2

 

0

 

 

2

D

 

2

 

 

 

0,

22,

1,

80,

2

 

0

 

 

2

D

4

 

 

 

 

0,

22,

85,

84,

2

 

0

 

 

2

DATA

40,170,170,

 

5,

80,

0,

22,

1,

85,

10,160,

0

 

 

2

D

 

0

 

 

 

 

2

 

 

1

 

0

 

 

2

D

 

4

 

 

 

 

2

 

 

1

 

0

 

 

2

D

 

1

 

 

 

 

6,170,

0,

0,

0,

0

 

 

2

DATA

1,

84,

0,

0,

0,

0,

0,170,

0,

0,

0,

0

 

 

2

DATA

O,

20,

0,

0,

0,

0

 

 

 

 

 

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2‘ Dot graphics data

2‘ 1ST LINE

2

DATA

O, 0, 0, 0, 0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0

2

DATA

O,

0, 0, 0, 0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0

2

DATA

O, 0, 0, 0, 0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0

2

DATA

O,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0,

0

2

DATA

O,

0,

0,

0,

0,

0,

0,

0,

0,

0,127,255,

0,255,255

2DATA 1,255,255, 3, 0, 0, 7, 0, 0, 7, 0, 0, 15, 0, 0

2DATA 31, 0, 0, 31, 0, 0, 31, 0, 0, 31, 0, 0, 31, 0, 0

2DATA 31, 0, 0, 31, 0, 0, 31, 0, 0, 31, 0, 0, 31, 0, 0

2DATA 31, 0, 0, 31, 0, 0, 31, 0, 0, 31, 0, 0, 31, 0, 0

Chapter8 MS-DOSANDYOUR PRINTER 81

Page 87
Image 87
Star Micronics SJ-48 manual MS-DOSANDYOUR Printer