易语言制作大话西游Ⅱ自动发言工具源码

admin

请点击此处下载

查看状态：需购买或无权限

您的用户组是：游客

提取密码:5ifx88 
下载次数:1  文件大小:0 Bytes 
下载权限: 不限 以上或 VIP会员   [加入VIP]   [获取金币]  [免费赚金币]

部分代码如下

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
进程id	整数型
进程1	整数型
进程2	整数型
进程3
进程4
句柄	整数型
游戏进程	整数型
外挂进程	整数型
顶层	逻辑型
启动外挂	整数型
停止外挂	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
名称	文本型		0
命令行	文本型		1

启动外挂 ＝ 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F10键 )
停止外挂 ＝ 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F11键 )
提升进程权限 ()
XP风格 ( #蓝色风格 )
取命令行 (命令行)
如果 (取数组下标 (命令行, ) ≠ 0)
进程id ＝ 到数值 (命令行 [1])
游戏进程 ＝ 2
标签1.标题 ＝ 到文本 (进程id)
句柄 ＝ 取进程主窗口 (进程id)
检查游戏进程 ()
如果 (游戏进程 ＝ 0)
信息框 (“没有找到[大话西游Ⅱ]进程!”, 0 ＋ 48, )
进程id ＝ 进程1
标签1.标题 ＝ 到文本 (进程id)
句柄 ＝ 取进程主窗口 (进程id)

' 以下的防止外挂重复运行的方法还有不足，需要改进
如果 (取数组下标 (命令行, ) ≠ 0)
进程id ＝ 到数值 (命令行 [1])
外挂进程 ＝ 2
标签1.标题 ＝ 到文本 (进程id)
句柄 ＝ 取进程主窗口 (进程id)
检查游戏进程 ()
如果 (外挂进程 ＞ 1)
信息框 (“请不要重复运行大话西游Ⅱ” ＋ _启动窗口.标题, 0 ＋ 48, )
结束 ()
进程id ＝ 进程1
标签1.标题 ＝ 到文本 (进程id)
句柄 ＝ 取进程主窗口 (进程id)


判断 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, ) ＝ “1”)  ' 1为真
选择框1.选中 ＝ 真
_启动窗口.总在最前 ＝ 真
判断 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, ) ＝ “0”)  ' 0为假
选择框1.选中 ＝ 假
_启动窗口.总在最前 ＝ 假



判断 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, ) ＝ “1”)
选择框2.选中 ＝ 真
窗口侧边跟随 (句柄, _启动窗口, 真, , )
判断 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, ) ＝ “0”)
选择框2.选中 ＝ 假
取消侧边跟随 ()


喊话间隔框.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.ini”, “Installed”, “Interval”, )

子程序名	返回值类型	公开	备 注
_标签1_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

判断 (参数一 ＝ 启动外挂)
_开始按钮_被单击 ()
判断 (参数一 ＝ 停止外挂)
_结束按钮_被单击 ()

子程序名	返回值类型	公开	备 注
检查游戏进程

进程1 ＝ 取程序进程ID (, “XY2.EXE”)
如果 (进程1 ＝ 0)
游戏进程 ＝ 0
游戏进程 ＝ 1
进程2 ＝ 取程序进程ID (进程1, “XY2.EXE”)
如果真 (进程2 ≠ 0)
游戏进程 ＝ 2


进程3 ＝ 取程序进程ID (, _启动窗口.标题 ＋ “.exe”)
如果 (进程3 ＝ 0)
外挂进程 ＝ 0
外挂进程 ＝ 1
进程4 ＝ 取程序进程ID (进程3, _启动窗口.标题 ＋ “.exe”)
如果真 (进程4 ≠ 0)
外挂进程 ＝ 2

子程序名	返回值类型	公开	备 注
__启动窗口_位置被改变

关于程序窗口.顶边 ＝ _启动窗口.顶边 ＋ _启动窗口.高度
关于程序窗口.左边 ＝ _启动窗口.左边

子程序名	返回值类型	公开	备 注
_时钟2_周期事件

