y = 211
MoveTo 959, 539
Delay 500
 FindPic 1450,800,1528,868,"Attachment:\bg.bmp",0.1,intX,intY
If intX > 0 And intY > 0 Then 
                MoveTo intX, intY
                RightClick 1
    End If
                            MoveTo 959, 539
Delay 500
FindPic 1450,800,1528,868,"Attachment:\qx1.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
Goto 标记1
	Else
                                MoveTo 959, 539
    Delay 500
    End If
FindPic 1450,180,1738,246,"Attachment:\qx.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
    MoveTo intX, intY
                Rem 标记2
    Delay 4000
                                        SaveMousePos
            End If
    FindPic 1454,178,1728,365,"Attachment:\sp.bmp",1.0,intX,intY
    If intX > 0 And intY > 0 Then
            MoveR 44, 0
    GetCursorPos x, y
                If x > 1701 Then
                MessageBox "已完成"	
                End If
            Goto 标记2
            	Else
        RightClick 1
            Rem 标记1
           
                                        MoveTo 959, 539
            Delay 1000
                End If
            FindPic 1455,221,1737,372,"Attachment:\bg.bmp",0.1,intX,intY
If intX > 0 And intY > 0 Then
                            MoveTo intX, intY
                                RightClick 1
                    	Else
        KeyPress "Esc", 1
                                            MoveTo 959, 539
        Delay 500
    FindPic 1442,608,1696,723,"Attachment:\xg.bmp",0.6,intX,intY
If intX > 0 And intY > 0 Then
    MoveTo intX, intY
    LeftDoubleClick 1
        MoveTo 259, 482
        Delay 1000
        LeftClick 1
                Delay 1000
        MoveTo 215, 600
        RightClick 12
        Delay 1000
        MoveTo 750, 705
        LeftClick 1
            KeyPress "Esc", 1
                                                    MoveTo 959, 539
                        Delay 500
        FindPic 1442,608,1696,723,"Attachment:\xg.bmp",0.6,intX,intY
If intX > 0 And intY > 0 Then
    MoveTo intX, intY
    LeftDoubleClick 1
                        Delay 500
            MoveTo 260, 396
             Delay 500
            LeftClick 1
End If
        RestoreMousePos
                        Goto 标记2
                    End If
                    End If
                 FindPic 1650,807,1720,872,"Attachment:\xl.bmp",0.3,intX,intY
                If intX > 0 And intY > 0 Then 
                    Goto 标记3
                                	Else
                                                MoveTo 959, 539
                    Delay 500
                End If
                                     FindPic 1460,309,1919,1079,"Attachment:\xl.bmp",0.3,intX,intY
                                    If intX > 0 And intY > 0 Then 
                                        MoveTo intX, intY
                                        RightClick 1
                        Rem 标记3
                                                    MoveTo 959, 539
                        Delay 500
            End If
                                 FindPic 1505,896,1595,942,"Attachment:\ks.bmp",0.9,intX,intY
                                    If intX > 0 And intY > 0 Then 
                                    MoveTo intX, intY
                        LeftClick 1
                        RestoreMousePos
                Goto 标记2
    End If