LeftDoubleClick 1
                                Delay 300
                            Else 
                                IfColor 475, 745, "B3C6D5", 0 Then
                                    MoveTo 475, 745
                                    Delay  300
                                    LeftDoubleClick 1
                                    Delay 300                       
                                Else 
                                    Call Plugin.Msg.Tips("没回程了")
                                End If
                            End If
                        End If
                    End If
                End If
            End If
        End If
    End If



   

    Delay 10000
    //点商人

    Call Plugin.Msg.Tips("回程了")

    Rem zhaoshangren
    IfColor 654, 128, "3A2171", 0 Then
	
        MoveTo  654, 128
        Delay 500
        LeftDoubleClick 1
        Delay 500
        //点出售
        Rem chushou
        FindPic 69, 228, 343, 399, "Attachment:\cs.bmp", 0.9, X, Y
        If X > 0 Then 
            MoveTo X + 20, Y + 20
            LeftClick 1
            Delay 500
            //是否有 确认出售 按钮，并且保存坐标，
            Call Shuaxin()
            Delay 1000
            Rem qrcs
            FindPic 276, 389,533, 560, "Attachment:\qrcs.bmp", 0.9, a, b
            If a> 0 Then 
                FindPic 0,0,1024,768,"Attachment:\baoguo.bmp",0.9,inX,inY  
                MoveTo inX - 127, inY + 132
                kk = 0
                //2层循环 卖掉
                For 7
                    For 8
                        MoveR 34, 0
                        Delay 200
                        Call dianji()
                        kk = kk + 1
                        If kk = 10 Then 
                            //满10次点击一下出售 
                            SaveMousePos
                            MoveTo a+30,b+10
                            Delay 500
                            LeftClick 1
                            Delay 100
                            kk = 0
                            RestoreMousePos
                        End If
                    Next
                    MoveR -272 , 34
                    Delay 200
                Next
                //最后再卖一次
                MoveTo a+30,b+10
                Delay 500
                LeftClick 1
                Delay 100
                            
                //打开人物 点戒指\后检查是否到位，到位后走1步
                Call Plugin.Msg.Tips("卖完了")

                KeyPress "C", 1
                Rem rwsx
                Delay 1000
                FindPic 143, 129,442, 272,"Attachment:\rwsx.bmp",0.9,X,Y
                If X > 0 Then 
                    MoveTo X - 118, Y + 248
                    Delay 500
                    LeftDoubleClick 1
                    Delay 10000
                    Rem rwsx2
                    FindPic 143, 129,442, 272,"Attachment:\rwsx.bmp",0.9,X,Y
                    If X > 0 Then 
                        MoveTo 794, 735
                        Delay 500
                        LeftClick 1
                        MoveTo  323,433
                        Delay 500
                        LeftClick 1