Citizen CBM1000 manual ESC % n, Gosub Setchr Data

Models: CBM1000

1 230
Download 230 pages 45.83 Kb
Page 80
Image 80

ESC % n

[Function]

Specifying/Canceling download character set

[Code]

<1B>H<25>H<n>

[Range]

0 n 255

[Outline]

Specifying/canceling download characters.

 

• Only the lowest bit (n0) is valid for n.

n0

0

1

Function

Canceling download character set

Specifying download character set

[Caution]

Download characters and download bit images cannot be

 

defined simultaneously.

 

[Default]

n = 0

 

[See Also]

ESC &

 

[Sample Program]

 

 

GOSUB SETCHR

DATA 6

 

LPRINT CHR$(&H1B) + “%” + CHR$(0) ;

DATA &HEF, &H80, &H00

 

LPRINT “@A” + CHR$(&HA) ;

DATA &H80, &H80, &H00

 

LPRINT CHR$(&H1B) + “%” + CHR$(1) ;

DATA &H80, &H80, &H00

 

LPRINT “@A” +CHR$(&HA) ;

DATA &H80, &H80, &H00

 

END

DATA &HFF, &HFF, &HFF

 

SETCHR:

DATA &HFF, &HFF, &HFF

 

LPRINT CHR$(&H1B) + “&” ;

DATA 12

 

LPRINT CHR$(3) + “@” + “A”;

DATA &HFF, &HFF, &HFF

 

FOR J=1 TO 2

DATA &H80, &H07, &HF9

 

READ REP

DATA &H80, &HFF, &HF9

 

LPRINT CHR$(REP) ;

DATA &H87, &HFE, &H01

 

FOR I=1 TO REP3

DATA &H9F, &H06, &H01

 

READ D

DATA &HF8, &H06, &H01

 

LPRINT CHR$(D)

DATA &HF8, &H06, &H01

 

NEXT I

DATA &H9F, &H06, &H01

 

NEXT J

DATA &H87, &HFE, &H01

 

RETURN

DATA &H80, &HFE, &HF9

 

 

DATA &H80, &H07, &HF9

 

 

DATA &HFF, &HFF, &HFF

[Print Results]

←⎯⎯ Internal Character Set ←⎯⎯ Download Character

— 62 —

Page 80
Image 80
Citizen CBM1000 manual ESC % n, Gosub Setchr Data