SRL Archive - RS3 Outdated / Broken Scripts

Draynor Oak Banker

By Fours

{ CHARMZ AUTO RESPONDER IS IN HERE (GoF's Edit) … NOT mine.
—————————————————-
Instructions v1.1
1. Fill out DeclarePlayers lines 40 +
2. Make sure your player is in Draynor
bank and that you have Vbright setting
on.
3. Make sure you have axe wielded or in 1st
inventory spot.
—————————————————–
This script will chop oaks in Draynor and bank them.


Note : If it doesn't walk to bank or trees… get the number.
'Found #3' is an example.

maybe attach it here to

=D I figured that out too =P

Lets Have A Look See

2 replies 13 views… LEECH-IFIDE

I can't make the script better untill I know what works and what doesn't for the public. What works for me may not work for you.

And give me complements! Builds my self-esteem. Makes me work harder

:cool:

i tryed one of these, it always went to the oak near the jail, and got killed by guards… haha, i'll try this though, thanks.

Oh sweet. W00t for four's scripts, they always help my wc army. I'll post proggy in a bit.

Edit: Well I'm not really sure what happened.. but when I came back to my pc after a couple of minutes my char was in lumby still looking for trees.

Maybe you should add lumbridge detection so that if a player dies they will become false and not sit around looking for oaks in the castle. ;D great script otherwise.

I like your scripting styles, your good.

Nice script.

Ty, im working on one that detects if it is in lumby. And doesn't go closer to guard.

U used charmz autoresponder edited by me BTW… U took it from my yew chopper didnt u?

Yeah I put that On sythe… ill change that here.

Cool. I was looking for one of these =D

Good job dude, will test later..

Successfully compiled
SRL Compiled in 250msec.
[Runtime Error] : Out Of Range in line 50 in script C:\Documents and Settings\torin\My Documents\My Received Files\SCAR 2.03\Scripts\good ones\Draynor Oak Banker.scar

having problems, thats the problem i guess. dont know how to fix it though. any ideas?

U havent set the player arrays i assume? Or u have the howmanyplayers thingie bigger than ur player arrays.

My next version will have the following fixes.

100% finding of the trees.
Will NOT go to any other tree but the one behind bank.
Much faster banking. ( New bank finding procedure )
Will bank random items.
Will get new axe if axe head not found. (Same with broken axe)
Better progress report.

oo been looking for a oak cutter, going to try it out =)

//->Declare Players<-//
Procedure DeclarePlayers;
begin
Status('Loading Players')

HowManyPlayers := 1;
NumberOfPlayers( HowManyPlayers );
CurrentPlayer := 0;

Players[0].Name := 'mine_wcfish';
Players[0].Pass := 'Password';
Players[0].Nick := 'Mine'; // 2-4 letters of username
Players[0].Active := True;

Players[1].Name := 'Username';
Players[1].Pass := 'password';
Players[1].Nick := 'Nickname'; // 2-4 letters of username
Players[1].Active := False;

Players[2].Name := 'Username';
Players[2].Pass := 'password';
Players[2].Nick := 'Nickname'; // 2-4 letters of username
Players[2].Active := False;

Players[3].Name := 'Username';
Players[3].Pass := 'password';
Players[3].Nick := 'Nickname'; // 2-4 letters of username
Players[3].Active := False;
end;

Const
AutoResp = True;
BankColor1 = 287867;
BankColor2 = 4895690;

procedure SafeInitForm;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('InitForm', v);
end;

procedure ShowFormModal;
begin
frmDesign.ShowModal;
end;

procedure SafeShowFormModal;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('ShowFormModal', v);
end;

Thats the set up for the declare players. I probably set it up wrong lol.

this message still comes up

Successfully compiled
SRL Compiled in 219msec.
[Runtime Error] : Out Of Range in line 50 in script C:\Documents and Settings\torin\My Documents\My Received Files\SCAR 2.03\Scripts\good ones\Draynor Oak Banker.scar

p.s in my actual script set up i entered the password, however i didn't enter it here because someone can go on my account lol.

If u have set the howmanyplayers to 1, u keep only lines for Player[0] and delete the Player[1],Player[2] and Player[3] lines or make them commented by putting them between bracelets{textgoeshere}. That's the trick ;)

evil chicken almost killed me, then my character ran north and kept searching for oaks

maybe log out after so long of not finding? better anti ban

wow really nice job four
heres my report,
————————————————
Time Running : 48 Minutes and 54 Seconds
Logs Banked : 270
Total Banks : 10
XP Gained : 20244
Ents Avoided: 2
————————————————

I posted this at sythe as well: the most limiting part to this script is finding the bank. I was wondering if perhaps anyone here had colors that worked well for them, so we might be able to try them out.

I'll check it out =)

I used your any-tree powerchopper before. Many times before. And it was good. Can't wait to see how this one is =D

hey! this worked pretty good for me, laggy at times but othwise good…worked for aprox. 32 min…i closed the scar windows so sry for no progy.

that was awesome, ty to everyone who helped get it running for me.(this was my first use of a scar script) nice one four. it worked like a charm, but i started getting killed by cap'n hand, i ran away a little but then stayed in the one spot while he was owning me lol.

heres report.

————————————————
Time Running : 4 Minutes and 2 Seconds
Logs Banked : 27
Total Banks : 1
XP Gained : 1012
————————————————

————————————————
Time Running : 7 Minutes and 16 Seconds
Logs Banked : 54
Total Banks : 2
XP Gained : 3037
————————————————

******** FOUND TALKING RANDOM TEXT********: Talk to Genie
******** SOLVED LAMP RANDOM ********

there were more but i had to cut them short and i lost the reports =( best one was for 20 mins , 200 oaks cut i think.
had to cut 1 short because it was in bank and moving mouse around trying to find bank booths.
had to cut another 1 short because autoresponder didn't work and some lad was getting angry with me.

ty again for awesome wcer. i shall post another report thingo once i get the whole thing downpat.

hey!
First of all I would like to say congrats on an awesome script!
It worked great for me to start off with,
it will chop the first load perfectly but as soon as its finished banking it
it wont click out of the bank and it spams

Found # 3
Found # 3
Found # 3
Found # 3
Found # 3
Found # 3

Any ideas?

Also I have another question, is "CHARMZ AUTO RESPONDER" safe?
Or will it eventually detect the repeated talks.

Thanks

One question before I try this out. Will I get my slave dead-ified if I use this? I'm using four level 3s (legit names and good clothes, don't worry) and I don't particularly want to die =/

heres another report. it worked really well, and i just realised i'm using an old version from sythe lmao. i'll download new one, it might run away from fighters better(keep getting killed by cap'n hand , tree spirits etc.)

————————————————
Time Running : 54 Minutes and 38 Seconds
Logs Banked : 262
Total Banks : 10
XP Gained : 53588
———————————————
******** FOUND FIGHTING RANDOM ********
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talking Random : 1 |
| SandWich[es] Solved : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Great one…im going to test this one out tonight…!

I think u can replace FindDTM precedure in WalkBackTree/WalkBank to FindMMDtm…because sometimes…it click out of map…that only my suggestion..;)

Wow four congratz
nice progs people
Looks like iv taught you well :P.

it never finds the bank for me, it cuts one load, looks around and just sits there, then logs out or starts spazzing

thanks I will try it when get to lvl 15

tryed it 3 times now. first time it banked 3 loads then i came back my player was killed.
the 2 other times was my player dead 3 min after i started it

Time Running : 47 Minutes and 0 Seconds
Logs Banked : 405
Total Banks : 15
XP Gained : 126000

Brilliant. Absolute brilliant. Works very well for me. Keep up the good scripting.

Only one thing wrong, after I bank it just stays there and doesn't go back out to the oak tree.

i love you four, your my idol!

Fours Draynor Oak Banker v1.1
————————————————
Time Running : 46 Minutes and 52 Seconds
Logs Banked : 297
Total Banks : 10
XP Gained : 58722
Ents Avoided : 2
————————————————
Axe head colors: 5979709 5387830 6176832
******** FOUND MOD ********
mine wcfish
Found # 3
Couldn't find ladder DTM, Sorry

got 10/11 banks :garfield: :)

Very useful for people making an army of woodcutters, Will test soon :)

Perfect script, im using it ^.^

My update is coming soon. It will be great, has better ent detection, axe finding, random detecting, and auto responding, I think it will be good. Ill post tonight when I get home.

Alot of nice features in here :D

The main focus of my script was accuracy and speed (finding bank, making it back to the tree)
I kinda said "screw the progress report". I guess that is because i couldn't care less whether or not i gained 30 levels or 60 i just want to program.

Yeah I may find another way to go to the bank and the tree. I use the ladder. I made a dtm of it and then did like… if finddtm ladder dtm the mouse x -20, y-100 or whatever the distance was from the ladder. I may try something else. How do you do it? I have not looked at your script yet.

I use the dtm of the bankers and the dude outside the bank who don't move on minimap.

works nicely for me for a little bit but then randomly the mouse moves to the bottem of the screen and shakes rapidly and just keeps doing that and i had to shift alt dele to get the scriped to stop it had done this twice for me

any idea on how to fix it

im new scar user… where i need to save that program? scar says :
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL.SCAR does not exist.
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL\Skill\Woodcutting.SCAR does not exist.
Failed when compiling

im new scar user i need to get this work but scar say for me :
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL.SCAR does not exist.
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL\Skill\Woodcutting.SCAR does not exist.
Failed when compiling

From: erkki
im new scar user i need to get this work but scar say for me :
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL.SCAR does not exist.
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL\Skill\Woodcutting.SCAR does not exist.
Failed when compiling

No need to double post. You just need to download SRL and install it correctly. Try the search button.

Yeah I use the ladder DTM, and now I am trying a new thing to get closer to the tree… how does FindDTMDeformed or w/e work, i couldn't figure it out.

From: fourscape
Yeah I use the ladder DTM, and now I am trying a new thing to get closer to the tree… how does FindDTMDeformed or w/e work, i couldn't figure it out.

