Program post site for everyone
Recommendation IchigoLatte IchigoJam PanCake MyApp
2018/11/29 23:05:40
MixJuice GET URL : kidspod.club/mj/683
あべのぶひで
シンプルなスネークゲームです。何かキーを押すと、時計回りに移動方向を変えます。画面の端に行くと、反対側にワープします。一定間隔で自分の体の残骸が残ります。残骸や自分の体に当たるとゲームオーバーです。ワンラインでスネークゲームができるか、チャレンジしてみました。ぎりぎりでできましたが、スコアを表示する余裕はありませんでした。Dが自分の体の長さです。最大101まで増やせます。A=(A+1)%Dのところで、体の残骸が残るようにしています。体の長さが短くなるほど、残骸が多く残るようになります。A=(A+1)%(A<D)にすると、残骸が残らなくなります。
10 CLS:CLV:X=15:D=50:E=1:FORI=0TO33:K=INKEY()>0:E=(E+K)*(E+K<4):F=E%2:X=(X+F-E/3*2+31)%31:Y=(Y+!F-!E*2+22)%22:I=SCR(X,Y):A=(A+1)%D:[A]=X*23+Y:B=A+1:C=[B*(B<=D)]:LCX,Y:?"@":LCC/23,C%23:?" ":WAIT3:NEXT