IF B AND #A && BF==FALSE THEN BX=X+16:BY=Y:BF=TRUE:BEEP 10 'ビーム発射 ENDIF IF BF==TRUE THEN BX=BX+1 'ビームの移動量 IF BX>399 THEN BX=-99:BF=FALSE '画面外の処理 SPOFS 1,BX,BY 'ビームのスプライトは管理番号1を使う ENDIF 13行目を上記の命令に置き換えれば自機の右側から画面の右端まで ビームが飛びます。 メインループの前にビームのスプライトの初期設定をして下さい。