SCAR Code:
Procedure WizardTower;
var Towers : Integer;
begin
if FindMSColorTol(x, y,9006173,5) then
begin
mmouse(x,y,2,2)
wait(25+random(50))
if IsUpTextMulti('Miz','zgo','gog') then
writeln('We are in the wizzy tower.')
gametab(7);
mouse(567, 229,2,2,true)
wait(5000+random(2000))
typesend('Bye lolz..lumby calls me')
wait(7000+random(2000))
Towers:= Towers + 1;
end;
end;
SCAR Code:
program New;
{.include srl/srl.scar}
Procedure WizardTower;
begin
if FindMSColorTol(x, y,9006173,5) then
begin
mmouse(x,y,2,2)
wait(25+random(50))
if IsUpTextMulti('Miz','zgo','gog') then
writeln('We are in the wizzy tower.')
gametab(7);
mouse(567, 229,2,2,true)
wait(7000+random(2000))
typesend('Bye lolz..lumby calls me.')
wait(7000+random(2000))
end;
end;
begin
setupsrl;
wizardtower;
end.