//**************************************循环挂机***************//

功能 循环挂机(下标)

变量 地图名, 挂机地图

//dm数组[下标].KeyPress("27")

等待(500)

检查暂停(下标)

等待(1000)

杀怪暂停(下标)

等待(1000)

加蓝暂停(下标)

等待(1000)

召唤坐骑(下标)

等待(1000)

地图名 = 获取当前地图(下标)//接收代码49行变量

如果(地图名 == "大理")//角色所在地图是大理执行以下代码

挂机地图 = 下拉框获取文本("下拉框9")//获取下拉框7用户选择挂机地图存在变量"挂机地图"中

选择(挂机地图)//选择挂机地图

条件 "西湖"//用户选择挂机地图跟这个条件相同执行以下线路

场景传送("大理传送苏州", 下标)//先执行场景传送185行代码 条件 "大理传送苏州"

场景传送("苏州传送西湖", 下标)//再执行场景传送198行代码条件 "苏州传送西湖"

场景传送("西湖传送挂机点", 下标)

条件 "火焰谷"//用户选择挂机地图跟这个条件相同执行以下线路

场景传送("大理传楼兰", 下标)//先执行场景传送185行代码 条件 "大理传送苏州"

调试输出("大理传楼兰完成")

场景传送("楼兰传高昌", 下标) //再执行场景传送198行代码条件 "苏州传送西湖"

调试输出("楼兰传高昌完成")

场景传送("高昌传火焰山", 下标)

场景传送("火焰山传火焰谷", 下标)

场景传送("寻路到火焰谷挂机点", 下标)

结束

结束

如果(地图名 == "洛阳")//角色所在地图是大理执行以下代码

挂机地图 = 下拉框获取文本("下拉框9")//获取下拉框7用户选择挂机地图存在变量"挂机地图"中

选择(挂机地图)//选择挂机地图

条件 "西湖"//用户选择挂机地图跟这个条件相同执行以下线路

场景传送("大理传送苏州", 下标)//先执行场景传送185行代码 条件 "大理传送苏州"

场景传送("苏州传送西湖", 下标)//再执行场景传送198行代码条件 "苏州传送西湖"

场景传送("西湖传送挂机点", 下标)

条件 "火焰谷"//用户选择挂机地图跟这个条件相同执行以下线路

场景传送("洛阳传楼兰", 下标)//先执行场景传送185行代码 条件 "大理传送苏州"

调试输出("洛阳传楼兰完成")

场景传送("楼兰传高昌", 下标) //再执行场景传送198行代码条件 "苏州传送西湖"

调试输出("楼兰传高昌完成")

场景传送("高昌传火焰山", 下标)

场景传送("火焰山传火焰谷", 下标)

场景传送("寻路到火焰谷挂机点", 下标)

结束

结束

等待(100)

如果(地图名 == "苏州")//角色所在地图是要执行以下代码

挂机地图 = 下拉框获取文本("下拉框9")

选择(挂机地图)

条件 "西湖"//用户选择挂机地图跟这个条件相同执行以下线路

//场景传送("苏州")

场景传送("苏州传西湖", 下标)

场景传送("西湖传送挂机点", 下标)

结束

结束

等待(100)

如果(地图名 == "西湖")//角色所在地图西湖是要执行以下代码

挂机地图 = 下拉框获取文本("下拉框9")

选择(挂机地图)

条件 "西湖"//用户选择挂机地图跟这个条件相同执行以下线路

//场景传送("苏州")

场景传送("西湖传送挂机点", 下标)

结束

结束

如果(地图名 == "火焰谷")

挂机地图 = 下拉框获取文本("下拉框9")

选择(挂机地图)

条件 "火焰谷"//要去的挂机地方

场景传送("寻路到火焰谷挂机点", 下标)

结束

结束

// //到达挂机点()

// 等待(900)

// 收回坐骑(下标)

// //等待(200)

// //寻路到火焰谷挂机点()

// 等待(1000)

// 初始化加蓝(下标)

// 等待(1000)

// 初始化检查(下标)

// 等待(1000)

// 初始化杀怪(下标)

// 等待(200)

// //循环杀怪(下标)

结束

//**************************************获取当前地图***************//

功能 获取当前地图(下标)

变量 所在地图名, X, Y

循环(循环开关)

所在地图名 = dm数组[下标].FindPic(1263, 4, 1408, 108, "洛阳.bmp|苏州.bmp|楼兰.bmp|大理.bmp|凤鸣1.bmp|四绝庄内.bmp|西湖.bmp|火焰谷.bmp|高昌.bmp", "020202", 0.6, 0, X, Y)

