if 获取挂机()==1 then 自动战斗("关闭") end
if 获得挂机地图ID()>0 then 设置("清空挂机坐标") end
if 0<查找任务("当前","有朋远来") then 放弃任务("有朋远来") end
if 0<查找任务("当前","淬剑·绿竹乡") then 放弃任务("淬剑·绿竹乡") end
if 0<查找任务("当前","淬剑·副本") then 放弃任务("淬剑·副本") end
if 0<查找任务("当前","绣针难觅") then 转到("做绣针难觅") end
if 0<查找任务("当前","雁行") then 转到("做雁行") end
if 0<查找任务("当前","解密") then 转到("做解密") end
if 0<查找任务("当前","国色天香") then 转到("做国色天香") end
if 坐标距离(393,325)<5 then 转到("交国色天香") end
if 外传任务("已接数量")>0 then 转到("做外传") end
if 外传任务("可接数量")>0 then 转到("接外传") end


   三三三三三三三三三三三三注意三三三三三三三三三三三三三三
   三      无法做的请手动做一下 基本适合所有支线         三
   三三三三三三三三三三三三三三三三三三三三三三三三三三三三


::接外传::
外传任务("去接任务");等待(3000)
if 查找("NPC","路鸿")<5 then 等待(2000) else 向下执行(2) end 
if 是否有红名怪("",5) then 转到("处理怪物扰") end 
if 查找("NPC","洛追云")<5 then 等待(2000) else 向下执行(2) end 
if 是否有红名怪("",5) then 转到("处理怪物扰") end 
记住当前位置()
等待(500)
if 窗口事件("Win_NPCTaskContent")==1 then 转到("点按钮") end
if 窗口事件("Win_NPC")==1 then 转到("选项") end
if 取记录距离()<0.5 then 打开NPC("");等待(2000) else 重载脚本() end  
重载脚本()

if 0<查找任务("当前","清洁小能手") then 转到("做清洁小能手") end

外传任务("完成",1)
--if 是否移动() then 向下执行(2) end
--if 查找("NPC","")<2 then 选中对象("",2) end
if 外传任务("已接数量")>1 then else 向下执行(3) end
外传任务("任务寻径",2);等待(2000)
向下执行(3)

if 外传任务("已接数量")>1 then else 向下执行(3) end
if 外传任务("取得任务目标")=="有朋远来" then 放弃任务("有朋远来") end


::做外传::
if 0<查找任务("当前","缘图觅宝") then 转到("昭明藏宝图") end
外传任务("任务寻径",1);等待(2000)
if 外传任务("完成",1)==1 then 转到("交外传任务") end
if 窗口事件("Win_NPCTaskContent")==1 then 转到("点按钮") end
if 窗口事件("Win_NPC")==1 then 转到("选项") end
if 外传任务("取得任务目标")=="击杀" then 转到("击杀") end
if 外传任务("取得任务目标")=="夺取" then 转到("击杀") end
if 外传任务("取得任务目标")=="目标" then 转到("目标") end
if 外传任务("取得任务目标")=="收集" then 转到("收集") end
记住当前位置()
等待(1000)
if 取记录距离()<1 then 外传任务("任务寻径",1);等待(1000) else 向下执行(11) end
if 取记录距离()<1 then else 向下执行(10) end   --判断是否移动
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box05");等待(500) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box03");等待(500) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(500) end
if 是否有红名怪("",5) then 选中红名怪("",5);等待(500) else 向下执行(5) end
if 目标怪物血量()>0 then 自动使用技能(1) else 向下执行(3) end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 外传任务("完成",1)==1 then 转到("交外传任务") end
if 目标怪物血量()>0 then 向上执行(9) end
if 获取挂机()==1 then 自动战斗("关闭") end
if 窗口事件("Win_NPC")==1 then 转到("选项") end
外传任务("任务寻径",1);等待(2000)
if 外传任务("完成",1)==1 then else 向下执行(3) end
if 窗口事件("Win_NPCTaskContent")==1 then 转到("点按钮") end
if 窗口事件("Win_NPC")==1 then 转到("选项") end
if 外传任务("已接数量")>0 then 转到("做外传") end
重载脚本()

::交外传任务::
if 外传任务("完成",1)==1 then else 重载脚本() end
if 获取挂机()==1 then 自动战斗("关闭") end
外传任务("任务寻径",1);等待(2000)
if 窗口事件("Win_NPCTaskContent")==1 then 转到("点按钮") end
if 窗口事件("Win_NPC")==1 then 转到("选项") end
转到("交外传任务")



