• Log in or sign up for an account here: https://www.sythe.org/login

WillowRapist1.0Draynor Willow Cutter + Dropper

ConJacKed

ConJacKed

Apprentice

Do Not Trade
Joined
Jul 21, 2009
Sythe Gold
0
Messages
639
FUCK SCAR - RSBOT IS WAYYYY BETTER

GET IT FROM http://updater.powerbot.org/RSBot.jar

[[[ UPDATED REGULARLY ]]]

NEWS: I want your proggys!!! After using WillowRapist, I will love you to post the proggy after to show people this is an actual working script! btw the proggy is the thing in the debug box at the bottom. it'll say something like logschopped: xpgained: blah blah blah.
Also keep posting (not spam of course :P) so this script does not die! It is a great script that works perfectly so it would be a shame for everyone to forget about it!

I Had an idea... If you see someone botting and think its with my script... Post a screenie of them then if they see it they'll be like WTF?!? I'll be taking part too! If you see me botting (skill3dg3) screenie it and post it and i will lol so hard :P Just a bit of fun lol

FOR SOME REASON THE SCRIPT ISN'T WORKING ATM.. TRYING TO FIX =D
Help would be appreciated, not really a good scripter :P

This was last checked on February the 16th and is NOT working.
Reason: It dosnt click trees for some reason... im working on it now

THANKS FOR OVER 3K VEIWS
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~DOES NOT WORK WITH GOOGLE CHROME OR VISTA SO DONT ASK WHY IT DONT WORK JUST CUZ U HAVNT READ THIS!!~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~~AS FAR IS I KNOW IT WORKS WITH EVERYTHING ELSE!!~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~~~~~~~~~~~~~~~~~IF IT DOSNT WORK WITH WHATEVER YOUR USING PLEASE POST IT~~~~~~~~~~~~~~~~~~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~TY~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

I GIVE SOME CREDIT TO HARRROCKS, SINCE HE FIXED A MINOR ERROR​

YOU NEED SCAR TO RUN THIS SCRIPT!! YOU CAN GET IT HERE IF YOU ALREADY HAVE SCAR THEN Well done! Look at you thinking ahead! Lol. Also. if you see part of your script here please post it so i can give you credit!!

So many of these scripts for Woodcutting + Dropping are rubbish. So instead of searching for one, I just took working parts from nn-working scripts, tweaked them, and voila! Out pops the WillowRapist

The auto responder may not work, so you might have to tweak it or use a different one, will have this fixed soon :)

Ignore the bit where it says Draynor Willow Cutter + Dropper, you can do any tree's. Just change the colours :)

!!Updates!!

