Results 1 to 5 of 5

Thread: Wood Cutter

  1. #1
    Join Date
    Jun 2007
    Posts
    44
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default Wood Cutter

    SCAR Code:
    program New;
    {.include SRL/SRL.scar}

    const
    LoadsPerPlayer = 10;

    procedure DeclarePlayers;
    begin
    SetupPlayers;

    Players[0].Name := '';
    Players[0].Pass := '';
    Players[0].Nick := '';
    Players[0].Active := True;

    Players[0].Name := '';
    Players[0].Pass := '';
    Players[0].Nick := '';
    Players[0].Active := True;

    LoadPlayerArray;
    end;
    var
    x, y, Mymark : integer;
    begin
    if not Loggedin then Exit;
    MarkTime (MyMark);
    Repeat
    if FindObj (x, y, 'hop', TreeColor, 30) then
    begin
    Mouse(x, y, 0,0, False);
    if ChooseOption ('hop') then
    begin
    Wait (WaitPerTree)
    Exit;
    end;
    end;
    if TimeFromMark (MyMark) > (2 * 60 * 100) then
    begin
    Logout
    Exit;
    end;
    until false
    end;

    The guy who made the tutorial was great!
    I learned a lot from it. Well heres my first script.

  2. #2
    Join Date
    Jul 2007
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    dosent work

  3. #3
    Join Date
    Sep 2007
    Posts
    9
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    um its small and there are no instructions do not get how to use it

  4. #4
    Join Date
    May 2007
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I dont know too much about scripting yet, but this I know is wrong

    procedure DeclarePlayers;
    begin
    SetupPlayers;

    Players[0].Name := '';
    Players[0].Pass := '';
    Players[0].Nick := '';
    Players[0].Active := True;

    Players[0].Name := '';
    Players[0].Pass := '';
    Players[0].Nick := '';
    Players[0].Active := True;

    LoadPlayerArray;
    end;
    you cant have two player 0's and you forgot to put a number of players line
    in there.

  5. #5
    Join Date
    Jun 2007
    Location
    NSW, Australia.
    Posts
    541
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Use standards my friend. Also you have all the things to do in the main procedure which is a bad idea.

    Just go like:
    SCAR Code:
    procedure ChopTrees;
    begin
    //Procedure for chopping a single tree in here.
    end;
    procedure DropLogs;
    begin
    //Procedure for a full inventory of logs in here.
    end;

    //Then this is your main loop.
    begin
      repeat
        repeat
          ChopLogs;
        until(InvCount = 28) or (Not(LoggedIn));
        DropLogs;
      until(false);
    end.

    Mind you, that is just psuedo-code, youll have to actually script it yourself.
    Quote Originally Posted by RAM View Post
    I sam sofa king wee todd did ! ~RAM
    My SRL Army Blog.


Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Auto Wood Cutter
    By Hasslarn in forum First Scripts
    Replies: 36
    Last Post: 01-03-2008, 02:06 AM
  2. IS there a premade auto wood cutter?
    By Hacksarefun in forum OSR Help
    Replies: 3
    Last Post: 09-14-2007, 11:59 PM
  3. Wood cutter
    By mooman001 in forum RS3 Outdated / Broken Scripts
    Replies: 2
    Last Post: 07-15-2007, 11:14 PM
  4. No1's Power Wood Cutter
    By nooneyouknow in forum First Scripts
    Replies: 2
    Last Post: 05-05-2007, 04:00 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •