’----撃沈 IF GEKICHIN(SP) THEN  SPVAR SP,0,1 ’処理フラグを1に  SPANIM SP,"XY+" ,-120,0,32 ,1 ’2秒で32ドット沈む  SPANIM SP,"C" ,-120,#BLACK ,1 ’2秒で黒にする ENDIF ’----爆発 IF SPVAR(SP,0)==1 && !SPANIM(SP) THEN ’撃沈アニメが終わってたら  SPVAR SP,0,2 ’処理フラグを2に  SPANIM SP,"I" ,~~爆発~~ ,1 ENDIF ’----消滅 IF SPVAR(SP,0)==2 && !SPANIM(SP) THEN ’爆発アニメが終わってたら  SPCLR(SP) ENDIF