IchigoJam キャラクターランダム出力

PanCake の STAMP1 や STAMP は

8×8 で出力する仕様になっています。

ちょうど IchigoJam のキャラクターと

同じ大きさになるので、

それなら〜と作ってみたのがこれです。

実行すると PanCake の画面で

IchigoJam BASIC のキャラクターが

ランダムに出力されます。

任意のキーを押して IchigoJam の画面へ戻ります。

PanCake ではスプライトに英数が存在していますが、

スプライトを使用しない場合の文字出力方法として

IchigoJam のキャラクターも使用できる事を

知ってもらえると、利便性があるかと思います。

10 'PanCake IchigoJam CHR Put
20 VIDEO 0
25 IF VER()>11000 UART 1
30 ?"PANCAKE VIDEO 01
40 ?"PANCAKE CLEAR 00
50 P=RND(256)*8
60 X=RND(72)
70 Y=RND(37)
80 C=RND(16)
90 ?"PANCAKE STAMP1 ";
100 ? HEX$(X,2);" ";
110 ? HEX$(Y,2);" ";
120 ? HEX$(C,2);" ";
130 FOR V=0 TO 7
140 ? HEX$(PEEK(P+V),2);
150 NEXT
160 ?
170 IF !INKEY() GOTO 50
180 ?"PANCAKE VIDEO 00
190 VIDEO 1

Kidspod; でプログラム参照

GitHub でプログラム参照 (再配布向け)

MixJuice ダウンロード ?"MJ GET kidspod.club/mj/620

MicJack ダウンロード ?"MJ GKP 620