Non ho ancora provato, ma lo lascio lo stesso così mi porto avanti ^^
#==================================================================
# 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