if 窗口事件("Win_NPCTaskContent")==1 then 转到("点按钮") end
if 窗口事件("Win_NPC")==1 then 转到("选项") end

if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(500) end

if 查找("怪物","")<10 then 自动使用技能(1) end


::点按钮::
任务对话("完成");等待(1000)
任务对话("接受");等待(1000)
重载脚本()


::选项::
if 0<查找任务("当前","以命填词万古传") then 转到("做以命填词万古传") end
对话框选项(1);等待(1000)
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
任务对话("完成");等待(1000)
任务对话("接受");等待(1000)
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box05");等待(500) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box03");等待(500) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(500) end
重载脚本()

::做以命填词万古传::
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(3);等待(1000) end
任务对话("完成");等待(1000)
任务对话("接受");等待(1000)
重载脚本()

::击杀::
外传任务("任务寻径",1);等待(2000)
记住当前位置()
等待(500)
if 取记录距离()<0.5 then else 向下执行(6) end   --判断是否移动
if 是否有红名怪("",5) then 选中红名怪("",5);等待(500) else 向下执行(5) end
if 目标怪物血量()>0 then 自动使用技能(1) else 向下执行(4) end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 外传任务("完成",1)==1 then 转到("交外传任务") end
if 目标怪物血量()>0 then 向上执行(4) end
if 获取挂机()==1 then 自动战斗("关闭") end
if 外传任务("完成",1)==1 then 转到("交外传任务") end
重载脚本()

::收集::
记住当前位置()
等待(500)
if 取记录距离()<0.5 then else 向下执行(4) end   --判断是否移动
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box05");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box03");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(1000) end
if 是否有红名怪("",5) then 选中红名怪("",5);等待(500) else 向下执行(4) end
if 目标怪物血量()>0 then 自动使用技能(1) else 向下执行(3) end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 目标怪物血量()>0 then 向上执行(3) end
if 获取挂机()==1 then 自动战斗("关闭") end
if 外传任务("已接数量")>0 then 转到("做外传") end
重载脚本()


外传任务("任务寻径",1);等待(1000)
记住当前位置()
等待(1000)
if 取记录距离()<1 then else 向下执行(26) end
外传任务("任务寻径",1);等待(1000)
if 取记录距离()<1 then else 向下执行(24) end


::目标::
记住当前位置()
外传任务("任务寻径",1);等待(2000)
if 取记录距离()<0.5 then else 向下执行(2) end   --判断是否移动
if 查找("NPC","")<2 then 选中对象("",2) end
记住当前位置()
等待(500)
if 取记录距离()<0.5 then else 向下执行(26) end
外传任务("任务寻径",1);等待(1000)
if 取记录距离()<1 then else 向下执行(24) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box05");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box03");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 等待(2000) end
if 走过==1 then else 向下执行(4) end
坐标移动(-2,0);等待(500)
走过=2
重载脚本()
if 走过==2 then else 向下执行(4) end
坐标移动(2,0);等待(500)
走过=3
重载脚本()
if 走过==3 then else 向下执行(4) end
坐标移动(0,2);等待(500)
走过=4
重载脚本()
if 走过==4 then else 向下执行(2) end
坐标移动(0,-2);等待(500)
走过=1
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box05");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box03");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(1000) end
if 窗口事件("Win_EasyBox")==1 then 等待(2000) end
if 是否移动() then 向下执行(5) end
if 是否有红名怪("",5) then 选中红名怪("",5);等待(500) else 向下执行(4) end
if 目标怪物血量()>0 then 自动使用技能(1) else 向下执行(3) end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 目标怪物血量()>0 then 向上执行(3) end
if 获取挂机()==1 then 自动战斗("关闭") end
if 外传任务("已接数量")>0 then 转到("做外传") end
重载脚本()

