Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Func _GetKeyPressed()
- $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,"
- $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,"
- $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,"
- $KeyList &= "A4,A5,BA,BB,BC,BD,BE,BF,C0,DB,DC,DD"
- $KeyList = StringSplit($KeyList, ",", 1)
- For $i = 1 To $KeyList[0]
- If _IsPressed($KeyList[$i]) = 1 Then
- Return ($KeyList[$i])
- EndIf
- Next
- Return("")
- EndFunc ;==>_GetKeyPressed
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement