////查找任务() 里有死循环 ,不能重复调用死循环,删除所有非主线程的查找任务()
变量 线程ID, dm, hwnd, dm_ret, 版本号
//从这里开始执行
//启动_热键操作
功能 启动_热键()
线程ID = 线程开启("执行", "")
结束
功能 执行()
//从这里开始你的代码
hwnd = dm.GetMousePointWindow()
调试输出(hwnd)
等待(150)
dm_ret = dm.BindWindowEx(hwnd, "dx.graphic.3d", "dx.mouse.position.lock.api|dx.mouse.position.lock.message|dx.mouse.state.api", "dx.keypad.state.api", "dx.public.active.message", 0)
等待(1000)
查找任务()
结束
功能 查找任务()
变量 x1, y1, x = 455, y = 250
循环(真)
鼠标小地图移动单击(x, y)
dm_ret = dm.FindPic(0, 0, 800, 600, "图片四.bmp", "000000", 0.9, 0, x1, y1)
调试输出(x1 & y1)
如果(x1 > 0)
dm.MoveTo(x1 + 31, y1 + 58)
等待(150)
dm.LeftClick()
等待(500)
跳出
结束
结束
领取任务()
结束
功能 领取任务()
dm.MoveTo(55, 176)
等待(500)
dm.LeftClick()
等待(1000)
dm.LeftClick()
等待(500)
检查任务一()
结束
功能 检查任务一()
变量 x, y
dm.KeyPress(120)
等待(500)
dm_ret = dm.FindPic(0, 0, 800, 600, "图片一.bmp", "000000", 0.9, 0, x, y)
调试输出(x & y)
如果(x > 0)
dm.MoveTo(x + 24, y + 10)
等待(500)
dm.LeftClick()
等待(500)
检查任务二()
结束
结束
功能 检查任务二()
变量 x, y
dm_ret = dm.FindPic(0, 0, 800, 600, "图片二.bmp", "000000", 0.9, 0, x, y)
调试输出(x & y)
如果(x > 0)
dm.KeyPress(9)
等待(150)
dm.MoveTo(455, 285)
等待(500)
dm.LeftClick()
等待(500)
dm.KeyPress(9)
等待(2000)
寻路一()
结束
结束
功能 寻路一()
变量 x1, y1, x = 180, y = 400
循环(真)
鼠标小地图移动单击(x, y)
dm_ret = dm.FindPic(0, 0, 800, 600, "图片三.bmp", "000000", 0.9, 0, x1, y1)
调试输出(x1 & y1)
如果(x1 > 0)
等待(1500)
跳出
结束
结束
结束
//终止热键操作
功能 终止_热键()
线程关闭(线程ID)
结束
功能 碎碎念_初始化()
//这里添加你要执行的代码
注册插件("rc:dm.dll", 真)
dm = 插件("dm.dmsoft")
版本号 = dm.ver()
调试输出(版本号)
dm.SetPath(获取资源路径("rc:"))
结束 |