*Complete Keyboard Input

[Neji]

Complete Keyboard Input

Descrizione

Questo e' uno script che vi permettera' di utilizzare tutti i tasti della tastiera e non solo quelli predefiniti di Rpg Maker XP.

Autore

Cybersam

Allegati

Inserite qui il testo

Istruzioni per l'uso

Dovete creare una nuova classe SOPRA A TUTTE, chiamandola come volete e incollarci questo:

 

 

#====================================================
#
# Keyboard Script v1									   created by: cybersam
#
#====================================================
#
# hi guys.... it me again... ^-^
#
# now... this script is for more keys to press...
# anyone you like...
#
# i'll list here some of the buttons...
# on you're keyboard....
# not all of them of course...
# it would take to much time... ^-^
#
# you'll see that i prepared a mouse button handle already....
# but it only the buttons are recognized...
# after this i'll work on the mouse itself... so it can be displayed... ^-^
#
# i marked the change in the script
#
#====================================================
#=begin
class Input_keyboard
 RMouse_BUTTON_L = 0x01		# left mouse button
 RMouse_BUTTON_R = 0x02		# right mouse button
 RMouse_BUTTON_M = 0x04		# middle mouse button
 RMouse_BUTTON_5 = 0x05		# 4th mouse button # only tested with win2k with a logitech mouse (MX900)
 RMouse_BUTTON_6 = 0x06		# 5th mouse button # only tested with win2k with a logitech mouse (MX900)

 R_Key_BACK	  = 0x08		# BACKSPACE key
 R_Key_TAB	   = 0x09		# TAB key
 R_Key_RETURN	= 0x0D		# ENTER key
 R_Key_SHIFT	 = 0x10		# SHIFT key
 R_Key_PAUSE	 = 0x13		# PAUSE key
 R_Key_CAPITAL   = 0x14		# CAPS LOCK key
 R_Key_ESCAPE	= 0x1B		# ESC key
 R_Key_SPACE	 = 0x20		# SPACEBAR
 R_Key_PRIOR	 = 0x21		# PAGE UP key
 R_Key_NEXT	  = 0x22		# PAGE DOWN key
 R_Key_END	   = 0x23		# END key
 R_Key_HOME	  = 0x24		# HOME key
 R_Key_LEFT	  = 0x25		# LEFT ARROW key
 R_Key_UP		= 0x26		# UP ARROW key
 R_Key_RIGHT	 = 0x27		# RIGHT ARROW key
 R_Key_DOWN	  = 0x28		# DOWN ARROW key
 R_Key_SELECT	= 0x29		# SELECT key
 R_Key_PRINT	 = 0x2A		# PRINT key
 R_Key_SNAPSHOT  = 0x2C		# PRINT SCREEN key
 R_Key_INSERT	= 0x2D		# INS key
 R_Key_DELETE	= 0x2E		# DEL key
 
 R_Key_0		 = 0x30		# 0 key
 R_Key_1		 = 0x31		# 1 key
 R_Key_2		 = 0x32		# 2 key
 R_Key_3		 = 0x33		# 3 key
 R_Key_4		 = 0x34		# 4 key
 R_Key_5		 = 0x35		# 5 key
 R_Key_6		 = 0x36		# 6 key
 R_Key_7		 = 0x37		# 7 key
 R_Key_8		 = 0x38		# 8 key
 R_Key_9		 = 0x39		# 9 key

 R_Key_A		 = 0x41		# A key
 R_Key_B		 = 0x42		# B key
 R_Key_C		 = 0x43		# C key
 R_Key_D		 = 0x44		# D key
 R_Key_E		 = 0x45		# E key
 R_Key_F		 = 0x46		# F key
 R_Key_G		 = 0x47		# G key
 R_Key_H		 = 0x48		# H key
 R_Key_I		 = 0x49		# I key
 R_Key_J		 = 0x4A		# J key
 R_Key_K		 = 0x4B		# K key
 R_Key_L		 = 0x4C		# L key
 R_Key_M		 = 0x4D		# M key
 R_Key_N		 = 0x4E		# N key
 R_Key_O		 = 0x4F		# O key
 R_Key_P		 = 0x50		# P key
 R_Key_Q		 = 0x51		# Q key
 R_Key_R		 = 0x52		# R key
 R_Key_S		 = 0x53		# S key
 R_Key_T		 = 0x54		# T key
 R_Key_U		 = 0x55		# U key
 R_Key_V		 = 0x56		# V key
 R_Key_W		 = 0x57		# W key
 R_Key_X		 = 0x58		# X key
 R_Key_Y		 = 0x59		# Y key
 R_Key_Z		 = 0x5A		# Z key

 R_Key_LWIN	 = 0x5B		 # Left Windows key (Microsoft Natural keyboard)
 R_Key_RWIN	  = 0x5C		# Right Windows key (Natural keyboard)
 R_Key_APPS	  = 0x5D		# Applications key (Natural keyboard)

 R_Key_NUMPAD0  = 0x60		 # Numeric keypad 0 key
 R_Key_NUMPAD1   = 0x61		# Numeric keypad 1 key
 R_Key_NUMPAD2   = 0x62		# Numeric keypad 2 key
 R_Key_NUMPAD3   = 0x63		# Numeric keypad 3 key
 R_Key_NUMPAD4   = 0x64		# Numeric keypad 4 key
 R_Key_NUMPAD5   = 0x65		# Numeric keypad 5 key
 R_Key_NUMPAD6   = 0x66		# Numeric keypad 6 key
 R_Key_NUMPAD7   = 0x67		# Numeric keypad 7 key
 R_Key_NUMPAD8   = 0x68		# Numeric keypad 8 key
 R_Key_NUMPAD9   = 0x69		# Numeric keypad 9 key
 R_Key_MULTIPLY  = 0x6A		# Multiply key (*)
 R_Key_ADD	   = 0x6B		# Add key (+)
 R_Key_SEPARATOR = 0x6C		# Separator key
 R_Key_SUBTRACT  = 0x6D		# Subtract key (-)
 R_Key_DECIMAL   = 0x6E		# Decimal key
 R_Key_DIVIDE	= 0x6F		# Divide key (/)

 R_Key_F1		= 0x70		# F1 key
 R_Key_F2		= 0x71		# F2 key
 R_Key_F3		= 0x72		# F3 key
 R_Key_F4		= 0x73		# F4 key
 R_Key_F5		= 0x74		# F5 key
 R_Key_F6		= 0x75		# F6 key
 R_Key_F7		= 0x76		# F7 key
 R_Key_F8		= 0x77		# F8 key
 R_Key_F9		= 0x78		# F9 key
 R_Key_F10	   = 0x79		# F10 key
 R_Key_F11	   = 0x7A		# F11 key
 R_Key_F12	   = 0x7B		# F12 key

 R_Key_NUMLOCK   = 0x90		# NUM LOCK key
 R_Key_SCROLL	= 0x91		# SCROLL LOCK key

 R_Key_LSHIFT   = 0xA0		# Left SHIFT key
 R_Key_RSHIFT   = 0xA1		# Right SHIFT key
 R_Key_LCONTROL  = 0xA2		# Left CONTROL key
 R_Key_RCONTROL  = 0xA3		# Right CONTROL key
 R_Key_L_ALT	 = 0xA4		# Left ALT key
 R_Key_R_ALT	 = 0xA5		# Right ALT key
 
 
 
 
 GetAsyncKeyState = Win32API.new("user32","GetAsyncKeyState",['i'],'i')

 def keyboard(rkey)
  GetAsyncKeyState.call(rkey) & 0x01 == 1  # key 0
 end
 
