自キャラに当たりをつけるSPCOLは、きゃらせっていの最後に SPCOL 0,1 をつけ加えます。 そのうえで、ソードあたりのあとの62行のENDIFの前から、 ELSE HIT=SPHITSP(0) IF HIT>1 THEN '自キャラやられ演出 SPANIMで回るとかしぼむとか？ 好きなように BREAK ' WHILEループから抜けてプログラムが終わる ENDIF と入れると良いと思います。