C O N F I D E N T I A L
d1 d3 d5 d7 d9 d11 d13 d15 d17.......
MSB
LSB
MSB
LSB
d2 | d4 | d6 | d8 | d10 | d12 | d14 | d16 | d18 |
| Program Example |
| Print Sample |
m=16: | GOSUB bitimage9 ← |
|
|
m=17: | GOSUB bitimage9 ← |
| m=16 |
END |
|
| |
|
| m=17 | |
|
|
| |
bitimage9: |
|
| |
PRINT #1, CHR$(&H1B);"[";CHR$(m);CHR$(70);CHR$(0); |
|
| |
FOR i=1 TO 5 |
|
| |
PRINT #1, CHR$(0);CHR$(128);CHR$(1);CHR$(0);CHR$(2);CHR$(0);CHR$(4);CHR$(0); |
|
| |
PRINT #1, CHR$(8);CHR$(0);CHR$(16);CHR$(0);CHR$(32);CHR$(0);CHR$(64);CHR$(0); |
|
| |
PRINT #1, CHR$(128);CHR$(0);CHR$(64);CHR$(0);CHR$(32);CHR$(0);CHR$(16);CHR$(0); |
|
| |
PRINT #1, CHR$(8);CHR$(0);CHR$(4);CHR$(0);CHR$(2);CHR$(0);CHR$(1);CHR$(0); |
|
| |
NEXT i |
|
| |
PRINT #1, CHR$(&HA); |
|
| |
RETURN |
|
| |
|
|
|
|
| Ver. 1.0 p. 40 |