Delay 500
    Goto 要花
Else 
    Delay 500
    MoveTo 0,100
    VBSCall FindPic(0,0,800,600,"Attachment:\管家.bmp",0.9,X,Y)
    If X>0 and Y>0
        Goto 点房管
    Else 
        Delay 500
        Goto 接任务
    EndIf 
EndIf 
///---识别任务--/////////////////////////////////////////
Rem 要花
MoveTo 0,0
VBSCall FindPic(0,0,800,600,"Attachment:\要花.bmp",0.9,X,Y)
If X>0 and Y>0
    MoveTo x,y
    RightClick 1
    Goto 点房管
Else 
    Rem 谢谢
    MoveTo 0,0
    VBSCall FindPic(0,0,800,600,"Attachment:\谢谢你.bmp",0.9,X,Y)
    If X>0 and Y>0
        MoveTo X,Y
        RightClick 1
        MoveTo x,y-100
        Goto 点房管
    Else 
        Rem 交打死鬼了
        MoveTo 0,0
        VBSCall FindPic(0,0,800,600,"Attachment:\交打死鬼了.bmp",1.0,X,Y)
        If X>0 and Y>0
            MoveTo X,Y
            RightClick 1
            MoveTo x,y-100
            Goto 点房管
        Else 
            Rem 多谢你了
            MoveTo 0,0
            VBSCall FindPic(0,0,800,600,"Attachment:\多谢你了.bmp",0.9,X,Y)
            If X>0 and Y>0
                MoveTo X,Y
                RightClick 1
                Goto 点房管
            Else 
                ////////////下面要过程的任务//////////////
                Rem 打鬼
                MoveTo 0,0
                VBSCall FindPic(0,0,800,600,"Attachment:\打鬼.bmp",1.0,X,Y)
                If X>0 and Y>0
                    MoveTo x,y
                    RightClick 1
                    MoveTo x,y-100
                    Goto 做打鬼
                Else 
                    Rem 无花
                    MoveTo 0,0
                    VBSCall FindPic(0,0,800,600,"Attachment:\没有花了.bmp",1.0,X,Y)
                    If X>0 and Y>0
                        MoveTo x,y
                        RightClick 1
                        Goto 赵虎任务杂货滩买花任务P1
                    Else 
                        MoveTo 0,0
                        VBSCall FindPic(0,0,800,600,"Attachment:\铁匠任务.bmp",1.0,X,Y)
                        If X>0 and Y>0
                            MoveTo x,y
                            RightClick 1
                            Goto 赵虎任务铁匠
                        Else 
                            MoveTo 0,0
                            VBSCall FindPic(0,0,800,600,"Attachment:\杂货.bmp",1.0,X,Y)
                            If X>0 and Y>0
                                MoveTo x,y
                                RightClick 1
                                Goto 赵虎任务杂货滩
                            Else 
                                MoveTo 0,0
                                VBSCall FindPic(0,0,800,600,"Attachment:\守城人.bmp",1.0,X,Y)
                                If X>0 and Y>0
                                    MoveTo x,y
                                    RightClick 1
                                    Goto 赵虎任务守城人
                                Else 
                                    MoveTo 0,0
                                    VBSCall FindPic(0,0,800,600,"Attachment:\赵虎.bmp",1.0,X,Y)
                                    If X>0 and Y>0
                                        MoveTo x,y
                                        RightClick 1
                                        Goto 赵虎任务P
                                    Else 
                                        MoveTo 0,0
                                        VBSCall FindPic(0,0,800,600,"Attachment:\张龙.bmp",1.0,X,Y)
                                        If X>0 and Y>0
                                            MoveTo x,y
                                            RightClick 1
                                            Goto 张龙任务张龙