--遇到不能做的任务手动完成。

if (取孩子等级()>=91) then
       打印信息("孩子等级已经大于等于91级，天下父母心任务结束！")
       goto en;
end

任务名字="天下父母心"
任务npc场景="洛阳"
任务npc名字="木子姐姐"
其他间隔=1

function 取任务信息(任务内容)
    位置 = 寻找文本 (任务内容, "", 1, 0)
    任务内容 = 取中间文本 (任务内容, "", "}")
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    地图 = 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    对象X= 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    对象Y= 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    对象地图ID= 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    return 地图,对象X,对象Y,任务内容
end

function 取任务信息2(任务内容)
    位置 = 倒找文本 (任务内容, "", 取文本长度 (任务内容), 0)
    任务内容 = 取文本中间 (任务内容, 位置+1, 取文本长度 (任务内容)-位置-1)
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    地图 = 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)

    位置 = 寻找文本 (任务内容, "*", 1, 0)
    对象X= 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    对象Y= 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    位置 = 寻找文本 (任务内容, "*", 1, 0)
    对象地图ID= 取文本中间 (任务内容, 1, 位置-1)
    任务内容 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置)
    return 地图,对象X,对象Y,任务内容
end
while(任务名字=="天下父母心") do
::a::
local 任务内容,任务进度=取任务(任务名字)
  if(任务进度== 1) then 
    召唤坐骑()
    寻路2 (任务npc场景, 任务npc名字)
    等待 (其他间隔)
    打开 (任务npc名字)
    等待 (其他间隔)
    对话 (任务名字)
    等待 (其他间隔)
    if (寻找文本 (任务内容, "成年", 1, 0) > 0) then   
        任务对象=取中间文本 (任务内容,"成年", "}")
          if(取文本长度 (任务对象)==8) then
            任务对象 = 取文本中间 (任务对象,1, 取文本长度 (任务对象)-2)
          end
        任务对象="成年"..任务对象	
        提交宝宝(任务对象)
    else
        继续() 
        等待 (其他间隔)
        完成 () 
    end
    等待 (其他间隔)
    goto a     
  end
  if (取任务进度 (任务名字) == -1) then
    召唤坐骑 ()
    寻路2 (任务npc场景, 任务npc名字)
    等待 (其他间隔)
    打开 (任务npc名字)
    等待 (其他间隔)
    对话 (任务名字)
    等待 (其他间隔) 
    是否继续=取提示内容()
   if (寻找文本 (是否继续, "已经领取过5次", 1, 0) > 0) then
       goto en;
   end
    goto a
  end
  
  if ((寻找文本 (任务内容, "CZRW_130822_61", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_46", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_56", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_51", 1, 0) > 0) and 任务进度==0) then 
    local 地图,对象X,对象Y,任务内容=取任务信息(任务内容)
    召唤坐骑()
    跨图寻路(地图,对象X,对象Y)
    采集物品(任务内容)
    等待 (其他间隔)
    goto a
  end

  if (寻找文本 (任务内容, "成年", 1, 0) > 0 and 任务进度==0) then 
    任务对象=取中间文本 (任务内容,"成年", "}")
    if(取文本长度 (任务对象)==8) then
        任务对象 = 取文本中间 (任务对象,1, 取文本长度 (任务对象)-2)
    end
    任务对象="成年"..任务对象
    local 珍兽列表满=捉宝宝(任务对象)
    if 珍兽列表满==0 then
       放弃任务("天下父母心")
       打印信息("珍兽列表满放弃捉宝宝任务")
    end
    等待 (其他间隔)
    goto a    
  end
  if (寻找文本 (任务内容, "CZRW_130822_91", 1, 0) > 0 and 任务进度==0) then 
    local 地图,对象X,对象Y,任务内容=取任务信息2(任务内容)
    召唤坐骑()
    跨图寻路(地图,对象X,对象Y)
    下坐骑()
    使用物品("风筝")
    等待 (10)
    goto a
  end


  if ((寻找文本 (任务内容, "CZRW_130822_165", 1, 0) > 0 or 寻找文本 (任务内容,"CZRW_130822_164", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_166", 1, 0)>0) and 任务进度==0)  then 
    任务对象=取中间文本 (任务内容,"*", "}")
    召唤坐骑 ()
    寻路2("洛阳","白萌生","名字")
    打开("白萌生")
    等待 (其他间隔)
    买物 (任务对象, 1)
    等待 (其他间隔)
    goto a
  end
  if ((寻找文本 (任务内容, "CZRW_130822_18", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_38", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_30", 1, 0) > 0 or 寻找文本 (任务内容, "CZRW_130822_24", 1, 0) > 0) and 任务进度==0) then 
    local 地图,对象X,对象Y,任务内容=取任务信息(任务内容)
    召唤坐骑()
    跨图寻路(地图,对象X,对象Y)
    打开(任务内容)
    等待 (其他间隔)
    对话(任务名字)
    等待 (其他间隔)
    goto a
  end

  if (寻找文本 (任务内容, "CZRW_130822_96", 1, 0) > 0 and 任务进度==0) then
    local 地图,对象X,对象Y,任务内容=取任务信息2(任务内容)
    召唤坐骑()
    跨图寻路(地图,对象X,对象Y)
    下坐骑()
    使用物品("小铲子")
    等待 (10)
    goto a
  end
  if (寻找文本 (任务内容, "CZRW_130822_106", 1, 0) > 0 and 任务进度==0) then 
    local 地图,对象X,对象Y,任务内容=取任务信息2(任务内容)
    召唤坐骑()
    跨图寻路(地图,对象X,对象Y)
    下坐骑()
    使用物品("飞火流星")
    等待 (10)
    goto a
  end
  
  if (寻找文本 (任务内容, "CZRW_130822_101", 1, 0) > 0 and 任务进度==0) then 
    local 地图,对象X,对象Y,任务内容=取任务信息2(任务内容)
    召唤坐骑()
    跨图寻路(地图,对象X,对象Y)
    下坐骑()
    使用物品("健康树")
    等待 (10)
    goto a
  end

  if ((寻找文本 (任务内容, "布帽", 1, 0) > 0 or 寻找文本 (任务内容, "布鞋", 1, 0) > 0 or 寻找文本 (任务内容, "手套", 1, 0) > 0 or 寻找文本 (任务内容, "布衣", 1, 0) > 0 or 寻找文本 (任务内容, "腰带", 1, 0) > 0) and 任务进度==0)  then  
    位置 = 倒找文本 (任务内容, "*", 取文本长度 (任务内容), 0)
    任务对象 = 取文本中间 (任务内容, 位置+2, 取文本长度 (任务内容)-位置-2)
    召唤坐骑 ()
    寻路2("洛阳","陶得宝","名字")
    打开("陶得宝")
    等待 (其他间隔)
    买物 (任务对象, 1)
    等待 (其他间隔)
    goto a
  end
  等待 (其他间隔)
end  --while结尾
::en::
打印信息("天下父母心任务完成")
