次に2行きます。
まず@MAINの直前で、すべてのスプライトに当たり判定をセットします。
SPCOL 1
FOR I=11 TO 18
SPCOL I
NEXT
こういうときはFOR文が便利です。
SPCOLの設定は、SPSETすると消えてしまうので、IF BUT…のあとのSPSETは全部消します。
最後に、WAIT 1の前に当たりをチェックします。
H=SPHITSP(1)
IF H>1 THEN BEEP 7: SPANIM H,"XY",-30,-16,-16
コインを拾ったらどうなるかは、打ち込んでのお楽しみ(^^)