Star Micronics XB-2425, XB-2420 user manual Sampleprogram, 120

I

Whendefdng characters,thenumberof printedcolumns(ml), andthesum of side spacesand the characterwidth (mO+ ml + m2) cannotexceedthe value shownbelow.

Charactermode	ml	mO+ ml+ m2
Draft charactem	9	12
LQ picacharacters	31	36
LQ elitecharactem	27	30
LQ semi-condensed	19	24
LQ proportional	37	42
Draft super/subscript	7	12
LQ super/subscript	19	36
LQ prop. superlsubscript	37	42

Sampleprogram

Todemonstratehowtousethedownloadcharacters,let’suse the’’telephone” characterand the otheruser-definedcharactm to print a smallgraph.This programwilldo just that:

1000	WIDTH “LPTI : “ ,255
1010	LPRINT CHR$(27) ; “X1“ ;					o) ;
1020	LPRINT	CHR$(27)		; “&” ; CHR$
1030	LPRINT	CHR$(60) :CHR$(61 )
1040	FOR N=60		TO 61
1050	READ LS		:LPRINT	CHR$(LS)
1060	READ CW : LPRINT			CHR$(CW)
1070	READ RS		:LPRINT	CHR$(RS)
1080	FOR M=1 TO CW*3
1090	READ MM
1100	LPR~NT CHR$(MM);
1110	NEXT M
1120	NEXT N					( 11 ) ; CHR:$( o )
1130	LPRINT CHR$(27) ; “D” : CHR$
1140	LPRINT	CHR$(27)		; “k” ;CHR$		(4) :
1150	LPRINT	CHR$(27)		; “h” ;CHR$		( 1) ;
1160	LPRINT	“	DIFFUSION		RANGES OF“
1170	LPRINT	“	CARS & TELEPHONES”
1180	LPRINT CHR$(27) ; “h” : CHR$					(0)
1190	LPRINT	CHR$(27)		; “k” ;CHR$		(0) ;
1200	LPRINT	CHR$(27)		; “%” :CHR$		( 1) ;
1210	LPRINT	“USA” ;CHR$ (9)			:	: LPR I NT CHR$		60)	;
1220	FOR 1=0		TO 681	STEP	25
1230	I,PRINT
1240	LPRINT CHR$(9) ;					:LPRINT	CHR$	61)	:
1250	FOR 1=0		TO 781	STEP	25
1260	LPR INT
1270	LPRINT	“GERMANY’’: CHR$[ 9):
1280	FOR 1=0		TO 412	STEP	25	:LPRINT	CHR$	(60):
1290	LPR I NT
1300	LPRINT CHR$(9) :					:LPRINT	CHR$	(61):
1310	FOR 1=0		TO 488	STEP	25
1320	LPRINT

:NEXT I

:NEXT I

:NEXT I

:NEXT I

120