済みません、81行目の条件を間違えてしまいました。 IF SP!=FALSE THEN ~をIF SP!=-1 THEN ~に変更して下さい。 81行目と82行目を入れ替えて下さい。 変数SPに衝突判定の結果を取得してその結果が-1で無い場合に SPCOLOR関数でSPの表示色を取得します。