end 

 

 

Per far funzionare questo script dovete usare un IF all'interno del vostro script.
Per esempio vediamo come visualizzare il messaggio "W l'amiga" quando viene premuto il tasto "A"

STEP 1:

La classe dove vorrai usare questo script deve essere una classe eridante da Keyboard_Input, come nell'esempio:

class Scene_Map < Keyboard_Input

Ora le funzioni dello script Keyboard_Input sono accessibili dalla classe Scene_Map

STEP 2:

Suppongo che tutti sappiano cosa sia un IF(in caso contrario vi consiglio di leggervi qualche guida).
Comunque va usato in questo modo nello script:

if keyboard(R_Key_A)
print "W l'amiga"
end

L'if deve essere messo nella def update, visto che e' richiamata ad ogni frame ^^

R_Key_A e' la costante che indica il tasto "A". Trovate la lista completa all'interno dello script che ho postato. ^^

Se avete ancora qualche domanda chiedete pure :chirol_iei2:

Edited May 3, 2013 by Apo
code aggiornato

[Gabriel]

Accidenti quati tasti :nn:

A chi serviranno mai tutti quanti?

A me bastano e avanzano quelli di rpgmaker,ben 8...

Comunque l'ho provato e funziona :ayasi:

[havana24]

Sono piu' che utili se avete un battle system in tempo reale con Hotkeys (o tasti veloci) per ogni abilità :D

Cmq buona spiegazione neji.

L'unica cosa che mi verrebbe da chiedere é: ma le funzioni trigger, press ecc. con questo 'modulo' come si fanno?

[Neji]

non si usa il trigger Input bensi'

if keyboard(tasto)
...
end

 

^^

[Lord Bel]

Accidenti quati tasti :nn:

A chi serviranno mai tutti quanti?

A me, per esempio.

La casella di testo "Inserisci il tuo nome"... o fai una griglia con tutte le lettere, o semplicemente le fai digitare all'utente con questo script.

I Cheat/Debug che si attivano dopo una rapida sequenza di lettere alla GTA, come "NOMONSTERSPLEASE"...

E un'altra marea di esempi che ora non mi vengono in mente.

 

Comunque, anche se l'avevo già, ribadisco che è un ottimo script, ormai un Must nei miei progetti :°)

[EsMauro86]

wow fantastico :chirol_lovely:

[Alato]

Aggiunto all'Elenco Script e applicato il Template.

[nihil-omen]

ehm e se io volessi piazzare una "condizione SE" simile a quelle degli eventi e funzioni tali e quali a quelle degli eventi? (o semplicemente attivare un evento comune?)

[Neji]

questo e' uno script con il quale puoi interagire solo da script, dato che devi far ereditare la classe da questa.

Detta in poche parole: Devi per forza usare un IF nello script.

[Dark D]

uff...a me nn funziona...

[Dark D]

dov'è che lo metto sto cacchio di IF?

[marigno]

Dove ti da errore?

[agostino]

Sono riuscito a risolvere questo primo errore inserendo nella classe Scene_Map la riga

class Scene_Map<Keyboard_Input

Ma ora ho un altro errore

Errore di script 'OPZIONI' sulla linea 90 del tipo 'TypeError'

 

No implicit conversion from nil to integer

Edited May 3, 2013 by Apo

[seingh]

come funziona questo script???

non parte

[Guardian of Irael]

Nel primo post trovi la spiegazione su come farlo funzionare, cerca di essere più specifico; magari posta la parte di codice con la if che devi creare te per vedere se ci sono errori.

^ ^

[seingh]

Nel primo post trovi la spiegazione su come farlo funzionare, cerca di essere più specifico; magari posta la parte di codice con la if che devi creare te per vedere se ci sono errori.

^ ^

non ho capito dove lo devo mettere nel Scene_map xke mi segna un errore:

(se lo metto in un evento parallelo)

http://img146.imageshack.us/img146/4430/errore1.png

(se lo metto nello scene_map)

http://img40.imageshack.us/img40/5356/errore2.png

[Guardian of Irael]

Lo scene_map va lasciato dove è, non devi spostarlo; se vuoi che funzioni da scene map, se non ho capito male, devi cambiare la riga

class Scene_Map

con

class Scene_Map < Keyboard_Input

 

 

^ ^

Edited May 3, 2013 by Apo

[seingh]

