PADY - [UI] |
||||||
… 上下スクロールキーの入力
PADY
変数=PADY
IF PADY THEN・・・
上下キーの入力状態を返します。
押されていない場合は0を返します。
下キーが押されている場合は1を返します。
上キーが押されている場合は-1を返します。
この関数はリアルタイムキー入力で値が返ります。
SYNC、PADA、PADB、PADC、PADX、PADONA、PADONB、PADONC、PADONX、PADONY
(サンプル 1)
REM 944BASIC '上下キーの入力状態表示(PADY)'
Y=0
*LOOP
SYNC
Y=Y+PADY
LOCATE 0,0
PRINT Y;
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
PADY - [UI] |