Gosub 检查是否交易成功
        EndIf 
    Else 
        Gosub 取消交易
        Goto 开始喊话
    EndIf 
Return 计算价格
Sub 检查交易是否被对方提前结束
    IfColor ax,ay,0896c6,0
        Goto 交易正常进行中
    Else 
        Goto 开始喊话
    EndIf 
    Rem 交易正常进行中
Return 检查交易是否被对方提前结束
Sub 检查是否交易成功
    IfColor ax,ay,896C6,1
        Gosub 检测包裹
        Delay 100
        Goto 开始喊话
    Else 
        Gosub 取消交易
        Goto 开始喊话
        //等待(30秒)后,但对方不交易,就取消本次交易!
    EndIf 
Return 检查是否交易成功
Sub 取消交易
    bx=199+n:by=535+n
    MoveTo bx,by
    Delay 300
    LeftClick 1
    Delay 500
Return 取消交易
Sub 对方失误提前按下了交易
    zx=127+n:zy=297+n
    IfColor zx,zy,126b6e,0
        px=129+n:py=536+n
        Delay 300
        MoveTo px,py
        //(同意)按钮的坐标
        Delay 1000
        LeftClick 1
        Delay 300
        Goto 开始喊话
    EndIf 
Return 对方失误提前按下了交易
Sub 对方放置了不收购的物品
    If w<>c
        Gosub 取消交易
        Delay 1000
        KeyPress 13,1
        Delay 300
        SayString "#16请勿放入__不收购的物品!!!本次交易取消请重新交易我!"
        KeyPress 13,1
        Delay Yanshi
        KeyPress 13,1
        Delay 300
        SayString "#16请勿放入__不收购的物品!!!本次交易取消请重新交易我!"
        KeyPress 13,1
        Delay 300
        Goto 开始喊话
    EndIf 
Return 对方放置了不收购的物品
Sub 检测包裹
    MoveTo 708,681
    Delay 100
    LeftClick 1
    Delay 300
    //鼠标移动到VIP,并点击一次VIP.
    MoveTo 380,432
    Delay 100
    LeftClick 1
    Delay 3000
    //延时3秒,(是为了防止因机器或网络卡了一段时间导致无法准确检测颜色)鼠标移动到物品仓库,并点击一次物品仓库
    IfColor 983,581,0d0d0d,0
        //检测包裹第30格是否放有物品
        Delay 100
        MoveTo 878,203
        Delay 100
        LeftClick 1
        Delay 400
        Goto 包裹未满
        //经过检测包裹未放满30件,关闭包裹结束子程序,继续喊话收购物品!
    Else 
        Delay 100
        MoveTo 874,322
        Delay 100
        For 3
            LeftClick 1
            Delay 1000
        EndFor 
        IfColor 693,237,0d0d0d,0
            //如果693,237没有物品,则把包裹里的物品移动到仓库!
            For 30
                MoveTo 658,511
                Delay 100
                LeftClick 1
                Delay 400
                MoveTo 761,272
                Delay 100