Else 
        Gosub 当前时间
        Message = CurrentTime & "！！！卖出商品结束，无任何卖出物..."
        Gosub 写入日志文件
    EndIf 
Return 卖出商品
Sub 行情查看
    //点开行情页面
    //Delay 1000
    StMenu = 0
    While StMenu = 0
        PosX = 729
        PosY = 360
        Gosub 移动鼠标
        LeftClick 1
        Gosub 延时判定
        Delay 2000
        PosX = 102
        PosY = 99
        Gosub 坐标转换
        IfColor PosX,PosY,BBBBBB,2
            StMenu = 1
            Gosub 当前时间
            Message = CurrentTime & "行情查看页面打开成功..."
            Gosub 写入日志文件
        Else 
            Gosub 当前时间
            Message = CurrentTime & "！！！行情查看页面打开未成功..."
            Gosub 写入日志文件
            //再去找老板
            Gosub 查找交易所老板
        EndIf 
    EndWhile 
    Gosub 行情数组初始化
    Gosub 卖出行情查看
    Gosub 买入行情查看
    //行情查看结束
    KeyPress 27,1
    Delay 1000
Return 行情查看
Sub 行情数组初始化
    //判断买入走势（0-货不存在，1-Down下，2-Calm平，3-Up上）
    Num = 1
    For 10
        VBS MarketBuy(Num) = 0
        Num = Num+1
    EndFor 
    //判断卖出走势（0-货不存在，1-Down下，2-Calm平，3-Up上）
    Num = 1
    For 15
        VBS MarketSell(Num) = 0
        Num = Num+1
    EndFor 
    //百分比制定买入信息（0-货不存在，1-买入，2-价高不买）
    Num = 1
    For 10
        VBS BSDirection(Num) = 0
        Num = Num+1
    EndFor 
Return 行情数组初始化
Sub 卖出行情查看
    //选择卖出标志商品
    SellChoose = 0
    Num = 1
    For 15
        PosX = 424
        PosY = 99
        Gosub 坐标转换
        Gosub 商品坐标转换
        IfColor PosX,PosY,BBBBBB,2
            PosX = 669
            PosY = 133
            Gosub 坐标转换
            Gosub 商品坐标转换
            IfColor PosX,PosY,CCDD11,2
                VBS MarketSell(Num) = 1
            Else 
                IfColor PosX,PosY,22DD99,2
                    VBS MarketSell(Num) = 2
                    If SellChoose = 0
                        SellChoose = Num
                    EndIf 
                Else 
                    IfColor PosX,PosY,2277DD,2
                        VBS MarketSell(Num) = 3
                        SellChoose = Num
                    Else 
                        VBSCall MessageBox ("错误的行情走势参数！")
                    EndIf 
                EndIf 
            EndIf 
        Else 
            Goto 卖出行情查看结束
        EndIf 
        If Num>=5
            PosX = 694
            PosY = 369
            Gosub 移动鼠标
            IfColor PosX,PosY,000000,2
                PosX = 694