求易语言高手帮忙解决一段游戏自动发言的代码! 回车键问题
我引用的模块:超级模块高级版这个游戏自动发现现在要按回车它才自己发言,我想让它自己发言,这段代码就是不会提前按回车键!要我按了他才发无耐啊!求助!!-----------...
我引用的模块:超级模块高级版
这个游戏自动发现现在要按回车它才自己发言,我想让它自己发言,这段代码就是不会提前按 回车键 ! 要我按了他才发 无耐啊!求助!!
-------------------------------------------------------------------------
.版本 2
.支持库 xplib
.程序集 窗口程序集1
.程序集变量 句柄, 整数型
.程序集变量 所有窗口信息, 窗口信息, , "0"
.程序集变量 哪句话, 整数型
.子程序 __启动窗口_创建完毕
XP风格 (#银色风格)
_按钮2_被单击 ()
.子程序 _时钟发言_周期事件, , , 自动发言功能
.局部变量 内容, 文本型
.如果真 (句柄是否有效 (句柄) = 假)
返回 ()
.如果真结束
.循环判断首 ()
.如果真 (哪句话 = 6)
哪句话 = 1
.如果真结束
.如果真 (哪句话 = 5)
内容 = 编辑框5.内容
哪句话 = 6
.如果真结束
.如果真 (哪句话 = 4)
内容 = 编辑框4.内容
哪句话 = 5
.如果真结束
.如果真 (哪句话 = 3)
内容 = 编辑框3.内容
哪句话 = 4
.如果真结束
.如果真 (哪句话 = 2)
内容 = 编辑框2.内容
哪句话 = 3
.如果真结束
.如果真 (哪句话 = 1)
内容 = 编辑框1.内容
哪句话 = 2
.如果真结束
.循环判断尾 (内容 = “”)
文本投递 (句柄, 内容)
按键消息 (句柄, #回车键)
.如果真 (到数值 (编辑框.内容) × 1000 ≠ 时钟发言.时钟周期)
时钟发言.时钟周期 = 到数值 (编辑框.内容) × 1000
.如果真结束
.子程序 _选择框_被单击
.如果 (选择框.选中)
时钟发言.时钟周期 = 到数值 (编辑框.内容) × 1000
哪句话 = 1
.否则
时钟发言.时钟周期 = 0
.如果结束
.子程序 _列表框_双击选择
还原窗口 ()
句柄 = 列表框.取项目数值 (列表框.现行选中项)
标签1.标题 = “请[双击选择]-” + 列表框.取项目文本 (列表框.现行选中项)
.子程序 _按钮1_被单击
还原窗口 ()
.如果真 (按钮1.标题 = “显 示 游 戏”)
按钮1.标题 = “隐藏游戏喊话”
返回 ()
.如果真结束
.如果 (句柄是否有效 (句柄))
窗口状态控制 (句柄, 0)
按钮1.标题 = “显 示 游 戏”
.否则
标签1.标题 = “请[双击选择]-” + “请选择游戏窗口!!!”
.如果结束
.子程序 _按钮2_被单击, , , 刷新窗口列表
.局部变量 计次, 整数型
.局部变量 窗口数目, 整数型
.局部变量 临时标题, 文本型
还原窗口 ()
标签1.标题 = “请[双击选择]-接收发言信息的窗口”
句柄 = 0
清除数组 (所有窗口信息)
列表框.清空 ()
窗口数目 = 枚举窗口信息 (所有窗口信息)
' 输出调试文本 (窗口数目)
.计次循环首 (窗口数目, 计次)
临时标题 = 所有窗口信息 [计次].窗口标题
.如果真 (临时标题 ≠ “”)
列表框.加入项目 (临时标题, 所有窗口信息 [计次].窗口句柄)
.如果真结束
.计次循环尾 ()
.子程序 __启动窗口_将被销毁
还原窗口 ()
.子程序 还原窗口
.如果真 (句柄是否有效 (句柄))
窗口状态控制 (句柄, 4)
.如果真结束
----------------------------------------------------------------------
高手帮忙改下了谢谢!! 展开
这个游戏自动发现现在要按回车它才自己发言,我想让它自己发言,这段代码就是不会提前按 回车键 ! 要我按了他才发 无耐啊!求助!!
-------------------------------------------------------------------------
.版本 2
.支持库 xplib
.程序集 窗口程序集1
.程序集变量 句柄, 整数型
.程序集变量 所有窗口信息, 窗口信息, , "0"
.程序集变量 哪句话, 整数型
.子程序 __启动窗口_创建完毕
XP风格 (#银色风格)
_按钮2_被单击 ()
.子程序 _时钟发言_周期事件, , , 自动发言功能
.局部变量 内容, 文本型
.如果真 (句柄是否有效 (句柄) = 假)
返回 ()
.如果真结束
.循环判断首 ()
.如果真 (哪句话 = 6)
哪句话 = 1
.如果真结束
.如果真 (哪句话 = 5)
内容 = 编辑框5.内容
哪句话 = 6
.如果真结束
.如果真 (哪句话 = 4)
内容 = 编辑框4.内容
哪句话 = 5
.如果真结束
.如果真 (哪句话 = 3)
内容 = 编辑框3.内容
哪句话 = 4
.如果真结束
.如果真 (哪句话 = 2)
内容 = 编辑框2.内容
哪句话 = 3
.如果真结束
.如果真 (哪句话 = 1)
内容 = 编辑框1.内容
哪句话 = 2
.如果真结束
.循环判断尾 (内容 = “”)
文本投递 (句柄, 内容)
按键消息 (句柄, #回车键)
.如果真 (到数值 (编辑框.内容) × 1000 ≠ 时钟发言.时钟周期)
时钟发言.时钟周期 = 到数值 (编辑框.内容) × 1000
.如果真结束
.子程序 _选择框_被单击
.如果 (选择框.选中)
时钟发言.时钟周期 = 到数值 (编辑框.内容) × 1000
哪句话 = 1
.否则
时钟发言.时钟周期 = 0
.如果结束
.子程序 _列表框_双击选择
还原窗口 ()
句柄 = 列表框.取项目数值 (列表框.现行选中项)
标签1.标题 = “请[双击选择]-” + 列表框.取项目文本 (列表框.现行选中项)
.子程序 _按钮1_被单击
还原窗口 ()
.如果真 (按钮1.标题 = “显 示 游 戏”)
按钮1.标题 = “隐藏游戏喊话”
返回 ()
.如果真结束
.如果 (句柄是否有效 (句柄))
窗口状态控制 (句柄, 0)
按钮1.标题 = “显 示 游 戏”
.否则
标签1.标题 = “请[双击选择]-” + “请选择游戏窗口!!!”
.如果结束
.子程序 _按钮2_被单击, , , 刷新窗口列表
.局部变量 计次, 整数型
.局部变量 窗口数目, 整数型
.局部变量 临时标题, 文本型
还原窗口 ()
标签1.标题 = “请[双击选择]-接收发言信息的窗口”
句柄 = 0
清除数组 (所有窗口信息)
列表框.清空 ()
窗口数目 = 枚举窗口信息 (所有窗口信息)
' 输出调试文本 (窗口数目)
.计次循环首 (窗口数目, 计次)
临时标题 = 所有窗口信息 [计次].窗口标题
.如果真 (临时标题 ≠ “”)
列表框.加入项目 (临时标题, 所有窗口信息 [计次].窗口句柄)
.如果真结束
.计次循环尾 ()
.子程序 __启动窗口_将被销毁
还原窗口 ()
.子程序 还原窗口
.如果真 (句柄是否有效 (句柄))
窗口状态控制 (句柄, 4)
.如果真结束
----------------------------------------------------------------------
高手帮忙改下了谢谢!! 展开
3个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询