FindDTMRotated? Well FindDTMRotated(dtm, x, y, MMX1, MMY1, MMX2, MMY2, startangle, stopangle, anglestep, var for what angle found at)

DTM is the dtm to find. x and y are the coords of the parent point found on screen, mmx1 etc are bounds to search in, startangle is how far rotated for it to start searching, stop angle is the angle to stop searching at, and the last thing is a variable (extended) to return the angle it was found at. Example:

procedure FindTheDtm;
var ex, ey : integer;
    AngleFound : extended;
begin
 SuperCoolDTM := DTMFromString(whatever);
 if FindDtmRotated(SuperCoolDTM, ex, ey, 0, 0, 500, 500, 0, 360, 0.5, AngleFound) then
  mouse(ex, ey, 2, 2, true);
 writeln('Found DTM at: ' + floattostr(AngleFound) + ' radians.')
end;

nice script… but the anti random can better

FindDTMRotated is used different: StartAngle and EndAngle are in Pi, not in degrees.

I remember asking it a long time ago. driger1592 knew the answer. Long live archive. Here is his (old) quote:

From: driger1592
Nobody has access to the archives anymore. I'm not sure what you need to know, but here's what I have to offer on the subject:

Function FindDTMRotated(DTM:LongInt; var x,y: LongInt; x1,y1,x2,y2: LongInt; StartAngle: Extended; EndAngle: Extened; AngleStep: Extended; var Angle: Extended): Boolean;

The param DTM is obvious (declare which DTM to use).
Var x and y should also be obvious for you (the variables where the coordinates will be stored).
X1,y1,x2,y2 are, probably also obvious to you, the coordinates to look for the DTM in.
The StartAngle param is simply the angle that the DTM starts at (I'd use 0.0).
The EndAngle is the final angle to stop looking for the DTM at (360 degrees = 6.28318530717959, 180 degrees = 3.14159265358979).
The AngleStep param is how many degrees to go up to search for the rotated DTM each time (ie. AngleStep is .1, it will look at 0.0, then 0.1, then 0.2).
The Angle variable stores the first angle at which the DTM is found.

I hope this has helped :D

PS. I used one of BenLand's math plugins to convert the degrees to the appropriate radian (those long decimals). The formula Pi divided by 180 times times the degree (or angle).

mines says failed when compiling!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

it works great, but has a little trouble finding the bank sometimes, any suggestions?

four u make brill scripts

Time Running : 13 Minutes and 8 Seconds
Logs Banked : 54
Total Banks : 2
XP Gained : 3150
Ents Avoided : 2

works well :) but on some runs it gets stuck :) but other then that its good =D
————————————————
Time Running : 6 Minutes and 36 Seconds
Logs Banked : 27
Total Banks : 1
XP Gained : 975
————————————————
Axe head colors: 2177355 1848130 2177355
Found # 3
Found # 3
Woodcutting = 22162
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 13 Minutes and 38 Seconds
Logs Banked : 54
Total Banks : 2
XP Gained : 2962
————————————————
Axe head colors: 2177355 1848130 2177355
Found # 3
Found # 3
Found # 3
Found # 3
Woodcutting = 22575
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 21 Minutes and 24 Seconds
Logs Banked : 68
Total Banks : 3
XP Gained : 5362
Ents Avoided : 2
————————————————
Axe head colors: 5979708 5322294 6111296
Found # 3
Found # 3
Woodcutting = 22575
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 29 Minutes and 1 Seconds
Logs Banked : 82
Total Banks : 4
XP Gained : 7762
Ents Avoided : 2
————————————————
Axe head colors: 5979708 5322294 6111296
Found # 3
Found # 3
Woodcutting = 22762
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 36 Minutes and 35 Seconds
Logs Banked : 92
Total Banks : 5
XP Gained : 10349
Ents Avoided : 2
————————————————
Axe head colors: 5979708 5322294 6111296
:
:
Found # 3
Found # 3
Woodcutting = 23775
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 41 Minutes and 18 Seconds
Logs Banked : 119
Total Banks : 6
XP Gained : 13949
Ents Avoided : 2
————————————————
Axe head colors: 5979708 5322294 6111296
Found # 3
Found # 3
Woodcutting = 24787
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 45 Minutes and 36 Seconds
Logs Banked : 146
Total Banks : 7
XP Gained : 18561
Ents Avoided : 2
————————————————
Axe head colors: 5979708 5322294 6111296
Found a box, solving…
Question is:
What number is the Star
Answer is 6
******** SOLVED BOX RANDOM ********
Found # 3
Found # 3
Woodcutting = 25762
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 49 Minutes and 40 Seconds
Logs Banked : 172
Total Banks : 8
XP Gained : 24148
Ents Avoided : 2
————————————————
Axe head colors: 2177355 1848130 2177355
:
:
Found # 3
Found # 3
Woodcutting = 26775
Fours Draynor Oak Banker v1.1
————————————————
Time Running : 56 Minutes and 30 Seconds
Logs Banked : 199
Total Banks : 9
XP Gained : 30748
Ents Avoided : 2
————————————————
Axe head colors: 2177355 1848130 2177355
Demon Found. Solving the Demon…

I'm going to make one last test run of my new version… and I'll post if it works well… I dont know though… this is my best prog so far…

|Fours Draynor Oak Banker  v 1332
------------------------------------------------
>Time Running : 4 Hours, 27 Minutes and 28 Seconds.
>Logs Banked  : 1702
>Total Banks  : 66
>XP Gained    : 42550
>Ents Avoided : 7
>Talk Backs   : 12
------------------------------------------------

It will bank quicker and it get's closer to the bank… and the tree…

Found # 3

What to do? sometimes it clicks in the bank or somewhere outside bank where it cant see the oak trees and then it just tries to find oak but cant.

I really like this script, it works well for me. The only problem I had was when it banks, then goes to find a tree, it'll click off map.

ya i know im a leecher but that is a nice script it ran very well for me

gdgd im tryin this 1 out boiz!:D

Uhhh…I Like It But There Seems To Be no Random Event Prevention Or Anytype Of Random Event Lines That Work. Every Time There is A Random It Does Nothing…Overall I Like It Thanks Keep It Up

Hey this is a great script I love it maybe a bit touching up the the frog random and tree spirit but other than that great also one more question if anyone can answer this i want my players to cut 25 loads ea it never cut a full complete set, hmmm…O Well Still got me 1k logs overnight thanks keep up the good work

hopfully it will work when i try it overnigth, lets hope for the best:D

wtf do i freaking put for line 773 its making me mad:@:mad: :mad: :mad:

thank you and i will report any bugs

Error detecting Compass Angle.
0

It says it like 10 times and cant find oak he just keeps searching on normal trees and my screen keeps rotating =/

Hey this works fine and is one of my favorite scripts.
But for some reason about 5 times after 20minutes of it running i come back to the PC and im stood in lumbridge castle basement (probably some random)?

this is a mad script but u realy need to update the axe head finder i lost my rune 1 noooooo!!!11

but a great script none the less

I can never get these going i copy and paste and then target then play,,,Errors


on this one i got:mad:
Include file C:\Program Files\SCAR 3.03\includes\SRL\SRL.SCAR does not exist.
Include file C:\Program Files\SCAR 3.03\includes\SRL\SRL\Skill\Woodcutting.SCAR does not exist.
Failed when compiling

plz can someone help:confused: i really want to be able to use a auto…, i think i gotta switch the pink, but wtf is 'MS sans seriff'

–EMAIL- [email]bscansz@yahoo.com[/email] —

I am a real noob at this, I can get my char to cut the trees, but it just wanders around looking for the bank. Please help, this is a great autoer I just need to be able to bank.

My guy gets his first load and gets stuck in the bank. I saw that it said:

"Note : If it doesn't walk to bank or trees… get the number.
'Found #3' is an example."

But as I am a n00b I dont get it. Someone explain please????

mine worked for like 15minutes and then got ko'd by the Jail Guard. Can't wait until you bring out the new version (only chops the one near bank)

omfg two leechers~ gtfo please, nice script tempted to test it lel *makes 10 accounts*

ty for teh awesome script!

hey, can someone tell me what this means
[Runtime Error] : Out Of Range in line 53 in script

i can't seem to start the auto.
everything is filled out.

and where is this vbright setting?

hi what do things like thi smean? Failed when compiling
Line 326: [Error] (15042:1): Unknown identifier 'ClickItemColorTol' in script D:\Documents and Settings\CY\My Documents\Downloads\Draynor Oak Banker 1[1].1.scar, i got this when i tried to run your script, im pritty new to stuff like this and dont fully understand yet, please help me

From: streetrazerz
hi what do things like thi smean? Failed when compiling
Line 326: [Error] (15042:1): Unknown identifier 'ClickItemColorTol' in script D:\Documents and Settings\CY\My Documents\Downloads\Draynor Oak Banker 1[1].1.scar, i got this when i tried to run your script, im pritty new to stuff like this and dont fully understand yet, please help me

EXACTLY same problem. i Made a WC:er only to sell RS money, and beginning now only. id like this to work, i tried SCAR in the ancient younghood, but didnt get anything to work. please help?
Failed when compiling
Line 327: [Error] (15447:1): Unknown identifier 'ClickItemColorTol' in script E:\Ohjelmat\SCAR 2.03\Scripts\Draynor Oak Banker 1.1.scar

Please help :)


BTW Do i need to change these? ->
Const
AutoResp = True;
BankColor1 = 5558001;
BankColor2 = 6743804;
BankColor3 = 2986918;

IF i do how? what do i take with the coloud picker?

i tried to use it, but it came up with all errors. well i have version 3.04. can u tell me what to do plz

i got this when i tried to compile it….
line 27 duplicate identifier label1

pm if u know how to fix this
thanks

