DoFindColor 0,0,1024,768,"0000FF",intX,intYIf intX > 0 And intY > 0 Then MoveTo intx, intyLeftDown 1MoveTo x, yLeftUp 1Else Exit Do End Ifloop