PDA

View Full Version : WoodCutter + Fletcher!



Ekarma
03-10-2013, 08:37 AM
Program TreeCutter;
{$define SMART}
{$I SRL/SRL.Simba}
{$I P07Include.Simba}

Procedure Camera;
begin;
If (Not P07_LoggedIn) Then
terminatescript;
KeyDown(38);
Wait(RandomRange(1800,2000));
KeyUp(38);
P07_MakeCompassDegree(50);
End;


Procedure AntiBan;
begin
wait(randomrange(250,750));
if not(P07_loggedin)then
Exit;
case Random(6) of
0: P07_MakeCompassSouth;
1: P07_MakeCompassNorth;
2: P07_MakeCameraAngleLow;
3: P07_MakeCameraAngleHigh;
4: P07_MakeCompassEast;
5: P07_MakeCompassWest;
6: P07_HoverSkill('woodcutting',RandomRange(2500,3500 ));
end;
end;

Procedure Fletch;
Begin;
Mouse(576, 277, 2, 2, true);
Mouse(619, 231, 2, 2, true);
Mouse(68, 402, 2, 2, false);
Mouse(54, 457, 1, 1, true);
antiban;
wait(4000+random(2000));
End;

Procedure CutTree;
var x, y: Integer;

begin;
If (Not P07_LoggedIn) Then
terminatescript;
Writeln( 'Bot Status: Looking for trees...')
Camera;
repeat
If (Not P07_LoggedIn) Then
exit;
wait(2500+random(750));
If P07_FindObjCustom(x, y, ['Chop Down', 'Tree'], [1456433, 1649191], 25) Then
begin;
Mouse(x, y, 4, 4, true);
antiban;
wait(randomrange(2750,4500));
end;
until(P07_invfull);
If P07_invfull then
fletch;
end;

Procedure StartScript;
begin;
SetupSRL;
SetupP07Include;
ActivateClient;
end;


Begin
StartScript;
ClearDebug;
Repeat
CutTree;
Until(false);
end.


Please note, this script is VERY basic.
Also, this script only cuts NORMAL LOGS.


http://i46.tinypic.com/359hkqs.jpg

Brid Mayhem
03-10-2013, 08:56 AM
Use bigger random mouse coordinates, this will bery likely get you banned if you click everything in the 4x4 place every time.

Ekarma
03-10-2013, 09:19 AM
Use bigger random mouse coordinates, this will bery likely get you banned if you click everything in the 4x4 place every time.

As I said, very basic.

Brid Mayhem
03-10-2013, 09:50 AM
As I said, very basic.

Still, why not revise? :) Make it better than basic. I'm working on changing the oak chopper while afk to chop > fletch > drop with anti bans and anti randoms :D

Ekarma
03-10-2013, 06:15 PM
Still, why not revise? :) Make it better than basic. I'm working on changing the oak chopper while afk to chop > fletch > drop with anti bans and anti randoms :D

Working on other scripts.
(My Ardy Fur thiever)
&&
Another script yet to be released...

ookamocka
03-10-2013, 07:44 PM
the fletching part is extremely glitchy and proned to get stuck, had to edit it... i suggest others do the same, also added some randomness, everything was too exact

djspunz
03-11-2013, 12:43 AM
nice basic script. i would take out line 59 and also you need to have your knife in the second inv slot

Ashaman88
11-28-2013, 03:12 AM
P07include outdated. Please use official one - shoot me a PM when/if this is updated.