调试输出("所在地图名:" & 所在地图名)

如果(X >= 0 && Y >= 0)

选择(所在地图名)

条件 0

返回 "洛阳"

条件 1

返回 "苏州"

条件 2

返回 "楼兰"

条件 3

返回 "大理"

条件 4

返回 "风鸣镇"

条件 5

返回 "四绝庄副本内"

条件 6

返回 "西湖"

条件 7

返回 "火焰谷"

条件 8

返回 "高昌"

结束

结束

等待(100)

结束

结束

//***********************************场景传送*****************//

功能 场景传送(地图名, 下标)

选择(地图名)

条件 "大理传楼兰"

大理传楼兰(下标)

条件 "洛阳传楼兰"

洛阳传楼兰(下标)

条件 "楼兰传高昌"

楼兰传高昌(下标)

条件 "高昌传火焰山"

高昌传火焰山(下标)

条件 "火焰山传火焰谷"

火焰山传火焰谷(下标)

条件 "寻路到火焰谷挂机点"//场景传送("寻路到火焰谷挂机点")意思一样,执行以下代码

寻路到火焰谷挂机点(下标)

条件 "大理传送苏州"//传送目的地西湖

大理传送苏州(下标)

条件 "苏州传送西湖"//传送目的地西湖

苏州传送西湖(下标)

条件 "西湖传送挂机点"//传送目的地西湖

西湖传送挂机点(下标)

条件 "大理"

条件 "风鸣镇"

条件 "楼兰"

结束

结束

//************************************到达挂机点****************************//

功能 到达挂机点(下标)

结束

功能 循环杀怪(下标)//因为这里是一个循环,会不停的调用释放技能,所以下面不需要循环了,

变量 X, Y, 返回值, X1, Y1, 标题, 角色名, 杀怪数量, t2, 用户自定义杀怪数

角色名 = dm数组[下标].ReadString(窗口句柄集[下标], "[[[[" & 基址 & "]+" & 一级偏移 & "]+" & 二级偏移 & "]+" & 三级偏移 & "]+" & 名字偏移, 0, 0)

调试输出(角色名)

等待(200)

编辑框读取执行("编辑框0", 文件路径 & 角色名 & ".ini", "配置")

等待(300)

用户自定义杀怪数 = 编辑框获取文本("编辑框0")

如果(用户自定义杀怪数 == 假)

消息框("请设置杀怪数量", 标题 = "")

结束

变量 起始时间 = 当前时间()

循环(杀怪开关1)//这个相当于一个死循环了,会一直不停的找怪刷怪,直到手动停止脚本,

变量 技能键 = 随机数(112, 117)//每次会在2--8产生一个随机数,

返回值 = dm数组[下标].FindColor(316, 30, 325, 40, "ea1200-050505", 0.9, 0, X, Y)//发现怪,有条

如果(X >= 0 && Y >= 0)//找到血条打怪,吧要按得技能键传进去,这个找色

调试输出("[循环杀怪]放技能打怪")

写日志("[循环杀怪] 循环杀怪+1")

释放技能(技能键, 起始时间, 下标)

否则

调试输出("[循环杀怪]打死怪了" & 杀怪数量)//我洗澡了准备,有问题,

调试输出(每天杀怪数)

按键组合键("Ctrl", "Tab", dm数组[下标])

//dm对象.KeyPress(49)//没找到找怪,这个是啥键1//用这个命令就行

等待(50)

//dm对象.FindColor(318,26,333,39,"ff8d80-020202",0.9,0,X1,Y1)//别人抢怪时候不对593,69,837,119,

// dm数组[下标].FindPic(636, 99, 673, 122, "经验.bmp", "020202", 0.9, 0, X1, Y1)// 636,99,673,122,不错

// 如果(X1 >= 0 && Y1 >= 0)

// 等待(100)

// 杀怪数量++

// //取角色每天刷怪数()

// 杀怪数量 = 杀怪数量 - 2

// 结束

如果(获取系统时间() - t2 > 1 * 120 * 1000)

等待(200)

杀怪数量 = dm数组[下标].ReadInt(窗口句柄集[下标], "[[[[" & 基址 & "]+" & 一级偏移 & "]+" & 二级偏移 & "]+" & 三级偏移 & "]+" & 杀怪数偏移, 0)

等待(300)

自动返回挂机点(下标)

调试输出("时间间隔到了检查坐标是否偏远")

