Epson LX-810

User-defined Characters ^
Run the program to see the printout below:
9 9 9 9 9
trm
9 9 9 9 9
100 LPRINT CHR$(2T);"x";CHR$(l) ;
110 LPRINT CHR$(27) ;CHR$(0)
120 LPRINT CHR$(0);CHR$(12);CHR$(0); ^
130 FOR 1=1 TO 36
lUO READ D ^
150 LPRINT CHR$(D) ; ^
l60 NEXT I
170 LPRINT
180 LPRINT CHR$(27);"^";CHR$(l) ;
190 LPRINT
200 LPRINT CHR$(27);"^";CHR$(0) ; ^
210 LPRINT
220 END
230 DATA U,0,0,8,0,0,16,0,0,32,0,0 ^
2U0 DATA 6U,0,0,255,255,192,6U,0,0,32,0,0
250 DATA 16,0,0,8,0,0,U,0,0,0,0,0
4-30 Software and Graphics ^