{ CHARMZ AUTO RESPONDER IS IN HERE (GoF's Edit) … NOT mine.
—————————————————-
Instructions
1. Fill out DeclarePlayers lines 40 +
2. Make sure your player is in Draynor
bank and that you have Vbright setting
on.
3. Make sure you have axe wielded or in 1st
inventory spot.
—————————————————–
This script will chop oaks in Draynor and bank them.


Note : If it doesn't walk to bank or trees… get the number.
'Found #3' is an example.

}
Program DraynorOakBanker;
{.include SRL\SRL.SCAR}
{.include SRL\SRL\Skill\Woodcutting.SCAR}

Var
LoadNumber : Integer;
LogDTM, BrokenAxeDTM, AxeHandleDTM, RegularAxeDTM, WalkToBit, WalkToBit3 : Integer;
StartXP, EndXP, TotalXP, TotalLogs, BankTrips, WalkBank, WalkToBit2 : Integer;
frmDesign : TForm;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Edit1 : TEdit;
Edit2 : TEdit;
Edit3 : TEdit;
Button1 : TButton;
TheTreeName : String;
AmmountOfLoads : Integer;
TreeColor : Integer;
LX, LY, BankedLoggs : Integer;

//->Declare Players<-//
Procedure DeclarePlayers;
begin
Status('Loading Players')

HowManyPlayers := 1;
NumberOfPlayers( HowManyPlayers );
CurrentPlayer := 0;

Players[0].Name := 'polkinghorn';
Players[0].Pass := '…';
Players[0].Nick := 'polk'; // 2-4 letters of username
Players[0].Active := True;
end;

Const
AutoResp = True;
BankColor1 = 5558001;
BankColor2 = 6743804;
BankColor3 = 2986918;
//———————–\\
VersionNum = '1.1';

procedure SafeInitForm;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('InitForm', v);
end;

procedure ShowFormModal;
begin
frmDesign.ShowModal;
end;

procedure SafeShowFormModal;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('ShowFormModal', v);
end;

Procedure InitForm;
Begin
Status('Form Is Up')
frmDesign := CreateForm;
frmDesign.Left := 306;
frmDesign.Top := 367;
frmDesign.Width := 428;
frmDesign.Height := 207;
frmDesign.Caption := 'Setup';
frmDesign.Color := clBtnFace;
frmDesign.Font.Color := clWindowText;
frmDesign.Font.Height := -11;
frmDesign.Font.Name := 'MS Sans Serif';
frmDesign.Font.Style := [];
frmDesign.Visible := False;;
frmDesign.PixelsPerInch := 96;
Label1 := TLabel.Create(frmDesign);
Label1.Parent := frmDesign;
Label1.Left := 3;
Label1.Top := 20;
Label1.Width := 258;
Label1.Height := 20;
Label1.Caption := 'Loads For Player Before Logging Off';
Label1.Font.Color := clWindowText;
Label1.Font.Height := -17;
Label1.Font.Name := 'MS Sans Serif';
Label1.Font.Style := [];
Label1.ParentFont := False;
Label2 := TLabel.Create(frmDesign);
Label2.Parent := frmDesign;
Label2.Left := 3;
Label2.Top := 50;
Label2.Width := 78;
Label2.Height := 20;
Label2.Caption := 'Tree Name';
Label2.Font.Color := clWindowText;
Label2.Font.Height := -17;
Label2.Font.Name := 'MS Sans Serif';
Label2.Font.Style := [];
Label2.ParentFont := False;
Label3 := TLabel.Create(frmDesign);
Label3.Parent := frmDesign;
Label3.Left := 3;
Label3.Top := 80;
Label3.Width := 73;
Label3.Height := 20;
Label3.Caption := 'Tree Color';
Label3.Font.Color := clWindowText;
Label3.Font.Height := -17;
Label3.Font.Name := 'MS Sans Serif';
Label3.Font.Style := [];
Label3.ParentFont := False;
Edit1 := TEdit.Create(frmDesign);
Edit1.Parent := frmDesign;
Edit1.Left := 269;
Edit1.Top := 20;
Edit1.Width := 24;
Edit1.Height := 21;
Edit1.TabOrder := 8;
Edit1.Text := '3';
Edit2 := TEdit.Create(frmDesign);
Edit2.Parent := frmDesign;
Edit2.Left := 87;
Edit2.Top := 50;
Edit2.Width := 58;
Edit2.Height := 21;
Edit2.TabOrder := 9;
Edit2.Text := 'Oak';
Edit3 := TEdit.Create(frmDesign);
Edit3.Parent := frmDesign;
Edit3.Left := 87;
Edit3.Top := 79;
Edit3.Width := 69;
Edit3.Height := 21;
Edit3.TabOrder := 10;
Edit3.Text := '876624';
Button1 := TButton.Create(frmDesign);
Button1.Parent := frmDesign;
Button1.Left := 172;
Button1.Top := 133;
Button1.Width := 75;
Button1.Height := 25;
Button1.Caption := 'OK GO';
Button1.ModalResult := 1;
Button1.TabOrder := 11;
end;

Procedure Convert2;
Begin
TheTreeName := Edit2.text
AmmountOfLoads := StrToInt(Edit1.text)
TreeColor := StrToInt(Edit3.text)
end;


//->Load Dtm's<-//
Procedure LoadDTMs;

begin
Status('Loading DTM''s')

LogDTM := DTMFromString('78DA632C666260E0646440067921460CFF813' +
'448F43F103066314179C880118904D2354035FF19F0AB2905AA11' +
'22604E23500D0F0135C94035DCF8D50000507909F5');

BrokenAxeDTM := DTMFromString('78DA633CCAC4C090C1C8800C9A127919FE036' +
'990E87F2060BC0C54938CAA06220B2381F445A09A04026A8E01D5' +
'C41050B31FA8A698809AB384CD0100CBBD0D20');

AxeHandleDTM := DTMFromString('78DA637CCFC4C0E0C6C8800CCA227819FE036' +
'990E87F2060FC06546389AA06220B2381F473A09A00026ADE00D5' +
'F81350F316A8C685809A97403541F8D50000D0090D3C');

RegularAxeDTM := DTMFromString('78DA637461626060676440060DF1BC0CFF813' +
'448F43F10300601D5FC6740038C482490F604AAF94D408D13500D' +
'2B237E35F640358204D4F813618E1F50CD1F02EE0906AA61C26F0' +
'E0099720B7E');

WalkToBit := DTMFromString('78DA638C676260506740012A0CEC0C5C409A1' +
'188FF030123488D1AAA9A2C3B690611A81A10608CC13407434D22' +
'116AE2806A34F0AB01006D340A3E');

WalkToBit2 := DTMFromString('78DA636464666098CC80024C1938195280342' +
'310FF0702C67F4C186AE2D5381934A06A4080919999B01A06A09A' +
'4944A899825F0D0030C20B70');

WalkToBit3 := DTMFromString('78DA636C626260306040010ECCEC0C1C409A1' +
'188FF0301633DA69A440B760611A81A10606C25420DC82E4322D4' +
'E8E3570300B6030AAD');

WalkBank := DTMFromString('78DA63DCC6C4C0A0C980027881425C409A118' +
'8FF030123488D1AAA9A78356E0639A81A1000ABD126A0663BA65D' +
'186AB612560300E9920B3C');
end;

//->Walk Back To Trees<-//
Var
CC, YY : Integer;
Procedure WalkBackTree;
Begin
Repeat
MakeCompass('N')
If FindDtm(WalkToBit3, CC, YY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CC + 42, YY + 46, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit, CC, YY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 1')
Mouse(CC + 42, YY + 44, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit2, CC, YY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CC + 42, YY + 44, 0, 0, True)
flag;
end else
Begin
WriteLn('Couldn''t find ladder DTM, Sorry')
LogOut;
Wait(60000 + Random (60000))
NextPlayer(False)
end;
Until Not(FindMMColorTol(x, y, 10909539, 10))
end;

//->Walk To Bank<-//

Procedure WalkToBank;
Var
CCX, YYY : Integer;
Begin
MakeCompass('N')
If FindDtm(WalkToBit3, CCX, YYY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CCX + 2, YYY + 40, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit, CCX, YYY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 1')
Mouse(CCX + 2, YYY + 40, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit2, CCX, YYY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CCX + 2, YYY + 40, 0, 0, True)
flag;
end;
end;


//->Setup<-//
Procedure MySetupScript;
Begin
Status('Set-Up')
SetupSRL;
DeclarePlayers;
LoadDTMs;
end;


//->GetRandomLoad-//
Var
RandomLoad : Integer;

Procedure GetRandomLoad;
Begin
RandomLoad := (AmmountOfLoads + Random (3))
end;


//->Anti Randoms<-//
Procedure TheAntiRandoms;
Begin
Status('Random Check')
FindNormalRandoms;
wait(10)
FindTalk;
wait(10)
if (FindFight) then
begin
Status('Running From a fight.')
RunAwayDirection('W');
Wait(8500 + random(3500));
RunBack;
Wait(1000+Random(100))
WalkBackTree;
end;
Wait(10);
FindTalk;
end;

Procedure StoreStuff;
Begin
If InventoryCount > 1 then
Begin
Repeat
ClickItemColorTol(65536, 10, False)
Wait(10)
ChooseOption(x, y, 'All')
Wait(1000 + Random(1000))
Until InventoryCount = 0
Wait(1000 + Random (1000))
Repeat
If FindDtm(RegularAxeDTM, X, Y, MSX1, MSY1, MSX2, MSY2) then
Begin
Mouse(X, Y, 1, 1, True)
Wait(1000 + Random(1000))
end;
Until InventoryCount = 1
end;
end;

//–CHARMZ AUTO RESPONDER–//

Function GetChatMessage(Text: String): Boolean;
Var
TX, TY: Integer;
Chat: String;
Begin

If(IsTextInAreaEx(40, 415, 130, 415, TX, TY, ':', 0, SmallChars, False, True, 0, 0, 0))then
Begin
Chat:= Lowercase(Trim(GetTextAtEx(TX + 8, 415, 0, SmallChars, False, False, 0, 1, 16711680, 40, False, TR_AllChars)));

If(Pos(Text, Chat) <> 0)then
Begin
Result:= True;
End

End

End;

Function GetChatName(Name: String): Boolean;
Var
I : Integer;
ChatName : String;
Begin

ChatName := Lowercase(Trim(GetTextAtEx(21, 415, 0, SmallChars, False, False, 0, 0, 0, 50, False, TR_AllChars)));

I:= Pos(':', ChatName);
If(I <> 0)then
Begin
Delete(ChatName, I, I);
End

If(Pos(Name, ChatName) <> 0)then
Begin
Result:= True;
End

End;

Function AutoRespond: Boolean;
Var
Responce, Lvl: String;
RandomReply: Integer;
Chat,Name,ChatName: String;
Begin

if(AutoResp=False)then
begin
Exit;
end;

if(AutoResp)then
begin

OldLine:= TheLine;
TheLine:= Lowercase(Trim(GetTextAtEx(20, 415, 0, SmallChars, False, False, 0, 1, 16711680, 40, False, TR_AllChars)));
NewLine:= TheLine;

If(GetChatName(Players[CurrentPlayer].Name))then
Begin
Exit;
End

If(OldLine=NewLine)then
Begin
Exit;
End

If(GetChatMessage(Players[CurrentPlayer].Name)) or (GetChatMessage(Players[CurrentPlayer].Nick))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= Random(10)+1;
Case (RandomReply) of
0 : Responce:= ('?');
1 : Responce:= ('what');
2 : Responce:= ('yes');
3 : Responce:= ('no');
4 : Responce:= ('what do you want');
5 : Responce:= ('me?');
6 : Responce:= ('Yah?');
7 : Responce:= ('who?');
8 : Responce:= ('wha?');
9 : Responce:= ('?');
10 : Responce:= ('???');
End
TypeSend(Responce+' '+Name);
Result:= True;
End

If(GetChatMessage('lol')) or (GetChatMessage('lmao')) or (GetChatMessage('rofl')) or (GetChatMessage('haha'))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= Random(24)+1;
Case (RandomReply) of
0 : Responce:= ('heh');
1 : Responce:= ('loll');
2 : Responce:= ('lol');
3 : Responce:= ('haha');
4 : Responce:= ('hihi');
5 : Responce:= ('ehe');
6 : Responce:= ('lmao');
7 : Responce:= ('lmfao');
8 : Responce:= ('rofls');
9 : Responce:= ('fun');
10 : Responce:= ('nice');
11 : Responce:= ('lolz');
12 : Responce:= ('yep');
13 : Responce:= ('hola');
14 : Responce:= ('wow');
15 : Responce:= ('i bet');
16 : Responce:= ('rofl');
17 : Responce:= ('ghehehghehighhe');
18 : Responce:= ('cool');
19 : Responce:= ('…');
20 : Responce:= ('???');
21 : Responce:= ('wow');
22 : Responce:= ('grr..');
23 : Responce:= ('rowr');
24 : Responce:= ('lolololololol');
25 : Responce:= ('ha ha ha!!!');
End
TypeSend(Responce);
Result:= True;
End


If(GetChatMessage('wc')) or (GetChatMessage('woodcutting')) or (GetChatMessage('woodcuttin')) And
(GetChatMessage('lvl')) or (GetChatMessage('level')) or (GetChatMessage('lvls')) or (GetChatMessage('levels'))then
Begin
WriteLn(''+ChatName+': '+Chat);
Lvl:= IntToStr(GetSkillLevel('woodcutting'));
RandomReply:= Random(5)+1;
Case (RandomReply) of
0 : Responce:= ('i''m lvl '+Lvl+' woodcuttin');
1 : Responce:= ('level '+Lvl+' wc');
2 : Responce:= ('lvl '+Lvl+' woodcut!');
3 : Responce:= (+Lvl);
4 : Responce:= ('i''m level '+lvl);
5 : Responce:= (+Lvl+' here :P');
End
TypeSend(Responce);
Result:= True;
End

If(GetChatMessage('wat')) or (GetChatMessage('what')) and (GetChatMessage('doin')) or (GetChatMessage('doing'))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= Random(9)+1;
Case RandomReply of
0 : Responce:= ('not much');
1 : Responce:= ('nothing');
2 : Responce:= ('bored');
3 : Responce:= ('aye?');
4 : Responce:= ('emmm..nothin');
5 : Responce:= ('nope');
6 : Responce:= ('booo');
7 : Responce:= ('no ty');
8 : Responce:= ('what');
9 : Responce:= ('….');
10 : Responce:= ('nothin');
End;
TypeSend(Responce);
Result:= True;
End;

If(GetChatMessage('hey')) or (GetChatMessage('hi')) or (GetChatMessage('hello')) or (GetChatMessage('wats up')) or (GetChatMessage('whats up')) or (GetChatMessage('yo'))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= random(9)+1;
Case RandomReply of
0 : Responce:= ('hello');
1 : Responce:= ('wassup');
2 : Responce:= ('yo');
3 : Responce:= ('whats up everyone');
4 : Responce:= ('whats up');
5 : Responce:= ('welcome');
6 : Responce:= ('hello hello');
7 : Responce:= ('wat up');
8 : Responce:= ('yo');
9 : Responce:= ('sup?');
10 : Responce:= ('whats up');
end
TypeSend(Responce);
Result:= True;
end
end;
end;


//->Get Axe Colors<-//
Procedure GetAxeColors;
Begin
Wait(100)
MakeCompass('S')
GameTab(4)
FindAxeHeadColor;
MakeCompass('N')
end;


//->Ent Finder<-// Yohojo8
Var
EX, EY : integer;
FX, FY : integer;
Procedure EntChecker;
Begin
Status('Checking For Ent')
Flag;
If (FindObjMultiText(EX, EY, TheTreeName, TheTreeName, TheTreeName, Treecolor, 4)) then
Begin
MMouse(Ex, EY, 0, 0)
If FindColorTolerance( FX, FY, 55769, 85, 15, 115, 15, 20) then
Begin
Status('Ent Found');
MouseFindFlag(645, 83, 0, 0);
Wait(17000+Random(5000));
EntsAvoided := EntsAvoided + 1
WalkBackTree;
end;
end;
end;


//->Check for Broken Axe<-//
Var
BX, BY, NX, NY, HandX, HandY : integer;

Procedure IsAxeBroken;
Begin
Status('Checking for broken axe')
GameTab(4)
Wait(400 + Random (100))
If (Not(FindDTM(BrokenAxeDTM, BX, BY, MIX1, MIY1, MIX2, MIY2 ))) then
Begin
Status('Axe Not Broken')
Exit;
end;
Begin
If (FindDTM(BrokenAxeDTM, BX, BY, MIX1, MIY1, MIX2, MIY2 )) and
(Not(FindDTM(RegularAxeDTM, NX, NY, MIX1, MIY1, MIX2, MIY2))) then
Begin
WalkToBank;
Wait(1000 + Random(1000))
MakeCompass('E')
Repeat
OpenBankGlass('db', false, false)
Until BankScreen;
If FindDtm(BrokenAxeDTM, HandX, HandY, MIX1, MIY1, MIX2, MIY2) then
Begin
Mouse(HandX, HandY, 1, 1, False)
ChooseOption(x, y, 'All')
If FindDtm(RegularAxeDTM, X, Y, MSX1, MSY1, MSX2, MSY2) then
Begin
Mouse(X, Y, 1, 1, True)
end;
CloseBank;
MakeCompass('N')
WalkBackTree;
HighestAngle;
end else
NextPlayer(False)
end;
LoadNumber := Loadnumber + 1
end;
end;


//->Axe Head Finder<-//
Procedure TheFindAxe;
Begin
FindHead;
Status('Is axe head missing?')
end;

//->Everything Put Together<-//
Procedure CompleteFix;
Begin
TheAntiRandoms;
Wait(10)
EntChecker;
Wait(10)
TheFindAxe;
Wait(10)
AutoRespond;
end;


//->Start Chopping<-//
Var
TX, TY : Integer;
TreeTime : LongInt;

Procedure StartChopping;
Begin
MarkTime(TreeTime)
If ( Not (LoggedIn) ) Then
Begin
NextPlayer (False)
Exit;
end;
Repeat
Begin
IsAxeBroken;
Status('Looking for ' + TheTreeName)
If (InvFull) then
Begin
Exit;
end;
EntChecker;
MakeCompass('W')
If (FindObjMultiText(TX, TY, TheTreeName, TheTreeName, TheTreeName, Treecolor, 4)) then
Begin
Mouse(TX, TY, 1, 1, True)
Wait( 1400 + Random (200))
CompleteFix;
Wait(100)
CompleteFix;
Wait(100)
CompleteFix;
Wait(100)
Status('Waiting')
Wait(4000+Random(3000))
end;
end;
Until (InvFull) or (TimeFromMark(TreeTime)>60000 * 7)
end;


//->Bank Procedure<-//
Var
BankMark : LongInt;

Procedure StartBanking;
Begin
If (InvFull) then
Begin
If ( Not (LoggedIn) ) Then
Begin
NextPlayer (False)
Exit;
end;
MakeCompass('W')
HighestAngle;
Wait(100+Random(100))
GameTab(4)
end;
WalkToBank;
MarkTime(BankMark)
MakeCompass('E')
Repeat
OpenBankGlass('db', false, false)
Until (BankScreen) or (TimeFromMark(BankMark)>60000 + Random(60000))
If (TimeFromMark(BankMark)>60000) then
Begin
WriteLn('Couldn''t do banking.')
LogOut;
NextPlayer(False)
Exit;
WalkBackTree;
end;
Repeat
If FindDTM(LogDTM, LX, LY, MIX1, MIY1, MIX2, MIY2) then
Begin
BankedLoggs := CountItemDtm(LogDTM) + 6
Mouse(LX, LY, 6, 6, False)
ChooseOption(x, y, 'All')
Wait(1000+Random(1000))
end;
Until (Not(FindDTM(LogDTM, LX, LY, MIX1, MIY1, MIX2, MIY2)))
StoreStuff;
CloseBank;
BankTrips := BankTrips + 1
LoadNumber := LoadNumber + 1
WalkBackTree;
end;

Procedure FProgress;
Begin
WriteLn('Fours Draynor Oak Banker v' + VersionNum )
WriteLn('————————————————')
WriteLn(' Time Running : ' + TimeRunning )
WriteLn(' Logs Banked : ' + IntToStr(TotalLogs) )
WriteLn(' Total Banks : ' + IntToStr(BankTrips) )
WriteLn(' XP Gained : ' + IntToStr(TotalXp) )
If EntsAvoided > 0 then
Begin
WriteLn(' Ents Avoided : ' + IntToStr(EntsAvoided) )
end;
WriteLn('————————————————')
end;

//->Main Stuff<-//
Begin
wait(1200)
MySetupScript;
UseSandwichSolver := True;
UseBoxSolver := True;
SafeInitForm;
SafeShowFormModal;
Convert2;
ClearDebug;
WriteLn('Starting Script')
Wait(3000)
ClearDebug;
Begin
If (Not(LoggedIn)) then
Begin
Status('Logging In')
Loginplayer;
end;
end;
GetRandomLoad;
HighestAngle;
MakeCompass('N')
Repeat
StartXP := GetXp('Woodcutting')
GetAxeColors;
WalkBackTree;
Repeat
If ( Not (LoggedIn) ) Then
Begin
NextPlayer (False)
Exit;
end;
DisguiseScar('[' + IntToStr(LoadNumber) + '/' +IntToStr(RandomLoad) + '] ' +(Players[CurrentPlayer].name) + '')
StartChopping;
StartBanking;
EndXP := GetXp('Woodcutting')
TotalLogs := TotalLogs + BankedLoggs
TotalXP := (EndXP - StartXP) + (TotalXP)
FProgress;
GetAxeColors;
Until (LoadNumber >= RandomLoad)
LogOut;
NextPlayer(True);
LoadNumber := 0
GetRandomLoad;
HighestAngle;
MakeCompass('S')
Until False;
End.


… anyone help? it says this:

Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL.SCAR does not exist.
Include file C:\Program Files\SCAR 2.03\includes\SRL\SRL\Skill\Woodcutting.SCAR does not exist.

ok needs updating lol because it gets out side the bank there and says cut find it bit weird and the head finder needs to be updated it found it but dint click :S:S 1s even got in bank but dint click on it


hop u get updated ;)

Line 605: [Error] (16471:1): Unknown identifier 'OpenBankGlass' in script C:\DOCUME~1\vikrant\Desktop\Draynor Oak Banker 1.1.scar can u tell me what this means and how to fix it plz u guyz

ine 26: [Error] (35:1): Duplicate identifier 'UpChars' in script C:\Program Files\SCAR 3.06\includes\srl\srl\core\Globals.scar help please?

Wow, This place has been leechified lol last 10 - 20 post all of the reply's are from people with 10 post under.

how can i fix?

i keep getting this error:
Line 662: [Error] (15782:16): Unknown identifier 'CountItemDtm' in script C:\Program Files\SCAR 2.03\Scripts\Draynor Oak Banker.scar
can someone please help me with this and tell me whats wrong

i keep geting this
Line 341: [Error] (15112:1) : Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Compaq_Administrator\Local Settings\Temporary Internet Files\Content.IE5\ALG9M9CP\Drynor%20Oak%20Banker%201[1].1.scar
i dont no wat 2 do

what do i put in line 53??? nice script by the way:D :D

I also get the error Line 341: [Error] (15461:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\~~~\Desktop\Draynor Oak Banker 1.1.scar

i'll try it and post proggy :)

edit: got same error tbh

Failed when compiling
Line 341: [Error] (15461:1): Unknown identifier

Don't know what to do. please help?

Found # 3
Found # 3
Couldn't do banking.

what does that mean

Failed when compiling
Line 326: [Error] (15446:1): Unknown identifier 'ClickItemColorTol' in script C:\Program Files\SCAR 2.03\Scripts\Draynor Oak Banker 1.1.scar

I'm having this error, does anyone know what the hell is wrong?

"1. Fill out DeclarePlayers lines 40 +" and what that means ? does that effect banking cuz everything else works perfectly but it wont bank just rolls mouse pointer around and says "Found # 3".. SOME HELP PLZ :)

nice scripting dude

Found # 3
Couldn't do banking.
NextPlayer
[Runtime Error] : Out Of Range in line 399 in script C:\Program Files\SCAR 2.03\includes\srl\srl\core\Login.scar

all go till this

"Failed when compiling
Line 342: [Error] (15113:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Alex\Desktop\Draynor Oak Banker 1.1.scar"

can some one plz tell us noobs how to fix this please?:)

Worked great for me! Keep up the good work. 10/10.

Line 342: [Error] (15113:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\legendz\Desktop\Draynor Oak Banker 1.1.scar

what do i do:(

From: ianternet

Line 342: [Error] (15113:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\legendz\Desktop\Draynor Oak Banker 1.1.scar

what do i do:(

Use SCAR 2.03 and SRL 3.6 .

From: Inf456
Use SCAR 2.03 and SRL 3.6 .

also were do i get that please tell me im sorry 2 bother u

i keep getting the error;

Line 420: [Error] (16609:8): Identifier expected in script

Can you please fix this?

{ CHARMZ AUTO RESPONDER IS IN HERE (GoF's Edit) … NOT mine.
—————————————————-
Instructions
1. Fill out DeclarePlayers lines 40 +
2. Make sure your player is in Draynor
bank and that you have Vbright setting
on.
3. Make sure you have axe wielded or in 1st
inventory spot.
—————————————————–
This script will chop oaks in Draynor and bank them.


Note : If it doesn't walk to bank or trees… get the number.
'Found #3' is an example.

}
Program DraynorOakBanker;
{.include SRL\SRL.SCAR}
{.include SRL\SRL\Skill\Woodcutting.SCAR}
{.include SRL/SRL/extended/xAutoTalk.scar}
{.include SRL/SRL/extended/xAntiban.scar}
{.include SRL/SRL/extended/xInventory.scar}

Var
LoadNumber : Integer;
LogDTM, BrokenAxeDTM, AxeHandleDTM, RegularAxeDTM, WalkToBit, WalkToBit3 : Integer;
StartXP, EndXP, TotalXP, TotalLogs, BankTrips, WalkBank, WalkToBit2 : Integer;
frmDesign : TForm;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Edit1 : TEdit;
Edit2 : TEdit;
Edit3 : TEdit;
Button1 : TButton;
TheTreeName : String;
AmmountOfLoads : Integer;
TreeColor : Integer;
LX, LY, BankedLoggs : Integer;

//->Declare Players<-//
Procedure DeclarePlayers;
begin
Status('Loading Players')

HowManyPlayers := 5;
NumberOfPlayers( HowManyPlayers );
CurrentPlayer := 0;

Players[0].Name := 'Username';
Players[0].Pass := 'Password';
Players[0].Nick := 'Nickname'; // 2-4 letters of username
Players[0].Active := True;

Players[1].Name := 'Username';
Players[1].Pass := 'Password';
Players[1].Nick := 'Nickname'; // 2-4 letters of username
Players[1].Active := True;

Players[2].Name := 'Username';
Players[2].Pass := 'Password';
Players[2].Nick := 'Nickname'; // 2-4 letters of username
Players[2].Active := True;

Players[3].Name := 'Username';
Players[3].Pass := 'Password';
Players[3].Nick := 'Nickname'; // 2-4 letters of username
Players[3].Active := True;
end;

Const
AutoResp = True;
BankColor1 = 5558001;
BankColor2 = 6743804;
BankColor3 = 2986918;
//———————–\\
VersionNum = '1.1';

procedure SafeInitForm;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('InitForm', v);
end;

procedure ShowFormModal;
begin
frmDesign.ShowModal;
end;

procedure SafeShowFormModal;
var
v: TVariantArray;
begin
setarraylength(V, 0);
ThreadSafeCall('ShowFormModal', v);
end;

Procedure InitForm;
Begin
Status('Form Is Up')
frmDesign := CreateForm;
frmDesign.Left := 306;
frmDesign.Top := 367;
frmDesign.Width := 428;
frmDesign.Height := 207;
frmDesign.Caption := 'Setup';
frmDesign.Color := clBtnFace;
frmDesign.Font.Color := clWindowText;
frmDesign.Font.Height := -11;
frmDesign.Font.Name := 'MS Sans Serif';
frmDesign.Font.Style := [];
frmDesign.Visible := False;;
frmDesign.PixelsPerInch := 96;
Label1 := TLabel.Create(frmDesign);
Label1.Parent := frmDesign;
Label1.Left := 3;
Label1.Top := 20;
Label1.Width := 258;
Label1.Height := 20;
Label1.Caption := 'Loads For Player Before Logging Off';
Label1.Font.Color := clWindowText;
Label1.Font.Height := -17;
Label1.Font.Name := 'MS Sans Serif';
Label1.Font.Style := [];
Label1.ParentFont := False;
Label2 := TLabel.Create(frmDesign);
Label2.Parent := frmDesign;
Label2.Left := 3;
Label2.Top := 50;
Label2.Width := 78;
Label2.Height := 20;
Label2.Caption := 'Tree Name';
Label2.Font.Color := clWindowText;
Label2.Font.Height := -17;
Label2.Font.Name := 'MS Sans Serif';
Label2.Font.Style := [];
Label2.ParentFont := False;
Label3 := TLabel.Create(frmDesign);
Label3.Parent := frmDesign;
Label3.Left := 3;
Label3.Top := 80;
Label3.Width := 73;
Label3.Height := 20;
Label3.Caption := 'Tree Color';
Label3.Font.Color := clWindowText;
Label3.Font.Height := -17;
Label3.Font.Name := 'MS Sans Serif';
Label3.Font.Style := [];
Label3.ParentFont := False;
Edit1 := TEdit.Create(frmDesign);
Edit1.Parent := frmDesign;
Edit1.Left := 269;
Edit1.Top := 20;
Edit1.Width := 24;
Edit1.Height := 21;
Edit1.TabOrder := 8;
Edit1.Text := '3';
Edit2 := TEdit.Create(frmDesign);
Edit2.Parent := frmDesign;
Edit2.Left := 87;
Edit2.Top := 50;
Edit2.Width := 58;
Edit2.Height := 21;
Edit2.TabOrder := 9;
Edit2.Text := 'Oak';
Edit3 := TEdit.Create(frmDesign);
Edit3.Parent := frmDesign;
Edit3.Left := 87;
Edit3.Top := 79;
Edit3.Width := 69;
Edit3.Height := 21;
Edit3.TabOrder := 10;
Edit3.Text := '876624';
Button1 := TButton.Create(frmDesign);
Button1.Parent := frmDesign;
Button1.Left := 172;
Button1.Top := 133;
Button1.Width := 75;
Button1.Height := 25;
Button1.Caption := 'OK GO';
Button1.ModalResult := 1;
Button1.TabOrder := 11;
end;

Procedure Convert2;
Begin
TheTreeName := Edit2.text
AmmountOfLoads := StrToInt(Edit1.text)
TreeColor := StrToInt(Edit3.text)
end;


//->Load Dtm's<-//
Procedure LoadDTMs;

begin
Status('Loading DTM''s')

LogDTM := DTMFromString('78DA632C666260E0646440067921460CFF813' +
'448F43F103066314179C880118904D2354035FF19F0AB2905AA11' +
'22604E23500D0F0135C94035DCF8D50000507909F5');

BrokenAxeDTM := DTMFromString('78DA633CCAC4C090C1C8800C9A127919FE036' +
'990E87F2060BC0C54938CAA06220B2381F445A09A04026A8E01D5' +
'C41050B31FA8A698809AB384CD0100CBBD0D20');

AxeHandleDTM := DTMFromString('78DA637CCFC4C0E0C6C8800CCA227819FE036' +
'990E87F2060FC06546389AA06220B2381F473A09A00026ADE00D5' +
'F81350F316A8C685809A97403541F8D50000D0090D3C');

RegularAxeDTM := DTMFromString('78DA637461626060676440060DF1BC0CFF813' +
'448F43F10300601D5FC6740038C482490F604AAF94D408D13500D' +
'2B237E35F640358204D4F813618E1F50CD1F02EE0906AA61C26F0' +
'E0099720B7E');

WalkToBit := DTMFromString('78DA638C676260506740012A0CEC0C5C409A1' +
'188FF030123488D1AAA9A2C3B690611A81A10608CC13407434D22' +
'116AE2806A34F0AB01006D340A3E');

WalkToBit2 := DTMFromString('78DA636464666098CC80024C1938195280342' +
'310FF0702C67F4C186AE2D5381934A06A4080919999B01A06A09A' +
'4944A899825F0D0030C20B70');

WalkToBit3 := DTMFromString('78DA636C626260306040010ECCEC0C1C409A1' +
'188FF0301633DA69A440B760611A81A10606C25420DC82E4322D4' +
'E8E3570300B6030AAD');

WalkBank := DTMFromString('78DA63DCC6C4C0A0C980027881425C409A118' +
'8FF030123488D1AAA9A78356E0639A81A1000ABD126A0663BA65D' +
'186AB612560300E9920B3C');
end;

//->Walk Back To Trees<-//
Var
CC, YY : Integer;
Procedure WalkBackTree;
Begin
Repeat
MakeCompass('N')
If FindDtm(WalkToBit3, CC, YY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CC + 42, YY + 46, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit, CC, YY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 1')
Mouse(CC + 42, YY + 44, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit2, CC, YY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CC + 42, YY + 44, 0, 0, True)
flag;
end else
Begin
WriteLn('Couldn''t find ladder DTM, Sorry')
LogOut;
Wait(60000 + Random (60000))
NextPlayer(False)
end;
Until Not(FindMMColorTol(x, y, 10909539, 10))
end;

//->Walk To Bank<-//

Procedure WalkToBank;
Var
CCX, YYY : Integer;
Begin
MakeCompass('N')
If FindDtm(WalkToBit3, CCX, YYY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CCX + 2, YYY + 40, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit, CCX, YYY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 1')
Mouse(CCX + 2, YYY + 40, 0, 0, True)
flag;
end else
If FindDtm(WalkToBit2, CCX, YYY, MMX1, MMY1, MMX2, MMY2) then
Begin
WriteLn('Found # 3')
Mouse(CCX + 2, YYY + 40, 0, 0, True)
flag;
end;
end;


//->Setup<-//
Procedure MySetupScript;
Begin
Status('Set-Up')
SetupSRL;
DeclarePlayers;
LoadDTMs;
end;


//->GetRandomLoad-//
Var
RandomLoad : Integer;

Procedure GetRandomLoad;
Begin
RandomLoad := (AmmountOfLoads + Random (3))
end;


//->Anti Randoms<-//
Procedure TheAntiRandoms;
Begin
Status('Random Check')
FindNormalRandoms;
wait(10)
FindTalk;
wait(10)
if (FindFight) then
begin
Status('Running From a fight.')
RunAwayDirection('W');
Wait(8500 + random(3500));
RunBack;
Wait(1000+Random(100))
WalkBackTree;
end;
Wait(10);
FindTalk;
end;

Procedure StoreStuff;
Begin
If InventoryCount > 1 then
Begin
Repeat
ClickItemColorTol(65536, 10, False)
Wait(10)
ChooseOption(x, y, 'All')
Wait(1000 + Random(1000))
Until InventoryCount = 0
Wait(1000 + Random (1000))
Repeat
If FindDtm(RegularAxeDTM, X, Y, MSX1, MSY1, MSX2, MSY2) then
Begin
Mouse(X, Y, 1, 1, True)
Wait(1000 + Random(1000))
end;
Until InventoryCount = 1
end;
end;

//–CHARMZ AUTO RESPONDER–//

Function GetChatMessage(Text: String): Boolean;
Var
TX, TY: Integer;
Chat: String;
Begin

If(IsTextInAreaEx(40, 415, 130, 415, TX, TY, ':', 0, SmallChars, False, True, 0, 0, 0))then
Begin
Chat:= Lowercase(Trim(GetTextAtEx(TX + 8, 415, 0, SmallChars, False, False, 0, 1, 16711680, 40, False, TR_AllChars)));

If(Pos(Text, Chat) <> 0)then
Begin
Result:= True;
End

End

End;

Function GetChatName(Name: String): Boolean;
Var
I : Integer;
ChatName : String;
Begin

ChatName := Lowercase(Trim(GetTextAtEx(21, 415, 0, SmallChars, False, False, 0, 0, 0, 50, False, TR_AllChars)));

I:= Pos(':', ChatName);
If(I <> 0)then
Begin
Delete(ChatName, I, I);
End

If(Pos(Name, ChatName) <> 0)then
Begin
Result:= True;
End

End;

Function AutoRespond: Boolean;
Var
Responce, Lvl: String;
RandomReply: Integer;
Chat,Name,ChatName: String;
Begin

if(AutoResp=False)then
begin
Exit;
end;

if(AutoResp)then
begin

OldLine:= TheLine;
TheLine:= Lowercase(Trim(GetTextAtEx(20, 415, 0, SmallChars, False, False, 0, 1, 16711680, 40, False, TR_AllChars)));
NewLine:= TheLine;
end
If(GetChatName(Players[CurrentPlayer].Name))then
Begin
Exit;
End

If(OldLine=NewLine)then
Begin
Exit;
End

If(GetChatMessage(Players[CurrentPlayer].Name)) or (GetChatMessage(Players[CurrentPlayer].Nick))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= Random(10)+1;
Case (RandomReply) of
0 : Responce:= ('?');
1 : Responce:= ('what');
2 : Responce:= ('yes');
3 : Responce:= ('no');
4 : Responce:= ('what do you want');
5 : Responce:= ('me?');
6 : Responce:= ('Yah?');
7 : Responce:= ('who?');
8 : Responce:= ('wha?');
9 : Responce:= ('?');
10 : Responce:= ('???');
End
TypeSend(Responce+' '+Name);
Result:= True;
End

If(GetChatMessage('lol')) or (GetChatMessage('lmao')) or (GetChatMessage('rofl')) or (GetChatMessage('haha'))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= Random(24)+1;
Case (RandomReply) of
0 : Responce:= ('heh');
1 : Responce:= ('loll');
2 : Responce:= ('lol');
3 : Responce:= ('haha');
4 : Responce:= ('hihi');
5 : Responce:= ('ehe');
6 : Responce:= ('lmao');
7 : Responce:= ('lmfao');
8 : Responce:= ('rofls');
9 : Responce:= ('fun');
10 : Responce:= ('nice');
11 : Responce:= ('lolz');
12 : Responce:= ('yep');
13 : Responce:= ('hola');
14 : Responce:= ('wow');
15 : Responce:= ('i bet');
16 : Responce:= ('rofl');
17 : Responce:= ('ghehehghehighhe');
18 : Responce:= ('cool');
19 : Responce:= ('…');
20 : Responce:= ('???');
21 : Responce:= ('wow');
22 : Responce:= ('grr..');
23 : Responce:= ('rowr');
24 : Responce:= ('lolololololol');
25 : Responce:= ('ha ha ha!!!');
End
TypeSend(Responce);
Result:= True;
End


If(GetChatMessage('wc')) or (GetChatMessage('woodcutting')) or (GetChatMessage('woodcuttin')) And
(GetChatMessage('lvl')) or (GetChatMessage('level')) or (GetChatMessage('lvls')) or (GetChatMessage('levels'))then
Begin
WriteLn(''+ChatName+': '+Chat);
Lvl:= IntToStr(GetSkillLevel('woodcutting'));
RandomReply:= Random(5)+1;
Case (RandomReply) of
0 : Responce:= ('i''m lvl '+Lvl+' woodcuttin');
1 : Responce:= ('level '+Lvl+' wc');
2 : Responce:= ('lvl '+Lvl+' woodcut!');
3 : Responce:= (+Lvl);
4 : Responce:= ('i''m level '+lvl);
5 : Responce:= (+Lvl+' here :P');
End
TypeSend(Responce);
Result:= True;
End

If(GetChatMessage('wat')) or (GetChatMessage('what')) and (GetChatMessage('doin')) or (GetChatMessage('doing'))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= Random(9)+1;
Case RandomReply of
0 : Responce:= ('not much');
1 : Responce:= ('nothing');
2 : Responce:= ('bored');
3 : Responce:= ('aye?');
4 : Responce:= ('emmm..nothin');
5 : Responce:= ('nope');
6 : Responce:= ('booo');
7 : Responce:= ('no ty');
8 : Responce:= ('what');
9 : Responce:= ('….');
10 : Responce:= ('nothin');
End;
TypeSend(Responce);
Result:= True;
End;

If(GetChatMessage('hey')) or (GetChatMessage('hi')) or (GetChatMessage('hello')) or (GetChatMessage('wats up')) or (GetChatMessage('whats up')) or (GetChatMessage('yo'))then
Begin
WriteLn(''+ChatName+': '+Chat);
RandomReply:= random(9)+1;
Case RandomReply of
0 : Responce:= ('hello');
1 : Responce:= ('wassup');
2 : Responce:= ('yo');
3 : Responce:= ('whats up everyone');
4 : Responce:= ('whats up');
5 : Responce:= ('welcome');
6 : Responce:= ('hello hello');
7 : Responce:= ('wat up');
8 : Responce:= ('yo');
9 : Responce:= ('sup?');
10 : Responce:= ('whats up');
end
TypeSend(Responce);
Result:= True;
end
end;
end;


//->Get Axe Colors<-//
Procedure GetAxeColors;
Begin
Wait(100)
MakeCompass('S')
GameTab(4)
FindAxeHeadColor;
MakeCompass('N')
end;


//->Ent Finder<-// Yohojo8
Var
EX, EY : integer;
FX, FY : integer;
Procedure EntChecker;
Begin
Status('Checking For Ent')
Flag;
If (FindObjMultiText(EX, EY, TheTreeName, TheTreeName, TheTreeName, Treecolor, 4)) then
Begin
MMouse(Ex, EY, 0, 0)
If FindColorTolerance( FX, FY, 55769, 85, 15, 115, 15, 20) then
Begin
Status('Ent Found');
MouseFindFlag(645, 83, 0, 0);
Wait(17000+Random(5000));
EntsAvoided := EntsAvoided + 1
WalkBackTree;
end;
end;
end;


//->Check for Broken Axe<-//
Var
BX, BY, NX, NY, HandX, HandY : integer;

Procedure IsAxeBroken;
Begin
Status('Checking for broken axe')
GameTab(4)
Wait(400 + Random (100))
If (Not(FindDTM(BrokenAxeDTM, BX, BY, MIX1, MIY1, MIX2, MIY2 ))) then
Begin
Status('Axe Not Broken')
Exit;
end;
Begin
If (FindDTM(BrokenAxeDTM, BX, BY, MIX1, MIY1, MIX2, MIY2 )) and
(Not(FindDTM(RegularAxeDTM, NX, NY, MIX1, MIY1, MIX2, MIY2))) then
Begin
WalkToBank;
Wait(1000 + Random(1000))
MakeCompass('E')
Repeat
OpenBankGlass('db', false, false)
Until BankScreen;
If FindDtm(BrokenAxeDTM, HandX, HandY, MIX1, MIY1, MIX2, MIY2) then
Begin
Mouse(HandX, HandY, 1, 1, False)
ChooseOption(x, y, 'All')
If FindDtm(RegularAxeDTM, X, Y, MSX1, MSY1, MSX2, MSY2) then
Begin
Mouse(X, Y, 1, 1, True)
end;
CloseBank;
MakeCompass('N')
WalkBackTree;
HighestAngle;
end else
NextPlayer(False)
end;
LoadNumber := Loadnumber + 1
end;
end;


//->Axe Head Finder<-//
Procedure TheFindAxe;
Begin
FindHead;
Status('Is axe head missing?')
end;

//->Everything Put Together<-//
Procedure CompleteFix;
Begin
TheAntiRandoms;
Wait(10)
EntChecker;
Wait(10)
TheFindAxe;
Wait(10)
AutoRespond;
end;


//->Start Chopping<-//
Var
TX, TY : Integer;
TreeTime : LongInt;

Procedure StartChopping;
Begin
MarkTime(TreeTime)
If ( Not (LoggedIn) ) Then
Begin
NextPlayer (False)
Exit;
end;
Repeat
Begin
IsAxeBroken;
Status('Looking for ' + TheTreeName)
If (InvFull) then
Begin
Exit;
end;
EntChecker;
MakeCompass('W')
If (FindObjMultiText(TX, TY, TheTreeName, TheTreeName, TheTreeName, Treecolor, 4)) then
Begin
Mouse(TX, TY, 1, 1, True)
Wait( 1400 + Random (200))
CompleteFix;
Wait(100)
CompleteFix;
Wait(100)
CompleteFix;
Wait(100)
Status('Waiting')
Wait(4000+Random(3000))
end;
end;
Until (InvFull) or (TimeFromMark(TreeTime)>60000 * 7)
end;


//->Bank Procedure<-//
Var
BankMark : LongInt;

Procedure StartBanking;
Begin
If (InvFull) then
Begin
If ( Not (LoggedIn) ) Then
Begin
NextPlayer (False)
Exit;
end;
MakeCompass('W')
HighestAngle;
Wait(100+Random(100))
GameTab(4)
end;
WalkToBank;
MarkTime(BankMark)
MakeCompass('E')
Repeat
OpenBankGlass('db', false, false)
Until (BankScreen) or (TimeFromMark(BankMark)>60000 + Random(60000))
If (TimeFromMark(BankMark)>60000) then
Begin
WriteLn('Couldn''t do banking.')
LogOut;
NextPlayer(False)
Exit;
WalkBackTree;
end;
Repeat
If FindDTM(LogDTM, LX, LY, MIX1, MIY1, MIX2, MIY2) then
Begin
BankedLoggs := CountItemDtm(LogDTM) + 6
Mouse(LX, LY, 6, 6, False)
ChooseOption(x, y, 'All')
Wait(1000+Random(1000))
end;
Until (Not(FindDTM(LogDTM, LX, LY, MIX1, MIY1, MIX2, MIY2)))
StoreStuff;
CloseBank;
BankTrips := BankTrips + 1
LoadNumber := LoadNumber + 1
WalkBackTree;
end;

Procedure FProgress;
Begin
WriteLn('Fours Draynor Oak Banker v' + VersionNum )
WriteLn('————————————————')
WriteLn(' Time Running : ' + TimeRunning )
WriteLn(' Logs Banked : ' + IntToStr(TotalLogs) )
WriteLn(' Total Banks : ' + IntToStr(BankTrips) )
WriteLn(' XP Gained : ' + IntToStr(TotalXp) )
If EntsAvoided > 0 then
Begin
WriteLn(' Ents Avoided : ' + IntToStr(EntsAvoided) )
end;
WriteLn('————————————————')
end;

//->Main Stuff<-//
Begin
wait(1200)
MySetupScript;
UseSandwichSolver := True;
UseBoxSolver := True;
SafeInitForm;
SafeShowFormModal;
Convert2;
ClearDebug;
WriteLn('Starting Script')
Wait(3000)
ClearDebug;
Begin
If (Not(LoggedIn)) then
Begin
Status('Logging In')
Loginplayer;
end;
end;
GetRandomLoad;
HighestAngle;
MakeCompass('N')
Repeat
StartXP := GetXp('Woodcutting')
GetAxeColors;
WalkBackTree;
Repeat
If ( Not (LoggedIn) ) Then
Begin
NextPlayer (False)
Exit;
end;
DisguiseScar('[' + IntToStr(LoadNumber) + '/' +IntToStr(RandomLoad) + '] ' +(Players[CurrentPlayer].name) + '')
StartChopping;
StartBanking;
EndXP := GetXp('Woodcutting')
TotalLogs := TotalLogs + BankedLoggs
TotalXP := (EndXP - StartXP) + (TotalXP)
FProgress;
GetAxeColors;
Until (LoadNumber >= RandomLoad)
LogOut;
NextPlayer(True);
LoadNumber := 0
GetRandomLoad;
HighestAngle;
MakeCompass('S')
Until False;
End.

got this msg
Line 328: [Error] (15099:1): Unknown identifier 'ClickItemColorTol' in script C:\DOCUME~1\steven\LOCALS~1\Temp\Draynor Oak Banker 1.1.scar


help plz?

Failed when compiling
Line 342: [Error] (15120:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Danny\Desktop\Draynor Oak Banker 1.1.scar

Failed when compiling
Line 341: [Error] (15461:1): Unknown identifier 'ClickItemColorTol' in script

Tried it with scar divi and scar 2.03

Help please ?
SRL should be fine…. So many people(cough leechers) having problems with it maybe someone can help ?

Marzy

same error for me too:

Failed when compiling
Line 341: [Error] (15461:1): Unknown identifier 'ClickItemColorTol' in script C:\Program Files\SCAR 2.03\includes\Draynor Oak Banker 1.1.scar

Yay! I'm completely new at this so I'll be trying it out once I get 15 Woodcutting.
Woo Hoo. :D

[BANANA]Hmmm…? I get this Error.

Line 648: [Error] (15426:16): Unknown identifier 'CountItemDtm' in script C:\DOCUME~1\Turnbull\LOCALS~1\Temp\Draynor Oak Banker.scar

Any Ideas? :)[/BANANA]

thx, one of my first scripts worked quite nice

i get Line 45: [Error] (14823:17): Assignment expected in script


wtf do i do

Failed when compiling
Line 342: [Error] (15120:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Ka\Työpöytä\Bot\Draynor Oak Banker 1.1.scar

here is a quick progy

Time Running : 24 Minutes and 0 Seconds
Logs Banked : 134
Total Banks : 5
XP Gained : 15151

i only stopped using as it banked my mith axe after 5 loads and withdrew a rune axe witch my char is not high enough 2 use other then that great script :)

Line 328: [Error] (15106:1): Unknown identifier 'ClickItemColorTol' in script C:\DOCUME~1\HP_Owner\LOCALS~1\Temp\Draynor Oak Banker 1.1.scar

How do I fix currently says
ClickItemColorTol(65536, 10, False)
Wait(10)

wat does it mean when it says include {.include SRL\SRL.SCAR}
{.include SRL\SRL\Skill\Woodcutting.SCAR} and thjat wat do i do to fix that?

u need to install SRL


edit: when i started i get this :
Line 360: [Error] (15174:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Administrator\Bureaublad\Draynor Oak Banker 1.1.scar

Man… I tried using it but I got this:

Error detecting Compass Angle.

EDIT: Another mistake by me, sorry =S

i d/l and i went to run and i got this error
ser specified a new RS window
Failed when compiling
Line 342: [Error] (15120:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\tim\Desktop\scar\Draynor Oak Banker 1[1].1.scar

Great script. Cool idea!


Keep up the good work! :)

hi i keep getting

Failed when compiling
Line 327: [Error] (15105:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Owner\Desktop\Draynor Oak Banker 1.1.scar

what do i do?

Everytime I bank, the cursor just goes around the stuff in my bank and the "X"(close bank)
need help

It doesnt seem to work to good, when ever it goes banking then banks it sometimes puts the axe in the bank and freezes. Also when its going back to the tree it always gets lost. Like 40% of the time it makes it back to the yew.

mine says,
Failed when compiling
Line 341: [Error] (15461:1): Unknown identifier 'ClickItemColorTol' in script C:\PROGRA~1\SCAR2~1.03\Draynor Oak Banker 1[1].1.scar

I'm like completly new to this and have no idea wtf it is, will you help me?

hey im new and im going to try this!!! how do u make a progress report??

EDIT: i got this error
Failed when compiling
Line 342: [Error] (15156:1): Unknown identifier 'ClickItemColorTol' in script C:\Program Files\SCAR 3.06\Scripts\Draynor Oak Banker 1.1.scar

how do i fix this?? i have scar 3.06

Line 329: [Error] (15143:1): Unknown identifier 'ClickItemColorTol' in script
what do i have to do

works but cant bank -.-

"Couldn't do banking.
NextPlayer"

i check it but its just gos crazy in the bank

Line 342: [Error] (15058:1): Unknown identifier 'ClickItemColorTol'


Any ideas? Never seen ClickItemColorTol before.

About to test now ^_^

Line 341: [Error] (15155:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Owner\Desktop\Dan's Docs\Downloads and Torrents\Draynor Oak Banker 1.1.scar

me too what shall we do

no more error, using scar 2.03, i forget which version of srl. but it just logs in and does nothing.

says failed when compiling?

what about this error >.<

Line 342: [Error] (15113:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Compaq_Owner\Desktop\Draynor Oak Banker 1.1.scar

iii am seriouly lost here ok can some one email me what to do at [email]austin14666@yahoo.com[/email] plzz ive been at this for like 4-5 hours:mad: ok im gunna play rs now but will somebody plz get back to me and tell me exactly how they did it

Line 341: [Error] (15155:1): Unknown identifier 'ClickItemColorTol' in script

wtf need help with this error

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
:confused:

Line 342: [Error] (15156:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Dylan\Desktop\Draynor Oak Banker 1[1].1.scar
HELP?

i have line 341 error wth do u do?

well the script will log me in and everything but then once im logged in it dosn't do anything all it says is Found Compass.? and this goes for 99% of my scripts i try to use they don't work! i got the includes, downloaded SRL have all the microsoft VM actived uh everything else and i've setup the forms corretectly i think please tell me what i gotta do to fix this bcause this sript used to work for me and also ur FoursYewScript works for me ( edgeville one) PLEASE HELP ME ASAP!!! :)

well the script will log me in and everything but then once im logged in it dosn't do anything all it says is Found Compass.? and this goes for 99% of my scripts i try to use they don't work! i got the includes, downloaded SRL have all the microsoft VM actived uh everything else and i've setup the forms corretectly i think please tell me what i gotta do to fix this bcause this sript used to work for me and also ur FoursYewScript works for me ( edgeville one) PLEASE HELP ME ASAP!!! :) P.S only scar 3.1 seems to work for any of my scripts? howcome i can't use 3.6?

i got Line 341: [Error]. just like alot of others.
is there anyone who can help :)

Line 341: [Error] (15155:1): Unknown identifier 'ClickItemColorTol' in script

Whats RONG this is dummb :(

Line 342: [Error] (15156: 1) Unknown identifier 'ClickItemColorTol' in script

Im new to this autoing thing and I was wondering if some1 could help me with this, like by posting a sample form of how it should look? That would help, thanks a bunch.

people stop asking about "Unknown identifier 'ClickItemColorTol'" just go to freddy1990.com and download scar 2.03 with srl 3.6, not that hard. I've been messing with srl stuff for 2 days and I already know not to ask stupid questions like these.

Repeat
ClickItemColorTol(65536, 10, False)
Wait(10)
ChooseOption(x, y, 'All')


i keep on getting this thing for this

line 342: [Error] (15156:1): Unknown identifier 'ClickItemColorTol'

i keep getin this
Failed when compiling
Line 341: [Error] (15155:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Owner\Desktop\Draynor Oak Banker 1.1.scar

For some reason, every time I put a code in, any code, it doesn't work.. it says "Failed when Compiling" It says that for all of them.. Then it says an error thing.. I'm not sure why it does that, but none of the codes will work..

Line 328: [Error] (15142:1): Unknown identifier 'ClickItemColorTol' in script C:\Documents and Settings\Owner\Desktop\Draynor Oak Banker 1.1.scar

keep gettin this like all the other ppl do. Using Scar 3.06 if that helps at all

draynor oak banker (both) come up with blank icon. it doesnt extract. what program do u need for it?

i keep getting this error

line 328 error clickitemcolortol or some thing im very confused

Please read the thing scrolling at the top…

draynor oak banker (both) come up with blank icon. it doesnt extract. what program do u need for it?

OMG!!! You need scar. This whole site is based off of scar and SRL. Go read the tutorials. And the stickies.

hey guy im new and whenever i try it it says

Failed when compiling
Line 41: [Error] (14855:28) : 'BEGIN' expected in script (then some file name)

for some wierd reson it comes up with found compass on scripts then it doesnt do anything.
:confused: :o :confused:

Line 342: [Error] (15156:1): Unknown identifier 'ClickItemColorTol' … help would be nice..

when i download scar 2.06 with srl 3.07 "the setup files are corrupt please get another copy"

Why do you have a PSU in your thing?:

a what?

didn't work for me…

I really want to use this oak cutter, but I have no idea how to use scar or any scripts!!! I have the scar 3.06 version but I really need help using. If any1 can help me I would be SOOOO thankful ^_^

Why don't you read some tutorials archer? If you need help with that do this:

Go to Tutorial Island…….And go to the section that says how to auto.
Read some of the tutorials there and you should know how to auto after that.

Hey I understand how to use scar and set it up now, but can someone tell me what colors I use for the bank 1 2 and 3 colors? I know they are different, but can someone tell me what part to use picker on. Also if I try to run it without the colors I get an error saying

"Line 303: [Error] (5019:11): Unknown identifier 'ScanExactMinimapD' in script C:\Program Files\SCAR 3.06\includes\srl\srl\core\Color.scar"

Can someone help me with that too?

Oh and it also opens up a new tab on scar called "Colors.scar*"

i dont get how 2 use it i open the script but it fails to run

okay so I know I'm a total noob and possibly a leech - have never done autoing before so I have no post count whatsoever - but I want to add that before I posted I read every single other post first and tried to google this problem.
I'm using 2.03 with 3.6 SRL and, like a few other people who posted, the script logs me in then the character sits there and does absolutely nothing. Could someone please give a hint as to what to do?

email: [email]saers_little_butterfly@yahoo.com[/email]

Failed when compiling
Line 264: [Error] (12716:11): Unknown identifier 'FindMMColorTol' in script

Note : If it doesn't walk to bank or trees… get the number.
'Found #3' is an example.

What does he mean by get the number?

THANKS,
king of the nites

doesnt work 4 me

it says something about error

wat scar and srl does it work with??

This script does not work with the latest SRL / SCAR.

Use http://www.villavu.com/forum/showthread.php?t=16089

I'm sorry i wrote on wrong script lol soz

Line 341: [Error] (15155:1): Unknown identifier 'ClickItemColorTol' in script D:\Documents and Settings\Sirt\Local Settings\Temporary Internet Files\Content.IE5\YNRXGUUN\Draynor%20Oak%20Banker%201.1[1].scar

wtf?

From: Sirt
Line 341: [Error] (15155:1): Unknown identifier 'ClickItemColorTol' in script D:\Documents and Settings\Sirt\Local Settings\Temporary Internet Files\Content.IE5\YNRXGUUN\Draynor%20Oak%20Banker%201.1[1].scar

wtf?

Sirt, you need to look for scripts that are for SRL4.

Heres my oak banker.. http://www.villavu.com/forum/showthread.php?t=16089

i had

Line 67: [Error] (7054:1): Unknown identifier 'ChangeFPHandle' in script D:\Program Files\SCAR 3.11\includes\srl\srl\misc\SCSS.scar

Quick question… I haven't tried it yet but I'm wondering… I noticed a lot of people are dying from randoms. If I were to die, would it begin using another account if there was a few defined and continue chopping or does the script just stop then?

very nice work fine for me :)

Thx, gonna try it out and if i have some time maybe ill post some reports. Good Job.
Question: Do i need the lastest srl and scar? That's what im using.
I get this error.

Failed when compiling
Line 264: [Error] (15146:11): Unknown identifier 'FindMMColorTol' in script C:\Documents and Settings\Admin\Desktop\SCAR Scripts\Draynor Oak Banker 1.1.scar

does this work for Scar 3.13 not updated yet or wut?