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

Everything tree chopper and dropper v1.2

Wewt i got 5 stars for this baby
 
I have voted for you: 5 stars

But do you know good power cutter that dont drop the axe?
 
Now mine doesnt! UPDATED! enjoy all!

thanks for the feedback tim and town
 
Aim getting a error: Line 56: [Error] (14737:1): Type mismatch in script

What can I do about it?
 
hmmm. maybe your computer is full on its RAM.
idk its not the script.
 
Hey dude, I'm willing to team up with you, and inject some code into the scripts (more antirandoms and more human)

I will work for free and all I need to work is your ok.

Reguards,

Blankothe3rd.
 
Code: 
procedure chop;
begin
if FindColorSpiralTolerance(x,y,994343,52,26,468,260,3) then
Mouse(x,y,2,2,true)
l:=l+1
wait(waitt + random(10))
end;

Nice job! This coulda been done a lot better, though.. You could have done:

Code: 
 procedure chop;
  begin
    repeat  
      If(FindObjCustom(x, y, [TreeUptext1, TreeUptext2, TreeUptext3], [TreeColor1, TreeColor2, TreeColor3], tolerance)) then 
        begin
          Mouse(x, y, 2, 2, true);
          Wait(1000);
        end;
      If(not(FindObjCustom(x, y, [TreeUptext1, TreeUptext2, TreeUptext3], [TreeColor1, TreeColor2, TreeColor3], tolerance))) then
        begin
          MarkTime(RespawnTimer);
          repeat
            Wait(50);
            If(RespawnTimer > 60000) then
              begin
                WriteLN('Tree took too long to spawn!');
                Exit;
              end;
          until(FindObjCustom(x, y, [TreeUptext1, TreeUptext2, TreeUptext3], [TreeColor1, TreeColor2, TreeColor3], tolerance))
          Mouse(x, y, 2, 2, true);
        end;
    until(InvCount = 28);
    Drop;
end;

This makes it have tons of failsafes and makes sure you have a full inventory before you drop.

You could also put the variables (TreeUptexts and TreeColors) into const so the user can set them for the kind of tree they want (also put RespawnTimer in global vars as an integer) .. For uptexts, though, don't include the first letter of the word. Doesn't work too well..

I'm sure you know what tolerance is.. Well, I hope you take this to heart! Again, nice job!
 
Thx GMK!:D

For this good update and I love your scripts!
Now can i where my rune axe in my first slot

Aim gona use it know bye!
 
tim-gf said:
Thx GMK!:D

For this good update and I love your scripts!
Now can i where my rune axe in my first slot

Aim gona use it know bye!
Click to expand...


I aim getting an error: [Runtime Error] : Out Of Range in line 258 in script C:\Program Files\SCAR 3.13\includes\SRL/SRL/Core/AntiBan.scar

Can someone help me?
 
ProphesyOfWolf said:
Code: 
procedure chop;
begin
if FindColorSpiralTolerance(x,y,994343,52,26,468,260,3) then
Mouse(x,y,2,2,true)
l:=l+1
wait(waitt + random(10))
end;

Nice job! This coulda been done a lot better, though.. You could have done:

Code: 
 procedure chop;
  begin
    repeat  
      If(FindObjCustom(x, y, [TreeUptext1, TreeUptext2, TreeUptext3], [TreeColor1, TreeColor2, TreeColor3], tolerance)) then 
        begin
          Mouse(x, y, 2, 2, true);
          Wait(1000);
        end;
      If(not(FindObjCustom(x, y, [TreeUptext1, TreeUptext2, TreeUptext3], [TreeColor1, TreeColor2, TreeColor3], tolerance))) then
        begin
          MarkTime(RespawnTimer);
          repeat
            Wait(50);
            If(RespawnTimer > 60000) then
              begin
                WriteLN('Tree took too long to spawn!');
                Exit;
              end;
          until(FindObjCustom(x, y, [TreeUptext1, TreeUptext2, TreeUptext3], [TreeColor1, TreeColor2, TreeColor3], tolerance))
          Mouse(x, y, 2, 2, true);
        end;
    until(InvCount = 28);
    Drop;
end;

This makes it have tons of failsafes and makes sure you have a full inventory before you drop.

You could also put the variables (TreeUptexts and TreeColors) into const so the user can set them for the kind of tree they want (also put RespawnTimer in global vars as an integer) .. For uptexts, though, don't include the first letter of the word. Doesn't work too well..

I'm sure you know what tolerance is.. Well, I hope you take this to heart! Again, nice job!
Click to expand...

I think you meant to use "end else" instead of a separate statement for each. That won't work correctly.
 
Blankothe3rd said:
Hey dude, I'm willing to team up with you, and inject some code into the scripts (more antirandoms and more human)

I will work for free and all I need to work is your ok.

Reguards,

Blankothe3rd.
Click to expand...
definintly. pm me on your ideas.
btw i got your message, just forgot to reply
 
You must log in or register to reply here.
Runescape Gamblingrunescape gambling
Back
Top