My script,KaramjaFisher clicks on an fishing spot does right click and then does cage fishing spot but then after a few times it will walk away for no reasonsome1 help me plz
The Script:
My script,KaramjaFisher clicks on an fishing spot does right click and then does cage fishing spot but then after a few times it will walk away for no reasonsome1 help me plz
The Script:
Current Scripts:
OakZZ!||Done!!!!
WillowZZ!||Done!!!!
ChickenZZ!||Done!!!!
KaramjaFisher||Done!!!!
Firemaking||Busy!!!!
http://www.fenjer.com/adnan/SRLStats/4708.png
Handel Whirl shouldn't be there its what stops it:
SCAR Code:program KaramjaFisher;
{.include SRL/SRL.scar}
const
SmartWorld = 155;//What world to load smart in
Signed = True; //False = unsigned, slower and for multiplayer
//True = signed, faster and for 1 player only
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := '';//Username Set This if u wanna log in
Players[0].Pass := '';//Password Set This if u wanna log in
Players[0].Nick := '';//Y0ur NickName Set This if u wanna log in
Players[0].Active := True;//Player active or not??
end;
Procedure Fishing;
VAR
X,Y:INTEGER;
Begin
Makecompass('N');
Setangle(true);
if findcolor(x,y,15252878,MSX1,MSY1,MSX2,MSY2)then
begin
Mouse(x,y,0,0,false)
Chooseoption('Cage')
Writeln('Fishing')
Wait(20000)
End;
End;
Procedure Randoms;
Begin
FindTalk;
FindNormalRandoms;
solveChatRandom;
FindLamp ('Mining') //Uses lamp on that skill
DwarfItem;
If (FindFight)Then
Begin
MakeCompass ('N')
RunTo('E', True)
Wait(7000 +Random(3000));
RunTo('W', True);
End;
End;
procedure AntiBan;
begin
case random(100) of //do a random number so it won't always perform the antiban
0: RandomRClick;
1: BoredHuman;
2: HoverSkill('Mining', False);
3: AlmostLogout;
end;
end;
Procedure DropLobsters;
var
i : Integer;
begin
if invfull then
begin
for i := 5 to 28 do
begin
DropItem(i);
Wait(RandomRange(501, 1501));
end;
end;
end;
begin
SetupSRL;
DeclarePlayers;
ActivateClient;
if not loggedin then loginplayer;
Wait(1000)
Repeat
Fishing;
Randoms;
Antiban;
Droplobsters;
Until (false)
end.
^ There.
Hope I Helped![]()
tyvm
Current Scripts:
OakZZ!||Done!!!!
WillowZZ!||Done!!!!
ChickenZZ!||Done!!!!
KaramjaFisher||Done!!!!
Firemaking||Busy!!!!
http://www.fenjer.com/adnan/SRLStats/4708.png
There are currently 1 users browsing this thread. (0 members and 1 guests)