|
|
第一次做了个倩女幽魂自动打怪的脚本，发上来给大家看看 求学习
第二个增加了自动拾取银两银票功能
#include"自动拾取.t"
空间 倩女幽魂之自动打怪
//定义默认空间
整型 线程句柄
功能 逻辑型 打怪()
整型 a,d
整型 选项,选项3
选项=下拉框.得到选项("下拉框0")
如果(选项==0)
a=49
否则
如果(选项==1)
a=50
否则
如果(选项==2)
a=51
否则
如果(选项==3)
a=52
否则
如果(选项==4)
a=53
否则
如果(选项==5)
a=54
否则
如果(选项==6)
a=55
否则
如果(选项==7)
a=56
否则
如果(选项==8)
a=57
否则
如果(选项==9)
a=48
否则
如果(复选框.获得状态("复选框0"))
辅助.消息框("请设置技能1按键！")
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
选项3=下拉框.得到选项("下拉框3")
如果(选项3==0)
d=49
如果结束
如果(选项3==1)
d=50
如果结束
如果(选项3==2)
d=51
如果结束
如果(选项3==3)
d=52
如果结束
如果(选项3==4)
d=53
如果结束
如果(选项3==5)
d=54
如果结束
如果(选项3==6)
d=55
如果结束
如果(选项3==7)
d=56
如果结束
如果(选项3==8)
d=57
如果结束
如果(选项3==9)
d=48
如果结束
如果(选项3<0&&复选框.获得状态("复选框1"))
辅助.消息框("请设置技能2按键！")
如果结束
如果(a>0&&复选框.获得状态("复选框0"))
大漠.按键(a)
辅助.等待(600)
如果结束
如果(复选框.获得状态("复选框1"))
大漠.按键(d)
辅助.等待(600)
如果结束
返回 真
功能结束
功能 逻辑型 加血()
整型 b
整型 选项1
选项1=下拉框.得到选项("下拉框1")
如果(选项1==0)
b=112
否则
如果(选项1==1)
b=113
否则
如果(选项1==2)
b=114
否则
如果(选项1==3)
b=115
否则
如果(选项1==4)
b=116
否则
如果(选项1==5)
b=117
否则
如果(选项1==6)
b=118
否则
如果(选项1==7)
b=119
否则
如果(复选框.获得状态("复选框2"))
辅助.消息框("请设置加血按键！")
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果(b>0&&复选框.获得状态("复选框2"))
大漠.按键(b)
辅助.等待(300)
如果结束
返回 真
功能结束
功能 逻辑型 加蓝()
整型 c
整型 选项2
选项2=下拉框.得到选项("下拉框2")
如果(选项2==0)
c=112
否则
如果(选项2==1)
c=113
否则
如果(选项2==2)
c=114
否则
如果(选项2==3)
c=115
否则
如果(选项2==4)
c=116
否则
如果(选项2==5)
c=117
否则
如果(选项2==6)
c=118
否则
如果(选项2==7)
c=119
否则
如果(复选框.获得状态("复选框3"))
辅助.消息框("请设置加蓝按键！")
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果(c>0&&复选框.获得状态("复选框3"))
大漠.按键(c)
辅助.等待(300)
如果结束
返回 真
功能结束
功能 逻辑型 自动打怪()
逻辑型 是否成功
整型 窗口句柄
是否成功=辅助.注册插件("rc:\\dm.dll",真)
是否成功=大漠.创建()
如果(!是否成功)
辅助.消息框("大漠创建失败~")
返回 假
如果结束
窗口句柄=大漠.找到窗口("MainWnd class of ArkEngine","")
是否成功=大漠.绑定窗口(窗口句柄,"dx","dx","dx",0)
如果(!是否成功)
辅助.消息框("窗口绑定失败~")
返回 假
如果结束
是否成功=大漠.设置字库(0,"rc://倩女死亡.txt")
如果(!是否成功)
辅助.消息框("字库设置失败~")
返回 假
如果结束
倩女幽魂之自动打怪.打打()
返回 真
功能结束
功能 逻辑型 打打()
辅助.等待(1000)
大漠.按键(9)
循环(真)
整型 intx
整型 inty
整型 是否找到,找到与否1,找到与否2
是否找到=大漠.找字(406,4,529,58,"[死亡]","ffffff-000000",1.0,intx,inty)
找到与否1=大漠.找字(406,4,529,58,"[死亡]","ff88ff-000000",1.0,intx,inty)
找到与否2=大漠.找字(406,4,529,58,"[死亡]","fffe91-000000",1.0,intx,inty)
如果((是否找到==0)||(找到与否1==0)||(找到与否2==0))
辅助.等待(300)
大漠.按键(9)
否则
倩女幽魂之自动打怪.打怪()
如果结束
逻辑型 是否找到1
逻辑型 是否找到2
字符型 加血百分比
字符型 加蓝百分比
整型 e
整型 f
整型 g
整型 h
浮点型 m,n
加血百分比=编辑框.获得文本("编辑框0")
加蓝百分比=编辑框.获得文本("编辑框1")
e=转换.字符型转整型(加血百分比,0)
f=转换.字符型转整型(加蓝百分比,0)
如果((e<0)||(e>100))
辅助.消息框("请输入一个0~100的数")
如果结束
如果((f<0)||(f>100))
辅助.消息框("请输入一个0~100的数")
如果结束
m=74+108*e/100
n=74+108*f/100
g=转换.浮点型转整型(m)
h=转换.浮点型转整型(n)
是否找到1=大漠.区域找色(g,26,182,40,"900909-000000",1.0,0,intx,inty)
如果(!是否找到1)
倩女幽魂之自动打怪.加血()
如果结束
是否找到2=大漠.区域找色(h,37,182,51,"093b95-000000",1.0,0,intx,inty)
如果(!是否找到2)
倩女幽魂之自动打怪.加蓝()
如果结束
自动拾取.银票银两()
循环结束
返回 真
功能结束
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
线程句柄=线程.开启("倩女幽魂之自动打怪.自动打怪")
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
大漠.解绑窗口(线程句柄)
大漠.释放(线程句柄)
线程.关闭(线程句柄)
辅助.退出()
返回 真
//函数返回语句
功能结束
功能 逻辑型 按钮0_点击()
//这里添加你要执行的代码
大漠.解绑窗口(线程句柄)
大漠.释放(线程句柄)
线程.暂停(线程句柄)
返回 真
功能结束
空间结束
//空间结束语句
空间 自动拾取
功能 逻辑型 银票银两()
整型 是否找到1,是否找到2
整型 intx1,intx2
整型 inty1,inty2
是否找到1=大漠.找字(0,0,2000,2000,"银票","ffffff-000000",1.0,intx1,inty1)
是否找到2=大漠.找字(0,0,2000,2000,"银两","ffffff-000000",1.0,intx2,inty2)
循环((是否找到1==0)||(是否找到2==0))
是否找到1=大漠.找字(0,0,2000,2000,"银票","ffffff-000000",1.0,intx1,inty1)
如果(是否找到1==0)
大漠.移动(intx1+10,inty1+5)
大漠.左键单击()
辅助.等待(1000)
如果结束
是否找到2=大漠.找字(0,0,2000,2000,"银两","ffffff-000000",1.0,intx2,inty2)
如果(是否找到2==0)
大漠.移动(intx2+10,inty2+5)
大漠.左键单击()
辅助.等待(1000)
如果结束
如果((是否找到1!=0)&&(是否找到2!=0))
倩女幽魂之自动打怪.打打()
如果结束
循环结束
返回 真
功能结束
空间结束 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
|
/2 
发表于 2012-2-10 13:42:05
收藏
支持
反对
