Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2017
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.66 KB | None | 0 0
  1. Func _GetKeyPressed()
  2.     $KeyList = "01,02,04,05,06,08,09,0C,0D,10,11,12,13,14,1B,20,21,22,23,24,25,26,27,28,29,2A,2B,2C,2D,2E,30,31,32,33,34,35,36,37,38,39,"
  3.     $KeyList &= "41,42,43,44,45,46,47,48,49,4A,4B,4C,4D,4E,4F,50,51,52,53,54,55,56,57,58,59,5A,5B,5C,60,61,62,63,64,65,66,67,68,69,6A,6B,"
  4.     $KeyList &= "6C,6D,6E,6F,70,71,72,73,74,75,76,77,78,79,7A,7B,7C,7D,7E,7F,7G,7H,80H,81H,82H,83H,84H,85H,86H,87H,90,91,A0,A1,A2,A3,"
  5.     $KeyList &= "A4,A5,BA,BB,BC,BD,BE,BF,C0,DB,DC,DD"
  6.     $KeyList = StringSplit($KeyList, ",", 1)
  7.     For $i = 1 To $KeyList[0]
  8.         If _IsPressed($KeyList[$i]) = 1 Then
  9.             Return ($KeyList[$i])
  10.         EndIf
  11.     Next
  12.     Return("")
  13. EndFunc   ;==>_GetKeyPressed
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement