TC官方合作论坛
标题:
求助 大神门 新手 等待中....
[打印本页]
作者:
liuxilei520
时间:
2013-1-17 19:40
标题:
求助 大神门 新手 等待中....
#import "dm.dmsoft" AAA
空间 剑侠辅助
整型 线程句柄
功能 逻辑型 剑侠辅助()
整型 窗口句柄
整型 intX, intY
逻辑型 是否成功
整型 血量
逻辑型 内力
AAA.SetPath(辅助.获取资源路径("rc:"))
是否成功=辅助.注册插件("rc:\\dm.dll",真)
如果(是否成功)
辅助.消息框("注册成功")
否则
辅助.消息框("注册失败")
如果结束
窗口句柄=窗口.鼠标所在窗口句柄()
如果(窗口句柄==0)
辅助.消息框("获得窗口句柄失败！")
否则
整型 是否绑定成功
是否绑定成功=AAA.BindWindow(窗口句柄,"dx","dx","dx",0)
如果(是否绑定成功==0)
辅助.消息框("大漠绑定失败！")
否则
辅助.消息框("恭喜,大漠绑定成功！")
如果结束
循环(真)
AAA.FindPic(32,54,745,577,"2.bmp","203040",0.8,0,intX,intY)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
AAA.FindPic(32,54,745,577,"金怪.bmp","203040",0.8,0,intX,intY)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
AAA.FindPic(32,54,745,577,"水怪.bmp","203040",0.8,0,intX,intY)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
AAA.FindPic(32,54,745,577,"木怪.bmp","203040",0.8,0,intX,intY)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
AAA.FindPic(32,54,745,577,"火怪.bmp","203040",0.8,0,intX,intY)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
循环结束
如果结束
返回 真
功能结束
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
线程句柄=线程.开启("剑侠辅助.剑侠辅助","")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
AAA.UnBindWindow()
AAA.ForceUnBindWindow(0)
线程.关闭(线程句柄)
辅助.退出()
返回 真
//函数返回语句
功能结束
功能 逻辑型 热键0_热键()
//这里添加你要执行的代码
热键.注册("热键0")
线程句柄=线程.开启("剑侠辅助.剑侠辅助","")
返回 真
功能结束
功能 逻辑型 热键1_热键()
//这里添加你要执行的代码
热键.注册("热键1")
AAA.UnBindWindow()
AAA.ForceUnBindWindow(0)
线程.关闭(线程句柄)
返回 真
功能结束
功能 逻辑型 热键1_失去焦点()
//这里添加你要执行的代码
热键.销毁("热键1")
辅助.等待(100)
热键.注册("热键1")
返回 真
功能结束
功能 逻辑型 热键0_失去焦点()
//这里添加你要执行的代码
热键.销毁("热键0")
辅助.等待(100)
热键.注册("热键0")
返回 真
功能结束
空间结束
//空间结束语句
怎么 一开始就往左上角坐标跑啊 其其它都可以
作者:
554354854
时间:
2013-1-17 19:41
又见3.0
作者:
liuxilei520
时间:
2013-1-17 19:43
新手 3.0都不会
作者:
元芳
时间:
2013-1-17 20:02
3.0看不懂
作者:
zyz0112
时间:
2013-1-17 21:03
那个区那个服啊
作者:
liuxilei520
时间:
2013-1-17 21:05
免费区
作者:
zyz0112
时间:
2013-1-17 21:17
那个区
作者:
sport431
时间:
2013-1-17 21:24
左上角就是没找到图,返回值是-1,1,所以跑左上角
作者:
雨碎江南
时间:
2013-1-17 21:35
找图的返回值冲突了吧，在每次找图前初始化返回值intX,intY
比如：
intX=0
intY=0
AAA.FindPic(32,54,745,577,"88888888.bmp","203040",0.8,0,intX,intY)
intX=0
intY=0
AAA.FindPic(32,54,745,577,"999999.bmp","203040",0.8,0,intX,intY)
如果答对了给个 采纳呗
作者:
liuxilei520
时间:
2013-1-17 21:51
回复
9楼
雨碎江南
的帖子
好的 谢谢你的回答 我试试
作者:
liuxilei520
时间:
2013-1-17 21:55
回复
7楼
zyz0112
的帖子
能找到图啊 我前台 可以的 后台锁定鼠标 他就往左上跑了 在前面的怪都打 就是不打后门的
作者:
雨碎江南
时间:
2013-1-17 22:05
这样找图不科学，没有找到图也会执行鼠标移动命令，那就乱套了，最好加判断语句，可以这样：
intX=0
intY=0
图片序号=-1
B=0
循环(B<30)
图片序号=AAA.FindPic(32,54,745,577,"木怪.bmp","203040",0.8,0,intX,intY)
如果(图片序号>=0)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
否则
B=B+1
辅助.等待(300)
如果结束
循环结束
作者:
雨碎江南
时间:
2013-1-17 22:07
上面代码有误，更正下
：
intX=0
intY=0
图片序号=-1
B=0
循环(B<30)
图片序号=AAA.FindPic(32,54,745,577,"木怪.bmp","203040",0.8,0,intX,intY)
如果(图片序号>=0)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
B=30
否则
B=B+1
辅助.等待(300)
如果结束
循环结束
作者:
liuxilei520
时间:
2013-1-17 23:28
回复
12楼
雨碎江南
的帖子
还有4张怎么搞 我是新手
作者:
liuxilei520
时间:
2013-1-17 23:33
回复
13楼
雨碎江南
的帖子
老大你真牛 行了
作者:
雨碎江南
时间:
2013-1-17 23:51
如果解决了，那就在我的回复中 左下角点一下“采纳"吧，赚个TC币真不容易啊
采纳| 举报| TOP
作者:
liuxilei520
时间:
2013-1-17 23:53
回复
16楼
雨碎江南
的帖子
好的 现在就是 我只打木 按照你的方法 现在
作者:
liuxilei520
时间:
2013-1-17 23:54
回复
12楼
雨碎江南
的帖子
#import "dm.dmsoft" AAA
空间 剑侠辅助
整型 线程句柄
功能 逻辑型 剑侠辅助()
整型 窗口句柄
整型 intX, intY
逻辑型 是否成功
整型 图片序号=-1
AAA.SetPath(辅助.获取资源路径("rc:"))
是否成功=辅助.注册插件("rc:\\dm.dll",真)
如果(是否成功)
辅助.消息框("注册成功")
否则
辅助.消息框("注册失败")
如果结束
窗口句柄=窗口.鼠标所在窗口句柄()
AAA.MoveWindow(窗口句柄,-0,-0)
AAA.SetWindowText(窗口句柄,"剑侠轻风")
如果(窗口句柄==0)
辅助.消息框("获得窗口句柄失败！")
否则
整型 是否绑定成功
是否绑定成功=AAA.BindWindow(窗口句柄,"dx","dx2","dx",0)
如果(是否绑定成功==0)
辅助.消息框("大漠绑定失败！")
否则
辅助.消息框("恭喜,大漠绑定成功！")
如果结束
辅助.等待(2000)
循环(真)
intX=0
intY=0
图片序号=-1
B=0
循环(B<30)
图片序号=AAA.FindPic(32,54,745,577,"木怪.bmp","203040",0.8,0,intX,intY)
如果(图片序号>=0)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
B=30
否则
B=B+1
辅助.等待(300)
如果结束
循环结束
如果结束
返回 真
作者:
liuxilei520
时间:
2013-1-17 23:56
回复
0楼
liuxilei520
的帖子
B 没定义变量 名
作者:
雨碎江南
时间:
2013-1-18 00:03
怎么不下载最新版本的？没定义的就定义一下全局变量吧
空间 剑侠辅助
整型 B
作者:
雨碎江南
时间:
2013-1-18 00:05
只打木的话，就复制“循环-----循环结束”的代码把图片名和内容改下就可以了
循环(真)
intX=0
intY=0
图片序号=-1
B=0
循环(B<30)
图片序号=AAA.FindPic(32,54,745,577,"木怪.bmp","203040",0.8,0,intX,intY)
如果(图片序号>=0)
AAA.MoveTo(intX-20,intY+60)
辅助.等待(200)
AAA.LeftClick()
B=30
否则
B=B+1
辅助.等待(300)
如果结束
循环结束
如果结束
返回 真
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1
#import "dm.dmsoft" AAA
： 老大你真牛 行了