t2 = 获取系统时间()

结束

结束

等待(100)

如果(杀怪数量 >= 用户自定义杀怪数)

//返回城市()

跳出

结束

等待(100)

结束

等待(100)

结束

//**************************************************//

功能 释放技能(技能键, 起始时间, 下标)

如果(技能是否可以释放(技能键, 起始时间, 下标) == 1)//判断传进来得技能键是不是在冷却中,不在就释放他,

dm数组[下标].KeyPress(技能键)

否则

dm数组[下标].KeyPress(112)//技能在冷却就普通攻击

结束

结束

//***************有问题**************//

功能 技能是否可以释放(技能键, 起始时间, 下标)//F7是召唤坐骑？

//技能是否可以释放应该找图就能判断出来,

变量 技能名, 冷却时间

选择(技能键)

条件 112

如果(复选框获取状态("复选框11"))

冷却时间 = 编辑框获取文本("编辑框17")

如果(时间间隔("s", 起始时间, 当前时间()) > 冷却时间)

起始时间 = 当前时间()

返回 1

结束

结束

条件 113

如果(复选框获取状态("复选框12"))

冷却时间 = 编辑框获取文本("编辑框17")

如果(时间间隔("s", 起始时间, 当前时间()) > 冷却时间)

起始时间 = 当前时间()

返回 1

结束

结束

条件 114

如果(复选框获取状态("复选框13"))

冷却时间 = 编辑框获取文本("编辑框17")

如果(时间间隔("s", 起始时间, 当前时间()) > 冷却时间)

起始时间 = 当前时间()

返回 1

结束

结束

条件 115

如果(复选框获取状态("复选框14"))

冷却时间 = 编辑框获取文本("编辑框17")

如果(时间间隔("s", 起始时间, 当前时间()) > 冷却时间)

起始时间 = 当前时间()

返回 1

结束

结束

条件 116

如果(复选框获取状态("复选框15"))

冷却时间 = 编辑框获取文本("编辑框17")

如果(时间间隔("s", 起始时间, 当前时间()) > 冷却时间)

起始时间 = 当前时间()

返回 1

结束

结束

条件 117

如果(复选框获取状态("复选框16"))

冷却时间 = 编辑框获取文本("编辑框17")

如果(时间间隔("s", 起始时间, 当前时间()) > 冷却时间)

起始时间 = 当前时间()

返回 1

结束

结束

结束

结束

功能 自动寻路状态(状态, 下标)

变量 起始时间

选择(状态)

条件 "开"

起始时间 = 当前时间()

循环(时间间隔("s", 起始时间, 当前时间()) < 10)//10

如果(大漠找图(1215, 437, 1367, 567, "坐标2.bmp", dm数组[下标]) == 1)

//写日志("[自动寻路状态] 自动寻路窗口已打开")

返回

否则

鼠标移动单击(1328, 183, 1, 2, dm数组[下标])

等待(500)

结束

等待(随机数(50, 80))

结束

条件 "关"

起始时间 = 当前时间()

循环(时间间隔("s", 起始时间, 当前时间()) < 3)

如果(大漠找图(1215, 437, 1367, 567, "坐标2.bmp", dm数组[下标]) == 1)

鼠标移动单击(1328, 183, 1, 2, dm数组[下标])

等待(500)

结束

等待(随机数(50, 80))

结束

结束

结束

//*************************************传送//

功能 洛阳传楼兰(下标)

自动寻路状态("开", 下标)

等待(1000)

循环(循环开关)

变量 X, Y

如果(大漠找图(3, 78, 265, 269, "汪旱.bmp", dm数组[下标], 0.7, 2, 0) == 1)//找到跳出循环,没有找到一直执行否则里面内容直接到目的地停止

//写日志("大理传楼兰 自动寻路完成")

等待(200)

如果(大漠找图(1, 120, 267, 477, "洛阳传楼兰.bmp", dm数组[下标]) == -1)//没有找到大理传楼兰.bmp,被任物挡住了

鼠标移动单击(243, 287, 2, 3, dm数组[下标])//鼠标点这里可以找到传楼兰.bmp

等待(200)

dm数组[下标].FindPic(1, 120, 267, 477, "洛阳传楼兰.bmp", "020202", 0.8, 0, X, Y)

如果(X >= 0 && Y >= 0)

等待(100)

dm数组[下标].MoveTo(X, Y)

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(2000)

调试输出("开始跳出")

返回

结束

结束

否则

调试输出("执行洛阳传楼兰否则")