v1.0 = REALEASE!
v1.1 = Added the BoredCutter (speaks randomly, you can change what is being said if you want) // currently screwed!!
v1.2 = Added EntDetection
v1.2.1 = Very small update
v1.4.1 = Added auto respender (Credits 99% SmartCracker, 1% me. I fixed it cuz it didn't work :P) // also currently screwed
v1.4.2 = Fixed the script so it works again!!
v1.4.3 = Cleaned it up a bit
v1.4.4 = fixed again
v2.4.4 = added the second script (a banking one!)

!!Coming Soon!!

v3 = Getting SMART!!!!! (that means that it opens a seperate window and does it there, allowing you full access to your pc while botting!)

You dont have to put your name and password if you dont want, it just makes it more accurate, You can put your name and a random password. I use the script exactly, with my name (of my skiller) and ****** as the pass. Use mine if you want. Unless your using SMART, then youll have to put your name and pass cuz it logs you in itself, you cant

Here is the DROPPING script
Code: 
///////////////////////\\\\\\\\\\\\\\\\\\\\\\\
//      ConJacKed's Willow Rapist 2.4.4      \\
//     This will cut any tree ANYWHERE      \\
///////////////STUFF IT DOES\\\\\\\\\\\\\\\\\\
//    Cuts down any willow, any location    \\
//      Drops when full inventory           \\
//   Dosnt drop slot 1 (put axe there)      \\
//              Good antiban                \\
//                                          \\
//        !Make sure you near willows!      \\
///////////////////////\\\\\\\\\\\\\\\\\\\\\\\



program WillowRapist;
{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\WoodCutting.scar}


var
x, y, willowcolor1, willowcolor2, willowcolor3, FindTalk, timerun, loads, Chat, logs, wxp, loadstodo, fail, retries, levelgain: integer;
rundirec: string;

procedure DeclarePlayers;
begin
writeln('Setting up players..');
 HowManyPlayers := 1;
 CurrentPlayer := 0;
 NumberOfPlayers(HowManyPlayers);

 Players[0].Name := 'I Love Bananas';
 Players[0].Pass := 'Yummybananas';
 Players[0].Nick := 'ove';     //3 LOWER CASE LETTERS
 Players[0].Skill := 'woodcutting'; // Skill for genie lamp (coming soon)
 Players[0].Active := True; // Leave this!!
                            //Make More If you Need to
writeln('Players set up!!');
end;

procedure SetUp;
begin
writeln('Lookin for your wc lvl..');
 loadstodo    := 10000; // How Many Invs You Wanna Do
 rundirec     := 'E'  // Direction To Run If Being Attacked (N, E, S, W)
 ActivateClient;
 SetupSRL;
 if not LoggedIn then LogInPlayer;
 willowcolor1 := 3891280; // Change if needed!
 willowcolor2 := 2042403; // Change if needed!
 willowcolor3 := 8430479; // Change if needed!
 loads        := 0;
 logs         := 0;
 wxp          := 0;
 fail         := 0;
 levelgain    := 0;
 retries      := 10;
 wait(1000);
 ClearDebug;
 writeln('//////ConJacKed`s Willow Rapist V1.4.4\\\\\\');
 Players[CurrentPlayer].integers[1] := GetSkillInfo('woodcutting', False);
 writeln('Your Woodcutting level is ' + IntToStr(Players[CurrentPlayer].integers[1]) + '.');
end;


Procedure BoredCutter;
begin
  case random(300) of
    0: TypeSend('wc lvls');
    1: TypeSend('woodcutting lvls');
    2: TypeSend('im soo bored');
    3: TypeSend('i love woodcutting');
    4: TypeSend('*yawn*');
    5: TypeSend('runescape rocks'); // not really
    6: TypeSend('wc lvls??');
    7: TypeSend('wc lvls? mines 54 :)');
    8: TypeSend('brb, i gotta pee :P ');
    9: TypeSend('willows r soo easy to chopp');
    10:TypeSend('*bored*');
    11:TypeSend('I hate noobs...');
  end;
end;


procedure WCRandoms;
var
posx, posy: integer;
begin
 getmousepos(posx,posy);
 FindEnt(posx,posy,true);
 if FindFight then RunAway(rundirec, True, 1, 7000+random(3000));
 if FindNPCChatText('lations', Nothing) then
  begin
  writeln('Omg. WC level up! :D');
  ClickContinue(True, True);
  levelgain := levelgain + 1;
  end;
 if (FindBlackChatMessage('ou do not')) then
  begin
  writeln('Oh no! Our axe is broken, or something went wrong.');
  LogOut;
  end;
end;

procedure SmartDrop;
var
  i: integer;
begin
  for i:= 2 to 28 do
  begin
    DropItem(i);
    FindNormalRandoms;
    if FindFight then RunAway(rundirec, False, 1, 6000+random(3000));
  end;
  loads := loads + 1;
  logs  := logs + 27;
end;


procedure Report;
begin
ClearDebug;
writeln('~~~~~~~~~~~~~~~~~~~~~~~');
writeln('WillowRaping Report');
writeln('Run Time : ' + TimeRunning);
writeln('Loads Done: ' + IntToStr(loads));
writeln('Logs Cut: ' + IntToStr(logs));
writeln('XP Gained: ' + IntToStr(logs * 75));
writeln('Levels Gained: ' + IntToStr(levelgain));
writeln('Note: the number of logs and xp may vary,');
writeln('because of random event rewards.');
writeln('~~~~~~~~~~~~~~~~~~~~~~~');
writeln('Thanks for using WillowRapist');
if loads=loadstodo then
 begin
 writeln('You have cut all your Loads! Well Done!');
 LogOut;
 end;
end;

procedure Runtime;
begin
wait(6000);
timerun := timerun + 1;
end;


procedure RespondToPlayers;
var
  TheOldMessage, CurrentMessage, I: Byte;
  Levels, Macro: TStringArray;
begin
  Levels := ['vl', 'evel', 'Wc', 'wc', 'oodcutting', 'oodcut'];
  Macro := ['acro', 'Macro', 'Bot', 'bot', 'Auto', 'auto'];
  for I := 0 to 5 do
  begin
    begin
      CurrentMessage := 0;
      if (CurrentMessage = TheOldMessage) then
        Exit;
      case (Random(5)) of
        1: TypeSend('Mine is ' + IntToStr(Players[CurrentPlayer].Integers[2]) + '.');
        2: TypeSend(IntToStr(Players[CurrentPlayer].Integers[2]) + ', you?');
        3: TypeSend(IntToStr(Players[CurrentPlayer].Integers[2]));
        4: TypeSend('I have ' + IntToStr(Players[CurrentPlayer].Integers[2]) + ' Woodcutting.');
        5: TypeSend('1, jokes! ' + IntToStr(Players[CurrentPlayer].Integers[2]) + '.');
      end;
      TheOldMessage := CurrentMessage;
      WriteLn('Responded [Levels]');
      ReportVars[7] := ReportVars[7] + 1;
      Exit;
    end;
    Wait(150 + Random(50));
    begin
      CurrentMessage := 1;
      if (CurrentMessage = TheOldMessage) then
        Exit;
      case (Random(5)) of
        1: TypeSend('?');
        2: TypeSend('Im too busy');
        3: TypeSend('What?');
        4: TypeSend('...');
        5: TypeSend('   ');
      end;
      TheOldMessage := CurrentMessage;
      WriteLn('Responded [Players Nick]');
      ReportVars[7] := ReportVars[7] + 1;
      Exit;
    end;
    Wait(150 + Random(50));
    begin
      CurrentMessage := 2;
      if (CurrentMessage = TheOldMessage) then
        Exit;
      case (Random(5)) of
        1: TypeSend('Leave me alone, just how I roll ;p');
        2: TypeSend('... Go away much?');
        3: TypeSend('No I am not, beep! ;p');
        4: TypeSend('Autos arent real, theyre asIans who play too much.');
        5: TypeSend('Rofl, autos arent real, theyre virus.');
      end;
      TheOldMessage := CurrentMessage;
      WriteLn('Responded [Macro]');
      ReportVars[7] := ReportVars[7] + 1;
      Exit;
    end;
  end;
  Exit;
end;

procedure FindBrokenAxe;
var
  baxe: integer;
begin
  if not (LoggedIn) then
    Exit;
  if TimeFromMark(baxe) < 1500 then
    Exit;
  FindNormalRandoms;
  MarkTime(baxe);
  if (FindBlackChatMessage('ou do not')) then
  begin
    Writeln('Axe has been broken');
    LogOut;
    Players[CurrentPlayer].Active := False;
    NextPlayer(Players[CurrentPlayer].Active);
  end;
end;

procedure MainTree;
begin
 repeat
 if fail = 5 then
  begin
  Report;
  writeln('Cant find any willows :(');
  LogOut;
  TerminateScript;
  end;
 SetRun(true);
 FindNormalRandoms;
 if FindObjCustom(x, y, ['illow'], [willowcolor1, willowcolor2, willowcolor3], 3) then
   begin
   fail := 0;
   retries := 5;
   Mouse(x, y, 15, 15, true);
   WCRandoms;
   FindNormalRandoms;
   FindNormalRandoms;
   if FindFight then RunAway(rundirec, True, 1, 7000+random(3000));
   wait(6873+random(1127));
   end else
   fail    := fail + 1;
   retries := retries - 1;
   writeln('Willowfinder failed... trying again ' + IntToStr(retries) + ' times.');
   SendArrowWait(1,500+random(1000));
   until(InvFull);
 if InvFull then SmartDrop;
HoverSkill('Woodcutting', False);
HoverSkill('Firemaking', False);
 Report;
end;

begin
 DeclarePlayers;
 SetUp;
  repeat
  Report;
  MainTree;
  until(false);
Report;
end.



If there are any major problems, just say and i will try and fix. I am EXTREMELY new to this and this is my 1st script, so dont be harsh :)

