请问我重复按X键，按久了会有难听的咚咚咚声。

恶魔般的天使 · 发表于 2013-6-4 18:54:50

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

请问我重复按X键，按久了会有难听的咚咚咚声。这是什么情况？

亿万星辰 · 发表于 2013-6-9 06:31:36

当然是放在回车啊，esc键的处理里了~

恶魔般的天使 · 发表于 2013-6-8 23:26:50

亿万星辰发表于 2013-6-5 13:40
不要卖萌…… 本屌叔早已不吃这套~~~
这个好像是那个focus没有切回的原因，我记得以 ...

#==============================================================================
# ■ Type_Field
#------------------------------------------------------------------------------
# 　处理输入域的类。
#==============================================================================
class Type_Field

  #--------------------------------------------------------------------------
  # ● 定义实例变量
  #--------------------------------------------------------------------------
  attr(:active)

  #--------------------------------------------------------------------------
  # ● 初始化
  #--------------------------------------------------------------------------
  def initialize(v,default_text = "",default_careth = nil,default_fonts = 16,\
default_fontc = Color.new(255,255,255))
# active
@active = false
# 视口
rect = v.rect
@v = Viewport.new(rect.x,rect.y,rect.width,rect.height)
@v.z =500
@v.visible = false
@w = rect.width
@h = rect.height
# 属性
@caret_h = default_careth.nil? ? @h : [@h,default_careth].min
@caret_y = rect.y + (@h - @caret_h) / 2
@font_size = [default_fonts,@h].min - 4
# 描绘contents
@cts = Sprite.new(@v)
@cts.bitmap = Bitmap.new(@w - 3,@h)
@cts.bitmap.font.size = @font_size
@cts.bitmap.font.color = default_fontc
@cts.z = @v.z + 1

@bts = Sprite.new(@v)
@bts.bitmap = Bitmap.new(@w - 3,@h)
@bts.bitmap.font.size = 10
@bts.bitmap.font.color =  Color.new(255,255,255)
@bts.z = @v.z
# 辅助属性
@bk_count = 0
$聊天 = default_text.scan(/./)
@max_width = @w - 3
$聊天宽度 = $聊天.size
@save_pos = $聊天宽度
# 光标Caret
@v1 = Viewport.new(rect.x,@caret_y,@w + 3,@caret_h)
$caret_sp = Sprite.new(@v1)
@v1.z = @v.z + 1
@caret_bitmap = Bitmap.new(3,@caret_h)
@caret_bitmap.fill_rect(0,0,1,@caret_h,Color.new(0,0,0,180))
@caret_bitmap.fill_rect(1,0,1,@caret_h,Color.new(0,0,0))
@caret_bitmap.fill_rect(2,0,1,@caret_h,Color.new(120,120,120))
$caret_sp.bitmap = @caret_bitmap
$caret_sp.x = self.get_width($聊天[0,$聊天宽度].to_s)
$caret_sp.y = 0
$caret_sp.visible = false
@caret_flash_count = 0
# 刷新
refresh
# 设置焦点
TypeAPI.setFocus
# 开始输入
TypeAPI.startType
  end
  #--------------------------------------------------------------------------
  # ● 初始化文字
  #--------------------------------------------------------------------------
  def clear(default_text = "")
$聊天 = default_text.scan(/./)
$caret_sp.x = self.get_width($聊天[0,$聊天宽度].to_s)
TypeAPI.setFocus
text = TypeAPI.getText
refresh
  end
  #--------------------------------------------------------------------------
  # ● 设置活动标记
  #--------------------------------------------------------------------------
  def active=(value)
if value != true and value != false
   return
end
@active = value
$caret_sp.visible = @active
@v.visible = @active
  end
  #--------------------------------------------------------------------------
  # ● 释放
  #--------------------------------------------------------------------------
  def dispose
@caret_bitmap.dispose
$caret_sp.bitmap.dispose
$caret_sp.dispose
@cts.bitmap.dispose
@bts.bitmap.dispose
@bts.dispose
@cts.dispose
@v.dispose
@v1.dispose
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
@cts.bitmap.clear
@bts.bitmap.clear
if  $聊天.to_s.include?("\\")
$ShowCursor.call(1)
p "非法字符"
$ShowCursor.call(0)
$Ltf.clear
$caret_sp.visible = false
$聊天宽度 = 0
end
@cts.bitmap.draw_text(0,0,@w,@h,$聊天.to_s)
@bts.bitmap.draw_text(25,0,@w,@h,"")
  end
  #--------------------------------------------------------------------------
  # ● 获取文字
  #--------------------------------------------------------------------------
  def get_text
