谢谢各位出手相助!谢谢!!
源码不能上传,下载链接 http://bbs.tyuyan.com/thread-1954-1-1.html
源码是TC2.003编写的,我用的是TC2.100
源码解压后的目录名 自动打怪测试 自动打怪测试目录下2个子目录;生存目录下没有文件
自动打怪测试\生存
自动打怪测试\自动打怪测试\资源
自动打怪测试\自动打怪测试\ 目录下(和资源目录并列的)有 自动打怪.t 文件和 自动打怪测试.t
内容见下面.
用记事本打开的 自动打怪.t 的内容
空间 自动打怪
功能 逻辑型 打怪()
整型 窗口句柄
窗口句柄 = 窗口.类名返回窗口("MainWnd class of ArkEngine")
如果(窗口句柄==0)
辅助.消息框("未找到窗口")
返回 假
如果结束
整型 x坐标,y坐标
窗口.获取位置(窗口句柄,x坐标,y坐标)
整型 颜色值
循环(真)
窗口.发送按键(窗口句柄,9) // TAB
辅助.等待(500)
// 整型 x,y
//图像.区域找色(303,61,307,61,#0101DB,0,x,y)
颜色值 = 图像.坐标点取色(303+x坐标,61+y坐标)
//如果(x>0) // 找到怪
如果(颜色值 == #0101DB) // 找到怪
循环(真) // 打怪循环
窗口.发送按键(窗口句柄,49) // 释放技能打怪
辅助.等待(1000)
//图像.区域找色(303,61,307,61,#0101DB,0,x,y) // 怪物是否死亡
颜色值 = 图像.坐标点取色(303,61)
//如果(x>0)
如果(颜色值 == #0101DB)
继续
否则
跳出
如果结束
循环结束
如果结束
循环结束
返回 真
功能结束
空间结束
用记事本打开的 自动打怪测试.t 的内容
#include"自动打怪.t"
空间 自动打怪测试
//定义默认空间
整型 线程句柄
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
线程句柄 = 线程.开启("自动打怪测试.打怪")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
线程.关闭(线程句柄)
辅助.退出()
返回 真
//函数返回语句
功能结束
空间结束
//空间结束语句
|