其实只要进程名字改了。可以应用到所有游戏！.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
喊话内容 ＝ 编辑框1.内容
.如果真 (喊话内容 ≠ “”)
列表框1.加入项目 (喊话内容, )
.如果真结束
.子程序 _按钮2_被单击, , , 开始喊话
时钟1.时钟周期 ＝ 到数值 (编辑框2.内容) × 1000
当前喊话条数 ＝ -1
按钮2.禁止 ＝ 真
喊话状态 ＝ 真
.子程序 _按钮3_被单击, , , 结束喊话
喊话状态 ＝ 假
按钮2.禁止 ＝ 假
时钟1.时钟周期 ＝ 0
.子程序 _时钟1_周期事件, , , 喊话操作
.如果真 (喊话状态)
' 加载喊话内容
喊话条数 ＝ 列表框1.取项目数 ()
.如果真 (当前喊话条数 ＜ 喊话条数)
当前喊话条数 ＝ -1
.如果真结束
当前喊话条数 ＝ 当前喊话条数 ＋ 1
喊话内容 ＝ 列表框1.取项目文本 (当前喊话条数)
' 开始喊话
窗口句柄 ＝ 取句柄 (“Dragon.exe”)
调试输出 (窗口句柄)
窗口激活 (窗口句柄)
按键消息 (窗口句柄, 13)
延时 (200)
.如果 (是否重复上一句)
按键消息 (窗口句柄, #上光标键) ' 重复上一局
.否则
文本投递 (窗口句柄, 喊话内容) ' 输入内容
.如果结束
延时 (200)
按键消息 (窗口句柄, 13)
.如果真结束
.子程序 _按钮4_被单击, , , 删除喊话内容
列表框1.删除项目 (列表框1.取焦点项目 ())
.子程序 __启动窗口_将被销毁, , , 打开网页
打开网页 (“http://www.wxwk.net”)
.子程序 _选择框1_被单击, , , 重复上一句
.如果 (是否重复上一句)
是否重复上一句 ＝ 假
.否则
是否重复上一句 ＝ 真
.如果结束
.子程序 __启动窗口_创建完毕
是否重复上一句 ＝ 假
| 
发表于 2010-8-10 19:52
