you need to use srl v4 beta with scar 3.11
try this one:
SCAR Code:
{ THIS IS A VERY SIMPLE WOOD CUTTING PROGRAM. IT DOESNT EVEN DROP THE LOGS
BUT IM AM NEW TO SCAR SO I AM LEARNING.
I WOULD LIKE TO THANK SOMEONE. BECUASE ME READING THEIR SCRIPT MADE ME
UNDERSTAND HOW TO FIND COLORS ANS STUFF. BUT THE SCRIPT DIDNT HAVE A NAME ON
IT.
OK TO OPERATE THIS YOU NEED TO CHANGE THE TREE COLOR AND THEN
THE LAST TWO CORDINATES OF THE FINDCOLORSPIRAL
THEN ALL YOU NEED TO DO IS DRAG CROSSHAIR TO RS AND PRESS PLAY.}
{IF YOU HAVE SUGGESTION OR WANT TO HELP ME WITH SCRIPTING. EMAIL ME AT
<a href="mailto:ajredalert@sbcglobal.net">ajredalert@sbcglobal.net</a>}
// version 1.0 = very simple woodcutter\\
// version 1.2 = added log droping\\
program simplewc;
{.include SRL/SRL.scar}
{.include SRL\SRL\skill\WoodCutting.scar}
var
logDTM, x, y : integer;
invX1, invY1, invX2, invY2 : Integer;
// THE SETUP\\
const tree=11047; // SET THE TREE COLOR\\
// END SETUP\\
procedure setup;
begin
invX1:= 547;
invY1:= 202;
invX2:= 736;
invY2:= 463;
setupsrl;
activateclient;
writeln('CREDIT GOES TO ME HAVOC928 ...FEEL FREE TO DISTRIBUTE');
wait(1000);
end;
procedure dtms;
begin
logDTM := DTMFromString('78DA63CC636660E861644006716E1C0CFF813' +
'448F43F1030C601D54C425503918591401A64CE2C026A6A806A26' +
'1350530054D34A404D2A504D3B7E350002D50BB3');
end;
procedure treekiller; // you might want to add ent protection, antiban, and antirandoms
begin
repeat
findcolortolerance(x, y, tree, 3, 3, 551, 224, 5) //PUT IN LAST 2 CORDINATES FROM THE COLOR PICKER\\
// DO NOT TOUCH BELOW\\
mouse(x,y,0,0,true)
wait(5000+random(5000))
until(invfull);
end;
procedure droplogs; // some people have their axes in inventory... so i changed it to drop logs
begin
repeat
if finddtm(logDTM, x, y, invX1, INVY1, INVX2, INVY2) then
begin
mouse(x, y, 2, 2, false);
wait(200+random(100));
chooseoption(x, y, 'Drop');
wait(1000+random(200));
end;
until(invcount = 0) or (invcount = 1);
end;
begin
dtms;
setup;
repeat
treekiller;
wait(2000+random(500))
droplogs;
until (false)
end.