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

2022/11/17 21:23:24

MixJuice GET URL : kidspod.club/mj/2145

川下り 改造

川下りを魔改造してみた

  • 1
  • 2
  • 1
  • 2

SOURCE CODE

15 CLS:LC12,10:?CHR$(182,220,184,192,222,216);"  HISCORE:";PEEK(#FFF):C=B
16 INPUT"HAYASA?",A
20 CLS:CLT:X=12
30 LCRND(31),23:?CHR$(244)
40 X=X-(BTN(28)*(X>0))+(BTN(29)*(X<30))
50 IFSCR(X,4)GOTO 70
60 LCX,5:?CHR$(237):WAITA:GOTO30
70B=TICK():B:IFB>C?"HISCORE!":POKE#FFF,B:WAIT180:GOTO15:ELSEWAIT180:GOTO15
SAVE0

COMMENT