5 'ヤヲヨケロ 10 CLS:S=0:Y=21:Z=1:L=10:X=2:I=2 15 POKE#700,8,8,8,8,73,42,28,8 16 INPUT"レヘ゛ルカ゛ヘンコウテ゛キマス(1~3)",Z:CLS 17 IFZ=0ORZ>3GOTO16 20 LCL,I:?CHR$(6);:?" ";:?CHR$(6);:I=I+1 30 IFI<21GOTO20 40 IFS%Y=0A=RND(5)+1:B=1 50 K=INKEY():CLK 60 LCX+L,20:?" " 70 IFK=28IFX>1X=X-1 80 IFK=29IFX<5X=X+1 90 LCX+L,20:?CHR$(5) 100 IFB-Z<21LCL+A,B-Z:PRINT" " 110 IFB<21LCL+A,B:?CHR$(#E0):B=B+Z 120 IFVPEEK(L+X,19)!=32GOTO150 130 LC1,1:?"スコア:";S/10 140 S=S+1:GOTO40 150 LCX+L,20:?"ケ゛ームオーハ゛スコア:";S/10;:?"ホ゜イント 160 LC26,3:?"イタイ!"
シンプルで良いゲームですね。スコアが増えていくと矢が速くなるとか矢が増えるとかの仕組みがあると、もっと面白くなりそうです!