Nooby fast question.

Ok im making a script yadda yadia yah....I just need help with something really fast, ok i want Scar to search for ex.99999 (Color) and right click it. How would i write that?

 

procedure Clicking;
var x, y: Integer
if (findcolor [the color here] x,y) then
begin
MoveMouseSmooth(x, y)
Wait(1000);
ClickMouse(x, y, false);
end;

begin
Clicking;
end.

something like that i think..