SHIROのIchigoJam日記

マイコン「IchigoJam」(イチゴジャム)の電子工作とプログラミングをメインに

3Dかわくだり

こちらも「かわくだり魔改造グランプリ」の応募作品。なんちゃって3D視点のかわくだりゲームです。
カーソルキーの左右で自キャラを動かして、流れてくる岩を避けてください。
岩に当たるとゲームオーバーとなり、画面左上に下った秒数が表示されて終了します。

プログラム

10 '*Kawakudari 3D
20 CLV:CLS:CLT:X=16:Y=22
30 LC 0,5:FOR I=0 TO 31:?CHR$(140);:NEXT
40 FOR R=0 TO 15
50 LC 15-R,R+6:?CHR$(134)
60 LC 16+R,R+6:?CHR$(137)
70 NEXT
80 IF X=[16] GOTO 190
90 X=X-BTN(28)+BTN(29)
100 LC X,Y:?"O";
110 [0]=RND(32)
120 COPY #821,#81F,-32
130 FOR R=1 TO 16
140 A=#9D0+R*31:B=R*2:S=[R]*B/32
150 POKE A,0:COPY A+1,A,B-1
160 POKE A+S,42
170 NEXT
180 GOTO 80
190 BEEP 30,30
200 LC X,Y:?"X";
210 LC 0,0:?TICK()/60

Web版はこちら。

Web版だと動きが遅いので、ぜひIchigoJam実機で遊んでみてください。
スタート時に川の左岸に岩が一列に並びますが、高速化のための仕様です(笑)