PADX - [UI] |
||||||
… 左右スクロールキーの入力
PADX
変数=PADX
IF PADX THEN・・・
左右キーの入力状態を返します。
押されていない場合は0を返します。
右キーが押されている場合は1を返します。
左キーが押されている場合は-1を返します。
この関数はリアルタイムキー入力で値が返ります。
SYNC、PADA、PADB、PADC、PADY、PADONA、PADONB、PADONC、PADONX、PADONY
(サンプル 1)
REM 944BASIC '左右キーの入力状態表示(PADX)'
X=0
*LOOP
SYNC
X=X+PADX
LOCATE 0,0
PRINT X;
PRINT ' '
GOTO *LOOP
(サンプル 2)
REM 944BASIC '方向キーの制御'
X=14:Y=6
*LOOP SYNC
LOCATE X,Y-1:PRINT '↑'
LOCATE X-2,Y:PRINT '← →'
LOCATE X,Y+1:PRINT '↓'
LOCATE X,Y:PRINT '◎'
IF PADX THEN LOCATE X+PADX*2,Y:PRINT '◎': LOCATE X,Y: PRINT ' '
IF PADY THEN LOCATE X,Y+PADY:PRINT '◎': LOCATE X,Y: PRINT ' '
WAIT 1
GOTO *LOOP
PADX - [UI] |