
--熔岩之地
队友数量=取副本定义队友()
是否跟随=取副本是否跟随队长()
其他间隔=1
是否接受邀请或申请进队=1
只捡取物品="玄昊玉 新莽神符 忆魂石 回天神石 龙魂玉 金蚕丝 隐贤名玉 玄佛珠 何悦的信"
开启人物保护()
开启组队()


if(寻找文本("玄雷坡 毒障泽地 熔岩之地",取地图名称()) <= 0) then
        自动洛阳加血(80)
end

if(是否接受邀请或申请进队==1) then
  打印信息("开始组队")
  while (取队友数量 () < 队友数量 and 取地图名称 () == "楼兰") do
    寻路2("楼兰","何悦")
    等待 (其他间隔)
  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


队友序号=取队内位置()
打印信息(队友序号)

 while (读取任务 ("熔岩之地",1) == false or 取任务进度 ("熔岩之地") == 0) do
    while (寻找文本 ("玄雷坡 毒障泽地 熔岩之地",取地图名称 ()) ==-1) do
        召唤坐骑()  
        寻路2("楼兰","何悦")   
        if (取任务进度 ("熔岩之地") == 2) then
          放弃任务 ("熔岩之地")
          等待 (1800)
        end
        if 接任务("熔岩之地","楼兰","何悦","熔岩之地")==-1 then
             goto en
        end
        if(是否接受邀请或申请进队==1) then
          打印信息("开始组队")
           while(取队友数量() < 队友数量 and 取地图名称() == "楼兰") do    
              自动组队(队友数量,"90","119")  
               等待(其他间隔)
           end
           打印信息("组队完成")
        end   
        进副本("熔岩之地","楼兰","何悦","熔岩之地","前往熔岩之地","熔岩之地")
    end
    
    while (取任务进度 ("熔岩之地") == 0 and 取地图名称 () == "熔岩之地") do
        队友序号=取队内位置()
        打印信息(队友序号)
        if (队友序号 == 1)  then 
            召唤坐骑 ()
            寻路 (65,45)
            等待 (其他间隔)
            寻路 (203,216)            
            等待 (20)
            下坐骑()
            角色技能 ("","初级隐遁")
            等待 (2)
            角色技能 ("","初级隐遁")
            等待 (2)
        end        
        寻路 (203,216)
       if 是否跟随~=true then
        杀怪 (0,0,"火焰妖魔")
       end
        等待 (其他间隔)
        拣包 (只捡取物品)
    end
    
    计次 = 0
    while (取地图名称 () ~= "楼兰" and 计次 < 35) do
        计次 = 计次 + 1
        拣包2 (只捡取物品)
        杀怪 (0,1)
        等待 (1)
    end
    
end

交任务("熔岩之地","楼兰","何悦","熔岩之地")

    ::en::