Results 1 to 9 of 9

Thread: Willow Chopper And Dropper

  1. #1
    Join Date
    Feb 2008
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Willow Chopper And Dropper

    Well This is My First Script it is a Willow Chopper And Dropper, WARNING if you do use this script constantly check back or dont leave the room for a long time cause it isnt all to do with randoms, and the script wont look or find your axe if broken or if it fell off. Well enough warnings here is the Chopper

    Well I Found Out About the Drop Bug So I fixed it and Added Proggy!!=) So here is Version 1.5

  2. #2
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    I like this kinda thing, simple, yet effective. Although you are right about not leaving the room. Just add FindNormalRandoms if you want it to find randoms

  3. #3
    Join Date
    Feb 2008
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Just Updated It And Thanks For Reply dude_richard

  4. #4
    Join Date
    Feb 2008
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thanks, I'll be sure to try this out.

  5. #5
    Join Date
    Jan 2008
    Posts
    163
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by n00b? n00b? View Post
    Thanks, I'll be sure to try this out.
    STOP GOING THROUGH EVERY POST, POSTING CRAP TO GET YOUR POST COUNT UP

  6. #6
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Yeah people do get anoying when they do that, I've seen loads of threads with "I'll check this out, it looks good" but you never hear from them again. But I think the red text was a bit over the top

    EDIT: In your new version you haven't actually used the variables xx, yy, xy, yx and your standards aren't that great so I took the liberty of making the script look better:

    SCAR Code:
    Program WillowChopperDropper;
    {.include srl/srl.scar}
    {.include srl/srl/skill/woodcutting.scar}

    Var
    x, y, Time, LogsDropped, Logs :integer;

    Const
    WT=1000; //How Log to Wait In Milliseconds Per each Tree
    Tol=10 ; //Increase If not Finding Tree!!!
    Name='Mozilla Firefox Start Page - Mozilla Firefox';//What To Diguise Scar As


    Procedure LBitmap;
    Begin
      Logs:= DTMFromString('78DA6394606060006124A0A5C2CDF01F48330' +
           '2F17F20609407327818D000231209A48581043F01355C40429C80' +
           '1A5E20A140408D2C116AD48184147E35004C6206B2');
    end;


    Procedure DeclarePlayers;
    Begin
         HowManyPlayers := 1;
         NumberOfPlayers(HowManyPlayers);
         CurrentPlayer := 0;

         Players[0].Name :='';  //UserName
         Players[0].Pass :=''; //Password
         Players[0].Nick :=''; //Nickname 3 - 4 Letter's of Username Not Using First Letter!!
         Players[0].Active := True;
         
         Writeln(inttostr(HowManyPlayers) + ' Players');
    end;


    Procedure AntiRandoms;
    Begin
      FindNormalRandoms;
      if FindFight then
      begin
      RunAway('N', False,1,8000);
      Wait(5000 + random(3000));
      end;
    end;

    Procedure AntiBan;
    Begin
      case Random(10) of
        1: HoverSkill('woodcutting', false);
        2: BoredHuman;
        3: Mouse(646, 188,2,2,true)//This Clicks On Inventory I hope At least ="=
      end;
    end;


    procedure Waiting;
    begin
      MarkTime(Time)
      Repeat
        FindEnt(x, y, true);
        AntiBan;
        FindNormalRandoms;
        If InChat('wc') then
          SayCurrentLevels('woodcutting');
      until(not(IsUpText('Chop'))) or (TimeFromMark(Time) > WT+random(20))
    end;


    Procedure Cut;
    Begin
      if IsUpText('illow')then
      begin
        Mouse(x,y,0,0,false);
        ChooseOption('hop')
      end;
    end;

    Procedure FindWillows;
    Begin
      MakeCompass('N')
      If(FindObjCustom(x,y,['illo'],[4022890,4682364,3099730],Tol))then
         If IsUpText('hop') then
            Begin
              Repeat
                Cut;
                FindEnt(x,y,true);
                Waiting;
              until(InvFull)
            end;
    end;


    Procedure Drop;
    Begin
      Repeat
        If not FindDTM(Logs, x, y, MIX1, MIY1, MIX2, MIY2)then break;
        Mouse(x, y, 2, 2, false);
        ChooseOption('rop');
        LogsDropped := LogsDropped + 1;
      until (false);
    end;


    Procedure ProgressReport;
    Begin
      ClearDebug;
      SrlRandomsReport;
      writeln('========================');
      Writeln('Goblinos Power Chopper ProgessReport');
      Writeln('Worked:'+timerunning);
      Writeln('Dropped '+inttostr(LogsDropped)+' logs.');
      writeln('========================');
    end;

    Begin
      SetupSRL;
      Disguise(Name);
      DeclarePlayers;
      ActivateClient;
      if(not(loggedin))then loginplayer;
      LBitmap;
      Repeat
        if(not(loggedin))then loginplayer;
        Repeat
          FindWillows;
        until(InvFull)
        if (InvFull)then
          Begin
            Mouse(646, 188,2,2,true)
            Repeat
              ProgressReport;
              Drop;
            until(FindDTM(Logs,x,y,MIX1,MIY1,MIX2,MIY2))=false;
        end;
      until(False)
    end.

  7. #7
    Join Date
    Mar 2008
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    thanks works fine...itwiold b pretty cool to have a progress report that prints every hour thet it is running....nice tho

  8. #8
    Join Date
    Mar 2008
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    it worked good but then it messed up a ton...

  9. #9
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Ffs, stop going around posting on old threads, the script is likely to be outdated. And don't double post to get your post count up.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Willow Bucker and dropper!!!
    By Naum in forum RS3 Outdated / Broken Scripts
    Replies: 248
    Last Post: 02-08-2008, 07:04 PM
  2. Takeouts Willow chopper & dropper
    By takeout in forum RS3 Outdated / Broken Scripts
    Replies: 9
    Last Post: 10-30-2007, 10:09 PM
  3. Tskeouts willow chopper and dropper
    By takeout in forum RS3 Outdated / Broken Scripts
    Replies: 0
    Last Post: 10-02-2007, 11:03 PM
  4. 1-DUB's chopper dropper 0.2
    By 1-DUB in forum RS3 Outdated / Broken Scripts
    Replies: 5
    Last Post: 05-11-2007, 01:15 AM

Posting Permissions

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