yoctown
2007-05-30 00:54:00
well i just wrote this this is my second script figured people would defenantly use it in some autobuyers or for any reason they wish but what it does is it chooses a random row (switches so all free worlds are together in rows) the odds arnt 100% random considering the last row only has 13 servers (just means 1/4 times about it will only choose from 13 servers) but it will do i tested it works fine for me.. so someone should look over it and gimme some pointers for sure thanks
program YocsServerChanger;
{.include SRL/SRL.scar}
procedure changeservers;
begin
wait(200+random(30))
mouse(55,480,40,10,true)
wait(600+random(200))
mouse(630,10,3,3,true)
wait(600+random(200))
repeat
case random(4) of
0: mouse(105,263,35,220,true)
1: mouse(200,263,35,220,true)
2: mouse(290,263,35,220,true)
3: mouse(385,180,35,150,true)
end;
until (findcolortolerance(x,y,4471610,465,285,475,295,5))
end;
begin
activateclient;
wait(500+random(50))
changeservers;
wait(500+random(50))
end.