Citizen Systems CBM-253 User Manual

Page 57

CBM-253 User’s Manual

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 &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 &H9F, &H06, &H01

DATA &H87, &HFE, &H0l

DATA &H80, &HFF, &HF9

DATA &H80, &H07, &HF9

DATA &HFF, &HFF, &HFF