I have a feeling town is going to help me.. (Need help on script.)

Umm this is my script..

Code:

program ZetasMapleChop;

{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\Woodcutting.SCAR}

const
  Maple = 19058; //the color of the maple
  Maple2 = 16760;
  Maple3 = 9548;
  Tol = 12;
  RunDirection = 'S'; //the direction to run if in fight
  LogsToChop = 50; //how many logs to chop)

procedure DeclarePlayers;
begin
HowManyPlayers := 1; //Number of players to use
 NumberOfPlayers(HowManyPlayers); //Don't Touch
   CurrentPlayer := 0;  //Player to start with
   Players[0].Name := 'shampoo'; //Players username
     Players[0].Pass := ''; //Players password
       Players[0].Nick := 'hamp'; //3-4 characters from players username(Lowercase and no spaces)
         Players[0].Active := True;     //Are you using this player?
          end;

procedure WalkToMaples;
begin
MakeCompass('N');
RadialWalk( 2264447 , 10, 52, 40, 0, 0);
wait(1000+random(687));
end;

procedure ChopMaples;
var

  ChopMark: Integer;
begin
  repeat
    if FindObjMulti('aple tree', Maple, Maple2, Maple3, Tol) then
    begin
      GetMousePos(X, Y);
      Wait(500 + Random(102));
      Mouse(X, Y, 1, 1, True);
       MarkTime(ChopMark);
      repeat
        Wait(500 + Random(250));
        FindNormalRandoms;
      until(TimeFromMark(ChopMark) >= (10000 + Random(5000)));

    end;
  until(InvFull);
end;

procedure WalkToBank;
begin
if (InvFull) then
begin
MakeCompass('N');
RadialWalk( 9606557 , 218, 195, 50, 0, 0);
end;
end;


begin
  ActivateClient;
  SetUpSRL;
  DeclarePlayers;
  repeat
    if not LoggedIn then LogInPlayer;
     WalkToMaples;
      ChopMaples;
       WalkToBank;
   until(false)
end.

It logs in and starts trying to find maples, (I start in bank.) Then if I move to maples it will cut them but when inv is full is does not go to the bank. It seems like something is wrong with radial walk but i'm not sure. So if anyone can help me (even though Town is the only person that helps around here.) I would be very thankful!!

 

Hmm.
If i were you i would check for the message "Your inventory is too full to carry any more logs."
and if it finds that, move along to the banking procedure.

Hope that helps =D
-Thanks,
mr.gibblet

 

i think (InvFull) already does that

 

best thing to check is to do writeln('doing action x'); to see where the script is at, also, maybe the timer is too long and you'll have to wait a few seconds beore it starts going back.. 10000 + Random(5000) = 10 seconds+5 seconds =10-15 seconds waiting.

Also i suggest you remove that wait after GetMousePos, pretty useless if you ask me. Mouse function has its own waits
AND wtf is up with the setup o.o

Code:

procedure DeclarePlayers;
begin
  HowManyPlayers := 1; //Number of players to use
  NumberOfPlayers(HowManyPlayers); //Don't Touch
  CurrentPlayer := 0;  //Player to start with

  Players[0].Name := 'shampoo'; //Players username
  Players[0].Pass := ''; //Players password
  Players[0].Nick := 'hamp'; //3-4 characters from players username(Lowercase and no spaces)
  Players[0].Active := True;     //Are you using this player?
end;

much better standards

 

i guess town isnt going to help me

 

Code:

repeat
        Wait(500 + Random(250));
        FindNormalRandoms;
      until(TimeFromMark(ChopMark) >= (10000 + Random(5000))) or (InvFull);

    end;
  until(InvFull);

It may not be able to find the color to RadialWalk.

 

would using color tolerance fix that?

 

There's no tolerance in RadialWalk. Colors change in Runescape so you will have to find the color before you start RadialWalking.

 

ooh i thought what you posted was just a quote