if 当前地图()=="镖局" then 转到("出帮派") end
if 当前地图()=="山寨" then 转到("出帮派") end
if 当前地图()=="绝情谷入口" then 转到("打绝情谷入口") end
if 当前地图()=="绝情谷深处" then 转到("打绝情谷深处") end
if 当前地图()=="绝情谷禁地" then 转到("打绝情谷禁地") end
if 获取挂机()==1 then 自动战斗("关闭") end
if 0<查找任务("可接","领取绝情谷入口地图") then 转到("领绝情谷地图") end
if 背包物品("数量","绝情谷入口地图")>0 then 转到("进入绝情谷入口") end
if 背包物品("数量","绝情谷深处地图")>0 then 转到("进入绝情谷深处") end
if 背包物品("数量","绝情谷禁地地图")>0 then 转到("进入绝情谷禁地") end
等待(2000)
重载脚本()

::出帮派::
寻径(75,288,34,-35);等待(2000)
if 查找("全部","交通使")<10 then else 向下执行(3) end 
打开NPC("交通使");等待(1000)
NPC对话("前往洛阳")
等待(2000)
重载脚本()

::领绝情谷地图::
寻径(75,582,30,245);等待(2000)
if 查找("全部","交通使")<5 then else 向下执行(3) end 
打开NPC("交通使");等待(1000)
NPC对话("前往洛阳");等待(2000)
if 坐标距离(582,245)<3 then else 向上执行(4) end 
打开NPC("游迅");等待(1000)
NPC对话("<活动>领取绝情谷入口地图");等待(1000)
任务对话("接受");等待(2000)
重载脚本()

绝情谷深处地图

::进入绝情谷入口::
if 我是队长() then else 转到("队员跟随") end
if 坐标距离(582,245)<3 then 向下执行(5) else 记住当前位置() end
寻径(75,582,30,245);等待(2000)
if 是否移动() then 上马() end 
if 取记录距离()<1.5 then 转到("卡住了") end
if 坐标距离(582,245)<3 then else 向上执行(4) end 
if 队员距离()<10 then 向下执行(5) end
if 我是队长() then else 转到("队员跟随") end
等待(3000)
if 当前地图()=="绝情谷入口" then 转到("打绝情谷入口") end
if 队员距离()<10 then else 向上执行(3) end
打开NPC("游迅");等待(1000)
NPC对话("绝情谷入口");等待(1000)
发送("0E001A005112000001")  --绝情谷入口
等待(3000)
重载脚本()

::进入绝情谷深处::
if 我是队长() then else 转到("队员跟随") end
if 坐标距离(582,245)<3 then 向下执行(5) else 记住当前位置() end
寻径(75,582,30,245);等待(2000)
if 是否移动() then 上马() end 
if 取记录距离()<1.5 then 转到("卡住了") end
if 坐标距离(582,245)<3 then else 向上执行(4) end 
if 队员距离()<10 then 向下执行(5) end
if 我是队长() then else 转到("队员跟随") end
等待(3000)
if 当前地图()=="绝情谷深处" then 转到("打绝情谷深处") end
if 队员距离()<10 then else 向上执行(3) end
打开NPC("游迅");等待(1000)
NPC对话("绝情谷深处");等待(1000)
发送("0E001A005212000001")  --绝情谷深处
等待(3000)
重载脚本()

::进入绝情谷禁地::
if 我是队长() then else 转到("队员跟随") end
if 坐标距离(582,245)<3 then 向下执行(5) else 记住当前位置() end
寻径(75,582,30,245);等待(2000)
if 是否移动() then 上马() end 
if 取记录距离()<1.5 then 转到("卡住了") end
if 坐标距离(582,245)<3 then else 向上执行(4) end 
if 队员距离()<10 then 向下执行(5) end
if 我是队长() then else 转到("队员跟随") end
等待(3000)
if 当前地图()=="绝情谷禁地" then 转到("打绝情谷禁地") end
if 队员距离()<10 then else 向上执行(3) end
打开NPC("游迅");等待(1000)
NPC对话("绝情谷禁地");等待(1000)
发送("0E001A005312000001")  --绝情谷禁地
等待(3000)
重载脚本()

寻径(1528,671,48,186)

::队员跟随::
if 坐标距离(582,245)<3 then 向下执行(5) else 记住当前位置() end
寻径(75,582,30,245);等待(2000)
if 是否移动() then 上马() end 
if 取记录距离()<1.5 then 转到("卡住了") end
if 坐标距离(582,245)<3 then else 向上执行(4) end 
等待(3000)
重载脚本()



