|
|
马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
这是一个传奇的后台打怪脚本·· 想橡中是这样的· 但是 前台可以 一到后台 就完了 还有 游戏窗口为什么 老是往出弹跳 往后面 压不住啊
变量 线程1
变量 dm
功能 决战大漠版_初始化()
//这里添加你要执行的代码
//编辑框设置文本("编辑框0","我爱郭明瑞")
变量 ret=是否注册("dm.dmsoft")
如果(ret)
// 消息框("插件已注册")
dm=com("dm.dmsoft")
否则
消息框("插件未注册")
变量 ret1=注册插件("rc:\\dm.dll",真)
如果(ret1)
dm=com("dm.dmsoft")
变量 版本号=dm.Ver()
消息框("插件注册成功 版本号为"&版本号)
结束
结束
结束
功能 启动_热键()
线程1=线程开启("打怪","")
结束
//终止热键操作
功能 终止_热键()
线程关闭(线程1)
结束
功能 打怪()
变量 窗口句柄=窗口查找("┊¤▁决战巅峰01－24区▁网通▁已合▁¤┊ - 01-24区 - 呵呵aa")
dm.SetWindowState(窗口句柄,12)
变量 绑定是否成功 = dm.BindWindow(窗口句柄,"gdi","windows","windows",1)
调试输出(绑定是否成功)
循环(真)
变量 x
变量 y
dm.SetPath(获取资源路径("rc:"))
变量 ret3 = dm.FindPic(0,0,800,800,"/500元宝.bmp","000000",0.9,0,x,y)
如果(ret3==0)
x=x+19
y=y+23 //x 620-599=21 y 306-283=23
// 窗口鼠标左键单击(窗口句柄,x,y)
// 鼠标移动(x,y)
// 鼠标左键单击()
dm.MoveTo(x,y)
dm.LeftClick(2)
等待(200)
dm.LeftClick
// 窗口鼠标左键单击(窗口句柄,x,y)
// 鼠标左键单击()
等待(700)
dm.LeftClick()
// 鼠标左键单击()
// 窗口鼠标左键单击(窗口句柄,x,y)
等待(900)
// 调试输出("现在在运行拾取")
否则
变量 x1=-1,y1=-1
// dm.SetPath(获取资源路径("rc:"))
变量 ret2=dm.FindPic(0,0,800,500,"/血管图全.bmp","000000",0.9,0,x1,y1)
如果(ret2==0)
x1=x1+18
y1=y1+30
// 鼠标移动(x1,y1)
//
// 鼠标左键单击()
dm.MoveTo(x1,y1)
dm.LeftClick()
// 窗口鼠标左键单击(窗口句柄,x1,y1)
等待(100)
// 鼠标左键单击()
// 窗口鼠标左键单击(窗口句柄,x1,y1)
dm.LeftClick()
等待(3500)
调试输出("运行打怪")
否则
等待(1000)
// 键盘按键(49) //东西又没 血又没 的情况下 按随机键 重新开始
// 窗口发送按键(窗口句柄,49)
dm.KeyPress(49)
等待(3000)
调试输出("没东西打")
结束
结束
结束
结束
|
|
/2 
发表于 2015-11-24 22:20:33
楼主