return $聊天.to_s
  end
  #--------------------------------------------------------------------------
  # ● 取得字符宽度
  #--------------------------------------------------------------------------
  def get_width(str)
return @cts.bitmap.text_size(str).width
  end
  #--------------------------------------------------------------------------
  # ● 更新
  #--------------------------------------------------------------------------
  def update
# 非激活状态则返回
unless @active
   return
end
# 获取按键信息
key_info = TypeAPI.getKeyInfos
case key_info
when 0x09 # Tab
   # 按下 Tab 键的情况自己定义怎么处理
   return
when 0x0d # Enter
   #$game_switches[1] = true
   # 按下 Enter 键的情况自己定义怎么处理
   return
when 0x1B # Esc
   # 按下 Esc 键的情况自己定义怎么处理
   return
end
self.update_text
self.update_lrb
self.update_back
self.update_caret
  end

  #--------------------------------------------------------------------------
  # ● 更新文字
  #--------------------------------------------------------------------------
  def update_text
# 文字刷新
TypeAPI.setFocus
text = TypeAPI.getText
#禁止使用符号"\"
if text != ""
   for char in text.scan(/./)
      if self.get_width($聊天.to_s + char) <= @max_width
      $聊天[$聊天宽度,0] = char
      $聊天宽度 += 1
      else
      break
      end
   end
   refresh
end
  end
  #--------------------------------------------------------------------------
  # ● 更新左右按键
  #--------------------------------------------------------------------------
  def update_lrb
if RInput.trigger?(RInput::LEFT) and $聊天宽度 > 0
   $聊天宽度 -= 1
   return
end
if RInput.trigger?(RInput::RIGHT) and $聊天宽度 < $聊天.size
   $聊天宽度 += 1
   return
end
  end

  #--------------------------------------------------------------------------
  # ● 更新退格
  #--------------------------------------------------------------------------
  def update_back
# 前退格处理
@bk_count += TypeAPI.ifBack
if @bk_count > 0
   @bk_count -= 1
   if $聊天宽度 > 0
      $聊天.delete_at($聊天宽度 - 1);$聊天宽度 -= 1;refresh
   end
end
  end

  #--------------------------------------------------------------------------
  # ● 更新光标闪烁
  #--------------------------------------------------------------------------
  def update_caret
# 闪烁计时
@caret_flash_count += 1
if @caret_flash_count == 30
   $caret_sp.visible = !$caret_sp.visible
   @caret_flash_count = 0
end
# Caret位置刷新
if @save_pos != $聊天宽度
   @save_pos = $聊天宽度
   $caret_sp.x = self.get_width($聊天[0,@save_pos].to_s)
end
  end

end


这是我的聊天脚本。。。亿万大叔，帮我分析下。。。应该把您给我执行脚本放在哪个位置。。
哎，新人有点笨啦。。。不过，，，我真的很想解决这个问题。。
我已经连续好几天找方法了。。。

恶魔般的天使 · 发表于 2013-6-8 14:28:42

亿万星辰发表于 2013-6-5 13:40
不要卖萌…… 本屌叔早已不吃这套~~~
这个好像是那个focus没有切回的原因，我记得以 ...

血的问题我解决了恩哼。
咚咚冬声还在等你出办法呢。那声音感觉就和电脑发出
的咚咚声一样。是不是游戏里没有阻断于电脑之间的联系造成的咩？

亿万星辰 · 发表于 2013-6-7 13:12:55

本帖最后由亿万星辰于 2013-6-7 13:16 编辑

恶魔般的天使发表于 2013-6-7 12:06
那怎么解决呢？

取消聊天的时候执行以下TypeAPI.lostFocus

恶魔般的天使 · 发表于 2013-6-7 12:06:44

chd114 发表于 2013-6-7 10:03
只要是电脑键盘都是这样

那怎么解决呢？

chd114 · 发表于 2013-6-7 10:03:53

恶魔般的天使发表于 2013-6-7 02:19
不是的。。。我是ARPG战斗、、、肯定要重复按

只要是电脑键盘都是这样