Advice will be muchly appreciated

Thanks,





If you are looking for the best places with barely any people to do this auto... here are the best for Willows and Yews

WILLOWS -- A little place i call Willow Lake (max people on a world with not many people is about 1-3)

WilllowLake.jpg


YEWS -- Great because there is 4 next to eachother =D (only ever a few people there)

Yews.jpg


Also... just to clear things up... I DID NOT MAKE THIS SCRIPT!!!!! ITS A LITTLE BIT FROM A FEW PEOPLES!!! I took a non working script, Looked for the bits that didnt work, and just swapped it for part of another script. It was pretty much trial and error. So Scipt making people... If you see part of you script... Please post it so i can give you credit. thats the only thing i forgot to do wilst making the script. And if anyone asks me to make them i script i will Rofl since i cant make scripts cuz im very very noobish at this. Just cuz i have a working script dosnt mean i cam make them :P
 
If anyone has a Banking script or AutoResponce script, please leave as comment, i need them :)
 
599033 said:
It doesnt work, it doesnt run
Click to expand...

It does work, because I can use it

Does it just not run or does it say [ERROR] in the debug??

Please be more specific so I can actually help or post a screenshot that would be better
 
Is there any particular reason why it checks the achievement diaries?
 
Antiban
 
Line 47: [Error] (47:11): Unknown identifier 'CreateTPAFromBMP' in script C:\Program Files\SCAR 3.21\includes\SRL\SRL\Core\Math.scar

