回复 2楼陌上青衣。的帖子
很长。。。要耐心
- #import "dm.dmsoft" dm
- 空间 傲剑古墓挂机
- //定义默认空间
- 整型 X,Y,随机数1,随机数2,随机数3
- 功能 逻辑型 线程1()
-
- dm.SetPath(辅助.获取资源路径("rc:"))
- 整型 窗口句柄=窗口.鼠标所在窗口句柄()
- 如果(窗口句柄==0)
- 辅助.消息框("获得窗口句柄失败!")
- 否则
- 整型 是否绑定成功
- 是否绑定成功=dm.BindWindow(窗口句柄,"gdi","windows","windows",0)
- 如果(是否绑定成功==0)
- 辅助.消息框("大漠绑定失败,请试下其他绑定模式!")
- 否则
- 辅助.蜂鸣(1000,500)
-
- 辅助.等待(2000)
- 整型 坐标点X,坐标点Y
- 整型 选项1=下拉框.得到选项("下拉框1")
- 整型 选项2=下拉框.得到选项("下拉框2")
- 随机数2=辅助.随机数(900,1200)
-
-
-
- 循环(真)
- 循环(真)
-
- 辅助.等待(6000)
- dm.FindPic(0,0,1366,768,"10.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- help.sleep(3000)
- dm.FindPic(0,0,500,300,"19.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- 辅助.消息框("找到")
- 否则
- dm.KeyPress(84)
- 循环(真)
- dm.FindPic(0,0,1366,664,"20.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X+85,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
- 跳出
- 如果结束
-
- 循环结束
- dm.FindPic(0,0,1366,664,"27.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
- 否则
- dm.FindPic(0,0,1366,664,"22.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
- 否则
- dm.FindPic(0,0,1366,664,"21.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
- 否则
- dm.FindPic(0,0,1366,664,"24.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
- 否则
- dm.FindPic(0,0,1366,664,"25.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
- 否则
- dm.FindPic(0,0,1366,664,"26.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- help.sleep(1000)
-
- 如果结束
- 如果结束
-
- 如果结束
- 如果结束
- 如果结束
- 如果结束
- 如果结束
-
- dm.FindPic(0,0,1366,768,"23.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- 如果结束
- help.sleep(1000)
- dm.KeyPress(84)
- help.sleep(1000)
-
-
- help.sleep(3000)
- dm.KeyPress(77)
- help.sleep(随机数2)
- 循环(真)
- dm.FindPic(0,0,1366,768,"16.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X+39,Y)
- help.sleep(随机数2)
- dm.LeftClick()
- help.sleep(随机数2)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
- //坐标
- 如果(选项1==0)
-
- dm.KeyPress(49)
- help.sleep(500)
- dm.KeyPress(51)
- help.sleep(500)
- dm.KeyPress(53)
- help.sleep(500)
- 否则
- 如果(选项1==1)
-
- dm.KeyPress(50)
- help.sleep(500)
- dm.KeyPress(53)
- help.sleep(500)
- 否则
- 如果(选项1==2)
- dm.KeyPress(50)
- help.sleep(500)
- dm.KeyPress(48)
- help.sleep(500)
- 否则
- 如果(选项1==3)
- dm.KeyPress(49)
- help.sleep(500)
- dm.KeyPress(51)
- help.sleep(500)
- dm.KeyPress(48)
- help.sleep(500)
- 否则
- dm.KeyPress(55)
- help.sleep(500)
- dm.KeyPress(48)
- help.sleep(500)
- 如果结束
- 如果结束
- 如果结束
- 如果结束
- //X坐标
-
- dm.FindPic(0,0,1366,768,"18.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X+39,Y)
- help.sleep(随机数2)
- dm.LeftClick()
-
- help.sleep(随机数2)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
-
- dm.KeyPress(8)
- help.sleep(500)
- 如果(选项1==0)
-
- dm.KeyPress(50)
- help.sleep(500)
- dm.KeyPress(53)
- help.sleep(500)
-
- 否则
- 如果(选项1==1)
-
- dm.KeyPress(50)
- help.sleep(500)
- dm.KeyPress(48)
- help.sleep(500)
- 否则
- 如果(选项1==2)
- dm.KeyPress(56)
- help.sleep(500)
- dm.KeyPress(52)
- help.sleep(500)
- 否则
- 如果(选项1==3)
- dm.KeyPress(55)
- help.sleep(500)
- dm.KeyPress(57)
- help.sleep(500)
- 否则
- dm.KeyPress(54)
- help.sleep(500)
- dm.KeyPress(48)
- help.sleep(500)
- 如果结束
- 如果结束
- 如果结束
- 如果结束
- //Y坐标
-
- 如果结束
-
-
- dm.FindPic(0,0,1366,768,"15.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(随机数2)
- dm.LeftClick()
- help.sleep(3000)
- dm.LeftClick()
- help.sleep(6000)
- help.sleep(6000)
- dm.KeyPress(77)
-
-
-
- 如果结束
-
- 跳出
-
- 如果结束
-
- 循环结束
- dm.KeyPress(90)
- help.sleep(随机数2)
- dm.FindPic(0,0,1366,768,"17.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X+45,Y)
-
- help.sleep(随机数2)
- dm.LeftClick()
- help.sleep(随机数2)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
- dm.KeyPress(8)
- help.sleep(500)
- dm.KeyPress(8)
- //挂机范围
- 如果(选项2==0)
- dm.KeyPress(39)
- help.sleep(500)
- dm.KeyPress(53)
- help.sleep(500)
- 否则
- 如果(选项2==1)
- dm.KeyPress(49)
- help.sleep(500)
- 否则
- 如果(选项2==2)
- dm.KeyPress(50)
- help.sleep(500)
- 如果结束
- 如果结束
- 如果结束
-
- 如果结束
-
-
-
- dm.FindPic(0,0,1366,768,"14.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(随机数2)
- dm.LeftClick()
- help.sleep(随机数2)
- 如果结束
- 跳出
- 如果结束
- 循环结束
- //循环按键
- 随机数1=辅助.随机数(200,300)
- 循环(真)
- dm.FindPic(0,0,1366,768,"10.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.KeyPress(49)
- 辅助.等待(随机数1)
- dm.KeyPress(50)
- 辅助.等待(随机数1)
- dm.KeyPress(51)
- 辅助.等待(随机数1)
- 否则
- 跳出
-
- 如果结束
- 循环结束
- 循环结束
- 如果结束
- 如果结束
- 返回 真
- //函数返回语句
- 功能结束
- 功能 逻辑型 线程2()
- dm.SetPath(辅助.获取资源路径("rc:"))
- 整型 窗口句柄=窗口.鼠标所在窗口句柄()
- 如果(窗口句柄==0)
- 辅助.消息框("获得窗口句柄失败!")
- 否则
- 整型 是否绑定成功
- 是否绑定成功=dm.BindWindow(窗口句柄,"gdi","windows","windows",0)
- 如果(是否绑定成功==0)
- 辅助.消息框("大漠绑定失败,请试下其他绑定模式!")
- 否则
- 辅助.蜂鸣(1000,500)
-
- 辅助.等待(2000)
- 整型 m=1
- 随机数3=辅助.随机数(8000,28000)
- 整型 选项0=下拉框.得到选项("下拉框0")
-
-
- 辅助.等待(2000)
- 循环(真)
- dm.FindPic(600,0,1366,100,"12.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
-
- dm.KeyPress(77)
- help.sleep(2000)
- 循环(真)
- dm.FindPic(150,118,1000,700,"2.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- help.sleep(1000)
- dm.MoveTo(X,Y)
- help.sleep(2000)
- dm.LeftClick()
- help.sleep(2000)
-
- 跳出
-
-
- 如果结束
- 循环结束
- 循环(真)
- dm.FindPic(548,180,959,394,"3.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- help.sleep(1000)
- dm.MoveTo(X,Y)
- help.sleep(2000)
- dm.LeftClick()
- help.sleep(2000)
- 跳出
-
- dm.FindPic(150,118,1000,700,"2.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- help.sleep(1000)
- dm.MoveTo(X,Y)
- help.sleep(2000)
- dm.LeftClick()
- 如果结束
- 如果结束
- 循环结束
- 循环(真)
- dm.FindPic(567,342,822,507,"4.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- help.sleep(1000)
- dm.MoveTo(X,Y)
- help.sleep(2000)
- dm.LeftClick()
- help.sleep(2000)
- 跳出
- 否则
- dm.FindPic(567,342,822,507,"3.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- help.sleep(1000)
- dm.MoveTo(X,Y)
- help.sleep(2000)
- dm.LeftClick()
- 如果结束
-
- 如果结束
-
-
- 循环结束
- 循环(真)
- dm.FindPic(0,0,1366,768,"5.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
-
- dm.KeyPress(77)
- help.sleep(2000)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- 跳出
- 如果结束
- help.sleep(2000)
- 循环结束
- help.sleep(1000)
- 如果(选项0==0)
- dm.FindPic(0,0,1366,768,"8.bmp","000000",0.9,0,X,Y)
- 否则
- 如果(选项0==1)
- dm.FindPic(0,0,1366,768,"7.bmp","000000",0.9,0,X,Y)
- 否则
- dm.FindPic(0,0,1366,768,"7.bmp","000000",0.9,0,X,Y)
- 如果结束
- 如果结束
- 如果(X>0)
- dm.MoveTo(X,Y)
-
- dm.LeftClick()
- help.sleep(1000)
- 如果结束
- dm.FindPic(360,438,790,560,"9.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- 如果结束
- 如果结束
-
-
- 辅助.等待(随机数3)
- 循环结束
- 如果结束
- 如果结束
- 返回 真
- 功能结束
- 功能 逻辑型 线程3()
- //判断死亡。死亡回城
-
- 整型 窗口句柄=窗口.鼠标所在窗口句柄()
- 如果(窗口句柄==0)
- 辅助.消息框("获得窗口句柄失败!")
- 否则
- 整型 是否绑定成功
- 是否绑定成功=dm.BindWindow(窗口句柄,"gdi","windows","windows",0)
- 如果(是否绑定成功==0)
- 辅助.消息框("大漠绑定失败,请试下其他绑定模式!")
- dm.SetPath(辅助.获取资源路径("rc:"))
-
- 辅助.等待(2000)
- 循环(真)
- dm.FindPic(0,0,1000,700,"11.bmp","000000",0.9,0,X,Y)
- 如果(X>0)
- dm.MoveTo(X,Y)
- help.sleep(1000)
- dm.LeftClick()
- 如果结束
- 循环结束
- 如果结束
- 如果结束
-
- 返回 真
-
-
- 功能结束
- 功能 逻辑型 按钮3_点击()
- //这里添加你要执行的代码
- //这里添加你要执行的代码
- 逻辑型 注册=辅助.注册插件("dm.dll",真)
- 如果(注册)
- 辅助.蜂鸣(1000,500)
- 如果结束
- 整型 线程句柄1,线程句柄2,线程句柄3
- 线程句柄2=线程.开启("傲剑古墓挂机.线程2","")
- 线程句柄1=线程.开启("傲剑古墓挂机.线程1","")
- 线程句柄3=线程.开启("傲剑古墓挂机.线程3","")
- 返回 真
- //函数返回语句
- 功能结束
- 功能 逻辑型 热键0_热键()
- //这里添加你要执行的代码
- 线程.开启("傲剑古墓挂机.按钮3_点击","")
- 返回 真
- 功能结束
- 功能 逻辑型 热键1_热键()
-
- 整型 线程句柄
- 线程句柄=线程.开启("傲剑古墓挂机.按钮3_点击","")
- //这里添加你要执行的代码
- 线程.关闭(线程句柄)
- 辅助.消息框("推出")
- 返回 真
- 功能结束
- 功能 逻辑型 按钮1_点击()
- //这里添加你要执行的代码整型 线程句柄
- 逻辑型 是否成功,是否成功2
- 整型 线程句柄=线程.开启("傲剑古墓挂机.按钮3_点击","")
- 辅助.等待(2000)
- 线程.暂停(线程句柄)
- 辅助.等待(2000)
- 线程.恢复(线程句柄)
- 返回 假
- 功能结束
- 功能 逻辑型 按钮0_点击()
- //这里添加你要执行的代码
- 进程.打开("rc:我的浏览器.exe")
- help.sleep(2000)
- 返回 真
- 功能结束
复制代码 |