::做绣针难觅::
if 0<查找任务("完成","绣针难觅") then 转到("交外传任务") end
寻径(75,273,12,251);等待(3000)
if 坐标距离(273,251)<3 then else 向上执行(2) end 
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(272,24,247)
等待(3000)
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(5000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(5000) end
重载脚本()


::做雁行::
if 0<查找任务("完成","雁行") then 转到("交外传任务") end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
发送("900004");等待(300)
等待(3000)
重载脚本()

::做国色天香::
if 0<查找任务("完成","国色天香") then 转到("交国色天香") end
寻径(75,367,8,336);等待(3000)
if 坐标距离(367,336)<3 then 等待(1000) else 向上执行(2) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(5000) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(5000) end
if 0<查找任务("完成","国色天香") then 转到("交国色天香") end
重载脚本()

::交国色天香::
寻径(75,334,11,336);等待(3000)
if 坐标距离(340,336)<5 then else 向下执行(5) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
发送("900004");等待(300)
飞跃(333,15,336)
等待(3000)
if 坐标距离(334,336)<2 then else 转到("交国色天香") end
打开NPC("东方姑娘");等待(1000)
NPC对话("")
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
if 窗口事件("Win_NPC")==1 then 对话框选项(1);等待(1000) end
任务对话("完成");等待(1000)
任务对话("接受");等待(1000)
重载脚本()

::昭明藏宝图::
if 0<查找任务("完成","缘图觅宝") then 转到("交外传任务") end
if 背包物品("数量","昭明藏宝图碎片")==2 then else 向下执行(2) end
右键使用物品("昭明藏宝图碎片");等待(3000) 
if 背包物品("数量","昭明藏宝图")==1 then else 向下执行(3) end
右键使用物品("昭明藏宝图");等待(1000) 
藏宝图("自动寻径");等待(2000)
记住当前位置()
等待(500)
if 取记录距离()<0.5 then 藏宝图("挖掘") else 向下执行(2) end   --判断是否移动
等待(10000)
重载脚本()

::处理怪物扰::
if 是否有红名怪("",5) then 选中红名怪("",5) else 向下执行(3) end
自动使用技能(1);等待(500)--参数:个数
if 是否有红名怪("",2) then 向上执行(1) end
重载脚本()


::做清洁小能手::
if 0<查找任务("完成","清洁小能手") then 转到("交外传任务") end
if 活动入口("距离","香蕉皮")<6 then 向下执行(2) else 转到("跳上房顶") end
if 当前高度()>210 then else 转到("跳上房顶") end
if 活动入口("距离","香蕉皮")<6 then 活动入口("移动","香蕉皮");等待(2000) else 向下执行(2) end
if 窗口事件("Win_EasyBox")==1 then 窗口事件("Win_EasyBox","Btn_Box01");等待(7000) end
if 0<查找任务("完成","清洁小能手") then 转到("交外传任务") end
if 活动入口("距离","香蕉皮")<6 then 向上执行(3) end
if 0<查找任务("完成","清洁小能手") then 转到("交外传任务") else 转到("做清洁小能手") end

::跳上房顶::
if 房走过==1 then 房走过=2 else 向下执行(2) end
转到("房顶一")
if 房走过==2 then 房走过=3 else 向下执行(2) end
转到("房顶二")
if 房走过==3 then 房走过=4 else 向下执行(2) end
转到("房顶三")
if 房走过==4 then 房走过=5 else 向下执行(2) end
转到("房顶四")
if 房走过==5 then 房走过=6 else 向下执行(2) end
转到("房顶五")
if 房走过==6 then 房走过=1 else 向下执行(2) end
转到("房顶六")
房走过=1
重载脚本()

::房顶一::
寻径(85,626,205,-81);等待(2000)
if 坐标距离(626,-81)<3 then else 向上执行(2) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(621,217,-86)
等待(3000)
重载脚本()

::房顶二::
寻径(85,632,205,-91)
if 坐标距离(632,-91)<3 then else 向上执行(2) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(629,225,-97)
等待(3000)
重载脚本()

::房顶三::
寻径(85,661,205,-104)
if 坐标距离(661,-104)<3 then else 向上执行(2) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(662,224,-108)
等待(3000)
重载脚本()

::房顶四::
寻径(85,697,205,-104);等待(2000)
if 坐标距离(697,-104)<3 then else 向上执行(2) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(697,225,-107)
等待(3000)
重载脚本()

::房顶五::
寻径(85,707,205,-88);等待(2000)
if 坐标距离(707,-88)<3 then else 向上执行(2) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(707,215,-92)
等待(3000)
重载脚本()

::房顶六::
寻径(85,707,205,-88);等待(2000)
if 坐标距离(707,-88)<3 then else 向上执行(2) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1") end 
等待(2000)  --回复体力才能跳
if 体力()>100 then else 向上执行(1) end
发送("900001");等待(400)
发送("900002");等待(300)
发送("900003");等待(300)
飞跃(714,219,-96)
等待(3000)
重载脚本()

::做解密::
if 0<查找任务("完成","解密") then 转到("交外传任务") end
发送("0E0006201200000000000000000000FF00000000000000000000") 
等待(1000)
任务对话("完成");等待(1000)
任务对话("接受");等待(1000)
重载脚本()













