endless online auto potter scar script

program AutoPotter;
//
// This script will automatically use a potion when your health
// drops below 50%. Place your pots in the far upper right hand
// corner of your inventory.
//
// http://eomix.blogspot.com
//
var x, y:integer;
procedure Pot;
begin
FindWindow('Endless Online')
ActivateClient
repeat
if(FindColorSpiral(x, y, 1579032, 185, 38, 185, 38))then
begin
clickmouse(78, 360, true);
wait(50)
clickmouse(464, 376, true);
wait(5)
clickmouse(464, 376, true);
wait(200)
end
until(FindColorSpiral(x, y, 1579032, 185, 38, 185, 38)=false)
end;
begin
repeat
Pot
until(false)
end.