如果(大漠找图(142, 345, 384, 558, "坐标.bmp", dm数组[下标]) == -1)//+防止别人关自动寻路出错

自动寻路状态("开", 下标)

等待(随机数(100, 200))

结束//+

dm数组[下标].MoveTo(1278, 300)

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(200)

dm数组[下标].LeftClick()

等待(200)

dm数组[下标].MoveTo(1286, 337)

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

dm数组[下标].LeftClick()

结束

等待(50)

结束

结束

功能 大理传楼兰(下标)

自动寻路状态("开", 下标)

//召唤坐骑(下标)//＋的

等待(1000)

循环(循环开关)

变量 X, Y

如果(大漠找图(142, 345, 384, 558, "再见.bmp", dm数组[下标]) == 1)//找到跳出循环,没有找到一直执行否则里面内容直接到目的地停止

//写日志("大理传楼兰 自动寻路完成")

等待(200)

如果(大漠找图(1, 120, 267, 477, "大理传楼兰.bmp", dm数组[下标]) == -1)//没有找到大理传楼兰.bmp,被任物挡住了

鼠标移动单击(243, 287, 2, 3, dm数组[下标])//鼠标点这里可以找到传楼兰.bmp

等待(200)

dm数组[下标].FindPic(1, 120, 267, 477, "大理传楼兰.bmp", "020202", 0.7, 0, X, Y)

如果(X >= 0 && Y >= 0)

等待(100)

dm数组[下标].MoveTo(X, Y)

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(2000)

调试输出("开始跳出")

跳出

结束

结束

否则

调试输出("执行大理传楼兰否则")

如果(大漠找图(142, 345, 384, 558, "坐标.bmp", dm数组[下标]) == -1)//+防止别人关自动寻路出错

自动寻路状态("开", 下标)

等待(随机数(100, 200))

结束//+

鼠标移动单击(1279, 299, 0, 0, dm数组[下标])

等待(500)

鼠标移动双击(1288, 336, 0, 0, dm数组[下标])

结束

等待(50)

结束

自动寻路状态("关", 下标)

结束

功能 楼兰传高昌(下标)

等待(2000)

变量 X1, Y1, X, Y, 返回X, 返回Y

自动寻路状态("开", 下标)

//召唤坐骑(下标)//＋的

等待(1000)

循环(循环开关)

调试输出("楼兰传高昌")

如果(大漠找图(1216, 212, 1420, 550, "楼兰传高昌.bmp", dm数组[下标], 0.8, 3, 0) == 1)//我+防止别人关自动寻路出错

dm数组[下标].MoveTo(1278, 301)

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(200)

dm数组[下标].MoveTo(1325, 422)

等待(200)

dm数组[下标].LeftClick()

等待(100)

dm数组[下标].LeftClick()

等待(1100)

//找图返回坐标(x1,y1,x2,y2,图片名,对象,&返回X,&返回Y,t=0,方向=0)

如果(找图返回坐标(343, 81, 1079, 681, "确定.bmp", dm数组[下标], 返回X, 返回Y, 5, 0) == 1)

dm数组[下标].MoveTo(返回X, 返回Y)

dm数组[下标].LeftClick()

等待(100)

dm数组[下标].LeftClick()

等待(6000)

返回

否则

等待(6000)

返回

结束

否则

调试输出("执行楼兰传高昌兰否则")

如果(大漠找图(142, 345, 384, 558, "坐标.bmp", dm数组[下标]) == -1)//+防止别人关自动寻路出错

自动寻路状态("开", 下标)

等待(随机数(100, 200))

结束//+

鼠标移动单击(1278, 300, 1, 2, dm数组[下标])

等待(500)

鼠标移动双击(1323, 420, 1, 1, dm数组[下标])

结束

等待(50)

结束

结束

功能 高昌传火焰山(下标)

自动寻路状态("开", 下标)

等待(3000)

变量 X3, Y3

循环(循环开关)

如果(大漠找图(499, 166, 907, 490, "场景切换.bmp", dm数组[下标], 0.8, 5, 0) == 1)

//如果(大漠找色1(1322,114,1363,146,"f53b00-222222",dm数组[下标],5,0)==1)//找到跳出循环,没有找到一直执行否则里面内容直接到目的地停止

//写日志("[寻路到四绝庄] 自动寻路完成,接任务")

等待(2500)

跳出

否则

如果(大漠找图(142, 345, 384, 558, "坐标.bmp", dm数组[下标]) == -1)//我+防止别人关自动寻路出错

自动寻路状态("开", 下标)

