"> 1 UT - : 2 (Y>. ,<a fi, F
( .,c
d
g
n"u
,,,,:",\,, *,, I
L.:: i , _ Y !I?i,: (:,: 'j, , , .P! ': :, '
P _ 1 '"#i r> ",?
ly:
' n-fl
' T9, .! (\ -:, ' !>,
,
',i: b-G"
' k'2 1: :jL /1 I 1,: 1 J ,, l.'Jfw
I"I>@ : ; ,",>
~~~~~~
$fi
~~~~~~~~~~~ ___ .:,
' 'fi"W ~~~~~~~'~~~'
a nm
.
~,, -l.~".:_..
, *
s:' '?Y rrc a',: '?~I' FR,~~~l~lIIIWIIR~~~.~~,~~~~
Exemple 4 : Police téléchargée en mode LQ (le sélecteur DIP 12 doit être sur la position
ON)
1000
'-----
Set
control
codes
-----
3.010 NL$=CHR$(O)
'NUT, code
1020
E$=CHR$(27)
'ESC code
1030
DL$=E$+"&"+NL$
'Download
command
1040
SOS-CHRS(l.4)
'SO code
(lloubleswide
printing
by linc)
1050
'-----
Copy R O M Font
to
R A M -----
1060 WIDTH "lptl:"
255
1070
LPRINT
E$;
"xl";
1080
LPRINT
E$;
":";
NL$;
NL$
;
1090
'-----
~ownload
the
character
data
-----
1100
LPRINT DL$."@".
I
I
'Character
code
ASCII
64
3.110 LPRINT
CHR$(Ol;CHR$(36I;CHR$(O);
'36
Dots
1120
RESTORE
1130
FOR I=l
TO 108:READ
B$:GOSUU 158O:NEXT'Clharacter
data
1140
'-----
Print
the
download
character
-----
2150
ItPRINT E$;"wl";SO$;
1160 LPRINT
E$;"%l";
11'10 LPRINT
"@"
1180
LPRINT
E$;"B"
1190
ENU
1200
'-----
Character
data
-----
1210
DATA oooooooo,oooooooo,oooooooo
1220
DATA oooooooo,oooooooo,oooooooo
1230
DATA oooooooo,oooooo~o,oooooooo
1240
DATA 01111111,00000000,00000000
1250
DATA 0111111ï,10000000,00000000
1260
DATA 00000001,11000000,00000000
1270
DATA 00000001,11000000,00000000
3.280 DATA Olllllll,llllllll,lllllOOO
1290
DATA 01111111,11111111,11111100
1300
DATA 00000001,1111ï111,11111110
1.310 DATA 00000001,11111111,11111110
1320
DA'YA 01111111,11111111,11111100
1330
DATA 01111111,11111111,11111000
1340
DATA 00000001,11000000,00000000
1350
DATA 00000001,11000000,00000000
1360
DATA 01111111,10000000,00000000
1370
DATA 01111111,00000000,00000000
1380
fiAT'A OOOOOOOO,OOOOOOOO,OOOOOOOO
1390
DATA OOOOOOOO,OOOOOOOO,OOOOOOOO
1400
DATA OOOO@OOO,OOOOOOOO,OOOOOOOO
1410
DATA OOOOOOOO,OOOOOOOO,OOOOOOOO
1420
DATA OOO11111,1111iOOO,OOOOOOOO
1430
DATA 00111111,11111000,00000000
1440
DATA
ooïï11:1,lliïlooo,oooooooo
1450
DATA 01111111,11111000,00000000
1460
DATA 01111111,11111000,00000000
1470
DATA 01111111,23121000,00000000
1480
DATA 01111111,11111111,11111000
1490
DATA 01111111,11111111,11111100
1500
DATA 01.121311,11111111,11111110
1510 DATA 01111111,11111111,11111110
1520
DATA 01111111.,11211111,11111100
1530
DATA 00111111,11111111,11111000
1540
DATA OOOOOOOO,OOOOOOOO,OOOOOOOO
1550
DATA OOOOOOOO,OOOOOOOO,OOOOOOOO
62