前回と前々回の記事タイトルと（ｒｙ

前回、
コメントでFCのゼル伝の画面移動みたいなのをするソースコードを書いてくれたかたのソースコードを
QRコード化してそれを読み込んで実行して、
それで少し遊んでたら
なんかゼル伝もどきみたいなの作りたくなってきて
攻撃の部分作ってみた

もしかしたら作ってるうちに飽きるかもねーｗ（

画像は適当
そのまま書こうとするとグチャグチャなので、
グチャグチャの原因となってるコメント化されたコードは省いて書く
因みに作りかけ。
武器発射して目標物がある方向に向かってる場合でも
目標物が動いてるようにしてみる予定

@RESET
CLEAR:CLS:ACLS
SPSET 0,0,8,0,0,0
SPSET 1,10,8,0,0,1
WAIT 60
@LOOP1
B=BUTTON()
IF B==1   THEN Y=Y-1
IF B==2   THEN Y=Y+1
IF Y==177 THEN Y=176
IF Y==-1  THEN Y=0
SPOFS 0,0,Y
IF B==16 THEN GOSUB @LAST:GOTO @RESET
IF IO==0 THEN YY=YY+1
IF IO==1 THEN YY=YY-1
IF YY==177 THEN IO=1
IF YY==0    THEN IO=0
SPOFS 1,239,YY
VSYNC 1
GOTO @LOOP1
@LAST
SPOFS 0,239,Y,60
@WAIT
IF SPCHK(0) THEN @WAIT
V=5
IF SPHITSP(0,1) THEN SPCLR 1:FOR I=248 TO 255:SPCHR 0,I:VSYNC V:NEXT:SPCLR 0
RETURN