结束//我+

dm数组[下标].MoveTo(1278, 300)//1326,331//020405有问题高昌传火焰山,有时候传迷宫

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

dm数组[下标].MoveTo(1326, 331)//1328, 296

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

//鼠标移动单击(1278, 301, 1, 2, dm数组[下标])

//等待(500)

//鼠标移动双击(1327, 336, 1, 2, dm数组[下标])

//等待(500)

// 如果(大漠找图(499,166,907,490,"场景切换.bmp",dm数组[下标],0.8,50,0) == 1)//我+防止别人关自动寻路出错

// 等待(200)

// 返回

// 结束//我+

结束

等待(100)

结束

自动寻路状态("关", 下标)

结束

功能 火焰山传火焰谷(下标)

变量 X3, Y3, X2, Y2, 返回X, 返回Y

自动寻路状态("开", 下标)

等待(2000)

循环(循环开关)

dm数组[下标].FindPic(379, 87, 1002, 530, "确定.bmp", "020202", 0.7, 0, X2, Y2)

如果(X2 >= 0 && Y2 >= 0)

dm数组[下标].MoveTo(X2, Y2)

等待(100)

dm数组[下标].LeftClick()

等待(200)

结束

如果(大漠找图(499, 166, 907, 490, "场景切换.bmp", dm数组[下标], 0.8, 5, 0) == 1)//找到跳出循环,没有找到一直执行否则里面内容直接到目的地停止

//写日志("[寻路到四绝庄] 自动寻路完成,接任务")

等待(1200)

跳出

否则

如果(大漠找图(142, 345, 384, 558, "坐标.bmp", dm数组[下标]) == -1)//我+防止别人关自动寻路出错

自动寻路状态("开", 下标)

结束//我+

dm数组[下标].MoveTo(1278, 299)

等待(200)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

dm数组[下标].MoveTo(1328, 354)

等待(100)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

dm数组[下标].LeftClick()//鼠标左键单击头像

等待(100)

//如果(找图返回坐标(379,87,1002,530,"确定.bmp",dm数组[下标],返回X,返回Y,2,0)==1)

// 如果(大漠找图(499,166,907,490,"场景切换.bmp",dm数组[下标],0.9,50,0) == 1)//我+防止别人关自动寻路出错

// 等待(200)

// 跳出

// 结束//我+

结束

等待(160)

结束

自动寻路状态("关", 下标)

结束

功能 寻路到火焰谷挂机点(下标)

自动寻路状态("开", 下标)

变量 返回X, 返回Y, 挂机点开关 = 真

等待(1300)

dm数组[下标].UseDict(1)//这里用1号字库,天龙数字

变量 目的地x = 转整型(编辑框获取文本("编辑框14"))

变量 目的地y = 转整型(编辑框获取文本("编辑框15"))

循环(挂机点开关)

变量 当前x = 转整型(dm数组[下标].Ocr(1344, 1, 1374, 20, "fdff73-000000", 1.0))

变量 当前y = 转整型(dm数组[下标].Ocr(1374, 3, 1404, 20, "fdff73-000000", 1.0))

如果(目的地x != 当前x && 目的地y != 当前y)//判断是否到目的地

如果(大漠找图(142, 345, 384, 558, "坐标.bmp", dm数组[下标]) == -1)//我+防止别人关自动寻路出错

自动寻路状态("开", 下标)

结束//我+

dm数组[下标].MoveTo(1311, 498)//坐标x

等待(110)

dm数组[下标].LeftClick()//鼠标左键单击坐标x位置

等待(110)

dm数组[下标].LeftClick()

等待(200)

dm数组[下标].SendString(窗口句柄集[下标], 目的地x)

等待(300)

dm数组[下标].MoveTo(1344, 498)//坐标y

等待(110)

dm数组[下标].LeftClick()//鼠标左键单击坐标y位置

等待(110)

dm数组[下标].LeftClick()

等待(200)

dm数组[下标].SendString(窗口句柄集[下标], 目的地y)

等待(300)

如果(找图返回坐标(1319, 342, 1421, 573, "移动.bmp", dm数组[下标], 返回X, 返回Y, 3, 0) == 1)

dm数组[下标].MoveTo(返回X, 返回Y)//坐标x

等待(110)

dm数组[下标].LeftClick()//鼠标左键单击坐标x位置

等待(110)

dm数组[下标].LeftClick()

等待(1500)

如果(寻路颜色判断(1368, 84, 1297, 70, dm数组[下标], 循环开关) == 1)//判断是否到目的地

