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

2023/02/08 22:40:22

MixJuice GET URL : kidspod.club/mj/2181

ワンライン　UFO襲来

ロケットを操作してUFOを避けてください。
UFOは画面上部からななめに降りてきて、画面中ほどで垂直に降下します。
ロケットはだんだん昇っていきます。
操作は左右キーです。
1000点以上になるとちょっとした隠し要素が発現します。

  • 1
  • 1

SOURCE CODE

10 CLV:CLS:X=15:FORI=0TO1:S=S+1:POKE#920+RND(33),#F1:COPY#A3F,#A1E+S/30%2*2,-288:COPY#BFF,#BDF-S/1000,-448:X=(X-BTN(28)+BTN(29)+32)%32:LC0,23:?S;:LCX,22-S/100:I=SCR():?CHR$(#F0);:BEEPS%4+3:WAIT5:NEXT

COMMENT