Page 1 of 2 12 LastLast
Results 1 to 25 of 28

Thread: First Willow Cutting/ Banker Script - So Far...

  1. #1
    Join Date
    Oct 2007
    Location
    SoCal
    Posts
    31
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    First Willow Cutting/ Banker Script

    I'M DONE! It chops the willows, brings them to the bank and deposits them. The only problem is that once it deposits the willows, the camera turns north to the highest angle, cutting off view of the willows, thus preventing the script continuing without human intervention. Can you tell me how to fix this? Thanx!

  2. #2
    Join Date
    Jun 2007
    Posts
    785
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    not bad, try finish it before posting.. anyway heres something without errors, that compiles.( did the chop part to not sure it works )

    check attachment

    [22:20] <[-jesus-]> freddy, go uninstall yourself

  3. #3
    Join Date
    Oct 2007
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hey guys i'd like to do a willow/banker in draynor, where is a good guide to make
    it?

  4. #4
    Join Date
    Jun 2007
    Posts
    785
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    just try some tutorials and with some little improvise you can do it

    [22:20] <[-jesus-]> freddy, go uninstall yourself

  5. #5
    Join Date
    Apr 2007
    Posts
    2,593
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Here's your edited script. I added a proggy :
    SCAR Code:
    program WillowBanker;
    {.include srl/srl.scar}
    Const
         WillowColor=2185809;
         BankSymbolColor=4901104;
         
    Var Chopped: Integer;
    Procedure DeclarePlayers;
    begin
      HowManyPlayers:= 6;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer:= 0;
      Players[0].Name        := 'Username'; //UserName
      Players[0].Pass        := 'Password'; //Password
      Players[0].Nick        := 'Nick'; //2-4 letters of username
      Players[0].Integers[1] := 10; //Number of loads before switching
      Players[0].Booleans[1] := True; //Is the axe wielded?
      Players[0].Active      := True; //Active
      Players[1].Name        := 'Username'; //UserName
      Players[1].Pass        := 'Password'; //Password
      Players[1].Nick        := 'Nick'; //2-4 letters of username
      Players[1].Integers[1] := 10; //Number of loads before switching
      Players[1].Booleans[1] := True; //Is the axe wielded?
      Players[1].Active      := True;
      Players[2].Name        := 'Username'; //UserName
      Players[2].Pass        := 'Password'; //Password
      Players[2].Nick        := 'Nick'; //2-4 letters of username
      Players[2].Integers[1] := 10; //Number of loads before switching
      Players[2].Booleans[1] := True; //Is the axe wielded?
      Players[2].Active      := True; //Active
      Players[3].Name        := 'Username'; //UserName
      Players[3].Pass        := 'Password'; //Password
      Players[3].Nick        := 'Nick'; //2-4 letters of username
      Players[3].Integers[1] := 10; //Number of loads before switching
      Players[3].Booleans[1] := True; //Is the axe wielded?
      Players[3].Active      := True; //Active
      Players[4].Name        := 'Username'; //UserName
      Players[4].Pass        := 'Password'; //Password
      Players[4].Nick        := 'Nick'; //2-4 letters of username
      Players[4].Integers[1] := 10; //Number of loads before switching
      Players[4].Booleans[1] := True; //Is the axe wielded?
      Players[4].Active      := True; //Active
      Players[5].Name        := 'Username'; //UserName
      Players[5].Pass        := 'Password'; //Password
      Players[5].Nick        := 'Nick'; //2-4 letters of username
      Players[5].Integers[1] := 10; //Number of loads before switching
      Players[5].Booleans[1] := True; //Is the axe wielded?
      Players[5].Active      := True; //Active
      Writeln('Using '+IntToStr(HowManyPlayers)+' Players');
      NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
    end;
    procedure Login;
    begin
     if (not(LoggedIn)) then
     LoginPlayer;
    end;
    procedure DoChats;
    begin
      if (not(LoggedIn)) then
      Exit;
      SetChat('off', 1);
      SetChat('friends', 2);
      SetChat('on', 3);
      SetChat('off', 4);
    end;
    function FindFastRandoms: Boolean;
    var
      i: Integer;
    begin
      for i:=1 to 10 do
      begin
        case I of
         1:  If FindDead then
               Result := True;
         2:  If FindMod then
               Result := True;
         3:  If FindMime then
               Result := True;
         4:  If FindMaze then
               Result := True;
         5:  If FindQuiz then
               Result := True;
         6:  If FindDemon then
               Result := True;
         7: begin
               if NoGameTab then
               begin
                 Result := True;
                 Players[CurrentPlayer].loc := 'No GameTab';
                 Logout;
                 Exit;
               end;
             end;
         8: begin
               if InBlack then
               begin
                 Result := True;
                 Players[CurrentPlayer].loc := 'InBlack';
                 Logout;
                 Exit;
               end;
             end;
           9: RC;
           10: Respond;
        end;
        wait(1);
      end;
    end;
    procedure FindRandoms;
    begin
      FindTalk;
      FindFastRandoms;
      FindNormalRandoms;
      FindLamp('Woodcutting');
      SolvePinball;
      if (FindFight) then
      begin
        MakeCompass('N');
        RunTo('N', True);
        Wait(7000 +Random(3000));
        RunBack;
      end;
    end;
    procedure AntiBan;
    begin
      if (not(LoggedIn)) then
      Exit;
      case Random(8) of
        0: RandomRClick;
        1: HoverSkill('Woodcutting', False);
        2: RandomMovement;
        3: BoredHuman;
        4: PickUpMouse;
        5: AlmostLogout;
        6: begin
             GameTab(1 +Random(12));
             wait(2000 +Random(1000));
             GameTab(4);
           end;
        end;
    end;
    procedure Chop;
    begin
     if Findcolor(x,y,WillowColor,333,218,350,230) then
      mouse(x, y, 1, 1, false);
      if IsupText('willow') then
      chooseoption('chop');
      status('chopped down a willow');
      Chopped := Chopped + 1;
    end;

    begin                   // These functions will start te script ( login player find window ect..)
      SetupSRL;
      FindWindowBySize(766, 504);
      Activateclient;
      DeclarePlayers;
      LoginPlayer;
      repeat       // all function below here will repeat untill false.
        FindFastRandoms;
        FindRandoms;
        Antiban;
        Chop;
        // bank needs here if you made a bank function
        WriteLn('Chopped '+ IntToStr(Chopped) + ' willows!');
        until(false);
    end.

  6. #6
    Join Date
    Jul 2007
    Posts
    14
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Is there s certain spot you are supposed to start out on this? I started it in the draynor bank and the mouse just moved around in random places and did nothing. Although it did exam the ground once. The script I was using was the one dumpin posted

  7. #7
    Join Date
    Jun 2007
    Posts
    785
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    LOL?! thats my script... not his... you just added a writeln and removed the spaces between the declare players? lol

    [22:20] <[-jesus-]> freddy, go uninstall yourself

  8. #8
    Join Date
    Aug 2007
    Posts
    12
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Choob'R'Us View Post
    Please, let me know if i'm doing anything wrong so far.
    Note: Some sections are not complete.
    good script, ran it for a while nice

  9. #9
    Join Date
    Jul 2007
    Posts
    14
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hey I want to try out this script but when I try to run it I get this.

    Line 7: [Error] (7:11): Identifier expected in script C:\DOCUME~1\MATTPR~1\LOCALS~1\Temp\First Script.scar
    Line 7: [Error] (7:13): colon (':') expected in script C:\DOCUME~1\MATTPR~1\LOCALS~1\Temp\First Script.scar

    Can someone please tell me what this means because I am a noob at scar.

  10. #10
    Join Date
    Oct 2007
    Location
    SoCal
    Posts
    31
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Script Completed

    My first scrip is compleated...aside from the fact it needs fixing up a bit. See first post for details.

  11. #11
    Join Date
    Oct 2007
    Location
    SoCal
    Posts
    31
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Revised Final Version Completed: See first post for more details.

  12. #12
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Try if findobj. Because then it will hover over the same colors which is very detectable.

    ->{Nauman}<-

  13. #13
    Join Date
    Jun 2007
    Posts
    785
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    final version is pretty good , good job !

    [22:20] <[-jesus-]> freddy, go uninstall yourself

  14. #14
    Join Date
    Oct 2007
    Posts
    17
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I Havent tried it yet but it looks pretty good - ill leave an edit in a min.

  15. #15
    Join Date
    Oct 2007
    Posts
    17
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Line 27: [Error] (14707:32): Identifier expected in script C:\Documents and Settings\Home\Desktop\Draynor Wood Cutter and Banker.scar - doesnt want to work for me - nothing does.

  16. #16
    Join Date
    Jan 2007
    Posts
    28
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Pretty solid for your first script man. you got to post the finished master piece up man.. keep it dude

    l8rs
    West syd

  17. #17
    Join Date
    Jan 2007
    Posts
    28
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    sorry man didnt mean to add the last icon.. but still keep it up man

  18. #18
    Join Date
    Oct 2007
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    good job man

  19. #19
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol ^^ stop spamming or your post count will be 0 and you never will be junior member
    ~Hermen

  20. #20
    Join Date
    Oct 2007
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol im saying what i think about it... lol

  21. #21
    Join Date
    Oct 2007
    Location
    SoCal
    Posts
    31
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Nauman... How would if Findobj keep the script flowing? The problem is that there are no willows on screen after it deposits the willows in the bank. I don't see how if Findobj would fix that...

  22. #22
    Join Date
    Oct 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    cool

  23. #23
    Join Date
    Oct 2007
    Posts
    28
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    good SCRIPT !!

  24. #24
    Join Date
    Oct 2007
    Location
    SoCal
    Posts
    31
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Quote Originally Posted by derrick slay View Post
    good SCRIPT !!
    thanks...
    I'm suprised on how good I did for my first script.
    It still has a few bugs to work out though...

  25. #25
    Join Date
    Nov 2007
    Location
    lol
    Posts
    176
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default error

    i got error

Page 1 of 2 12 LastLast

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. First script (Willow cutter/banker)
    By ZaSz in forum First Scripts
    Replies: 85
    Last Post: 03-10-2009, 01:27 AM
  2. First Script Willow Banker
    By x13om13e12x in forum First Scripts
    Replies: 29
    Last Post: 02-20-2008, 04:51 PM
  3. Replies: 6
    Last Post: 01-08-2008, 02:10 PM
  4. JAD Willow - edgevil willow cutter + banker.
    By JAD in forum RS3 Outdated / Broken Scripts
    Replies: 58
    Last Post: 10-08-2007, 05:11 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
  •