Project1

标题: 全键盘~ 改 [打印本页]

作者: 雷欧纳德 时间: 2006-10-8 07:25
标题: 全键盘~ 改
全键盘~ 改

说明：至于原来站上那个全键盘的有什么问题试就知道了。。。。

1、Kboard.press?(key) 同 Input.press?(key)
2、Kboard.repeat?(key) 同 Input.repeat?(key)
3、Kboard.trigger?(key) 同 Input.trigger?(key)

以下脚本中没给出键值，需要的自己查找。。。

module Kboard
module_function
@R_Key_Hash = {}
@R_Key_Repeat = {}
GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
def press?(rkey)
return GetKeyState.call(rkey) != 0
end
def repeat?(rkey)
result = GetKeyState.call(rkey)
if result != 0
if @R_Key_Repeat[rkey].nil?
@R_Key_Repeat[rkey] = 0
return true
end
@R_Key_Repeat[rkey] += 1
else
@R_Key_Repeat[rkey] = nil
@R_Key_Hash[rkey] = 0
end
if !@R_Key_Repeat[rkey].nil? and @R_Key_Repeat[rkey] > 4 # 4乃准确数字
@R_Key_Repeat[rkey] = 0
return true
else
return false
end
end
def trigger?(rkey)
result = GetKeyState.call(rkey)
if @R_Key_Hash[rkey] == 1 and result != 0
return false
end
if result != 0
@R_Key_Hash[rkey] = 1
return true
else
@R_Key_Hash[rkey] = 0
return false
end
end
end

复制代码

module Kboard
module_function
@R_Key_Hash = {}
@R_Key_Repeat = {}
GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
def press?(rkey)
return GetKeyState.call(rkey) != 0
end
def repeat?(rkey)
result = GetKeyState.call(rkey)
if result != 0
if @R_Key_Repeat[rkey].nil?
@R_Key_Repeat[rkey] = 0
return true
end
@R_Key_Repeat[rkey] += 1
else
@R_Key_Repeat[rkey] = nil
@R_Key_Hash[rkey] = 0
end
if !@R_Key_Repeat[rkey].nil? and @R_Key_Repeat[rkey] > 4 # 4乃准确数字
@R_Key_Repeat[rkey] = 0
return true
else
return false
end
end
def trigger?(rkey)
result = GetKeyState.call(rkey)
if @R_Key_Hash[rkey] == 1 and result != 0
return false
end
if result != 0
@R_Key_Hash[rkey] = 1
return true
else
@R_Key_Hash[rkey] = 0
return false
end
end
end

复制代码

作者: 两只鱼 时间: 2006-10-8 09:17
想问鼠标中也能定义吗{/gg}

作者: 雷欧纳德 时间: 2006-10-8 15:17

以下引用两只鱼于2006-10-8 1:17:55的发言：

想问鼠标中也能定义吗

你打算定义啥？ {/gg}

作者: 两只鱼 时间: 2006-10-8 20:20
少打一个字了～～是鼠标中键

作者: frantice 时间: 2006-10-8 20:22
可以的{/se}

但是偶不会{/hx}

作者: oksh 时间: 2006-10-8 22:58
记录一下，试了看看。

作者: 柳柳 时间: 2006-10-27 08:59
发布完毕……
VIP += 6

欢迎光临 Project1 (https://rpg.blue/)