my26929 发表于 2010-8-10 19:52

龙腾世界自动喊话工具(源代码-易语言版)

其实只要进程名字改了。可以应用到所有游戏!
.版本 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_被单击, , , 重复上一句

.如果 (是否重复上一句)
是否重复上一句 = 假
.否则
是否重复上一句 = 真
.如果结束


.子程序 __启动窗口_创建完毕

是否重复上一句 = 假

Zanker 发表于 2010-8-10 20:02

...额。。。牛..

lj3689622 发表于 2010-9-11 15:41

不会弄额   人太苯呢

weixuge 发表于 2011-5-31 13:55

下来学习下先

麦田守望者 发表于 2012-9-30 23:08

下载试验下!看看好用吗!

daojue 发表于 2012-12-15 23:22

学习学习,正在研究投递消息

QQ496550001 发表于 2013-11-13 12:41

感觉太复杂了{:1_925:}
页: [1]
查看完整版本: 龙腾世界自动喊话工具(源代码-易语言版)