等待(1000)

//收回坐骑(下标)

等待(2000)

自动寻路状态("关", 下标)

等待(2000)

初始化杀怪(下标)

等待(2000)

初始化检查(下标)

等待(1000)

初始化加蓝(下标)

等待(1000)

挂机点开关 = 假

//循环杀怪1(下标)

结束

否则

调试输出("当前x" & 当前x)

调试输出("当前y" & 当前y)

结束

等待(100)

结束

结束

结束

//******************************//

功能 大理传送苏州(下标)

变量 X, Y, X1, Y1, X2, Y2, X0, Y0, X3, Y3

自动寻路(下标)

等待(500)

变量 崔逄九 = dm数组[下标].FindPic(1256, 270, 1409, 508, "崔逢九.bmp", "020202", 0.8, 0, X2, Y2)

如果(X2 >= 0 && Y2 >= 0)

dm数组[下标].MoveTo(X2, Y2)//鼠标移动到自动寻路

等待(随机数(300, 500))

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(100)

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

寻路颜色判断(1368, 84, 1297, 70, dm数组[下标], 循环开关)//判断是否到目的地

等待(随机数(600, 800))

变量 大理向下 = dm数组[下标].FindPic(5, 106, 274, 478, "向下.bmp", "020202", 0.9, 0, X3, Y3)

如果(X3 >= 0 && Y3 >= 0)

dm数组[下标].MoveTo(X3, Y3)//鼠标移动到自动寻路

等待(随机数(300, 500))

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

变量 楼传苏州 = dm数组[下标].FindPic(14, 223, 263, 464, "楼传苏州.bmp", "020202", 0.9, 0, X0, Y0)

如果(X0 >= 0 && Y0 >= 0)

dm数组[下标].MoveTo(X0, Y0)//鼠标移动到自动寻路

等待(随机数(300, 500))

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

//切换场景("苏州")

否则

调试输出("没有找到楼传苏州图片")

结束

否则

调试输出("没有找到向下图片")

结束

结束

结束

功能 苏州传送西湖(下标)

变量 X, Y, X1, Y1, X2, Y2, X3, Y3

自动寻路(下标)

等待(600)

变量 崔逄九 = dm数组[下标].FindPic(1246, 246, 1428, 510, "传西湖.bmp", "020202", 0.8, 0, X2, Y2)

如果(X2 >= 0 && Y2 >= 0)

dm数组[下标].MoveTo(X2, Y2)//鼠标移动到自动寻路

等待(700)

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(100)

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

寻路颜色判断(1368, 84, 1297, 70, dm数组[下标], 循环开关)//判断是否到目的地

等待(1000)

变量 确定2 = dm数组[下标].FindPic(509, 134, 882, 408, "确定2.bmp", "020202", 0.9, 0, X3, Y3)

如果(X3 >= 0 && Y3 >= 0)

dm数组[下标].MoveTo(X3, Y3)//鼠标移动到自动寻路

等待(随机数(300, 500))

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

//切换场景("西湖")

等待(1000)

//到达挂机点()

否则

等待(500)

//切换场景("西湖")

等待(1000)

//到达挂机点()

结束

结束

结束

功能 西湖传送挂机点(下标)

变量 X, Y, X1, Y1, X2, Y2

自动寻路(下标)

等待(600)

变量 自动寻 = dm数组[下标].FindPic(1258, 238, 1424, 514, "怪.bmp", "020202", 0.9, 0, X1, Y1)

如果(X1 >= 0 && Y1 >= 0)

dm数组[下标].MoveTo(X1, Y1)//鼠标移动到自动寻路

等待(随机数(300, 500))

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

变量 自动寻怪字 = dm数组[下标].FindPic(1258, 238, 1424, 514, "柳鬼.bmp", "020202", 0.9, 0, X2, Y2)

如果(X2 >= 0 && Y2 >= 0)

dm数组[下标].MoveTo(X2, Y2)//鼠标移动到自动寻路

等待(随机数(300, 500))

//dm对象.LeftDoubleClick()//鼠标2键单击

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(100)

dm数组[下标].LeftClick()//鼠标左键单击dm.LeftClick

等待(随机数(300, 500))

寻路颜色判断(1368, 84, 1297, 70, dm数组[下标], 循环开关)//判断是否到目的地

等待(1000)

关闭自动寻路(下标)

等待(1000)

//收回坐骑()

否则

调试输出("没有找到柳鬼图片")

结束

否则

调试输出("没有找到怪图片")

结束

结束