队友数量=取副本定义队友()
是否接受邀请或申请进队=1
其他间隔=1
只捡取物品="玄昊玉 新莽神符 忆魂石 回天神石 龙魂玉 金蚕丝 隐贤名玉 玄佛珠 何悦的信 黄金之链"
开启人物保护()
开启组队()
副本地图="炎魔山"
副本名字="剑荡三环除妖魔"

function 接任务(任务名字,任务地图,任务npc,对话内容)
    if (取任务进度 (任务名字) == 2) then
          放弃任务 (任务名字)
          等待(其他间隔)
    end
    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
                            打印信息("任务失败,放弃任务！")
                            放弃任务(任务名字)
                            等待(其他间隔)
                        elseif (寻找文本(取对话框内容(),"不满足")<= 0 ) then
                           判断地图()
                        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 副本打怪子程序(任务名字,地图,x,y,过滤打怪)
       if(取地图名称() == 地图) then
          while(取周围怪数量()>0 and 取任务进度(副本名字) == 0) do
	       杀怪(0,1,过滤打怪)
	       等待(其他间隔)
               拣包(只捡取物品)
	  end
            召唤坐骑()            
	    寻路(x,y)
          while(取周围怪数量()>0 and 取任务进度(副本名字) == 0) do
	       杀怪(0,1,过滤打怪)
	       等待(其他间隔)
               拣包(只捡取物品)
	  end
       end
end

function 副本打怪()
    while(取任务进度(副本名字) == 0 and 取地图名称() == 副本地图) do
        local 阶段,listNum,killedNum,g_1_NiuQi_num,g_1_NiuQu_num=取新三环数据() 
        --打印信息(阶段.."|"..listNum.."|"..killedNum.."|"..g_1_NiuQi_num.."|"..g_1_NiuQu_num)
        if 阶段==1 or 阶段==0 then
              if killedNum~=60 then
                副本打怪子程序(副本名字,副本地图,139,176)
                副本打怪子程序(副本名字,副本地图,128,166)
              end
              if g_1_NiuQi_num~=1 then
                副本打怪子程序(副本名字,副本地图,113,158)
              end
              if g_1_NiuQu_num~=1 then
                副本打怪子程序(副本名字,副本地图,114,180)
              end
                
                副本打怪子程序(副本名字,副本地图,92,184)
        elseif 阶段==2 then
             if listNum==0 then
                副本打怪子程序(副本名字,副本地图,57,81)
             elseif listNum==1 then
                副本打怪子程序(副本名字,副本地图,78,68)
             elseif listNum==2 then
                副本打怪子程序(副本名字,副本地图,83,38)
             elseif listNum==3 then
                副本打怪子程序(副本名字,副本地图,52,31)
             elseif listNum==4 then
                副本打怪子程序(副本名字,副本地图,33,64)
             elseif listNum==5 then
                副本打怪子程序(副本名字,副本地图,55,56)
             end
        elseif 阶段==3 then
                副本打怪子程序(副本名字,副本地图,214,40,"火焰妖魔")
        end 
    end
end


队友序号=取队内位置()
打印信息("队伍所在位置"..tostring(队友序号))

if(寻找文本(副本地图,取地图名称()) <= 0) then
        自动洛阳加血(80)
end

if(读取任务(副本名字,1) == false or 取任务进度(副本名字) == 0) then
    while(寻找文本(副本地图,取地图名称()) == -1) do
        召唤坐骑()
        跨图寻路("楼兰",295,70)      
        if 接任务(副本名字,"楼兰","何悦",副本名字)==-1 then
             goto en
        end  
        if(是否接受邀请或申请进队==1) then
           while(取队友数量() < 队友数量 and 取地图名称() == "楼兰") do 
               打印信息("正在组队")
               跨图寻路("楼兰",295,70)			   
               等待(其他间隔)
           end
           打印信息("组队完成")
        end
        进副本(副本名字,"楼兰","何悦",副本名字,"前往",副本地图)
    end 
     while(寻找文本(副本地图,取地图名称()) ~= -1) do
         副本打怪()
         if  取任务进度(副本名字) == 1	then
             寻路(210,47)
             等待(其他间隔)
             打开("玄真子")
             等待(其他间隔)
             对话("离开副本")
             判断地图()
         end 
     end
end
交任务(副本名字,"楼兰","何悦",副本名字) 
::en::