if 气血()==0 then 转到("复活继续") end
if 当前地图()=="镖局" then 转到("出帮派") end
if 当前地图()=="山寨" then 转到("出帮派") end
if 当前地图()=="绿竹林" then 转到("复活继续") end
if 绿竹双倍冻结==1 then 向下执行(3) end
if 我是队长() then 转到("进入绿竹") else 转到("队员跟随") end
if 绿竹次数()==1 then else 转到("进入绿竹") end
绿竹双倍冻结=0 
自动战斗("关闭")
双倍经验("冻结")  --冻结

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

::复活继续::
if 气血()==0 then 复活("安全");等待(2000) end
if 窗口事件("Win_BindStatus")==1 then 发送("1B00") end 
if 计次("读出")==0 then 转到("找出怪点1") end
if 计次("读出")==1 then 转到("打熊坐标") end
if 计次("读出")==2 then 转到("打猴坐标") end
计次("清零")
重载脚本()

::队员跟随::
--自动0线(1)
引怪模式(0) --关
if 我是队长() then 转到("进入绿竹") end
取队长坐标寻径()
等待(2000)
if 体力()>50 then else 向下执行(4) end
if 是否移动() then eles 向下执行(3) end
加速()
上马()
if 当前地图()=="绿竹林" then else 向上执行(7) end
双倍经验("领取");等待(500)
双倍经验("解冻");等待(500)
重载脚本()

::找出怪点1::
if 窗口事件("Win_BindStatus")==1 then 发送("1B00") end 
寻径(1016,143,34,3);等待(2000)
if 坐标距离(143,3)<1 then else 向上执行(1) end
等待(1000)
if 活动入口("距离","")<5 then 转到("找出怪点2") end
计次("写入",1)
转到("打熊坐标") 

::找出怪点2::
if 窗口事件("Win_BindStatus")==1 then 发送("1B00") end 
寻径(1016,132,34,-32);等待(2000)
if 坐标距离(132,-32)<1 then else 向上执行(1) end
等待(2000)
if 活动入口("距离","")<5 then 转到("复活继续") end
计次("写入",2)
转到("打猴坐标")


::打熊坐标::
计时("开始")
寻径(1016,141,34,14);等待(2000)
if 计时("读出")>10 then 转到("找出怪点2") end  
if 坐标距离(141,14)<1 then else 向上执行(2) end
设置("取当前为挂机坐标")
设置("怪物默认") 
转到("自动打怪")

::打猴坐标::
计时("开始")
寻径(1016,131,34,-57);等待(2000)
if 计时("读出")>10 then 转到("找出怪点1") end  
if 坐标距离(131,-57)<1 then else 向上执行(2) end
设置("取当前为挂机坐标")
设置("怪物默认") 
转到("自动打怪")

::进入绿竹::
引怪模式(0) --关
if 计次("读出")==0 then else 计次("清零") end
--自动0线(1)
寻径(75,238,25,168);等待(2000)   --绿竹翁坐标
上马()
if 当前地图()=="绿竹林" then 向下执行(2) end
if 坐标距离(238,168)<5 then else 向上执行(3) end
if 我是队长() then 转到("队长先进") else 转到("队员跟随") end
转到("队长先进")

::队长先进::
if 当前地图()=="绿竹林" then 向下执行(6) else 等待(2000) end
if 队员距离()<20 then else 向上执行(1) end
if 我是队长() then 打开NPC("绿竹翁");等待(1000) else 重载脚本() end
if 我是队长() then 发送("0E001A00A900000001") end --进入绿竹
等待(3000)
if 当前地图()=="绿竹林" then else 向上执行(5) end
双倍经验("领取")
双倍经验("解冻")
转到("复活继续")

::打猴::
if 气血()==0 then 转到("复活继续") end
if 当前地图()=="绿竹林" then else 重载脚本() end
if 查找("怪物","石猴像")<90 then 选中对象("石猴像",90) else 向下执行(2) end
向下执行(6)
if 查找("怪物","忍者猴")<90 then 选中对象("忍者猴",90) else 向下执行(2) end
向下执行(4)
if 查找("怪物","力士猴")<90 then 选中对象("力士猴",90) else 向下执行(2) end
向下执行(2)
if 查找("怪物","美猴王")<90 then 选中对象("美猴王",90) else 转到("打猴坐标") end
等待(500)
if 窗口事件("Win_LootRoll")==1 then 窗口事件("Win_LootRoll","Btn_Need1") end 
转到("打猴")

::打熊::
if 气血()==0 then 转到("复活继续") end
if 当前地图()=="绿竹林" then else 重载脚本() end
if 查找("怪物","金熊像")<90 then 选中对象("金熊像",90) else 向下执行(2) end
向下执行(6)
if 查找("怪物","剑客熊")<90 then 选中对象("剑客熊",90) else 向下执行(2) end
向下执行(4)
if 查找("怪物","功夫熊")<90 then 选中对象("功夫熊",90) else 向下执行(2) end
向下执行(2)
if 查找("怪物","黑熊王")<90 then 选中对象("黑熊王",90) else 转到("打熊坐标") end
等待(500)
if 窗口事件("Win_LootRoll")==1 then 窗口事件("Win_LootRoll","Btn_Need1") end
转到("打熊")

::自动打怪::
设置("范围",50) 
if 气血()==0 then 转到("复活继续") end
if 当前地图()=="绿竹林" then else 重载脚本() end
if 获取挂机()==1 then 等待(1000) else 自动战斗("开启") end
if 活动入口("距离","")<15 then else 向下执行(3) end
发送("1F0000000000007D0A01FFFFFF000000000000000000000000D9DAE241BC58CC42A5A61CC201")
等待(4000)
if 怒气()==100 then 转到("释放怒气") else 等待(1000) end
if 是否有红名怪("",25) then 选中红名怪("",25);等待(1000) end
if 是否有红名怪("",25) then 选中红名怪("",25);等待(1000) end
if 查找怪物("",25)>0 then 向上执行(6) end
if 窗口事件("Win_InstanceAward")==1 then 转到("抽奖") end --出现抽奖界面
if 当前地图()=="绿竹林" then 转到("自动打怪") else 重载脚本() end


::释放怒气::
if 是否有红名怪("",20) then else 转到("自动打怪") end
自动战斗("关闭") 
释放怒气();等待(500)
if 怒气()==100 then 转到("释放怒气") end
自动战斗("开启")
转到("自动打怪")

::抽奖::
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)
双倍经验("冻结")  --冻结
重载脚本()


双倍经验("冻结") -- 双倍经验 参数:领取/冻结/解冻
双倍经验("领取")
双倍经验("解冻")
双倍经验() -- 双倍经验 参数:领取/冻结/解冻


