SRL Archive - First Scripts

This script chops oaks and then drops when inventory full,
Will be updated soon :)

//This script uses pretty fast woodcutting, plus it does not have antirandoms
//Dont have your axe in 1st inventory slot.
//Thank you
//~System79
program PowahCutt0r;
{.include srl\srl.scar}
{.include srl\srl\skill\woodcutting.scar}
var Clicks: Integer;
Loads: Integer;
procedure CheckRandom;
begin
FindTalk;
FindNormalRandoms;
if (FindFight = true) then
begin
RunAwayDirection('N');
Wait(10000 + random(2000));
RunBack;
end;
end;
procedure ProgressReport;
begin
ClearDebug; 
   Writeln('o.O ============================= o.O');
    Writeln('------>Powahch0pp0r by System79<-------');
    Writeln('  Did ' + IntToStr(Loads) + ' Loads' + '    ');
    Writeln('---------------------------------------------');
    Writeln('  Did ' + IntToStr(Clicks) + ' Clicks' + '        ');
    Writeln('o.O ============================  o.O');
end;

procedure Cuttree;
begin
repeat
if(FindColor(x,y,3041376,5,5,515,340))then
MMouse(x,y,3,3);
wait(50);
Mouse(x,y,0,0,true);
Clicks:=Clicks+1;
wait(6000);
until(InvFull);
end;
Procedure Drop;
begin
DropTo(5,28);
Loads:=Loads+1;
end;
begin
SetupSRL;
repeat
activateclient;
Cuttree;
Drop;
CheckRandom;
until(false);
end.

Every tip is welcome :)
Edit 1: Added BASIC anti randoms, next is multiplayer
Edit 2: Added progress report :), and better axe st00f, you can now take 5 axes with your in total: 1 in weapon slot, 4 in inventory :) should make your run-time longer

Not bad, add in antirandoms, multiplayer, and any other features you think up…

yeah, thats what im going to do now =]
first i wanted a script to make myself able to auto a bit faster than the other SRL scripts.

you could also add a better dropper IE using dtms or bitmaps

i might be able to help you with them
[email]haz43@hotmail.co.uk[/email]

uhhh, it doesnt work that well for me. Too slow finding trees.

testin out now :P

not too bad put in standards and anti randoms and anti bann it and then it should be good.. :) and consider dtms for dropping.. so u dont drop everything

i get a few unknown identifiers