Lo scene_map va lasciato dove è, non devi spostarlo; se vuoi che funzioni da scene map, se non ho capito male, devi cambiare la riga

class Scene_Map 

 

con

 

class Scene_Map < Keyboard_Input 

 

^ ^

questo l'ho fatto xD mi sono spiegato male xD ma non funziona xD adesso ti allego lo scene_map

 

 

#==============================================================================
# ** Scene_Map
#------------------------------------------------------------------------------
# This class performs map screen processing.
#==============================================================================

class Scene_Map < Keyboard_Input
#--------------------------------------------------------------------------
# * Main Processing
#--------------------------------------------------------------------------
def main
# Make sprite set
@spriteset = Spriteset_Map.new
# Make message window
@message_window = Window_Message.new
# Transition run
Graphics.transition
# Main loop
loop do
# Update game screen
Graphics.update
# Update input information
Input.update
# Frame update
update
# Abort loop if screen is changed
if $scene != self
break
end
end
# Prepare for transition
Graphics.freeze
# Dispose of sprite set
@spriteset.dispose
# Dispose of message window
@message_window.dispose
# If switching to title screen
if $scene.is_a?(Scene_Title)
# Fade out screen
Graphics.transition
Graphics.freeze
end
end

#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
def update
# Loop
loop do
# Update map, interpreter, and player order
# (this update order is important for when conditions are fulfilled
# to run any event, and the player isn't provided the opportunity to
# move in an instant)
$game_map.update
$game_system.map_interpreter.update
$game_player.update
# Update system (timer), screen
$game_system.update
$game_screen.update
# Abort loop if player isn't place moving
unless $game_temp.player_transferring
break
end
# Run place move
transfer_player
# Abort loop if transition processing
if $game_temp.transition_processing
break
end
end
# Update sprite set
@spriteset.update
# Update message window
@message_window.update
# If game over
if $game_temp.gameover
# Switch to game over screen
$scene = Scene_Gameover.new
return
end
# If returning to title screen
if $game_temp.to_title
# Change to title screen
$scene = Scene_Title.new
return
end
# If transition processing
if $game_temp.transition_processing
# Clear transition processing flag
$game_temp.transition_processing = false
# Execute transition
if $game_temp.transition_name == ""
Graphics.transition(20)
else
Graphics.transition(40, "Graphics/Transitions/" +
$game_temp.transition_name)
end
end
# If showing message window
if $game_temp.message_window_showing
return
end
# If encounter list isn't empty, and encounter count is 0
if $game_player.encounter_count == 0 and $game_map.encounter_list != []
# If event is running or encounter is not forbidden
unless $game_system.map_interpreter.running? or
$game_system.encounter_disabled
# Confirm troop
n = rand($game_map.encounter_list.size)
troop_id = $game_map.encounter_list[n]
# If troop is valid
if $data_troops[troop_id] != nil
# Set battle calling flag
$game_temp.battle_calling = true
$game_temp.battle_troop_id = troop_id
$game_temp.battle_can_escape = true
$game_temp.battle_can_lose = false
$game_temp.battle_proc = nil
end
end
end
# If B button was pressed
if Input.trigger?(Input::B)
# If event is running, or menu is not forbidden
unless $game_system.map_interpreter.running? or
$game_system.menu_disabled
# Set menu calling flag or beep flag
$game_temp.menu_calling = true
$game_temp.menu_beep = true
end
end
# If debug mode is ON and F9 key was pressed
if $DEBUG and Input.press?(Input::F9)
# Set debug calling flag
$game_temp.debug_calling = true
end
# If player is not moving
unless $game_player.moving?
# Run calling of each screen
if $game_temp.battle_calling
call_battle
elsif $game_temp.shop_calling
call_shop
elsif $game_temp.name_calling
call_name
elsif $game_temp.menu_calling
call_menu
elsif $game_temp.save_calling
call_save
elsif $game_temp.debug_calling
call_debug
end
end
end
#--------------------------------------------------------------------------
# * Battle Call
#--------------------------------------------------------------------------
def call_battle
# Clear battle calling flag
$game_temp.battle_calling = false
# Clear menu calling flag
$game_temp.menu_calling = false
$game_temp.menu_beep = false
# Make encounter count
$game_player.make_encounter_count
# Memorize map BGM and stop BGM
$game_temp.map_bgm = $game_system.playing_bgm
$game_system.bgm_stop
# Play battle start SE
$game_system.se_play($data_system.battle_start_se)
# Play battle BGM
$game_system.bgm_play($game_system.battle_bgm)
# Straighten player position
$game_player.straighten
# Switch to battle screen
$scene = Scene_Battle.new
end
#--------------------------------------------------------------------------
# * Shop Call
#--------------------------------------------------------------------------
def call_shop
# Clear shop call flag
$game_temp.shop_calling = false
# Straighten player position
$game_player.straighten
# Switch to shop screen
$scene = Scene_Shop.new
end
#--------------------------------------------------------------------------
# * Name Input Call
#--------------------------------------------------------------------------
def call_name
# Clear name input call flag
$game_temp.name_calling = false
# Straighten player position
$game_player.straighten
# Switch to name input screen
$scene = Scene_Name.new
end
#--------------------------------------------------------------------------
# * Menu Call
#--------------------------------------------------------------------------
def call_menu
# Clear menu call flag
$game_temp.menu_calling = false
# If menu beep flag is set
if $game_temp.menu_beep
# Play decision SE
$game_system.se_play($data_system.decision_se)
# Clear menu beep flag
$game_temp.menu_beep = false
end
# Straighten player position
$game_player.straighten
# Switch to menu screen
$scene = Scene_Menu.new
end
#--------------------------------------------------------------------------
# * Save Call
#--------------------------------------------------------------------------
def call_save
# Straighten player position
$game_player.straighten
# Switch to save screen
$scene = Scene_Save.new
end
#--------------------------------------------------------------------------
# * Debug Call
#--------------------------------------------------------------------------
def call_debug
# Clear debug call flag
$game_temp.debug_calling = false
# Play decision SE
$game_system.se_play($data_system.decision_se)
# Straighten player position
$game_player.straighten
# Switch to debug screen
$scene = Scene_Debug.new
end
#--------------------------------------------------------------------------
# * Player Place Move
#--------------------------------------------------------------------------
def transfer_player
# Clear player place move call flag
$game_temp.player_transferring = false
# If move destination is different than current map
if $game_map.map_id != $game_temp.player_new_map_id
# Set up a new map
$game_map.setup($game_temp.player_new_map_id)
end
# Set up player position
$game_player.moveto($game_temp.player_new_x, $game_temp.player_new_y)
# Set player direction
case $game_temp.player_new_direction
when 2 # down
$game_player.turn_down
when 4 # left
$game_player.turn_left
when 6 # right
$game_player.turn_right
when 8 # up
$game_player.turn_up
end
# Straighten player position
$game_player.straighten
# Update map (run parallel process event)
$game_map.update
# Remake sprite set
@spriteset.dispose
@spriteset = Spriteset_Map.new
# If processing transition
if $game_temp.transition_processing
# Clear transition processing flag
$game_temp.transition_processing = false
# Execute transition
Graphics.transition(20)
end
# Run automatic change for BGM and BGS set on the map
$game_map.autoplay
# Frame reset
Graphics.frame_reset
# Update input information
Input.update
end
def update_demo
# Bボタン または C ボタンが押された場合
if Input.trigger?(Input::B) or Input.trigger?(Input::C)
$game_system.running_demo = false
$scene = Scene_Title.new
end
end
end
if keyboard(R_Key_A)
print "prova"
end 

 

 

