Full Keyboard Module

por **VictorBG4** Qua Set 05, 2012 8:44 pm

Full Keyboard Module
por Raizen884

Permite utilizar todas as teclas do teclado assim como chama-las pelos comandos utilizados por scripters:

Código:: - Input.trigger? - Input.press? - Input.repeat?

Código

Código:: #================================================================== # Full Keyboard Module # Autor: Raizen # Compatibilidade: RMVX, RMVXA, RMXP #================================================================== # Instruções: # Para inserir uma tecla basta olhar a tabela abaixo # e utilizar o comando de tecla dos scripts normalmente que são. # Esse é como um gatilho, ao apertar ele indica que foi apertado # uma vez, e só volta a retornar verdadeiro caso seja solto a tecla # e pressionado novamente # Input.trigger?(tecla) # Esse é o identico ao dos eventos, ele indica se a tecla está pressionada. # Input.press?(tecla) # Esse é o utilizado nas lojas e menus, ele indica verdadeiro no momento # que se pressiona, e indica falso até um certo tempo, depois volta a indicar # verdadeiro. # Input.repeat?(tecla) # Para utilizar é bem simples, basta olhar a tabela abaixo e colocar # um Key:: na frente, por exemplo # Input.trigger?(Key::F) => indica se foi pressionado a tecla F # Input.press?(Key::Ctrl) => indica se o Ctrl está pressionado # Input.repeat?(Key::K6) => indica se o numerador 6 foi pressionado # e fará a verificação de quanto tempo ele está pressionado. # Coloque esse código nas Condições dos eventos, 4ª aba das condições, Script: # Input.trigger?(Key::valor da tecla abaixo) ou # Input.press?(Key::valor da tecla abaixo) ou # Input.repeat?(Key::valor da tecla abaixo) #================================================================== module Key K0 = 0x30 #Tecla 0 K1 = 0x31 #Tecla 1 K2 = 0x32 #Tecla 2 K3 = 0x33 #Tecla 3 K4 = 0x34 #Tecla 4 K5 = 0x35 #Tecla 5 K6 = 0x36 #Tecla 6 K7 = 0x37 #Tecla 7 K8 = 0x38 #Tecla 8 K9 = 0x39 #Tecla 9 Ced = 0xBA # Tecla Ç A = 0x41 #Tecla A B = 0x42 #Tecla B C = 0x43 #Tecla C D = 0x44 #Tecla D E = 0x45 #Tecla E F = 0x46 #Tecla F G = 0x47 #Tecla G H = 0x48 #Tecla H I = 0x49 #Tecla I J = 0x4A #Tecla J K = 0x4B #Tecla K L = 0x4C #Tecla L M = 0x4D #Tecla M N = 0x4E #Tecla N O = 0x4F #Tecla O P = 0x50 #Tecla P Q = 0x51 #Tecla Q R = 0x52 #Tecla R S = 0x53 #Teclar S T = 0x54 #Tecla T U = 0x55 #Tecla U V = 0x56 #Tecla V W = 0x57 #Tecla W X = 0x58 #Tecla X Y = 0x59 #Tecla Y Z = 0x5A #Tecla Z Mouse1 = 0x01 #Botão esquerdo do mouse Mouse2 = 0x02 #Botão direito do mouse Cancel = 0x03 #Cancelar/interromper processamento Mousewheel = 0x04 #Botão do meio do mouse (em um mouse de três botões) Mouse3 = 0x05 #Windows 2000/XP: Botão X1 do mouse Mouse4 = 0x06 #Windows 2000/XP: Botão X2 do mouse Back = 0x08 #Tecla BACKSPACE Tab = 0x09 #Tecla TAB Clear = 0x0C #Tecla CLEAR Enter = 0x0D #Tecla ENTER Shift = 0x10 #Tecla SHIFT Ctrl = 0x11 #Tecla CTRL Alt = 0x12 #Tecla ALT Pause = 0x13 #Tecla PAUSE Caps = 0x14 #Tecla CAPS LOCK Esc = 0x1B #Tecla ESC Space = 0x20 #Tecla SPACEBAR (Espaço) Pageup = 0x21 #Tecla PAGE UP Pagedown = 0x22 #Tecla PAGE DOWN End = 0x23 #Tecla END Home = 0x24 #Tecla HOME Left = 0x25 #Tecla LEFT ARROW (Seta para a esquerda) Up = 0x26 #Tecla UP ARROW (Seta para cima) Right = 0x27 #Tecla RIGHT ARROW (Seta para a direita) Down = 0x28 #Tecla DOWN ARROW (Seta para baixo) Select = 0x29 #Tecla SELECT Print = 0x2A #Tecla PRINT Execute = 0x2B #Tecla EXECUTE Print = 0x2C #Tecla PRINT SCREEN Ins = 0x2D #Tecla INS Del = 0x2E #Tecla DEL Help = 0x2F #Tecla HELP Lw = 0x5B #Tecla Windows do lado esquerdo Lr = 0x5C #Tecla Windows do lado direito Apps = 0x5D #Menu de contexto Sleep = 0x5F #Tecla Sleep Num0 = 0x60 #Tecla 0 (T. numérico) Num1 = 0x61 #Tecla 1 (T. numérico) Num2 = 0x62 #Tecla 2 (T. numérico) Num3 = 0x63 #Tecla 3 (T. numérico) Num4 = 0x64 #Tecla 4 (T. numérico) Num5 = 0x65 #Tecla 5 (T. numérico) Num6 = 0x66 #Tecla 6 (T. numérico) Num7 = 0x67 #Tecla 7 (T. numérico) Num8 = 0x68 #Tecla 8 (T. numérico) Num9 = 0x69 #Tecla 9 (T. numérico) NumX = 0x6A #Tecla Multiplicar NumA = 0x6B #Tecla Adicionar NumS = 0x6C #Tecla Separador NumM = 0x6D #Tecla Subtrair Dec = 0x6E #Tecla Decimal Div = 0x6F #Tecla Dividir F1 = 0x70 #Tecla F1 F2 = 0x71 #Tecla F2 F3 = 0x72 #Tecla F3 F4 = 0x73 #Tecla F4 F5 = 0x74 #Tecla F5 F6 = 0x75 #Tecla F6 F7 = 0x76 #Tecla F7 F8 = 0x77 #Tecla F8 F9 = 0x78 #Tecla F9 F10 = 0x79 #Tecla F10 F11 = 0x7A #Tecla F11 F12 = 0x7B #Tecla F12 NUMLOCK = 0x90 #Tecla NUM LOCK SCROLL = 0x91 #Tecla SCROLL LOCK end module Input @trigger_keys = [] @index = [] GetKeyState = Win32API.new("user32","GetAsyncKeyState",'i','i') module_function def press(key) GetKeyState.call(key) != 0 end def trigger(key) unless GetKeyState.call(key) == 0 @trigger_keys.include?(key) ? (return false) : @trigger_keys.push(key) return true else @trigger_keys.delete(key) if @trigger_keys.include?(key) return false end end def repeat(key) unless GetKeyState.call(key) == 0 @trigger_keys.push(key) unless @trigger_keys.include?(key) index = @trigger_keys.index(key) @index[index] = 0 unless @index[index] @index[index] += 1 return true if @index[index] == 1 @index[index] >= 30 && @index[index] % 4 == 1 ? (return true) : (return false) else index = @trigger_keys.index(key) if @trigger_keys.include?(key) @index[index] = nil if index end end end class << Input alias raizen_trigger? trigger? alias raizen_repeat? repeat? alias raizen_press? press? def trigger?(key) key.is_a?(Integer) ? trigger(key) : raizen_trigger?(key) end def repeat?(key) key.is_a?(Integer) ? repeat(key) : raizen_repeat?(key) end def press?(key) key.is_a?(Integer) ? press(key) : raizen_press?(key) end end