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
^
To Next Page
Loading...
