ESC
•
•
(colon)
'MUm'
ESC:
(colon)
(O}D -
ROM CG set copy
Wm4-i1Mii
CHR$(27);": ";CHR$(O);CHR$(O);CHR$(O);
biiimlMI
Copies ROM CG set.
When this code is input, fonts in the ROM CG (Character
Generator) set are copied into the Download CG set.
By inputting this code, the ASCII characters in the ROM CG may be
output while in the Download character mode. In this case, it is not
necessary to input ESC
%
0 and ESC
%
1 to select the CG.
In other words, when you want to use only a portion of the ROM CG
for your own Download characters to create your own character code
table, this code is convenient.
'itUUm
10 'Copy from ROM CG to Download CG
20 LPRINT CHR$ (27) ;
/I: /I;
CHR$
(m ;
CHR$ (0) ; CHR$
«(2)
;
30
40 'CG pattern definition
50 LPRINT CHR$ (27) ;
"~(";
CHR$ (0) ;
"##/1;
60 LPRINT CHR$(139);
70 LPRINT CHR$(38);CHR$(9);CHRS(64);CHR$(9);
80 LPRINT CHR$(240);CHR$(9);CHR$(64);CHR$(9);
90 LPRINT CHRS(38);CHR$(0);CHR$(0);
100
110 LF'RINT CHRS (27) ;
/1%/1;
CHRS
(1) ;
CHR$ (0) ;
120 FOR 1=33 TO 47
130 LPRINT CHRS(I);
140 NEXT
150 LPRINT CHRS (27) ;
/I~~";
CHRS
(0) ;
CHRS
«(2)
;
160 END
! /li!i$%8( , ( )
*+, -. /
3-78
l.
I'
\
I
1.