Citizen CT-P29 Series, Справочник по командам

Страница: 168 / 428

- 167 -
[Sample Program]
LPRINT CHR$(&H1C);"&"; DATA &H00, &H00, &H00, &H00, &H00, &H00
GOSUB SETCHR DATA &H00, &H00, &H60, &H00, &H00, &HF0
LPRINT CHR$(&H77); CHR$(&H21); DATA &H00, &H01, &HF8, &H00, &H03, &HFC
LPRINT CHR$(&HA); DATA &H00, &H07, &HFE, &H00, &H0F, &HFF
LPRINT CHR$(&H1C);"."; DATA &H00, &H00, &HF0, &H00, &H00, &HF0
END DATA &H00, &H00, &HF0, &H00, &H00, &HF0
DATA &H00, &H00, &HF0, &H00, &H00, &HF0
SETCHR: DATA &H00, &H00, &HF0, &H00, &H00, &HF0
LPRINT CHR$(&H1C);"2"; DATA &H00, &H01, &HF0, &H1F, &HFF, &HF0
LPRINT CHR$(&H77); CHR$(&H21); DATA &H1F, &HFF, &HF0, &H1F, &HFF, &HE0
FOR I=1 TO 72 DATA &H1F, &HFF, &HC0, &H00, &H00, &H00
READ D DATA &H00, &H00,&H00, &H00, &H00, &H00
LPRINT CHR$(D);
NEXT I
RETURN
[Print Results]
Registered character