::打绝情谷入口::
设置("清空挂机坐标") -- 清空列表
设置("目标怪物","红蘑菇","水晶","蓝蘑菇","箱子","木桶","木柴堆","墓碑","青石碑")
设置("怪物不打")
设置("范围",99)
if 当前地图()=="绝情谷入口" then else 重载脚本() end
if 是否有红名怪("",99) then 向下执行(4) end
寻径(1526,383,37,-127);等待(2000)
if 坐标距离(383,-127)<10 then else 向上执行(3) end
if 当前地图()=="绝情谷入口" then else 重载脚本() end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 副本目标("目标")=="" then 转到("出去") end
if 是否有红名怪("",99) then 向上执行(3) else 向上执行(4) end
重载脚本()
    
::打绝情谷深处::
移动防卡(1)
设置("清空挂机坐标") -- 清空列表
设置("目标怪物","红蘑菇","水晶","蓝蘑菇","箱子","木桶","木柴堆","墓碑","青石碑")
设置("怪物不打")
设置("范围",99)
if 当前地图()=="绝情谷深处" then else 重载脚本() end
if 是否有红名怪("",99) then 向下执行(6) end
寻径(1527,600,50,-17);等待(2000)
if 坐标距离(600,-17)<10 then else 向上执行(3) end
if 是否有红名怪("",99) then 向下执行(4) end
寻径(1527,517,49,24);等待(2000)
if 坐标距离(517,24)<10 then else 向上执行(2) end
if 当前地图()=="绝情谷深处" then else 重载脚本() end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 副本目标("目标")=="" then 转到("出去") end
if 是否有红名怪("",99) then 向上执行(3) else 向上执行(10) end
重载脚本()

寻径(1527,600,50,-17) --虫
寻径(1527,517,49,24) --不出现跑第二




寻径(1527,490,49,-12)
寻径(1527,584,49,-12)
寻径(1527,548,49,3)

::打绝情谷禁地::
设置("清空挂机坐标") -- 清空列表
设置("目标怪物","红蘑菇","水晶","蓝蘑菇","箱子","木桶","木柴堆","墓碑","青石碑")
设置("怪物不打")
设置("范围",99)
if 坐标距离(659,157)<3 then 向下执行(4) else 记住当前位置() end
寻径(1528,659,48,157);等待(2000)
if 取记录距离()<1.5 then 转到("卡住了") end
if 坐标距离(659,157)<3 then else 向上执行(3) end 
if 副本目标("目标")=="" then 转到("最后出去") end
if 是否有红名怪("",25) then else 向上执行(5) end
if 当前地图()=="绝情谷禁地" then else 重载脚本() end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 副本目标("目标")=="" then 转到("最后出去") end
向上执行(4)
重载脚本()

::最后出去::
if 当前地图()=="绝情谷禁地" then else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 是否有红名怪("",99) then 重载脚本() end
自动战斗("关闭")
窗口事件("Win_InstanceFinish","Btn_Cancel") 
等待(2000) 
窗口事件("Win_BattleFieldMain","Btn_BattleFieldLeave")
等待(3000)  


::出去::
if 当前地图()=="绝情谷入口" then 向下执行(3) end
if 当前地图()=="绝情谷深处" then 向下执行(2) end
if 当前地图()=="绝情谷禁地" then else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 副本目标("目标")=="" then 等待(2000) else 重载脚本() end
if 是否有红名怪("",99) then 重载脚本() end
自动战斗("关闭")
窗口事件("Win_InstanceFinish","Btn_Cancel") 
等待(2000) 
窗口事件("Win_BattleFieldMain","Btn_BattleFieldLeave")
等待(3000)  
重载脚本()


::跟随队长打怪::
if 窗口事件("Win_BindStatus")==1 then 发送("1B00") end
if 我是队长() then 重载脚本() else 等待(1000) end
if 当前地图()=="绝情谷入口" then 向下执行(3) end
if 当前地图()=="绝情谷深处" then 向下执行(2) end
if 当前地图()=="绝情谷禁地" then else 重载脚本() end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 队长距离()<10 then 向下执行(5) end
if 获取挂机()==1 then 自动战斗("关闭") end
取队长坐标寻径()
等待(1000)
if 队长距离()<8 then else 向上执行(5) end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
转到("跟随队长打怪")


if 我是队长() then 发送("0000") else 转到("队员跟随") end

