//去点出征的地方
    Delay 5*chbtime
    MoveTo 890,560
    Delay 200
    LeftClick 1
    //去点不装备的按钮
    //不带宝
    x=-2
    While x< 00
        VBSCall Call FindPic(500,300,700,500,"bmp\不装备.bmp",0.9,x,y)
        If x>=0 and y>=0
            MoveTo x+10 ,y+10
            Delay 500
            LeftClick 1
        Else 
            Delay dltime
            LeftClick 1
            Delay dltime
            VBSCall Call FindPic(700,500,1000,800,"bmp\出兵.bmp",0.9,x,y)
        EndIf 
        Gosub 重新进入
    EndWhile 
    //等开局对话
Return 要出兵罗
//出兵模块，要先定义 hang 并赋值
Sub 出兵模块
    x=-2
    While x<0
        VBSCall Call FindPic(700,500,1000,800,"bmp\出兵.bmp",0.9,x,y)
        If x>=0 and y>=0
            MoveTo x+10 ,y+10
        Else 
            LeftClick 1
            Delay 500
        EndIf 
        IfColor 917,697,94ebff,0
            SaveMousePos 
            MoveTo 920,700
            Delay chbtime
            LeftClick 1
            RestoreMousePos 
        EndIf 
        //点黄巾开始
        IfColor 913,690,94ebff,0
            SaveMousePos 
            MoveTo 920,700
            Delay chbtime
            LeftClick 1
            RestoreMousePos 
        EndIf 
        Gosub 重新进入
    EndWhile 
    //出兵模块了
    str="[等出兵框]！！"
    Gosub 记运行日志5
    //等出兵框
    xx=2
    While xx>0
        IfColor 370,214,deebef,0
            xx=-2
        Else 
            LeftClick 1
            Delay dltime
        EndIf 
        IfColor 370,214,ced3d6,0
            xx=-2
        EndIf 
        Gosub 重新进入
    EndWhile 
    //m 农夫继续一
    //------
    flag=1
    While jiangshu > 0
        hang=hangzhu(jiangshu) - 1
        jy=jiangy + hang*hangju1
        Delay chbtime
        MoveTo jiangx,jy
        Delay chbtime
        LeftClick 1
        Delay chbtime
        flag=1
        While flag > 0
            IfColor jiangx,jy,73c7e7,2
                flag=0
            Else 
                MoveTo jiangx,jy
                Delay chbtime
                LeftClick 1
                Delay chbtime
            EndIf 
            Gosub 重新进入
        EndWhile 
        jiangshu=jiangshu-1
    EndWhile 
    //点兵种  刀MoveTo 370,400，弓MoveTo 629,405， 抢 MoveTo 370,450，骑MoveTo 620,450
    If bingz=1
        MoveTo 370,400
    ElseIf bingz=2
        MoveTo 629,405
    ElseIf bingz=3