spero che mi sai aiutare ^^

Edited May 3, 2013 by Apo

[Guardian of Irael]

Come dice la spiegazione nel primo post il codice

if keyboard(R_Key_A)
print "prova"
end 

 

devi incollarlo dentro il def update, quindi appena dopo la riga 287

def update_demo 

 

oppure prova anche dopo il

if Input.trigger?(Input::B) or Input.trigger?(Input::C)
$game_system.running_demo = false
$scene = Scene_Title.new
end 

 

Non saprei di preciso non mi intendo di script, prova entrambi.
^ ^

Edited May 3, 2013 by Apo

[giver]

E' sbagliata l'ereditarietà indicata da chi ha postato lo script.
Invece di

class Scene_Map < Keyboard_Input 

 

va scritto

class Scene_Map < Input_keyboard 

 

Attenzione che la Kappa della parola keyboard va scritta minuscola . . .

Edited May 3, 2013 by Apo

[seingh]

allora abbiamo risolto la cosa del bloccaggio del gioco xD

adesso funziona...

ma non funziona lo script (non esce nulla xD)

[Guest clyde]

Aiutando un utente, clyde si è trovato a combattere con questo script.
Clyde ritiene che sia più semplice renderlo come un modulo, più facile da includere in una classe.
Nel caso specifico, clyde non poteva includerlo in class Game_Character.
Clyde però non è sicuro al 100% che così sia corretto.

