SRL Archive - RS3 Outdated / Broken Scripts

West Varrock Oak Chopper v0.3!!


Info:

   {-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_}
   {                    Varrock Oak cutter v0.3                       }
   {                                                                  }
   {------------------------------------------------------------------}
   {                Description: Cuts oaks near Varrock West Bank     }
   {                Writer: [-Jesus-]                                 }
   {                Category: Woodcutting                             }
   {                Version: 0.3                                      }
   {                Release Date: September 27, 2007                  }
   {                Notes:  Made for SRL4+ & Scar 3.12+               }
   {                Thanks: Rogeruk for the CountDTMA function        }
   {------------------------------------------------------------------}
   {                       Instructions:                              }
   {1. Fill out the Player Array                                      }
   {2. Drag the crosshair to RS Window                                }
   {3. Go to the most-southern bank booth in Varrock West Bank        }
   {4. Put all extra axes in the FIRST slot of your bank              }
   {5. Start the script!                                              }
   {                                                                  }
   {-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_}

Features:
-Radial Walk
-Multiplayer
-Find & Check axe
- & more!

Post all Proggies, bugs, ect. here!

{-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_}
{                Varrock West Bank Oak Chopper v0.1
{      Worked for 2 Hours, 7 Minutes and 25 Seconds.
{      Cut & Banked 378 Oaks!
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_}

Oh, cool :D I'll review code later.

Meh… I need to fix some stuff tomorrow & add in a few failsafes.

Edit: Going to run an edited/updated version overnight, will probably upload it tomorrow if all goes well.

Runekiller for findaxe?,

function FindAxeA: Boolean;   //Modded SRL version
var
  InvAxe, WieldAxe, Ix, Iy: Integer;
  dtmAxes: array[0..1] of Integer;
begin
  if LoggedIn then
  begin
    GameTab(4);
    dtmAxes[1]:= DTMFromString('78DA63F4606260B8CD8002ECED63197418191' +
       '88088E13F1030FA00D5DC4355932EC2C160C4005103028C8E4035' +
       'D719D000231209A42D816ADE1250630D54F381801A3BA09A3BF8D' +
       '500005D910CA6');
    GameTab(5);
    for WieldAxe := 1 to 2 do
    begin
      if(WieldAxe = 2)then
        Break;
      if(FindDtm(dtmAxes[WieldAxe], Ix, Iy, MIX1, MIY1, MIX2, MIY2))then
        Break;
    end;
    GameTab(4);
    for InvAxe := 1 to 2 do
    begin
      if(InvAxe = 2)then
        Break;
      if(FindDtm(dtmAxes[InvAxe], Ix, Iy, MIX1, MIY1, MIX2, MIY2))then
       Break;
    end;
    if(InvAxe = 2)and(WieldAxe = 2)then
    begin
      Result := False;
      Writeln('No axe was found.');
      FreeDtm(dtmAxes[0]);
      Exit;
    end;
    if((InvAxe - WieldAxe) < 0)then
      EquipAxe := False
    else
      EquipAxe := True;
      Result := True;
      //FreeDtm(dtmAxes[0]);
      if(debug=true)then
        begin
          writeln('Found axe');
        end;
  end;
end;

Looks similar to that.

Also..

   Load := Load +1;
   Logs := Logs +27;

Yea, its +1 load but who says you got 27 logs?,

From: rogeruk
Runekiller for findaxe?,

function FindAxeA: Boolean;   //Modded SRL version
var
  InvAxe, WieldAxe, Ix, Iy: Integer;
  dtmAxes: array[0..1] of Integer;
begin
  if LoggedIn then
  begin
    GameTab(4);
    dtmAxes[1]:= DTMFromString('78DA63F4606260B8CD8002ECED63197418191' +
       '88088E13F1030FA00D5DC4355932EC2C160C4005103028C8E4035' +
       'D719D000231209A42D816ADE1250630D54F381801A3BA09A3BF8D' +
       '500005D910CA6');
    GameTab(5);
    for WieldAxe := 1 to 2 do
    begin
      if(WieldAxe = 2)then
        Break;
      if(FindDtm(dtmAxes[WieldAxe], Ix, Iy, MIX1, MIY1, MIX2, MIY2))then
        Break;
    end;
    GameTab(4);
    for InvAxe := 1 to 2 do
    begin
      if(InvAxe = 2)then
        Break;
      if(FindDtm(dtmAxes[InvAxe], Ix, Iy, MIX1, MIY1, MIX2, MIY2))then
       Break;
    end;
    if(InvAxe = 2)and(WieldAxe = 2)then
    begin
      Result := False;
      Writeln('No axe was found.');
      FreeDtm(dtmAxes[0]);
      Exit;
    end;
    if((InvAxe - WieldAxe) < 0)then
      EquipAxe := False
    else
      EquipAxe := True;
      Result := True;
      //FreeDtm(dtmAxes[0]);
      if(debug=true)then
        begin
          writeln('Found axe');
        end;
  end;
end;

Looks similar to that.

Also..

   Load := Load +1;
   Logs := Logs +27;

Yea, its +1 load but who says you got 27 logs?,

:O, I got the find axe procedure from bomh's willow chopper & pm'd runekiller to see if I could use it since that was his origional script. I'll change credits later when I get back from school. & for +27 logs I was just averaging that out, because I doubt anyone would end up with like 10 randoms in their inv or something like that.


Edit: Uploaded new version, edited a lot of smaller things & changed credits/thanks for the FindAxe procedure.

Lol nvm,

Its so simple to count the logs before you bank them. Count the DTM's and wolla done. Its hell alot more accurate and MUCH more usefull ;).

Looks pretty good, thanks. ;)

I'm going to add dtm's in next version or 2. I'll be gone until Sunday though so I can't do any updates. & got a small proggy from earlier, need to get a better thing for finding if you're dead or not/ to run from fights.

{-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_}
{                Varrock West Bank Oak Chopper v0.1
{      Worked for 2 Hours, 7 Minutes and 25 Seconds.
{      Cut & Banked 378 Oaks!
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_}

Edit: Just noticed I had the wrong version uploaded, just did the correct 1 now.

looks nice, im gonna test in a sec

Uploaded version 0.3, did a lot of small updates, added in Rogeruk's CountItemDTMA function(Hope that's ok w/ you, I added your name in the thanks/gave you cred for it) so it would count them better :p & did other small things to overallness.


Edit: Redownload, I fixed some small bugs. & If it doesn't work for you POST ABOUT IT!!!

Also: Would like to remind ppl: Make acc's 15 or 20+ cmb before autoing with them!!! I'm pretty sure I saw a lvl 6 using my script a few mins ago.

Oaklog DTM i made.. the actual CountItemDTMA isnt mine, it was posted here

From: rogeruk
Oaklog DTM i made.. the actual CountItemDTMA isnt mine, it was posted here

Alright :p I'll edit that in next version if I update. No one seems to be using this though >.<

Looks very nice ;) Picks up extra axe from bank :P I have tested it and it was good srry i havent posted any proggie ill try to do it