I hate to ask again already, but I am having another problem.
Code:
program WalkerTexasRanger;
{.include srl/srl/misc/smart.scar}
{.include srl/srl.scar}
{--- DECLARE PLAYERS ---}
Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name :=''; // Runescape Username
Players[0].Pass :=''; // Runescape Password
Players[0].Nick :='Vic'; // A short nickname for this character
Players[0].Strings[0] :='Draynor'; //Where do you want to go
Players[0].Active:=True; // Is this player being used
end;
{--- SETUP SMART ---}
Procedure SetupSmart;
begin
SmartSetupex(16, False, True, False);
Wait(1000);
SetTargetDC(SmartGetDC);
end;
{--- WALK TO FALADOR ---}
Procedure WalkToFalador;
begin;
if not LoggedIn then exit;
end;
{--- WALK TO VARROCK ---}
Procedure WalkToVarrock;
begin;
if not LoggedIn then exit;
end;
{--- WALK TO DRAYNOR ---}
Procedure WalkToDraynor;
begin;
if not LoggedIn then exit;
RadialWalk(FindLumbyRoadColor, 30, 70, 65, -1, 0);
end;
{---WALK TO CHICKENS---}
Procedure WalkToChickens;
begin;
if not LoggedIn then exit;
end;
{--- WHERE TO WALK ---}
Procedure Walk;
begin
case Players[CurrentPlayer].Strings[0] of
'falador' : WalkToFalador;
'varrock' : WalkToVarrock;
'draynor' : WalkToDraynor;
'chickens' : WalkToChickens;
end;
end;
{--- MAIN LOOP ---}
begin
SetupSRL;
SetupSMART;
DeclarePlayers;
LoginPlayer;
Walk;
end.
The script compiles and runs, but it doesn't seem to actually perform the WalkToWhatever function.