Script Modificato:

 

#====================================================
# [XP] Keyboard Script Versione 1-clyde
# Originale di: cybersam
# Modificato da: "Non voglio essere creditato"
#====================================================
# DIFFERENZE:
# -Trasformata la classe in modulo.
# -Ridefinita la funzione per leggere lo stato del tasto
# che a clyde non funzionava! ^_^
#
# ISTRUZIONI:
# -Il modulo va incluso in ogni classe che ne utilizza
# le funzioni. Il modo è questo:
# class Something < Something Else
# include Input_keyboard
#
# -Richiamando il metodo:
# keyboard(costante) #dove costante è presa dall'elenco a inizio modulo
# puoi sapere se il tasto è premuto, ed usarlo come condizione.
#
# Citando l'esempio di neji:
# if keyboard(R_Key_A)
# print("W l'Amiga!")
# end
#====================================================
#=begin
module Input_keyboard

RMouse_BUTTON_L = 0x01 # left mouse button
RMouse_BUTTON_R = 0x02 # right mouse button
RMouse_BUTTON_M = 0x04 # middle mouse button
RMouse_BUTTON_5 = 0x05 # 4th mouse button # only tested with win2k with a logitech mouse (MX900)
RMouse_BUTTON_6 = 0x06 # 5th mouse button # only tested with win2k with a logitech mouse (MX900)
R_Key_BACK = 0x08 # BACKSPACE key
R_Key_TAB = 0x09 # TAB key
R_Key_RETURN = 0x0D # ENTER key
R_Key_SHIFT = 0x10 # SHIFT key
R_Key_PAUSE = 0x13 # PAUSE key
R_Key_CAPITAL = 0x14 # CAPS LOCK key
R_Key_ESCAPE = 0x1B # ESC key
R_Key_SPACE = 0x20 # SPACEBAR
R_Key_PRIOR = 0x21 # PAGE UP key
R_Key_NEXT = 0x22 # PAGE DOWN key
R_Key_END = 0x23 # END key
R_Key_HOME = 0x24 # HOME key
R_Key_LEFT = 0x25 # LEFT ARROW key
R_Key_UP = 0x26 # UP ARROW key
R_Key_RIGHT = 0x27 # RIGHT ARROW key
R_Key_DOWN = 0x28 # DOWN ARROW key
R_Key_SELECT = 0x29 # SELECT key
R_Key_PRINT = 0x2A # PRINT key
R_Key_SNAPSHOT = 0x2C # PRINT SCREEN key
R_Key_INSERT = 0x2D # INS key
R_Key_DELETE = 0x2E # DEL key