模拟按键 ( #上光标键, , )
延时 (500)
模拟按键 ( #回车键, , )

子程序名	返回值类型	公开	备 注
_开始按钮_被单击

时钟2.时钟周期 ＝ 5000
结束按钮.禁止 ＝ 假
开始按钮.禁止 ＝ 真

子程序名	返回值类型	公开	备 注
_结束按钮_被单击

时钟2.时钟周期 ＝ 0
结束按钮.禁止 ＝ 真
开始按钮.禁止 ＝ 假

子程序名	返回值类型	公开	备 注
_关于按钮_被单击

载入 (关于程序窗口, , 假)

子程序名	返回值类型	公开	备 注
_选择框1_被单击

判断 (选择框1.选中 ＝ 真)
_启动窗口.总在最前 ＝ 真
_启动窗口.总在最前 ＝ 假

子程序名	返回值类型	公开	备 注
_选择框2_被单击

判断 (选择框2.选中 ＝ 真)
窗口侧边跟随 (句柄, _启动窗口, 真, , )
时钟1.时钟周期 ＝ 500
取消侧边跟随 ()
时钟1.时钟周期 ＝ 0

子程序名	返回值类型	公开	备 注
_保存按钮_被单击

判断 (选择框1.选中 ＝ 真)
写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, “1”)
写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, “0”)

判断 (选择框2.选中 ＝ 真)
写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, “1”)
写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, “0”)

写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Interval”, 喊话间隔框.内容)

i支持库列表	支持库注释
shellEx	扩展功能支持库一
xplib	XP风格界面库
eAPI	应用接口支持库

