参考資料
§ 入力デバイス・十字ボタン §
十字ボタンの押し下げ状態は、BUTTON関数で取得する事が出来ます。亦、SPCOLステートメントとSPHITSP関数を使用する事でスプライト同士の衝突判定を簡単に行う事が出来ます。
下記のプログラムでは、スプライト（騎士）が、
ボタンで上下左右に動きます。スプライト（姫）と接触すると、ハートを表示して終了します。
| 0000001 | OPTION STRICT |
| 0000002 | ACLS |
| 0000003 | DIM X,Y,B |
| 0000004 | SPSET 0,660:SPCOL 0 ' 騎士 |
| 0000005 | SPSET 1,600:SPCOL 1:SPOFS 1,192,160 ' 姫 |
| 0000006 | WHILE TRUE |
| 0000007 | B=BUTTON(0) |
| 0000008 | IF B AND 4 THEN X=X-1 |
| 0000009 | IF B AND 8 THEN X=X+1 |
| 0000010 | IF B AND 1 THEN Y=Y-1 |
| 0000011 | IF B AND 2 THEN Y=Y+1 |
| 0000012 | SPOFS 0,X,Y |
| 0000013 | IF SPHITSP(0)>=0 THEN BREAK |
| 0000014 | VSYNC 1 |
| 0000015 | WEND |
| 0000016 | SPSET 1,601:SPOFS 1,192,160 |
| 0000017 | SPSET 2,222:SPOFS 2,192,140 ' ハート |
| 0000018 | VSYNC 1 |