R_Key_0 = 0x30 # 0 key
R_Key_1 = 0x31 # 1 key
R_Key_2 = 0x32 # 2 key
R_Key_3 = 0x33 # 3 key
R_Key_4 = 0x34 # 4 key
R_Key_5 = 0x35 # 5 key
R_Key_6 = 0x36 # 6 key
R_Key_7 = 0x37 # 7 key
R_Key_8 = 0x38 # 8 key
R_Key_9 = 0x39 # 9 key
R_Key_A = 0x41 # A key
R_Key_B = 0x42 # B key
R_Key_C = 0x43 # C key
R_Key_D = 0x44 # D key
R_Key_E = 0x45 # E key
R_Key_F = 0x46 # F key
R_Key_G = 0x47 # G key
R_Key_H = 0x48 # H key
R_Key_I = 0x49 # I key
R_Key_J = 0x4A # J key
R_Key_K = 0x4B # K key
R_Key_L = 0x4C # L key
R_Key_M = 0x4D # M key
R_Key_N = 0x4E # N key
R_Key_O = 0x4F # O key
R_Key_P = 0x50 # P key
R_Key_Q = 0x51 # Q key
R_Key_R = 0x52 # R key
R_Key_S = 0x53 # S key
R_Key_T = 0x54 # T key
R_Key_U = 0x55 # U key
R_Key_V = 0x56 # V key
R_Key_W = 0x57 # W key
R_Key_X = 0x58 # X key
R_Key_Y = 0x59 # Y key
R_Key_Z = 0x5A # Z key
R_Key_LWIN = 0x5B #Left Windows key (Microsoft Natural keyboard)
R_Key_RWIN = 0x5C # Right Windows key (Natural keyboard)
R_Key_APPS = 0x5D # Applications key (Natural keyboard)
R_Key_NUMPAD0 = 0x60 # Numeric keypad 0 key
R_Key_NUMPAD1 = 0x61 # Numeric keypad 1 key
R_Key_NUMPAD2 = 0x62 # Numeric keypad 2 key
R_Key_NUMPAD3 = 0x63 # Numeric keypad 3 key
R_Key_NUMPAD4 = 0x64 # Numeric keypad 4 key
R_Key_NUMPAD5 = 0x65 # Numeric keypad 5 key
R_Key_NUMPAD6 = 0x66 # Numeric keypad 6 key
R_Key_NUMPAD7 = 0x67 # Numeric keypad 7 key
R_Key_NUMPAD8 = 0x68 # Numeric keypad 8 key
R_Key_NUMPAD9 = 0x69 # Numeric keypad 9 key
R_Key_MULTIPLY = 0x6A # Multiply key (*)
R_Key_ADD = 0x6B # Add key (+)
R_Key_SEPARATOR = 0x6C # Separator key
R_Key_SUBTRACT = 0x6D # Subtract key (-)
R_Key_DECIMAL = 0x6E # Decimal key
R_Key_DIVIDE = 0x6F # Divide key (/)
R_Key_F1 = 0x70 # F1 key
R_Key_F2 = 0x71 # F2 key
R_Key_F3 = 0x72 # F3 key
R_Key_F4 = 0x73 # F4 key
R_Key_F5 = 0x74 # F5 key
R_Key_F6 = 0x75 # F6 key
R_Key_F7 = 0x76 # F7 key
R_Key_F8 = 0x77 # F8 key
R_Key_F9 = 0x78 # F9 key
R_Key_F10 = 0x79 # F10 key
R_Key_F11 = 0x7A # F11 key
R_Key_F12 = 0x7B # F12 key
R_Key_NUMLOCK = 0x90 # NUM LOCK key
R_Key_SCROLL = 0x91 # SCROLL LOCK key
R_Key_LSHIFT = 0xA0 # Left SHIFT key
R_Key_RSHIFT = 0xA1 # Right SHIFT key
R_Key_LCONTROL = 0xA2 # Left CONTROL key
R_Key_RCONTROL = 0xA3 # Right CONTROL key
R_Key_L_ALT = 0xA4 # Left ALT key
R_Key_R_ALT = 0xA5 # Right ALT key

GetAsyncKeyState = Win32API.new("user32","GetAsyncKeyState",['i'],'i')
def keyboard(rkey)
GetAsyncKeyState.call(rkey) < 0 # key 0
end

end

 

 

 

 

Edited May 3, 2013 by Apo
code aggiornato