参考資料
§ 入力デバイス・モーションセンサー §
モーションセンサーの状態は、ACCELステートメントで取得する事が出来ます。猶、モーション機能を使用するには、前以てXON MOTIONを宣言して置く必要が有ります。亦、SPCOLステートメントとSPHITSP関数を使用する事でスプライト同士の衝突判定を簡単に行う事が出来ます。
下記のプログラムでは、スプライト（騎士）が、本機を傾ける事で上下左右に動きます。スプライト（姫）と接触すると、ハートを表示して終了します。
| 0000001 | OPTION STRICT |
| 0000002 | XON MOTION |
| 0000003 | ACLS |
| 0000004 | DIM X,Y,DX,DY,DZ |
| 0000005 | SPSET 0,660:SPCOL 0 ' 騎士 |
| 0000006 | SPSET 1,600:SPCOL 1:SPOFS 1,192,160 ' 姫 |
| 0000007 | WHILE TRUE |
| 0000008 | ACCEL OUT DX,DY,DZ |
| 0000009 | IF DX>0 THEN X=X+1 |
| 0000010 | IF DX<0 THEN X=X-1 |
| 0000011 | IF DY>0 THEN Y=Y+1 |
| 0000012 | IF DY<0 THEN Y=Y-1 |
| 0000013 | IF X<0 THEN X=0 |
| 0000014 | IF X>384 THEN X=384 |
| 0000015 | IF Y<0 THEN Y=0 |
| 0000016 | IF Y>224 THEN Y=224 |
| 0000017 | SPOFS 0,X,Y |
| 0000018 | IF SPHITSP(0)>=0 THEN BREAK |
| 0000019 | VSYNC 1 |
| 0000020 | WEND |
| 0000021 | SPSET 1,601:SPOFS 1,192,160 |
| 0000022 | SPSET 2,222:SPOFS 2,192,140 ' ハート |
| 0000023 | VSYNC 1 |
