Delay 1000
    MoveTo 690, 456
    LeftClick 1
    Delay 1000
    MoveTo 688, 499
    LeftClick 1
    Delay 1000
    MoveTo 742, 445
    LeftClick 1
    MoveTo 690, 456
    LeftClick 1
    Delay 1000
    MoveTo 742, 445
    LeftClick 1
    MoveTo 1000, 245
    LeftClick 1
End If
FindPic 0,0,1024,768,"Attachment:\2009.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo 1006, 203
    LeftClick 1
    Delay 1000
    KeyPress "R", 1
End If
IfColor 782,334,"8D9AA6",0 Then
KeyPress "R", 1
Else
End If