goto 点1
        End if//点1333333333333333333333333333333333333333333  
 
    Else //去找小222222222222222222222222222222222222
        If DateDiff("s",t去找小,now) >10  Then
            Call 识别任务
            Exit Sub
        End if
        Delay yc+ 200
        goto 去找小
        //DateDiff
    End if//去找小22222222222222222222222222222222222222222222 
  
End Sub
////药
Sub 药需求()



    dm_ret = dm.FindStr(248,282,526,363,"回生","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//找回生1
        yao = "回生"
    End If 
    dm_ret = dm.FindStr(248,282,526,363,"益气","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//找回生1
        yao = "益气"
    End If
    dm_ret = dm.FindStr(248,282,526,363,"木香","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//找回生1
        yao = "木香"
    End If
    dm_ret = dm.FindStr(248,282,526,363,"独圣","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//找回生1
        yao = "独圣"
    End If
    dm_ret = dm.FindStr(248,282,526,363,"清平","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//找回生1
        yao = "清平"
    End If
    dm_ret = dm.FindStr(248,282,526,363,"玉屑","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//找回生1
        yao = "玉屑"
    End If

    Call 打开道具1
    Call 打开道具1
    Delay yc+ 200
    FindPic 0,0,807,621,"C:\XYW\"& yao &".bmp",0.9,intX,intY
    If intX > 0 And intY > 0 Then//找回生2
        Delay yc+ 200
        Call 关闭道具
        Call 关闭任务
        Call 交任务
    Else //找回生2
        Call 打开道具2
        Call 打开道具2 
        Delay yc+ 200
        FindPic 0,0,807,621,"C:\XYW\"& yao &".bmp",0.9,intX,intY
        If intX > 0 And intY > 0 Then//找回生3
            Delay yc+ 200
            Call 关闭道具
            Call 关闭任务
            Call 交任务
        Else //找回生3
            Call 关闭道具
            Call 关闭任务
            Call 去药店买药
            Delay yc+ 200
            Call 关闭任务
            Call 交任务
        End If//找回生3
      
    End If//找回生2





End Sub
//白装需求
Sub 白装需求()

    dm_ret = dm.FindStr(248,282,526,363,"青布衣","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//青布衣
        zhuangbei = "青布衣"
        Goto 布店
    End If 
    dm_ret = dm.FindStr(248,282,526,363,"布裙","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//布裙
        zhuangbei = "布裙"
        Goto 布店
    End If
    dm_ret = dm.FindStr(248,282,526,363,"布帽","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//布帽
        zhuangbei = "布帽"
        Goto 布店
    End If
    dm_ret = dm.FindStr(248,282,526,363,"碎花","f80000-000000",1.0,intX,intY)
    If intX>0 and intY>0 then//碎花
        zhuangbei = "碎花"