masterofjoe
06-23-2006, 06:27 PM
I need help with a roadmaking procedure. I'm writing a firemaker script that starts in Falador East Bank, and walks up to the range near the garden and lights fires,(see Fig 1) then withdraws logs and repeats until all the logs are gone. I don't know have any idea of how to start writing a roadwalking procedure. This is my script so far. It's not very good, but I'm learning:D.
program Firemaker;
{.include srl/srl.scar}
{.include srl/Firemaking.scar}
Procedure DeclarePlayers;
begin
HowManyPlayers :=1;
NumberOfPlayers( HowManyPlayers );
CurrentPlayer:=0;
Players[0].Name := 'character';
Players[0].Pass := 'character';
Players[0].Nick := 'ter';
Players[0].Active:=True;
end;
begin
Setupsrl;
DeclarePlayers;
ActivateClient;
Loginplayer;
wait(100);
Writeln('Logged in.');
OpenBank3;
wait(300)
Withdraw(1,1,27);
wait(250)
CloseBank;
Writeln('Withdrew logs.');
end.
Fig1:
http://img198.imageshack.us/img198/6782/rs1fz.png
Edit: Dang, spelled procedure wrong.
program Firemaker;
{.include srl/srl.scar}
{.include srl/Firemaking.scar}
Procedure DeclarePlayers;
begin
HowManyPlayers :=1;
NumberOfPlayers( HowManyPlayers );
CurrentPlayer:=0;
Players[0].Name := 'character';
Players[0].Pass := 'character';
Players[0].Nick := 'ter';
Players[0].Active:=True;
end;
begin
Setupsrl;
DeclarePlayers;
ActivateClient;
Loginplayer;
wait(100);
Writeln('Logged in.');
OpenBank3;
wait(300)
Withdraw(1,1,27);
wait(250)
CloseBank;
Writeln('Withdrew logs.');
end.
Fig1:
http://img198.imageshack.us/img198/6782/rs1fz.png
Edit: Dang, spelled procedure wrong.