GETKEYSTATE関数(キークリック):UWSC,

// キークリック、トグルキー情報
戻値 = GETKEYSTATE( キーコード )
引数
 キーコード: 状態を知りたいキーコード
戻値
 TRUE:クリックがあった、 FALSE:なし

 ※マウスクリック VK_RBUTTON (右)、VK_LBUTTON(左)、VK_MBUTTON(中)
 ※トグルキー状態 TGL_IME (IME)、TGL_NUMLOCK (NumLock)、TGL_CAPSLOCK(CapsLock)
          TGL_SCROLLLOCK (ScrollLock)、TGL_KANALOCK(カタカナ)

【例:サンプル】
// GETKEYSTATEによる Aキー、SHIFTキー、マウスクリックをチェック
while True
  wks = “”
  if GETKEYSTATE(VK_A) then wks = wks + “,A”
  if GETKEYSTATE(VK_SHIFT) then wks = wks + “,SHIFT”
  if GETKEYSTATE(VK_RBUTTON) then wks = wks + “,右クリック”
  if GETKEYSTATE(VK_LBUTTON) then wks = wks + “,左クリック”
  Fukidasi(Copy(wks,2,99))
  if wks <> “” then sleep(0.3)
  sleep(0.2)
wend

// SETHOTKEYによる キーチェック
for k = VK_A to VK_F
  SETHOTKEY(k, ,”fuckey”)     // AからFまでキー登録
next
SETHOTKEY( ,MOD_CONTROL, “fucx”)  // CTRLキー の登録
SETHOTKEY(VK_A, MOD_SHIFT, “fucx”) // Shift + A の登録
Sleep(100)
for k = VK_A to VK_F
  SETHOTKEY(k)          // 解除
next
// End
Procedure fuckey()
  print CHR(HOTKEY_VK) + “が押された”
Fend
Procedure fucx()
  if HOTKEY_MOD=MOD_CONTROL then print “CTRLが押された”
  if (HOTKEY_VK=VK_A) and (HOTKEY_MOD=MOD_SHIFT) then print “Shift + Aが押された”
Fend

このエントリーをはてなブックマークに追加

コメントを残す