恶魔般的天使 · 发表于 2013-6-7 02:19:44

本帖最后由恶魔般的天使于 2013-6-7 02:21 编辑

chd114 发表于 2013-6-6 13:25
电脑本来就是这么设置的啊，你按一个键按久了主机就会发出声音而且那个按键短时间内也不能按了 ...

不是的。。。我是ARPG战斗、、、肯定要重复按

恶魔般的天使 · 发表于 2013-6-7 02:15:46

本帖最后由亿万星辰于 2013-6-7 13:11 编辑

亿万星辰发表于 2013-6-6 12:51
夏娜的输入法是哪个？
我截图只能截出个记事本来~
get_hWnd方法是获取当前游戏窗口句柄的方法

=begin
脚本：【完美输入法修正】
功能：输入法。
说明: 直接用Type_Field创建输入域即可进行输入，在此可根据Type_Field域对象
的活动标记active来自定义刷新等，在Type_Field中需要自己处理特殊按键
的处理方法。具体不明白之处请参考范例工程。
作者：灼眼的夏娜
补充: 至于以前那个版本也许很多人都注意到那个烦人的问题了吧，按Enter和Tab那
些会出现不爽的声音，这个版本解决了那个问题，并简化添加了Type_Field类
来方便创建输入域。
=end
#==============================================================================
# ■ RInput
#------------------------------------------------------------------------------
# 　全键盘处理的模块。
#==============================================================================
module RInput
#--------------------------------------------------------------------------
# ● 常量定义
#--------------------------------------------------------------------------
ENTER = 0x0D
SPACE = 0x20
UP = 0x26
DOWN = 0x28
LEFT = 0x25
RIGHT = 0x27
LCTRL = 0xA2
LALT = 0xA4
TAB = 0x09
F1 = 0x70
ESCAPE = 0x1B
Key_0 = 0x30 # 0 key
Key_1 = 0x31 # 1 key
Key_2 = 0x32 # 2 key
Key_3 = 0x33 # 3 key
Key_4 = 0x34 # 4 key
Key_5 = 0x35 # 5 key
Key_6 = 0x36 # 6 key
Key_7 = 0x37 # 7 key
Key_8 = 0x38 # 8 key
Key_9 = 0x39 # 9 key
#--------------------------------------------------------------------------
# ● 临时Hash
#--------------------------------------------------------------------------
@R_Key_Hash = {}
@R_Key_Repeat = {}
#--------------------------------------------------------------------------
# ● 唯一API
#--------------------------------------------------------------------------
GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
#--------------------------------------------------------------------------
# ● 单键按下
#--------------------------------------------------------------------------
def self.press?(rkey)
return GetKeyState.call(rkey) != 0
end
#--------------------------------------------------------------------------
# ● 单键重复按下
#--------------------------------------------------------------------------
def self.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
#当连续按3下同一键时候返回=0
if !@R_Key_Repeat[rkey].nil? and @R_Key_Repeat[rkey] > 3 # 4乃准确数字
@R_Key_Repeat[rkey] = 0
return true
else
return false
end
end
#--------------------------------------------------------------------------
# ● 单键处理
#--------------------------------------------------------------------------
def self.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
#==============================================================================
# ■ EasyConv
#------------------------------------------------------------------------------
# 　转码模块。
#==============================================================================
module EasyConv
#--------------------------------------------------------------------------
# ● 常量定义
#--------------------------------------------------------------------------
CP_ACP = 0
CP_UTF8 = 65001
#--------------------------------------------------------------------------
# ● 模块函数
#--------------------------------------------------------------------------
module_function
#--------------------------------------------------------------------------
# ● 转码
#--------------------------------------------------------------------------
def s2u(text)
m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
len = m2w.call(CP_ACP, 0, text, -1, nil, 0)
buf = "\0" * (len*2)
m2w.call(CP_ACP, 0, text, -1, buf, buf.size/2)
len = w2m.call(CP_UTF8, 0, buf, -1, nil, 0, nil, nil)
ret = "\0" * len
w2m.call(CP_UTF8, 0, buf, -1, ret, ret.size, nil, nil)
ret[-1] = ""
return ret
end
#--------------------------------------------------------------------------
# ● 转码
#--------------------------------------------------------------------------
def u2s(text)
m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
len = m2w.call(CP_UTF8, 0, text, -1, nil, 0)
buf = "\0" * (len*2)
m2w.call(CP_UTF8, 0, text, -1, buf, buf.size/2)
len = w2m.call(CP_ACP, 0, buf, -1, nil, 0, nil, nil)
ret = "\0" * len
w2m.call(CP_ACP, 0, buf, -1, ret, ret.size, nil, nil)
return ret
end
end
#==============================================================================
# ■ TypeAPI
#------------------------------------------------------------------------------
# 　输入法相关API模块。
#==============================================================================
module TypeAPI
#--------------------------------------------------------------------------
# ● API定义
#--------------------------------------------------------------------------
GPPS = Win32API.new("kernel32","GetPrivateProfileString",'pppplp','l')
FindWindow = Win32API.new("user32", "FindWindow", 'pp', 'i')
CreateWindow = Win32API.new("NetGame","CreatWnd",'l','l')
SetHK = Win32API.new("NetGame","SetHK",'v','v')
GetText = Win32API.new("NetGame","GetWndText",'l','p')
SetFocus = Win32API.new("user32","SetFocus",'l','l')
IfBack = Win32API.new("NetGame","If_Back",'v','i')
StartType = Win32API.new("NetGame","StartType",'v','v')
EndType = Win32API.new("NetGame","EndType",'v','v')
GetKeyInfos = Win32API.new("NetGame","GetKeyInfo",'v','i')
#--------------------------------------------------------------------------
# ● 模块函数
#--------------------------------------------------------------------------
module_function
#=begin
#--------------------------------------------------------------------------
# ● 获取参数
#--------------------------------------------------------------------------
def getParam
val = "\0" * 256
GPPS.call("Game","Title","",val,256,"./Game.ini")
val.delete!("\0")
return val
end
#--------------------------------------------------------------------------
# ● 获取窗口
#--------------------------------------------------------------------------
def findWindow
return FindWindow.call("RGSS Player",self.getParam)
return FindWindow.call("",self.getParam)
end
#=end
=begin
#--------------------------------------------------------------------------
# ● 获取参数
#--------------------------------------------------------------------------
def getParam
val = 0.chr * 256
GPPS.call("Game","Title","",val,256,"./Game.ini")
val.delete!("\0")
return val
end
#--------------------------------------------------------------------------
# ● 获取窗口
#--------------------------------------------------------------------------
def findWindow
Win32API.new("user32","FindWindow","pp","i").call("RGSS Player",self.getParam)
end
=end
#--------------------------------------------------------------------------
# ● 创建窗口
#--------------------------------------------------------------------------
def createWindow(hwnd)
return CreateWindow.call(hwnd)
end
#--------------------------------------------------------------------------
# ● 设置HK
#--------------------------------------------------------------------------
def setHK
SetHK.call
end
#--------------------------------------------------------------------------
# ● 获取文字
#--------------------------------------------------------------------------
def getText
return EasyConv.s2u(GetText.call(@subhwnd))
end
#--------------------------------------------------------------------------
# ● 设置焦点
#--------------------------------------------------------------------------
def setFocus
SetFocus.call(@subhwnd)
end
#--------------------------------------------------------------------------
# ● 转换焦点
#--------------------------------------------------------------------------
def lostFocus
SetFocus.call(@hwnd)
end
#--------------------------------------------------------------------------
# ● 退格判定
#--------------------------------------------------------------------------
def ifBack
return IfBack.call
end
#--------------------------------------------------------------------------
# ● 开始输入
#--------------------------------------------------------------------------
def startType
StartType.call
end
#--------------------------------------------------------------------------
# ● 结束输入
#--------------------------------------------------------------------------
def endType
EndType.call
end
#--------------------------------------------------------------------------
# ● 输入中特殊按键处理
#--------------------------------------------------------------------------
def getKeyInfos
return GetKeyInfos.call
end
#--------------------------------------------------------------------------
# ● 获取句柄
#--------------------------------------------------------------------------
@hwnd = self.findWindow
@subhwnd = self.createWindow(@hwnd)
#--------------------------------------------------------------------------
# ● 设置HK应用
#--------------------------------------------------------------------------
self.setHK
end
#==============================================================================

复制代码

帐号		自动登录	找回密码
密码			注册会员

[已经过期] 请问我重复按X键，按久了会有难听的咚咚咚声。

加入我们，或者，欢迎回来。

点评

点评

贵宾

开拓者