Thats an error i get, ima noob with this, so I probably did something wrong, i just copypasted it into scar.
 
SirColton said:
Line 47: [Error] (47:11): Unknown identifier 'CreateTPAFromBMP' in script C:\Program Files\SCAR 3.21\includes\SRL\SRL\Core\Math.scar

Thats an error i get, ima noob with this, so I probably did something wrong, i just copypasted it into scar.
Click to expand...

Ahh, That happend to me on my laptop.

i have no idea how to fix it since its saying there is a problem with 'Math' in the SRL Core files. I have asked freddy1990 how to fix it and i am awaiting his reply, i will let you know how to fix it when i know
 
SirColton said:
do you have vista on your laptop, and something else on your pc?
Click to expand...

Ahh that might be the problem because i do. Well spotted :)

You may have to find an older version of the SRL files, either that or scar isnt compatible with Vista
 
If it's for antiban why couldn't it be something that makes more sense like friendslist or stats?
 
Kild said:
If it's for antiban why couldn't it be something that makes more sense like friendslist or stats?
Click to expand...

Ok, I have changed it so it checks quests and after it drops it goes to stats and sees how much xp you need in woodcutting and firemaking
 
It doesnt work.

I click run and the mouse just goes to the far end of the screen and I cant move it....
 
599033 said:
It doesnt work.

I click run and the mouse just goes to the far end of the screen and I cant move it....
Click to expand...

You need to select the RS window

At the top of scar there is a black circle on the toolbar at the far right. Click and drag that onto the RS window then it should work fine
 
..I'm not a noob at this, I've selected it. I run it it says compiled and run, and then it just goes to the black on the window.

Im using Google Chrome, would that be a problem?

Edit: WORKS PERFECT ON Internet Explorer.

It is not compatible with Google Chrome.

Thanks dude, great script.
 
599033 said:
..I'm not a noob at this, I've selected it. I run it it says compiled and run, and then it just goes to the black on the window.

Im using Google Chrome, would that be a problem?

Edit: WORKS PERFECT ON Internet Explorer.

It is not compatible with Google Chrome.

Thanks dude, great script.
Click to expand...

so thats something else it dosnt work with :S

oh well

Glad it works for you now :)
 
You must log in or register to reply here.

Similar threads

ConJacKed
Post
WillowRapist BANKING EDITION
Replies
14
Views
3,694
LA dizzle
LA dizzle
GMK
Post
[Scar 3.15b] Basicut 5.0! --- finnally fixed antirandoms!
Replies
11
Views
1,911
suph4l33t
S
Blankothe3rd
Post
B.A.A - Blanko's Attempt (at) A.N.N.A
Replies
6
Views
874
cazax
C
Jethr0x
Post
[RS2][SRL#14] Jethr0x Alcher v1!
3 4 5
Replies
84
Views
10,234
bulletq
B
GMK
Post
[October 20, 2008] BASICUT [October 20, 2008]
4 5 6
Replies
103
Views
15,292
o m g
O
Runescape Gamblingrunescape gambling
Back
Top