30行目で、弾が右端まで行ったかどうかの判定を行っているようですが、そのときに、弾フラグ？をリセットするだけではなく、弾を消す処理を入れる必要があります。 例えば、 IF SX>49 THEN F=0:SPHIDE 1 のような感じでしょうか。