Citizen CBM-253, Руководство пользователя

Страница: 57 / 122

CBM-253 User’s Manual
45
CITIZEN
[Function] Specifies or releases the downloading character set.
•
Only the lowest bit of n will be valid.
When n = <*******1>B, the downloading character set is specified.
When n = <*******0>B, the downloading character set is released.
(Specifies the internal character set)
[Items requiring caution]
It will not be possible to define downloading characters and downloading bit images at
the same time.
[Initial value] n = 0
[Reference] ESC &
[Program example]
GOSUB SETCHR
LPRINT CHR$(&H1B) + "%" + CHR$ (0) ;
LPRINT "@A" + CHR$ (&HA) ;
LPRINT CHR$ (&H1B) + "%" + CHR$ (1) ;
LPRINT "@A" + CHR$(&HA) ;
END
SETCHR :
LPRINT CHR$ (&H1B) + "&" ;
LPRINT CHR$ (3) + "@" + "A" ;
FOR J=1 TO 2
READ REP
LPRINT CHR$ (REP) ;
FOR I=1 TO REP*3
READ D
LPRINTCHR$ (D) ;
NEXT I
NEXT J
RETURN
DATA 6
DATA &HFF, &H80, &H00
DATA &H80, &H80, &H00
DATA &H80. &H80, &H00
DATA &H80. &H80, &H00
DATA &HFF, &HFF, &HFF
DATA &HFF, &HFF, &HFF
DATA 12
DATA &HFF, &HFF, &HFF
DATA &H80, &H07, &HF9
DATA &H80, &HFF, &HF9
DATA &H87, &HFE, &H01
DATA &H9F, &H06, &H0l
DATA &HF8. &H06, &H01
DATA &HF8. &H06, &H01
DATA &H9F, &H06, &H01
DATA &H87, &HFE, &H0l
DATA &H80, &HFF, &HF9
DATA &H80, &H07, &HF9
DATA &HFF, &HFF, &HFF