Ok, so i made this in half an hour
SCAR Code:
program ChickenKiller;
{.include srl/srl.scar}
var x,y:integer;
Const
ChickenColor = '1337';
TimeToPlay = '600000';//IN MILISECONDS//
Procedure CheckIfLoggedIn;
begin
Writeln('You are running ChickenKiller by wade007')
wait(1000)
If(Not(loggedin)) then
begin
Writeln('Please login before running script')
end;
end;
Procedure AttackChicken;
begin
If (FindColor(x,y, ChickenColor , 495, 166 , 991, 478)) then
begin
If IsUptextMulti('cken','hicken','chic')
then
begin
Mouse(x,y, true)
end;
end;
end;
procedure Debug;
begin
writeln(' Thank you for using my ChickenKiller')
wait(400)
Writeln(' It is still in beta, so don''t be too harsh')
end;
begin
SetupSrl;
ActivateClient;
MakeCompass('N')
CheckIfLoggedIn
repeat
AttackChicken
Until(TimeToPlay = TimeToPlay)
end.
and i am getting an error "Type mismatch in script"
I don't know what to do.... can you guys help?
h):
h):
thanks in advance!