Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

2023/03/16 17:31:06

MixJuice GET URL : kidspod.club/mj/2192

カエル（文字化け修正&&R対応）

ABCsanさんのカエルが文字化けしていたので修正と、Rでもいい感じに動くようにしました。Sなどでも動きます。
僕はIchigoJamR以外を持っていないのでウェイトの量はなんとなくですが、実機を持っている人は変えてみてください

本家が修正され次第、こちらは削除します。

  • 1
  • 1

SOURCE CODE

1 VIDEO3:CLS:POKE#700,102,68,221,255,255,126,255,231:POKE#708,102,221,221,255,126,126,102,102
5 ?"カエル"
10 A=RND(8):IF[A]=0LET[A+8],-3:LET[A],-RND(3)
30 FORB=0TO7:LCB*2,10:?CHR$(0):LCB*2,[B]+10:?CHR$(0):LET[B],[B]+[B+8]:IF[B]>0LET[B],0:LET[B+8],0ELSELET[B+8],[B+8]+1
40 LCB*2,[B]+10:IF[B]=0?CHR$(224)ELSE?CHR$(225)
50 NEXT:IFVER()>14999WAIT3
51 GOTO10

COMMENT