SCAR Code:
procedure LobbyTime;
begin
If not(findcolor(x,y,QuickJoin,0,0,1500,1000))then
begin
If(findcolor(x,y,Full,0,0,1500,1000))then
MoveMouseSmoothEx(x,y,20,20,70,25,7);
ClickMouse(x,y,true);
wait(23+random(7));
ClickMouse(x,y,true);
end else
writeLn('Cannot Find A Full Server, Going to look for Busy');
begin
If(findcolor(x,y,Busy,0,0,1500,1000))then
MoveMouseSmoothEx(x,y,20,20,70,25,7);
ClickMouse(x,y,true);
wait(23+random(7));
ClickMouse(x,y,true);
end else
writeLn('Cannot Find A Busy Server, Going to look for Moderate');
begin
If(findcolor(x,y,Moderate,0,0,1500,1000))then
MoveMouseSmoothEx(x,y,20,20,70,25,7);
ClickMouse(x,y,true);
wait(23+random(7));
ClickMouse(x,y,true);
end else
writeLn('Cannot Find A Moderate Server, Going to look for Low');
begin
If(findcolor(x,y,Low,0,0,1500,1000))then
MoveMouseSmoothEx(x,y,20,20,70,25,7);
ClickMouse(x,y,true);
wait(23+random(7));
ClickMouse(x,y,true);
end else
writeln('Cant Find a server');
end;
end;
end;
end;
end;
end;