hey bro since SRL 5 is out could you be able to make the script compatible, i'm struggling being new and all..... Thanks
hey bro since SRL 5 is out could you be able to make the script compatible, i'm struggling being new and all..... Thanks
Where do we start our player out for this?
Next to the North Yew in edgeville, read the description in the script its in there.
Expect ANOTHER update soon!
What's in this update -
DTM Walking
Failsafes fixing the Endless Loop
Next Next Version -
DTM Object Finding
Been searching for a good yew cutter...
Just doesnt work for me, it starts chopping than when tree is chopped (8-9 logs), it tries to bank. (emphasis on tries...)
it goes to deposit box, deposits and than keeps on going north for some reason. Finally I had to stop it after 4 tries.
OK is anyone else getting an error when it trys to walk to the bank after chopping? I get this below then the script terminates, please help?
The following DTMs were not freed: [SRL - Lamp bitmap, 1]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap]
Hmm, it's so frustrating when you're trying to release a script.
Working perfectly for me :S
For the basics of the basics of pascal, try my TuT. ||Photoshop Editing ||MapleResourceDung Script || Book a flight! BuySellTrip
Exception in Script: Unable to find file 'srl/srl/misc/smart.scar' used from ''
Is what mine says when I hit the Green arrow button thingy. please help! =(
i want to get this script please. be your tester
hello , i tryed to execute this script and i am having issues.
i get an error code saying this
could you help me with my problem please?Code:Exception in Script: Unable to find file 'srl/srl/misc/smart.scar' used from ''
thanks you for your time to respond.
~Charlyak
Since that everyone is using srl 5 now it is proberly best to update your script, i have already done it for personal use but there are some other aspects of the script that need updating to make it full functional which it as you are the only person that has the script working 100% i would say for everyone else it's not working as it should.
For srl 5 you need to change your file extensions from .scar to .simba.
its not logging in for me.
Yeah sorry i forgot to mention you need to update the compass options ill just give you the modified script i have done. It will compile, cut the north the tree but there seems to be something wrong with radial walking so it doesn't bank properly if S1N could help me it would be great but if not ill try to get it 100% working soon.
Simba Code:program S1NYews;
{$include srl/srl/misc/smart.simba} // This is where i changed the file extension from .scar to .simba
{$I SRL/SRL.simba} // This is where i changed the file extension from .scar to .simba
{$I srl/srl/misc/debug.simba} // This is where i changed the file extension from .scar to .simba
var
YewCount:Integer;
{Recent Changes-
1.1 January 2nd 2012
Revamped the whole code
Added numerous failsafes
Banking should be flawless
1.2 January 4th 2012
Cleaned up the whole code
Fixed Radial Walking bug(silly me :L)
added tons of failsafes
progress report
1.3
==To Come==
Seer's Village Support}
//Please start at the Yews.
{Currently featuring ONLY Edgeville.}
{Post on thread if you want support}
{for places such as Seers', GE, and whatever}
{Version 1.2}
{Updated January 4th, 2012}
//Script will be available for only a short time to prevent Yews from crashing
//Moving to Members+ as soon I can.
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := ''; // Username
Players[0].Pass := ''; // Password
Players[0].Active := True;
Players[0].Pin := '';
Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins', 'aphire', 'ssence'];
end;// declare players
procedure AntiBan;
begin
case random(50) of //change the number in brackets to however you want the antiban to perform
0: RandomRClick;
1: PickUpMouse;
2: RandomRClick;
3: HoverSkill('woodcutting', False);
end;
end;
procedure AntiRandoms;
begin
FindNormalRandoms;
LampSkill := 'firemaking'; //change to whatever you want
LevelUp;
end;
{DONT TOUCH BElOW IF YOU HAVE NO EXPERIENCE AND DONT WANT YOUR BOT TO NOT START.
IF YOU CHANGED SOMETHING AND IT DOESNT WORK, DONT YOU DARE COME CRYING TO ME
AND SAYING "0mfG, w7f !s th1s bu11sh!t. Eet n0 w0rk foar m3." without having details.
I WILL RESPOND WITH A "UMADBRUH?" TO YOU.
Have a nice day :)
}
procedure SetupLogin;
begin
ClearDebug;
Smart_Server := 87;
Smart_Members := True;
Smart_Signed := True;
Smart_SuperDetail := False;
SetupSRL;
DeclarePlayers;
LoginPlayer;
end;
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//==============================================================================
//================================Functions=====================================
//==============================================================================
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Function DepositEverything:Boolean;
var
x,y:Integer;
begin
FindObjCustom(x, y, ['eposit','items'], [2052490], 2);
Mouse(x, y, 0, 0, True);
end;
Function CloseDepositBox:boolean;
var
x2, y2:integer;
begin
if FindObjCustom(x2, y2, ['Close'], [1580837], 0) then
Mouse(x2, y2, 0, 0, True);
end;
function FindAndOpenDBox:Boolean;
var
x,y:Integer;
begin
repeat
if FindObjCustom(x, y, ['eposit'], [8092544, 789517], 2) then
MMouse(x, y, 0, 0);
until(IsUpText('eposit'));
Mouse(x, y, 2, 2, True);
end;
function CheckIfLoggedin:Boolean;
begin
if Not LoggedIn then
writeLn('Not Logged In, Ending Script');
TerminateScript;
end;
function NorthAndHigh:Boolean;
begin
MakeCompass(0);
SetAngle(SRL_ANGLE_HIGH); //I also changed this from 'True' to 'SRL_ANGLE_HIGH'
end;
function FindYewTree:Boolean;
var
x2,y2:Integer;
begin
FindObjCustom(x2, y2, ['hop', 'down'], [4937570, 4344918], 5);
end;
function RAngle:Boolean;
begin
MakeCompass(RandomRange(0,359));
end;
procedure Report;
begin
writeLn('========================');
writeLn('========S1NYews=========');
writeLn('===Time Running: ' + TimeRunning);
//writeLn('===Logs: ' + IntToStr(YewCount));
//writeLn('===Exp: ' + IntToStr(YewCount * 175));
writeLn('========================');
end;
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//==============================================================================
//================================Edgeville=====================================
//==============================================================================
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
procedure Bank;
begin
NorthAndHigh;
RadialWalkTolerance(5198946, 30, 45, 60, 1, 1, 2);
if IsMoving then
begin
wait(5000);
MakeCompass(350);
SetAngle(SRL_ANGLE_NONE); //I changed this from 'False' to 'SRL_ANGLE_NONE'
wait(1000);
end else
begin
wait(10000);
CheckIfLoggedIn;
end;
AntiRandoms;
FindAndOpenDBox;
if DidRedClick then
begin
wait(6000 + random(300));
end else
begin
wait(6000);
CheckIfLoggedIn;
end;
if DepositScreen then
begin
DepositEverything;
CloseDepositBox;
end else
begin
CheckIfLoggedIn;
If LoggedIn then
begin
FindAndOpenDBox
DepositEVERYthing;
CloseDepositBox;
end;
end;
MakeCompass(0);
WriteLn('Walking Back');
RadialWalk(3885138, 160, 180, 70, 1, 1);
if FlagPresent then
repeat
begin
wait(200);
end
until(Not IsMoving);
RadialWalk(2833988, 230, 270,42, 1, 1);
if FlagPresent then
repeat
wait(100);
until(Not IsMoving);
wait(20000);
ClearDebug;
end;
procedure ChopNorthTree;
var
x,y:Integer;
begin
SetAngle(SRL_ANGLE_NONE); // I changed this from 'false' to 'SRL_ANGLE_NONE'
MakeCompass(0);
wait(300);
repeat
if FindObjCustom(x, y, ['hop', 'down'], [4937570, 4344918], 5) Then
begin
WriteLn('Found North Yew');
MMouse(x, y, 2, 2);
end;
until(IsUpText('Chop down'));
Mouse(x, y, 2, 2,True);
repeat
wait(100);
MMouse(x, y, 2, 1);
until(Not IsUpText('own') or InvFull);
if FindBlackChatMessage('yew') then
begin
YewCount:= YewCount + 1
end;
AntiBan;
writeLn('Yew Tree is down. Banking'); //yawn .........
end;
procedure Edgeville;
begin
ClearDebug;
SetupLogin;
SetupSRL;
writeLn('============================================');
writeLn('WIELD YOUR HATCHET PLEASE!');
writeLn('This is not an error message, just a warning');
writeLn('============================================');
DeclarePlayers;
ActivateClient;
repeat
ChopNorthTree;
//WalkToSouth
//ChopSouthTree
Bank;
Report;
until(false);
end;
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//==============================================================================
//================================Seers'========================================
//==============================================================================
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//==============================================================================
//================================The GE========================================
//==============================================================================
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
//==============================================================================
//================================Main Code=====================================
//==============================================================================
//||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
begin
Edgeville; //Change this to your location (V1.3+ only)
end.
problem with this your code.
[Hint] (86:10): Variable 'Result' never used at line 85
[Hint] (93:10): Variable 'Result' never used at line 92
[Hint] (100:10): Variable 'Result' never used at line 99
[Hint] (110:10): Variable 'Result' never used at line 109
[Error] (119:10): Unknown identifier 'SRL_ANGLE_HIGH' at line 118
Compiling failed.
There shouldn't be a problem just make sure your simba is fully updated including your SRL, if it doesn't reconize SRL_ANGLE_HIGH that means you are still running srl 4.
ok, why my simba not login in to accounts?
If you are using a script that you downloaded or copied and pasted make sure you filled out declare players properly below is an example. IF you are using MSI make sure you didn't make any mistakes for adding a player. If you are still having problems there are alot of tutorials on this forum further explaining how to BOT with simba.
Simba Code:procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := 'Player'; // Username
Players[0].Pass := 'qwerty'; // Password
Players[0].Active := True;
Players[0].Pin := '';
Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins', 'aphire', 'ssence'];
end;// declare players
So, you're selling the full version of the script? .....
Found North Yew
Yew Tree is down. Banking
Successfully executed.
The following DTMs were not freed: [SRL - Lamp bitmap, 1]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap]
Then it just sits there. Any solution?
There are currently 1 users browsing this thread. (0 members and 1 guests)