Star Micronics SJ-48 manual MS-DOSANDYOUR Printer

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

2‘ 24–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