Program YoHoJosPMS;
{.Include SRL\SRL\Misc\SMART.SCAR}
{.include SRL\SRL.scar}
{.Include SRL\SRL\Misc\Debug.SCAR}
Const
YourStatsUserID = '301'; //User ID from scriptmanager.freehostia.com
YourStatsPass = '********'; //Your pass from scriptmanager.
NumbOfPlayers= 1; //How many players are you using
StartPlayer= 0; //Player to start auoting with! (0 means first char)
LoadsPerLogin= 600; //How Many Loads To Do Per Login!
LoadsTotal= 600; //How Many Total Lods To Do Per Character!
World= 102; //Server to log into, if you are using SMART.
SSigned= false; //True for singed, False for unsigned client;
DropGems= True; //Drop Gems?(They are useless!)
SleepyWeepie= 0; //Minutes to wait before logging in again.0 = Disabled.
YDebug= true; //Shows whats happening on the runescape screen in a
//debug window, so you dont have to open/close SMART.
Version= '1.04'; //NO TOUCHY!
var fftries : integer; rdebugstrings : TStringArray; oldremotestring : string;
{*******************************************************************************
procedure DeclarePlayers;
By: SRL
Description: SRL's Player Setup
*******************************************************************************}
procedure DeclarePlayers;
var i:integer;
begin
NumberOfPlayers(NumbOfPlayers);
CurrentPlayer := StartPlayer;
for i := 0 to NumbOfPlayers-1 do
Players[i].BoxRewards := ['mote', 'ostume', 'XP', 'Gem', 'ithril', 'oal', 'une', 'oins'];
with Players[0] do
begin
Name := 'carrots4u'; //Player username.
Pass := '********'; //Player password.
Nick := 'ts4u'; //Player nickname - 3-4 letters of Player username.
Active := True;
Integers[1] := 4; //1=BrightCopper,2=DarkCopper,3=Tin,4=Iron.
Integers[2] := 8; //Seconds to try mining rock before clicking another.
end;
{ with Players[1] do
begin
Name := ''; //Player username.
Pass := ''; //Player password.
Nick := ''; //Player nickname - 3-4 letters of Player username.
Active := True;
Integers[1] := 4; //1=BrightCopper,2=DarkCopper,3=Tin,4=Iron.
Integers[2] := 5; //Seconds to try mining rock before clicking another.
end;
with Players[2] do
begin
Name := ''; //Player username.
Pass := ''; //Player password.
Nick := ''; //Player nickname - 3-4 letters of Player username.
Active := True;
Integers[1] := 4; //1=BrightCopper,2=DarkCopper,3=Tin,4=Iron.
Integers[2] := 5; //Seconds to try mining rock before clicking another.
end;
with Players[3] do
begin
Name := ''; //Player username.
Pass := ''; //Player password.
Nick := ''; //Player nickname - 3-4 letters of Player username.
Active := True;
Integers[1] := 4; //1=BrightCopper,2=DarkCopper,3=Tin,4=Iron.
Integers[2] := 5; //Seconds to try mining rock before clicking another.
end;
with Players[4] do
begin
Name := ''; //Player username.
Pass := ''; //Player password.
Nick := ''; //Player nickname - 3-4 letters of Player username.
Active := True;
Integers[1] := 4; //1=BrightCopper,2=DarkCopper,3=Tin,4=Iron.
Integers[2] := 5; //Seconds to try mining rock before clicking another.
end; {}
end;
don't see anything wrong, lol
EDIT: OOPS!! lmao