--除害

队友数量=取副本定义队友()
是否跟随=取副本是否跟随队长()
其他间隔=1
是否接受邀请或申请进队=1
开启人物保护()
开启组队()
任务副本="竹林"

if (取背包物品数量 ("除害的令牌") ==0 and 读取任务 ("除害",1) == false) then
   打印信息("不符合老三环副本要求")
   goto en;
end

 if (寻找文本 ("宋辽边境 竹林",取地图名称 ()) <= 0) then
        召唤坐骑()
        寻路2("苏州","花剑雨")
 end

if(是否接受邀请或申请进队==1) then
  打印信息("开始组队")
  while (取队友数量 () < 队友数量 and 取地图名称 () == "苏州") do   
    自动组队(队友数量,"90","119")  
    等待 (其他间隔)
  end
  打印信息("组队完成")
end

只捡取物品="新莽神符 金蚕丝 琉璃焰 御瑶盘 隐贤名玉"

function 接任务(任务名字,任务地图,任务npc,对话内容)
    while (取任务进度(任务名字) == -1) do
        召唤坐骑()
        寻路2(任务地图,任务npc)
        打开(任务npc)
        等待(其他间隔)
        对话(对话内容)
        等待(其他间隔)
        if (寻找文本(取对话框内容(),"5次") > 0) then
            打印信息("今天任务已经5次")
            return -1
        else
            接受()
        end
        等待(其他间隔)
        
    end
           return 0
end

function 进副本(任务名字,任务地图,任务npc,对话内容1,对话内容2,副本地图)
    while(取任务进度(任务名字) == 0) do
        if(取地图名称() == 任务地图) then
            召唤坐骑()
            寻路2(任务地图,任务npc)
            等待(其他间隔)
            if(打开(任务npc) == true) then
                等待(其他间隔)
                if(对话(对话内容1) == true) then
                    等待(其他间隔)
                    if(对话(对话内容2) == true) then
                         判断地图()
                        if(寻找文本(取对话框内容(),"失败") > 0) then
                            打印信息("任务失败,放弃任务等待30分钟后继续任务！")
                            放弃任务(任务名字)
                        end
                    end
                end
            end
          
        end
      if 取地图名称() == 副本地图 then
          break;
      end
    end    
end
function 交任务(任务名字,任务地图,任务npc,对话内容,是否继续)
 while(取任务进度(任务名字) == 1) do
        寻路2(任务地图,任务npc)
        等待(其他间隔)
        打开(任务npc)
        等待(其他间隔)
        对话(任务名字)
        等待(其他间隔)
   if 是否继续~=nil then
        继续()
        等待(其他间隔)
   end
        完成()
        等待(其他间隔)
 end
 while(取任务进度(任务名字) == 2) do
        打印信息("任务失败，放弃任务等待30分钟后继续任务！")
        放弃任务(任务名字)
        等待(其他间隔)
 end
end
function 副本打怪()
 while (取任务进度 ("除害") == 0 and 取地图名称 () == 任务副本) do
    if (取地图名称 () == 任务副本) then
        寻路 (70,110)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (52,115)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (29,110)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (39,96)
        杀怪 (0,0)
        拣包 (只捡取物品)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (54,91)
        杀怪 (0,0)
        拣包 (只捡取物品)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (72,87)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (97,88)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (106,86)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (92,63)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (74,67)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (89,62)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (105,63)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (47,75)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (21,72)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (42,50)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (78,47)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (83,47)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (107,32)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (100,22)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (105,34)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (76,26)
        杀怪 (0,0)
    end
    if (取地图名称 () == 任务副本) then
        寻路 (46,35)
        杀怪 (0,0,"野熊")
    end
    if (取地图名称 () == 任务副本) then
        寻路 (40,35)
        杀怪 (0,0)
        拣包 (只捡取物品)
    end
    等待 (5)
 end
  local 计次=0;
  while (取地图名称 () == "竹林" ) do
    计次 = 计次 + 1
    拣包2 (只捡取物品)
    杀怪 (0,0)
    等待 (1)
  end
end

function 副本跟随()
  while(取任务进度("除害") == 0 and 取地图名称() == "竹林") do
    跟随队长()
    拣包2(只捡取物品)
    等待(其他间隔)
  end
  while (取地图名称 () == "竹林" ) do
    拣包2 (只捡取物品)
    杀怪 (0,0)
    等待 (1)
  end
end

队友序号=取队内位置()
打印信息(队友序号)
while (读取任务 ("除害",1) == false or 取任务进度 ("除害") == 0) do
    while (寻找文本 ("竹林 宋辽边境",取地图名称 ()) <= 0) do
         召唤坐骑()
         自动洛阳加血(80)
         寻路2("苏州","花剑雨")
         if 接任务("除害","苏州","花剑雨","除害")==-1 then
            goto en
         end  
         进副本("除害","苏州","花剑雨","除害","前往竹林","竹林")
    end   
   
    if 是否跟随~=true then
         副本打怪()
    else
         副本跟随()
    end
 
    

end

  while (取任务进度 ("除害") == 1 and 取地图名称 () ~= "苏州") do
    等待 (1)
  end

  交任务("除害","苏州","花剑雨","除害",1)  
::en::

打印信息("除害完成")