[Example]
[Sample Program]
LPRINT CHR$ (&H1B) + "∗" ; |
|
|
LPRINT CHR$ (0) + CHR$ (20) + CHR$ (0) ; | IMG1 : |
|
GOSUB IMG1 | LPRINT | CHR$ (&HFF) ; |
LPRINT CHR$ (&HA) ; | FOR I=1 TO 18 | |
LPRINT CHR$ (&H1B) + "∗" ; | LPRINT CHR$ (&H85) ; | |
LPRINT CHR$ (1) + CHR$ (20) + CHR$ (0) ; | NEXT I |
|
GOSUB IMG1 | LPRINT | CHR$ (&HFF) ; |
LPRINT CHR$ (&HA) ; | RETURN |
|
LPRINT CHR$ (&H1B) + "∗" ; | IMG2 ; |
|
LPRINT CHR$ (32) + CHR$ (20) + CHR$ (0) ; | LPRINT CHR$ (&HFF) ; | |
GOSUB IMG2 | LPRINT | CHR$ (&HFF) ; |
LPRINT CHR$ (&HA) ; | LPRINT | CHR$ (&HFF) ; |
LPRINT CHR$ (&H1B) + "∗" ; | FOR I=1 TO 18 | |
LPRINT CHR$ (33) + CHR$ (20) + CHR$ (0) ; | LPRINTCHR$ (&H80) ; | |
GOSUB IMG2 | LPRINTCHR$ (&H00) ; | |
LPRINT CHR& (&HA) ; | LPRINTCHR$ (&H05) ; | |
END | NEXT I |
|
| LPRINT | CHR$ (&HFF) ; |
| LPRINT | CHR$ (&HFF) ; |
| LPRINT | CHR$ (&HFF) ; |
| RETURN |
|
[Print Results]
48 | CITIZEN |
