Need oak chopper and drop oak log

Please can someone give me a working Oak Chopper and that drops the oak log for scar 3.13? please

 

There's plenty of power choppers in the scripts section.
1st page, 3rd post (including the sticky): http://www.sythe.org/showthread.php?t=330156

 

but Draynor willow banker? srl 4

 

Hello tobias i read what you said and if you looking for an oak chopper and droper you can use DMK's Basicut(TM)

I will post the script here as followed i take absolutely no credit for this script, all to DMK, but i did make a couple tweeks in order to cut trees that give more than one log. DMK's basicut was for lvl 1-15 choppers so i changed the time between "cutting trees" to make it fit Oaks, Willows, Maples, Yews, and Magic trees.

Please enjoy

P.S just copy and paste directly in scar from top to bottom
PP.S you may need to check every 20-30 minutes for randoms therefore it has no Anti-Randoms yet look for that in V 2.0

Compliments to DMK once again this is great i am now 81 WC because of you, thanks

{
Time usage recomendation: Check on it about every 15-20 minutes (for randoms) but if you want to take a gamble with the randoms it works fine for as long as you want to run it.
Class of script: Auto-leveler
Complexity 1-10: 2
Bugs: Make sure after you run it you click on the top internet explorer bar so it turns blue. Otherwise its typer wont work.
Notes: Works best with regular trees, but will find any tree. Sorry theres no antirandoms, look for them in V 2.0
-----------------------------------------------------------
WORKS BEST IN VARROCK BY THE 3 TREES NEAR THE GEN. STORE

{.Script Info:
# ScriptName = Basicut
# Author = GMK
# Description = A simple tree cutter.
# Version = 1.2
# Date = November 10th 2007
# Comments = You will love the simplicity.
/Script Info}
program Basicut;
{.include SRL/SRL.scar}

const
Waitt= 7000;//the time between cutting

var
x,y:integer;
l,lo:integer;

procedure comp;
begin
l:=0
lo:=0
ActivateClient;
cleardebug;
wait(10)
perfectnorth;
writeln('Basicut made by GMK')
ActivateClient;
end;


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;

procedure drop;
begin
if l=20 then
begin
dropall;
l:=0
end;
end;

procedure antiban;
begin
if lo=10 then
typesend('wc lvls?')
if lo=40 then
typesend('BAM!!!!!!!!!!!!!!!!!')
if lo=50 then
if lo=60 then
typesend('Ruescape is ruined!')
if lo=80 then
typesend('YO mamma!')
if lo=100 then
begin
typesend('lol')
lo:=0
end;
end;

procedure antideath;
begin
if (FindFight) then
RunTo('N', false);
end;




begin
SetupSRL;
comp;
repeat
lo:= lo+1
wait(1 + random(1))
chop;
wait(1 + random(1))
antideath;
wait(1 + random(1))
drop;
wait(1 + random(1))
antiban;
until(false)
end.