FOR I=0 TO 4094
SPSET I,0
SPOFS I,RND(400-16),RND(240-16)
SPCOL I
NEXT
で出せる限り(4095個)のスプライトを出します
そのうちの1個(0番)に衝突したら消す場合
(ついでに、スティックでそのうちの1個を動かせる)
SPOFS 0 OUT X,Y
LOOP
STICK 0 OUT SX,SY
HIT=SPHITSP(0)
IF HIT>=0 THEN SPCLR HIT
INC X, SX
INC Y, SY
SPOFS 0, X, Y
VSYNC
ENDLOOP