if 窗口事件("Win_BindStatus")==1 then 



::自动打怪::
if 当前地图()=="绝情谷入口" then 向下执行(3) end
if 当前地图()=="绝情谷深处" then 向下执行(2) end
if 当前地图()=="绝情谷禁地" then else 重载脚本() end
设置("范围",99) 
if 气血()==0 then 窗口事件("Win_ReviveItem","confirm");等待(1000) end

if 当前地图()=="绿竹林" then else 重载脚本() end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end



窗口事件("Win_InstanceDesc","Btn_Enter")
发送("0E001A005112000001")  --绝情谷入口
窗口事件("Win_InstanceOtherFrame","IDCANCEL")

if 


烈风拳师：0/40
烈风力士：0/20
滚石：0/1


塞北刀王：0/1

寻径(1526,391,37,-125)  --队员跟随队长


if 窗口事件("Win_InstanceAward")==1 then 转到("抽奖") end --出现抽奖界面
if 当前地图()=="绿竹林" then 转到("自动打怪") else 重载脚本() end

::卡住了::
if 是否有红名怪("",5) then 转到("处理干扰怪") end
等待(2000)
if 取记录距离()<2 then else 重载脚本() end
if 走过==1 then else 向下执行(11) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1");等待(2000) end
等待(1000)
if 体力()>50 then else 向上执行(1) end
坐标移动(-2,0);等待(500)
发送("900001");等待(200)
发送("900002");等待(300)
发送("900003");等待(300)
坐标移动(-2,0);等待(500)
走过=2
重载脚本()
if 走过==2 then else 向下执行(11) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1");等待(2000) end
等待(1000)
if 体力()>50 then else 向上执行(1) end
坐标移动(4,0);等待(1000)
发送("900001");等待(200)
发送("900002");等待(300)
发送("900003");等待(300)
坐标移动(2,0);等待(500)
走过=3
重载脚本()
if 走过==3 then else 向下执行(11) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1");等待(2000) end
等待(1000)
if 体力()>50 then else 向上执行(1) end
坐标移动(0,2);等待(1000)
发送("900001");等待(200)
发送("900002");等待(300)
发送("900003");等待(300)
坐标移动(0,2);等待(500)
走过=4
重载脚本()
if 走过==4 then else 向下执行(9) end
if 窗口事件("Win_BindStatus")==1 then 窗口事件("Win_BindStatus","Btn_Quit1");等待(2000) end
等待(1000)
if 体力()>50 then else 向上执行(1) end
坐标移动(0,-4);等待(1000)
发送("900001");等待(200)
发送("900002");等待(300)
发送("900003");等待(300)
坐标移动(0,-2);等待(500)
走过=1
重载脚本()

::抽奖::
if 窗口事件("Win_InstanceAward")==1 then 等待(1000) else 重载脚本() end 
绿竹双倍冻结=1
额外奖励()
等待(8000)
发送("78000000")
发送("78000100")
发送("78000200")
发送("78000300")
发送("78000400")
发送("78000500")
等待(1000) 
发送("840002")  --冻结
设置("清空挂机坐标") -- 清空列表
窗口事件("Win_InstanceAward","Btn_Close")
窗口事件("Win_InstanceAward","IDCANCEL")
if 地面是否有物品("",25) then 捡物("",25);等待(1000) end
if 地面是否有物品("",25) then 向上执行(1) end
发送("1F0000000000007D0A01FFFFFF000000000000000000000000D9DAE241BC58CC42A5A61CC201")
自动战斗("关闭");等待(1000)
计次("清零")
if 窗口事件("Win_BattleFieldMain")==1 then 窗口事件("Win_BattleFieldMain","Btn_BattleFieldLeave") end
等待(3000)
双倍经验("冻结")  --冻结
重载脚本()




地图: 绝情谷深处            ID:0x000005F7 (1527)   -512 0
坐标: 557,49,-13
寻径(1527,557,49,-13)

绝情谷深处
邪道女弟子：0/40
邪道投枪手：0/20
虫妖：0/4
鬼枪王
红蘑菇  水晶  蓝蘑菇


地图: 绝情谷禁地            ID:0x000005F8 (1528)   -512 0
坐标: 659,48,157

寻径(1528,659,48,157)

绝情谷禁地地图

寻径(1528,662,48,165)  --要移动到这里才会出现公孙灭

第一 寻径(1526,383,37,-127)
第二 寻径(1527,561,49,-3)


击败绝情谷主公孙灭
公孙灭
石阵尸骸