SCAR Code:
//------------------------------------------------------------------------\\
// Tutorial Island Runner \\
//------------------------------------------------------------------------\\
program TutorialIsland;
{.include SRL\SRL.scar}
//-------------------------------Players----------------------------------\\
procedure DeclarePlayers;
begin
HowManyPlayers:=1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer:=0;
Players[0].Name :='Username'; //Username goes here.
Players[0].Pass :='Password'; //Password goes here.
Players[0].Nick :='sern'; //Type 3-4 letters of your runescape username.
Players[0].Active :=true; //Is this player active?
end;
//---------------------------Character Look-------------------------------\\
Procedure MakeCharacter;
Begin
PerfectNorth;
Setrun(true);
HighestAngle;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//------------------------First Person On Island--------------------------\\
Procedure Firstperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//--------------Woodcutting, Firemaking, Fishing Instructor---------------\\
Procedure Secondperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//------------------------Bread Making Instructor-------------------------\\
Procedure Thirdperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//-------------------Emote, Run, To Prayer Instructor---------------------\\
Procedure Goingtofourthperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//--------------------------Prayer Instructor-----------------------------\\
Procedure Fourthperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//-----------------------------Mining Instructor--------------------------\\
Procedure Fifthperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//--------------------------Fighting Instructor---------------------------\\
Procedure Sixthperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//--------------------------------Banker----------------------------------\\
Procedure Seventhperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//-----------------------Financial Instructor-----------------------------\\
Procedure Eighthperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//------------------------Mage Instructor---------------------------------\\
Procedure Finalperson;
Begin
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
Mouse(870,184,0,0,true);
Flag;
end;
//------------------------------------------------------------------------\\
Begin
SetupSRL;
DisguiseScar('iTunes');
DeclarePlayers;
LoginPlayer;
MakeCharacter;
Firstperson;
Secondperson;
Thirdperson;
Fourthperson;
Fifthperson;
Sixthperson;
Seventhperson;
Eighthperson;
Finalperson;
end.
end.