.版本 2<br /> .支持库 shellEx<br /> .支持库 xplib<br /> .支持库 eAPI<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 进程id, 整数型<br /> .程序集变量 进程1, 整数型<br /> .程序集变量 进程2, 整数型<br /> .程序集变量 进程3<br /> .程序集变量 进程4<br /> .程序集变量 句柄, 整数型<br /> .程序集变量 游戏进程, 整数型<br /> .程序集变量 外挂进程, 整数型<br /> .程序集变量 顶层, 逻辑型<br /> .程序集变量 启动外挂, 整数型<br /> .程序集变量 停止外挂, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 名称, 文本型, , "0"<br /> .局部变量 命令行, 文本型, , "1"<br /> <br /> 启动外挂 ＝ 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F10键)<br /> 停止外挂 ＝ 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F11键)<br /> <br /> 提升进程权限 ()<br /> XP风格 (#蓝色风格)<br /> 取命令行 (命令行)<br /> .如果 (取数组下标 (命令行, ) ≠ 0)<br />     进程id ＝ 到数值 (命令行 [1])<br />     游戏进程 ＝ 2<br />     标签1.标题 ＝ 到文本 (进程id)<br />     句柄 ＝ 取进程主窗口 (进程id)<br /> .否则<br />     检查游戏进程 ()<br />     .如果 (游戏进程 ＝ 0)<br />         信息框 (“没有找到[大话西游Ⅱ]进程!”, 0 ＋ 48, )<br />     .否则<br />         进程id ＝ 进程1<br />         标签1.标题 ＝ 到文本 (进程id)<br />         句柄 ＝ 取进程主窗口 (进程id)<br />     .如果结束<br /> <br /> .如果结束<br /> ' 以下的防止外挂重复运行的方法还有不足，需要改进<br /> .如果 (取数组下标 (命令行, ) ≠ 0)<br />     进程id ＝ 到数值 (命令行 [1])<br />     外挂进程 ＝ 2<br />     标签1.标题 ＝ 到文本 (进程id)<br />     句柄 ＝ 取进程主窗口 (进程id)<br /> .否则<br />     检查游戏进程 ()<br />     .如果 (外挂进程 ＞ 1)<br />         信息框 (“请不要重复运行大话西游Ⅱ” ＋ _启动窗口.标题, 0 ＋ 48, )<br />         结束 ()<br />     .否则<br />         进程id ＝ 进程1<br />         标签1.标题 ＝ 到文本 (进程id)<br />         句柄 ＝ 取进程主窗口 (进程id)<br />     .如果结束<br /> <br /> .如果结束<br /> <br /> <br /> .判断开始 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, ) ＝ “1”)  ' 1为真<br />     选择框1.选中 ＝ 真<br />     _启动窗口.总在最前 ＝ 真<br /> .判断 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, ) ＝ “0”)  ' 0为假<br />     选择框1.选中 ＝ 假<br />     _启动窗口.总在最前 ＝ 假<br /> .默认<br /> <br /> .判断结束<br /> <br /> .判断开始 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, ) ＝ “1”)<br />     选择框2.选中 ＝ 真<br />     窗口侧边跟随 (句柄, _启动窗口, 真, , )<br /> .判断 (读配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, ) ＝ “0”)<br />     选择框2.选中 ＝ 假<br />     取消侧边跟随 ()<br /> .默认<br /> <br /> .判断结束<br /> 喊话间隔框.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.ini”, “Installed”, “Interval”, )<br /> <br /> .子程序 _标签1_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> <br /> .判断开始 (参数一 ＝ 启动外挂)<br />     _开始按钮_被单击 ()<br /> .判断 (参数一 ＝ 停止外挂)<br />     _结束按钮_被单击 ()<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 检查游戏进程<br /> <br /> 进程1 ＝ 取程序进程ID (, “XY2.EXE”)<br /> .如果 (进程1 ＝ 0)<br />     游戏进程 ＝ 0<br /> .否则<br />     游戏进程 ＝ 1<br />     进程2 ＝ 取程序进程ID (进程1, “XY2.EXE”)<br />     .如果真 (进程2 ≠ 0)<br />         游戏进程 ＝ 2<br />     .如果真结束<br /> <br /> .如果结束<br /> <br /> 进程3 ＝ 取程序进程ID (, _启动窗口.标题 ＋ “.exe”)<br /> .如果 (进程3 ＝ 0)<br />     外挂进程 ＝ 0<br /> .否则<br />     外挂进程 ＝ 1<br />     进程4 ＝ 取程序进程ID (进程3, _启动窗口.标题 ＋ “.exe”)<br />     .如果真 (进程4 ≠ 0)<br />         外挂进程 ＝ 2<br />     .如果真结束<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 __启动窗口_位置被改变<br /> <br /> 关于程序窗口.顶边 ＝ _启动窗口.顶边 ＋ _启动窗口.高度<br /> 关于程序窗口.左边 ＝ _启动窗口.左边<br /> <br /> .子程序 _时钟2_周期事件<br /> <br /> 模拟按键 (#上光标键, , )<br /> 延时 (500)<br /> 模拟按键 (#回车键, , )<br /> <br /> .子程序 _开始按钮_被单击<br /> <br /> 时钟2.时钟周期 ＝ 5000<br /> 结束按钮.禁止 ＝ 假<br /> 开始按钮.禁止 ＝ 真<br /> <br /> .子程序 _结束按钮_被单击<br /> <br /> 时钟2.时钟周期 ＝ 0<br /> 结束按钮.禁止 ＝ 真<br /> 开始按钮.禁止 ＝ 假<br /> <br /> .子程序 _关于按钮_被单击<br /> <br /> 载入 (关于程序窗口, , 假)<br /> <br /> .子程序 _选择框1_被单击<br /> <br /> .判断开始 (选择框1.选中 ＝ 真)<br />     _启动窗口.总在最前 ＝ 真<br /> .默认<br />     _启动窗口.总在最前 ＝ 假<br /> .判断结束<br /> <br /> <br /> .子程序 _选择框2_被单击<br /> <br /> .判断开始 (选择框2.选中 ＝ 真)<br />     窗口侧边跟随 (句柄, _启动窗口, 真, , )<br />     时钟1.时钟周期 ＝ 500<br /> .默认<br />     取消侧边跟随 ()<br />     时钟1.时钟周期 ＝ 0<br /> .判断结束<br /> <br /> <br /> .子程序 _保存按钮_被单击<br /> <br /> .判断开始 (选择框1.选中 ＝ 真)<br />     写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, “1”)<br /> .默认<br />     写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “zhiding”, “0”)<br /> .判断结束<br /> <br /> .判断开始 (选择框2.选中 ＝ 真)<br />     写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, “1”)<br /> .默认<br />     写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Adsorption”, “0”)<br /> .判断结束<br /> <br /> 写配置项 (取运行目录 () ＋ “\config.ini”, “Installed ”, “Interval”, 喊话间隔框.内容)

husiyu317

66666666666666