SRL Archive - RS3 Outdated / Broken Scripts

I am looking for someone who would be interested in maintaining this script. I am not nearly as active here as I once was and I have stopped playing Runescape for now. If someone would like to maintain this script please PM me. All I ask is you give me credit where it is due and of course you can credit yourself!

Make sure to always download the newest version of the script!

Now, let's get on to the script.

Setup
1.) Put the image that is attached in Simba/Includes/SPS/img/runescape_other and name it custom_lrc
2.) Fill in all user information
3.) Have bait and fishing rod in inventory or toolbelt.
4.) Start at the deposit pulley.
5.) Post progress reports, bugs, and thank yous!

To Do List
- Death walk (in progress)
- Fix any reported bugs

Common Issues
- Standing still at bank or running from fishing spot to spot?

From: vengeofw71
First you click on the pic on the first page to enlarge it. Then you dl it and move it to the folder that he specified. Otherwise the picture in the png will appear small and your char wont move L

From: pker x414
Download the picture to your desktop (fullsize)
Then type C:\Simba into your documents file in the address bar at the top.
It will open and then follow the rest of the insstructions on the forum.

Level 99 Fishing Achieved!

From: Excel
Amazing script! Recommend it for everyone who is trying to get 99 fishing and trying to get cash.

From: TehNeonFishy
Would like to say thanks for 99 fishing, didn't get a screenshot though. :(

From: vengeofw71
I also got 99 fishing from 92 with this script. DIdnt screen as well since it was an overnight thing. Thank you as well.

From: Mew
BTW I got 99 from this sexy bot!
Didnt screen cap though :[
It was well I was asleep about 2-3 weeks ago right as this bot got released for free!
Thanks I got cheated out of my bank so I am botting Rocktails for cash! Thanks! <3

Best Proggy so Far!

From: Mew

Do not hesitate to ask any questions, I will respond when I can. Here is the script. Enjoy!

Program Als_LRC_Fisher;
{$DEFINE SRL5}
{$DEFINE SMART}  // Edit this line out to rn the script in your browser.
{$i SRL/srl.simba}
{$i sps/sps.simba}
{$i srl/srl/skill/fighting.simba}
{$i SRL/SRL/misc/paintsmart.simba}

//////////////////////// Fill The Variables Below In \\\\\\\\\\\\\\\\\\\\\\\\\\\

Const
WTRA         = 550;  // Enter how low health can go before resting. Must be at least 50 below your maximum health.
FishTimer    = 5000; // Do NOT touch this variable.
World        = 88;   // Enter world you want to fish in.
PP           = '';   // Enter your pin here.
OnScreenProg = 0;    // 0 for an On Screen Report or 1 for no On Screen Report.
FishValue    = 2235; // Enter current price of the fish you are catching.
FishType     = 0;    // 0 to catch Rock Tails and 1 to catch Cave Fish.
Crashing     = True; // True if you are using SMART Manager or Crash Smart. False if not.

SRLStats_User     = ''; /// SRL Stats Username.
SRLStats_Password = ''; /// SRL Stats Password.


/////////////////////////////// NO Touchy \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Var
x,y,RFish,CFish,bankbox,FC,Fish_Caught,Fish_XP,XP,FPH,TimeGone,P: Integer;
fshield,fdamage,fvalue: Integer;
FishCaught,FishXP,Info1,Info2,Info3,Info4,XPPH2,FPH2,FFC,FVN: String;
ToFish,ToBankBox,FSpot1,FSpot2,FSpot3,Restart,RunAwayN: TPointArray;

////////////////////////// Fill In Log In Info \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  Players[0].Name :='';     // Enter your username here.
  Players[0].Pass :=''; // Enter your password here.
  Players[0].Nick :='';    // Enter nickname for progres report.
  Players[0].Active:=True;
  Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins'];
  Players[0].WorldInfo := [False, World];
End;

////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
///////////////////////DO NOT TOUCH ANYTHING PAST HERE \\\\\\\\\\\\\\\\\\\\\\\\\
////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure AntiBan;
Begin
  Case Random(500) Of
    100: SleepAndMoveMouse(500);
    200: PickUpMouse;
    300: RandomMovement;
    400: HoverSkill('Fishing',False);
    500: CompassMovement(45,90,true);
  End;
End;

Procedure IfRandoms;
Begin
  FindNormalRandoms;
  AntiBan;
End;

Procedure PrintOnSmart(TP: TStringArray; Placement: TPoint; Colour: integer);
Var
  mx, my, Pic, Pic2, I, B, H, TPH, Numb: Integer;
  TTP: TPointArray;
  Canvas: TCanvas;
Begin
  SmartSetDebug(True);
  GetClientDimensions(mx, my);
  Pic  := BitmapFromString(mx, my, '');
  Pic2 := BitmapFromString(360,71,'me');
  TPH := High(TP);
  For I := 0 To TPH Do
  Begin
    TTP := LoadTextTPA(TP[i], SmallChars, H);
    For B := 0 To High(TTP) Do
    Begin
      Numb := ((I + 1) * 13);
      FastSetPixel(Pic, TTP[b].x + 1, TTP[b].y + Numb + 1,8388736);
      FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
    End;
  End;
  Canvas := TCANVAS.Create;
  Canvas.Handle := SmartGetDebugDC;
  DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
  DrawBitmap(Pic2, Canvas, 100,10);
  FreeBitmap(Pic);
  FreeBitmap(Pic2);
end;

Procedure OnScreenUpdate;
Begin
  Begin
    SRLRandomsReport;
    Stats_Commit;
    IncEx(Fish_Caught, FC);
    IncEx(Fish_XP, XP);
    TimeGone   := (GetTimeRunning/1000);
    FishCaught := IntToStr(Fish_Caught);
    FishXP     := IntToStr(Fish_XP);
    FValue     := (Fish_Caught*FishValue);
    FVN        := IntToStr(FValue)
    FPH        := (3600*(Fish_Caught))/((TimeGone));
    FPH2       := IntToStr(FPH);
    Info1      := ('Fish Caught = ' + FishCaught)
    Info2      := ('Fising XP = ' + FishXP)
    Info3      := ('Fish Per Hr = ' + FPH2)
    Info4      := ('Money Made = ' + FVN)
  End;

  If (OnScreenProg=0) Then
    Begin
      PrintOnSmart(['Last banked at '+(TheTime)],Point(15,210),296906);
      PrintOnSmart([('Time script has run ')+MsToTime(GetTimeRunning,Time_Bare)],Point(15,240),296906);
      PrintOnSmart([Info1+' so '+Info3],Point(15,270),296906);
      PrintOnSmart([Info2+' and '+Info4],Point(15,300),296906);
    End;

  Begin
    Writeln('');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('You have caught ' + FishCaught + ' fish. That equals ' + FPH2 + ' fish per hour!');
    Writeln('You have gained ' + FishXP + ' xp. That equals ' + XPPH2 + ' xp per hour!');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('');
  End;
End;

Procedure SetDTMs;
Begin
  RFish    := DTMFromString('mrAAAAHic42BgYMhmYmDIBOJCIK4C4iIgzgHiRCCOBeLnQDV3gfgWlH4LxJ+B+AMQvwBij2APIMmEE3MBSXyYkQCGAQD1rAvw');
  CFish    := DTMFromString('mrAAAAHic42BgYLBlYmCwAmJXIPYHYg8gdgJiCyC2B2IORqAiKGYGYm4gFgJiFiD+BxRevLwASDLhxPwM+AEjAQwDAIoYBTU=');
  BankBox  := DTMFromString('mggAAAHicY2NgYDgJxKeheA8QbwPie0C8AIhboGJNQLwTiGcAcU91HENyuDNDWbITQ060LUNRggNDYqgjAz9QDhtmxIEhAABB1g9T');
  FShield  := DTMFromString('mrAAAAHic42BgYOAFYgEg5gdiHiBmB2I+IGaBijECMRMQs0LlQOJcUBqkl9XUCS8mBBgJYBgAAK0nBH8=');
  FDamage  := DTMFromString('mbQAAAHicY2VgYNBmhGAdINYDYn0glgZiBSBWBmI5IJYA4nQ2NoYEPj4wns3DA6a5gPrRMSMWDAYAIPEEVA==');
End;

Procedure FreeDTMSet;
Begin
  FreeDTM(RFish);
  FreeDTM(CFish);
  FreeDTM(BankBox);
  FreeDTM(FShield);
  FreeDTM(FDamage);
End;

Function HPLevel: Integer;
Var
ColourString: String;
Begin
  Result:= GetMMLevels('HP', ColourString);
End;

Procedure AllMyPaths;
Begin
  ToFish     := [Point(303, 303), Point(307, 323), Point(279, 363), Point(249, 404)];
  ToBankBox  := [Point(147, 379), Point(191, 379), Point(231, 387), Point(279, 379), Point(303, 335), Point(307, 299), Point(287, 287)];
  RunAwayN   := [Point(185, 385), Point(235, 385), Point(275, 370), Point(305, 330), Point(288, 287)];
  FSpot1     := [Point(247, 407)];
  FSpot2     := [Point(183, 400)];
  FSpot3     := [Point(150, 380)];
  Restart    := [Point(180, 395), Point(220, 395), Point(251, 395)];
End;

Procedure HealthCheck;
Begin
  If HPLevel < (WTRA) Then
    Begin
      If (Not FindSymbolIn(x,y,'Bank',600,60,640,100)) Then SPS_WalkPath(ToBankBox);
      Writeln('Resting until hp gets back up!');
      setrest;
        Repeat;
          If (Not LoggedIn) Then LoginPlayer;
          wait(randomrange(1500,2500));
          AntiBan;
        Until HPLevel > (WTRA + random(49));
    End;
End;

Procedure ToFishing;
Begin
  HealthCheck;
  SetRun(True);
  MakeCompass('n');
  SPS_WalkPath(ToFish);
  While isMoving Do
  wait(100+random(50));
  IfRandoms;
End;

Function FindPulley(x, y: Integer): Boolean;
Var
  CTS, I: Integer;
  TPA: TPointArray;
  ATPA: Array of TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.05, 0.18);
  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 6521492, MSX1, MSY1, MSX2, MSY2, 3);
  ColorToleranceSpeed(CTS);
  ATPA := TPAToATPAEx(TPA, 60, 60);

  For I := 0 To High(ATPA) Do
  Begin
    MiddleTPAEx(ATPA[i], x, y);
    MMouse(x, y, 0, 0);
    If(WaitUpTextMulti(['dep','osit','pul','ull','ley','lif','ift'],500)) Then
    Begin
      Result := True;
      GetMousePos(x, y);
      Break;
    End;
  End;
End;

Procedure Banking;
Begin
  If (FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Or FindDTM(CFish,x,y,MIX1,MIY1,MIX2,MIY2)) Then
    Begin
      If (FindPulley(X,Y)) Then
        Begin
          If FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Then FC  := CountItems('dtm', RFish, []) Else FC  := CountItems('dtm', CFish, []);
          XP  := (FC*380);
          FFC := IntToStr(FC);
          Writeln('Trying to bank ' + FFC + ' fish!');
          OnScreenUpdate;
          ClickMouse2(True);
          Wait(RandomRange(2250,2750));
          If PinScreen Then InPin(PP);
          Wait(RandomRange(1000,1250));
          If (FindDTM(RFish, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(CFish, x, y, MSX1, MSY1, MSX2, MSY2)) Then
            Begin
              Mouse(x,y,3,3,False);
              Wait(RandomRange(700,850));
              ChooseOption('ll');
              ToFishing;
            End Else ToFishing;
        End Else
        Begin
          SymbolAccuracy := 0.35
          FindSymbol(x,y,'bank');
          Mouse(x,y,0,0,true);
          Wait(RandomRange(1000,1300));
          SymbolAccuracy := 0.80
          Banking;
        End;
    End Else ToFishing;
End;

Procedure ToBank;
Begin
  SetRun(True);
  MakeCompass('N');
  SPS_WalkPath(ToBankBox);
  While isMoving Do wait(100+random(50));
  IfRandoms;
  Banking;
End;

Procedure RunAwayNow;
Begin
  SetRun(True);
  MakeCompass('n');
  Writeln('Fight detected. To the bank!');
  SPS_WalkPath(RunAwayN);
  While isMoving Do wait(100+random(50));
  Writeln('Banking, then returning to fish!');
  Banking;
  IfRandoms;
End;

/// Credits to putonajonny ///
Procedure CheckFight;
Var
 i: integer;
Begin
  If Not InFight Then Exit;
  WriteLn('Checking for fight....');
  For i := 0 To 7 Do
  Begin
    If (FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    Begin
      RunAwayNow;
      Exit;
    End;
    Wait(200+Random(50));
  End;
  WriteLn('No fight detected.');
End;

Function PColor: Integer;
Var
  arP: TPointArray;
  arC: TIntegerArray;
  tmpCTS, i, arL: Integer;
  X, Y, Z: Extended;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 1.00);

  FindColorsSpiralTolerance(MSCX, MSCY, arP, 859691, MSX1, MSY1, MSX2, MSY2, 2);
  If (Length(arP) = 0) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  arC := GetColors(arP);
  ClearSameIntegers(arC);
  arL := High(arC);

  For i := 0 to arL Do
  Begin
    ColorToXYZ(arC[i], X, Y, Z);

    If (X >= 1.12) And (X <= 2.02) And (Y >= 1.07) And (Y <= 1.93) And (Z >= 0.45) And (Z <= 0.74) Then
    Begin
      Result := arC[i];
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
End;

Function IsFishing: Boolean;
Var
  CTS: Integer;
  TPA: TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  Begin
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.07, 0.75);
    FindColorsSpiralTolerance(x, y, TPA, PColor, 245, 130, 285, 195, 3);
    ColorToleranceSpeed(CTS);
    result := (Length(TPA) > 0);
    If result Then
      Exit;
  End;
End;

Procedure FishingWait;
Var
  T: Integer;
Begin
  Marktime(T);
  Repeat
    CheckFight;
    If IsFishing Then
      Marktime(T);
    If (InvCount=28) or (FindNPCChatText('carry',Nothing)) Then
      Begin
        WriteLn('All full. Time to bank the fish!');
        ToBank;
      End;
    AntiBan;
    IfRandoms;
  Until(TimeFromMark(T) >= (FishTimer+(RandomRange(300,600))));
  Exit;
End;

Function FindFishingSpot(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 to arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('ockt', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    Exit;
  End;

  GetMousePos(fx, fy);
End;

Function FindFishingSpotC(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 To arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('vefis', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    //Writeln('No Rocktail spot found. Relocating....');
    Exit;
  End;

  GetMousePos(fx, fy);
end;

Procedure StartFishing;
Var
  X,Y: Integer;
Begin;
  CheckFight;

  If (Not FindSymbol(x,y,'fish')) Then ToFishing;

  If (FishType=0) Then
  Begin;
    If (FindFishingSpot(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;
    If Not (FindFishingSpot(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

  If (FishType=1) Then
  Begin;
    If (FindFishingSpotC(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;

    If Not (FindFishingSpotC(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

IfRandoms;
End;

Procedure Relocate;
Begin;

  SymbolAccuracy := 0.40;
  MarkTime(P);
  Repeat;
  If InvFull or (FindNPCChatText('carry',Nothing)) Then
    Begin
      WriteLn('All full. Time to bank the fish!');
      ToBank;
    End;

  If FindSymbolIn(x,y,'Fish',620,30,750,120) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Fish',575,85,635,125) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 3...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot3);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Mine',605,60,640,90) Then
    Begin
      HealthCheck;
      WriteLn('Back to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      If (FindFishingSpot(X, Y)) Then
        Begin
          SymbolAccuracy := 0.80;
          StartFishing;
        End Else
        Begin
          HealthCheck;
          Writeln('Back to spot 1...');
          SPS_WalkPath(FSpot1);
          SymbolAccuracy := 0.80;
          StartFishing;
        End;
    End;
  Until (TimeFromMark(P) >= 5000)

  IfRandoms;
End;

Procedure MainLoop;
Begin
  If Not (LoggedIn) Then Exit;
  SetDTMs;
  MakeCompass('n');
  SetAngle(0);
  ToFishing;
  StartFishing;
  Relocate;
  FreeDTMSet;
End;

Begin;
  ClearDebug
  MouseSpeed := RandomRange(18,23);
  Smart_Server := 86;
  Smart_Members := True;
  Smart_Signed := True;
  Smart_SuperDetail := False
  SetupSRL;
  SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);
  SetupSRLStats(1135, SRLStats_User, SRLStats_Password);
  ActivateClient;
  DeclarePlayers;
  LoginPlayer;
  SMART_ClearCanvas;
  wait(1000);
  PrintOnSmart(['A progress report will appear after banking. Good luck!'],Point(15,300),65674);
  AllMyPaths;
  If (Crashing = True) Then
    Begin
      SPS_WalkPath(ToBankBox);
      Wait(500+Random(500));
      Flag;
    End;
  Repeat;
    Mainloop;
  Until(AllPlayersInactive);
  SMART_ClearCanvas;
  OnScreenUpdate;
End.

Works fine so far! A little buggy at times but I'll run it for a while and then come back to you.

gratz on the release and thanks for the shoutout!

From: Athymy
Works fine so far! A little buggy at times but I'll run it for a while and then come back to you.

Buggy how? I have had it for quite a while and got 99 with it. Should get 6 hours out of it.

What happens to the people who you sold this script to?

Link: http://sythe.org/showthread.php?p=10877746#post10877746

EDIT: Why do you also ignore my pms?

From: Soviet Union
What happens to the people who you sold this script to?

Link: http://sythe.org/showthread.php?p=10877746#post10877746

EDIT: Why do you also ignore my pms?

I am no longer active on Sythe so I don't sell scripts. I emailed everyone I sold that script to, and will be issuing refunds. Thanks for the concern though. If anyone who bought this script on Sythe has not received an email from me concerning this script pm on Sythe and I will get you your refund.

great release man :D

nice release
Im guessing prices will drop because of this.

From: Jakee
nice release
Im guessing prices will drop because of this.

I thought about that, but I don't expect too many leechers to have a bunch of accounts sitting around with 90 fishing. At least I hope not. :P

@Ashaman Thanks! Sorry I spelled your named wrong originally. :redface:

From: alevere4
I thought about that, but I don't expect too many leechers to have a bunch of accounts sitting around with 90 fishing. At least I hope not. :P

@Ashaman Thanks! Sorry I spelled your named wrong originally. :redface:

There are goldfarmers that have several accounts that have high levels in fish, thieve, hunt, mining, etc.
Im not a fan of adding an anti leech, but maybe you should add one or something along those lines to keep prices near where they are right now.

From: Jakee
There are goldfarmers that have several accounts that have high levels in fish, thieve, hunt, mining, etc.
Im not a fan of adding an anti leech, but maybe you should add one or something along those lines to keep prices near where they are right now.

True. I may look into some kind of fairly basic anti leach tonight. I just hate putting one in.

You could also put this script in the general section of the runescape scripts, just like Ashaman and ggzz did with their WFK, AZK, LRC miner, and Summoner under a different thread title so it doesnt get the attention of much leechers/gfarmers. Or make a lite version and use this to apply for members.

Its all up to you man. :)

From: Jakee
You could also put this script in the general section of the runescape scripts, just like Ashaman and ggzz did with their WFK, AZK, LRC miner, and Summoner under a different thread title so it doesnt get the attention of much leechers/gfarmers. Or make a lite version and use this to apply for members.

Its all up to you man. :)

I applied once with it already haha. I will look into some antileech stuff this evening though. Don't really have the time to do what is required to become a member right now between college, job, and girlfriend so I decided all the other nonmembers need some good scripts too!

—

—

—

From: Soviet Union
What happens to the people who you sold this script to?

Link: http://sythe.org/showthread.php?p=10877746#post10877746

EDIT: Why do you also ignore my pms?

sythe and srl arent the same sites if he releases free here dont meen you should get a refund

—

—

—

—-

wow, thanks a lot for this LRC fisher. I will post a proggy tomorrow

—

i believe that being his script he can do whatever he wants with it

Will test it out later on tonight

And to the above poster complaining, its his script he can do anything he wants with it + he is offering refunds to users from scythe(clearly OP posted it above on post #6) so no need to do complains over here visible on the thread. Simply do as he has told you already simply PM him about the matter.

Who cares what he did on scythe. This is SRL. He shouldn't be giving money back to anyone. They paid and got their use. Now everyone else can get their use too. And why is everyone so worried about prices falling…its a game with tons of bot. Releasing one script on one site will not effect the prices. Also if this is your only way of money then just go ahead and quit.

Vote krasniy for Fag of America. He knows how to make everything gay! Vote krasniy!

—

so far so good =)

Thank you for the awesome script! I found a tiny issue, when a gravestone is clicked (for whatever reason) the script will not click out of the interface. I don't know how often the script misclicks, but there is a possibility of it happening.

From: anchvoy dust
Thank you for the awesome script! I found a tiny issue, when a gravestone is clicked (for whatever reason) the script will not click out of the interface. I don't know how often the script misclicks, but there is a possibility of it happening.

Never had it click a gravestone personally, but I will add it to the bug list and look into it. Thanks for reporting it.

—

gratz on release will test it out for ya and give feedback:D

—

Found a far worse problem than gravestones! Many legiters will teleother the whole stack of people, I came back to the bot being stuck on a teleother screen. Just another thing to think about.
Im an idiot sorry- Turn accept aid off

From: anchvoy dust
Found a far worse problem than gravestones! Many legiters will teleother the whole stack of people, I came back to the bot being stuck on a teleother screen. Just another thing to think about.

Why don't you just turn assist off? Then you don't have to worry about that…

damn man nice script! looking forward to more enhancements

one thing though, when the animation stops, it just runs to another fishing spot, you should have it check if the spot is still there or not. because of lag..

From: ineedbot
damn man nice script! looking forward to more enhancements

one thing though, when the animation stops, it just runs to another fishing spot, you should have it check if the spot is still there or not. because of lag..

It doesn't check for if you are fishing through animation. It searches for the pole color. I don't think I have ever had it move to a spot prematurely. Try lowering the FPS slider on Smart to decrease your lag.

Good script….hate the rock mineral guys though

The script isn't banking for me. Is there something wrong with the set up or anything i have done?

From: jajanein
The script isn't banking for me. Is there something wrong with the set up or anything i have done?

I would check your settings. Must be fixed, safe mode, and brightness turned all the way up.

From: alevere4
I would check your settings. Must be fixed, safe mode, and brightness turned all the way up.

I just watched it again. I'm in fixed, safe mode, and brightness as high as it can. It runs to the bank, mouse hovers over it the pulley then runs back to fish without doing anything.

whatever it is, I'll be in my leecher mode and leech this before it has antileech inside. Nice of you to put a release, not so good for the prices. But that's just life, isn't it?

From: jajanein
I just watched it again. I'm in fixed, safe mode, and brightness as high as it can. It runs to the bank, mouse hovers over it the pulley then runs back to fish without doing anything.

Sounds like an uptext issue. Check the setting that is something like "Mouse-Over Text" and make sure it is on.

@er1k That's just life is probably the best way to sum up just about anything that happens lol.

Suggestion; add srl stats, I'm sure you'd get some decent commits ;)

alright fixed my problem, one suggestion could be death walking and looting, as a level 3 in the caverns can be dangerous..

From: Le Jingle
Suggestion; add srl stats, I'm sure you'd get some decent commits ;)

I might feel guilty seeing all the anon commits lol.

@ineedbot I'll add that to the to do list.

Best script ever!!

Trying to test it but it wont move from bank?

From: the goods
Trying to test it but it wont move from bank?

That has to do with the map and SPS. I would maybe place the map back where I said in the original post, close all instances of Simba, then restart it.

From: alevere4
That has to do with the map and SPS. I would maybe place the map back where I said in the original post, close all instances of Simba, then restart it.

There is already a living rock cavern pic in the folder, do i leave that one alone and drag your attachment and name it custom_lrc, or do i just name the pic thats already in the folder custom_lrc??

From: the goods
There is already a living rock cavern pic in the folder, do i leave that one alone and drag your attachment and name it custom_lrc, or do i just name the pic thats already in the folder custom_lrc??

Leave the one that is already in the folder alone. Put the image that I attached in Simba/Includes/SPS/img/runescape_other and name it custom_lrc.

From: alevere4
Leave the one that is already in the folder alone. Put the image that I attached in Simba/Includes/SPS/img/runescape_other and name it custom_lrc.

I did and i still wont move.

From: the goods
I did and i still wont move.

I'm out of ideas. It is definitely something on your end, since it is running fine for other (or at least no one has said this specific issue). Check for updates under Tools, SRL, and SPS. I know it has something to do with the SPS and map though.

From: alevere4
I'm out of ideas. It is definitely something on your end, since it is running fine for other (or at least no one has said this specific issue). Check for updates under Tools, SRL, and SPS. I know it has something to do with the SPS and map though.

So i got it finally to move but it walks to one spot then runs back to back and repeats this path…i let it run a bit and proggie paint came up then it just stood at a spot for 5mins doing nothing?

From: the goods
So i got it finally to move but it walks to one spot then runs back to back and repeats this path…i let it run a bit and proggie paint came up then it just stood at a spot for 5mins doing nothing?

Hmm, still has something to do with the SPS and map. You said you did take the attached img in the original post and save it as custom_lrc? Cause it sounds like you took the one already in the folder and renamed it. That bug you just described happens when the SPS image is not correct.

Yeah i dragged your attached file picture to the runescape_other folder
Maybe i was suppose to save it as custom_lrc instead of dragging it???

From: the goods
Yeah i dragged your attached file picture to the runescape_other folder
Maybe i was suppose to save it as custom_lrc instead of dragging it???

Maybe. Wouldn't hurt to try. I am certain it is something to do with the map though :duh:

I really dont know how to change the map lol…

From: the goods
I really dont know how to change the map lol…

What exactly do you mean haha?

:) It's nice of you to refund your customers. Good job man. I'll try it sometime. Thank you for LRC fisher and cheaper rocktails!

Rocktails are massively sold and mostly by people using injection bots this script won't have much effect on their prices at the current time.

Nice release and i'm going to use it and then give some feedback.

Nice release dude, will definitly check it out! Are you ever going to add urns/summoning support to it?

Thanks mate! Am definitely using this for 25m+ fish exp!

Couple of questions: Does this work with SPS 1? Or do you need SPS 2?
Also why is there a pin option, it banks the rocktails at the pulley lift which doesn't require a pin right? Thanks :)

EDIT: Also getting this compiling error: [Error] C:\Users\Jack\Desktop\AlsLRCFisher.simba(639:13): Unknown identifier 'RUNESCAPE_OTHER' at line 638
Compiling failed.

Did everything you said right :(

Doesn't even move player from bank.

EDIT: nvm - got it working :)

Kinda disapointed as it will fish but it won't always work somehow and is for my opinion pretty slow at recognizing things it coulden't bank for me.

From: Battlefeild
Doesn't even move player from bank.

EDIT: nvm - got it working :)

How'd you get it to work?

Even though I paid for this script, it is a great script and got me 90-99 Fishing relatively fast! Congrats on the release I guess :) I just hope Rockies don't crash too much hehe.
-Brow

completely off topic:

/// Credits to putonajonny ///
Procedure CheckFight;
Begin
  If InFight Then
  Begin
    Writeln('Checking for fight....');
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow;
    Wait(250);
    if(FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    RunAwayNow Else Writeln('No fight detected. Back to fishing!');
  End;
End;

Please, make this a loop.. It would be like 10 vs 25.

Procedure CheckFight;
var
  i: integer;
Begin
  if not InFight then exit;
  WriteLn('Checking for fight....');
  for i := 0 to 7 do
  begin
    if (FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) then
    begin 
      RunAwayNow;
      exit;
    end;
    wait(200+random(50));
  end;
  WriteLn('No fight detected.');
end;

There, I fixed it. Also, I made it work like it as supposed to. :p

Just wondering does it have a combat detect so it runs to the pulley?

Also thanks for making this public :)

From: epiclulzzz
Just wondering does it have a combat detect so it runs to the pulley?

Also thanks for making this public :)

Yes it does.

Great script, running for over 3 hours now still going strong with 250k/hour :)
Flawless so far. :spot:

From: AJunky
Yes it does.

Great script, running for over 3 hours now still going strong with 250k/hour :)
Flawless so far. :spot:

Thanks for fast reply :)

Nice hope to get 99 off of this script then and will hopefully donate some profits to devo 8)



Can somebody please help can't seem to get it to work:

Error: Exception: Access violation at line 305
The following DTMs were not freed: [SRL - Lamp bitmap, 1, 2, 3, 4, 5]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap, 4]

From: jordi1104
Kinda disapointed as it will fish but it won't always work somehow and is for my opinion pretty slow at recognizing things it coulden't bank for me.

I don't think you have your settings correct or something to that extent. I have had no reports of bugs with the banking or being "slow". I have had this private for 2+ months now. Check that you are in fixed, min settings, and brightness all the way up. Also check that your mouse-over text is turned on.

From: Zerkeronrs7
Couple of questions: Does this work with SPS 1? Or do you need SPS 2?
Also why is there a pin option, it banks the rocktails at the pulley lift which doesn't require a pin right? Thanks :)

EDIT: Also getting this compiling error: [Error] C:\Users\Jack\Desktop\AlsLRCFisher.simba(639:13): Unknown identifier 'RUNESCAPE_OTHER' at line 638
Compiling failed.

Did everything you said right :(

If you don't have the folder Runescape_Other then you need to upgrade to SPS 2.0. Sounds like an SPS error to me (I am certain, actually). Also, I don't have a pin so I wasn't sure if it popped up the first time you used the pulley.

From: Nava2

Procedure CheckFight;
var
  i: integer;
Begin
  if not InFight then exit;
  WriteLn('Checking for fight....');
  for i := 0 to 7 do
  begin
    if (FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) then
    begin 
      RunAwayNow;
      exit;
    end;
    wait(200+random(50));
  end;
  WriteLn('No fight detected.');
end;

There, I fixed it. Also, I made it work like it as supposed to. :p

I had just updated the main post with the loop for this part and some of the standards. So, does the i integer automatically increase without there being an IncEx(i,1) anywhere? I don't think I understand that.

From: alevere4
I don't think you have your settings correct or something to that extent. I have had no reports of bugs with the banking or being "slow". I have had this private for 2+ months now. Check that you are in fixed, min settings, and brightness all the way up. Also check that your mouse-over text is turned on.



If you don't have the folder Runescape_Other then you need to upgrade to SPS 2.0. Sounds like an SPS error to me (I am certain, actually). Also, I don't have a pin so I wasn't sure if it popped up the first time you used the pulley.



I had just updated the main post with the loop for this part and some of the standards. So, does the i integer automatically increase without there being an IncEx(i,1) anywhere? I don't think I understand that.

Yes it does, "for i to 7 do" does that exact thing!

From: ashaman88
gratz on the release and thanks for the shoutout!

ashaman isnt the green ranger always black?

From: superbuster4
ashaman isnt the green ranger always black?

bro c'mon man! original is where it's at. Tommy was my idol

i watched the first 3 seasons as a kid then things went down south. i remember that whenever the red ranger would get his ass handed to him heed always say we need the megazord. lol good times

made 2m using this script great work =) no problems for me so far

From: instagib2001
made 2m using this script great work =) no problems for me so far

Awesome! Make sure to sell those at mid for everyone else ;)

whats the profit ph at lvl 90? just wanting to know if this is worth the time.

From: -Benny
How'd you get it to work?

Hard to explain, add me on MSN - [email]kiwibotter@pbot.org[/email]

and ill teamveiw you and fix it :)

From: Battlefeild
Hard to explain, add me on MSN - [email]kiwibotter@pbot.org[/email]

and ill teamveiw you and fix it :)

So I will direct all further questions to you ;)

Working really well, sometimes switches spots when its still there but the rest is pretty much perfect.
Running it tonight untill I dont want to run it anymore. :) hopefully i can get a 24+ hr proggie.

From: AJunky

Working really well, sometimes switches spots when its still there but the rest is pretty much perfect.
Running it tonight untill I dont want to run it anymore. :) hopefully i can get a 24+ hr proggie.

Awesome. Working on tweaking the fishing detection this evening.

How do i add the photo to simba? I really want to try it, and yes im new to simba!

Never mind found it! im just not that bright when it comes to scripts, ill post a proggy later! thanks man

quick question, how do i make it log into w84? i put 84 after the worldinfo, but it didnt work. This is what i did:

Players[0].WorldInfo := [False, World]; 84

If you could post the correct way to make it log into w84, that would be awesome, and if i can work it i will post a proggy.

From: maxtin5395
quick question, how do i make it log into w84? i put 84 after the worldinfo, but it didnt work. This is what i did:

Players[0].WorldInfo := [False, World]; 84

If you could post the correct way to make it log into w84, that would be awesome, and if i can work it i will post a proggy.

At the very beginning of the script, it says 88. you change that to 84. Afterwards, it will start logging into 84 instead of 88.

Cavefish or rocktails?

add the forth northen fishing spot of spot 3, because sometimes all 3 spots are down and the bot runs blindlessly looking for a spot.

How do you check if you have sps 2.0? Bot still wont work for me but im trying hard to make it tho ><

From: the goods
How do you check if you have sps 2.0? Bot still wont work for me but im trying hard to make it tho ><

I had the same issue as you before. Apparently this is what you have to do.

First you click on the pic on the first page to enlarge it. Then you dl it and move it to the folder that he specified. Otherwise the picture in the png will appear small and your char wont move L

From: the goods
How do you check if you have sps 2.0? Bot still wont work for me but im trying hard to make it tho ><

that is the current sps… as in it means you have to be up to date on your simba
Save properly the image on main thread post

Everything works for me except banking. It walks to the pully when it's full, stands there for a few seconds then runs back to the fishing spot and tries to fish. When it says the inventory is full it runs back to the bank again and repeats. I have everything to min and safe mode, and even tried adjusting the brightness but it made no difference.

From: vengeofw71
I had the same issue as you before. Apparently this is what you have to do.

First you click on the pic on the first page to enlarge it. Then you dl it and move it to the folder that he specified. Otherwise the picture in the png will appear small and your char wont move L

From: blinkblink
that is the current sps… as in it means you have to be up to date on your simba
Save properly the image on main thread post

I really appreciate both of yall taking the time to help others get it setup and running. We have a great community here at Villavu.

From: Saiga
Everything works for me except banking. It walks to the pully when it's full, stands there for a few seconds then runs back to the fishing spot and tries to fish. When it says the inventory is full it runs back to the bank again and repeats. I have everything to min and safe mode, and even tried adjusting the brightness but it made no difference.

Sorry, I haven't had this error happen to me so I have no idea what is causing it. Check your setting called something like "Mouse Over Text" and make sure it is enabled. It has something to do with the uptext since the mouse is moving to the pulley correctly.

From: alevere4
I really appreciate both of yall taking the time to help others get it setup and running. We have a great community here at Villavu.



Sorry, I haven't had this error happen to me so I have no idea what is causing it. Check your setting called something like "Mouse Over Text" and make sure it is enabled. It has something to do with the uptext since the mouse is moving to the pulley correctly.

Thanks for replying(quickly I might add :p), but I did check Mouse Over Text and it was on.

From: Saiga
Thanks for replying(quickly I might add :p), but I did check Mouse Over Text and it was on.

Looking through my code it is rather obvious this was the first script I wrote and learned while writing it lol. With that being said, after tomorrow night I will have my new PC and will have 3 days off from work. I think if I go through and clean the code up and rewrite a few of the procedures (like banking) it will get rid of most of these weird little bugs that only or two people are experiencing. So check back tomorrow night and maybe I'll be of more help. Thanks for being patient. If you do manage to figure it out be sure to post the solution in case anyone else has the same issue!

From: alevere4
Looking through my code it is rather obvious this was the first script I wrote and learned while writing it lol. With that being said, after tomorrow night I will have my new PC and will have 3 days off from work. I think if I go through and clean the code up and rewrite a few of the procedures (like banking) it will get rid of most of these weird little bugs that only or two people are experiencing. So check back tomorrow night and maybe I'll be of more help. Thanks for being patient. If you do manage to figure it out be sure to post the solution in case anyone else has the same issue!

Tbh, in the meantime babysitting it and manually banking is better than fishing 100% legit LOL. But I'm looking forward to the updates and I'll definitely post if I figure it out, though I doubt it as I'm new to this code.

Woopwoop, made another 2m tonight and still going. :) Now going to school and leaving it on. New proggie this evening!

keeps standing @ depost , i tried to update sls but says no update possible so i dont know what to do mate

No spot found, relocating…
Moving to spot 3…
Starting to fish!
Checking for fight….

this thing comes and it stops fishing and go to lobby in sometime..

can any1 help me with this? :)

From: vengeofw71
I had the same issue as you before. Apparently this is what you have to do.

First you click on the pic on the first page to enlarge it. Then you dl it and move it to the folder that he specified. Otherwise the picture in the png will appear small and your char wont move L

alright i will try this! And yes this worked, took a while for it to find a spot but it did. Thanks

back from school! Still going strong with 15 hours now. :) Going for 24hr proggie!
(Put it in your thread!!)

No spot found, relocating…
Moving to spot 3…
Starting to fish!
Checking for fight….

this thing comes and it stops fishing and go to lobby in sometime..

can any1 help me with this? :)

From: the goods
alright i will try this! And yes this worked, took a while for it to find a spot but it did. Thanks

omg thanks also worked for mee woohooo !!! 200k till 99 fish :P

EDIT ===:

the script doesnt keeps me logged in the game after like 7-8 mins it keeps fishing but doesnt do anti bans so i get logged out what do i do?

From: botuser112
omg thanks also worked for mee woohooo !!! 200k till 99 fish :P

EDIT ===:

the script doesnt keeps me logged in the game after like 7-8 mins it keeps fishing but doesnt do anti bans so i get logged out what do i do?

Go to line 49 of the script in Simba and change the Antiban procedure there to the one below.

Procedure AntiBan;
Begin
  Case Random(400) Of
    100: SleepAndMoveMouse(500);
    175: PickUpMouse;
    250: RandomMovement;
    325: HoverSkill('Fishing',False);
    399: CompassMovement(45,90,true);
  End;
End; 

@vengeofw71 Thanks for helping people out. Got your post telling people how to save the map in the original post so hopefully that will lower the number of people asking for help with that issue.

@AJunky Thanks for the proggy. Got it added to the main post. It stays there till you or someone else beats it ;)

some1 help me pls? :)

From: alevere4
Go to line 49 of the script in Simba and change the Antiban procedure there to the one below.

Procedure AntiBan;
Begin
  Case Random(400) Of
    100: SleepAndMoveMouse(500);
    175: PickUpMouse;
    250: RandomMovement;
    325: HoverSkill('Fishing',False);
    399: CompassMovement(45,90,true);
  End;
End; 

@vengeofw71 Thanks for helping people out. Got your post telling people how to save the map in the original post so hopefully that will lower the number of people asking for help with that issue.

@AJunky Thanks for the proggy. Got it added to the main post. It stays there till you or someone else beats it ;)

i tried it but it is not working , it seems that whenit looks for an figth the script stops. and nothing else happens

i cant make it work… when i push ''run'' i get this… and if i delete that out i get something else… FML please help!

From: kimalia
i cant make it work… when i push ''run'' i get this… and if i delete that out i get something else… FML please help!

Check for updates under SRL and SPS. Your SPS or SPS plugin is not up to date.

From: alevere4
Check for updates under SRL and SPS. Your SPS or SPS plugin is not up to date.

''No SPS update available.''

please help me :S

From: kimalia
i cant make it work… when i push ''run'' i get this… and if i delete that out i get something else… FML please help!

Think you're missing the minimap posted on the front page under the script :P

Download it and put it in C:/Simba/Includes/SPS/img/

Then make a new folder in there called "runescape_other" and name the minimap custom_lrc and place it in the new folder :P

Think that should fix it xD (Someone correct me if I'm wrong) :P

From: kimalia
''No SPS update available.''

please help me :S

Check for updates under SRL, not just SPS. This an error with not having SPS 2.0. I am positive. If you have no updates under SRL then you may need to reinstall Simba all together.

From: DRose
Think you're missing the minimap posted on the front page under the script :P

Download it and put it in C:/Simba/Includes/SPS/img/dwarven_mine

Think that should fix it xD (Someone correct me if I'm wrong) :P

Thanks for trying, but that is not this error ;)

From: DRose
Think you're missing the minimap posted on the front page under the script :P

Download it and put it in C:/Simba/Includes/SPS/img/dwarven_mine

Think that should fix it xD (Someone correct me if I'm wrong) :P

i putted in Simba/Includes/SPS/img/runescape_other as said on front page… but maybe ur right ?!

alevere4 please tell me what to do! :)

kimalia, i got the same error, but i fixed it… put the attachement on simba/includes/sps/img/runescape_other and change the image name to lrc_custom…. that should fix

From: alevere4
Check for updates under SRL, not just SPS. This an error with not having SPS 2.0. I am positive. If you have no updates under SRL then you may need to reinstall Simba all together.



Thanks for trying, but that is not this error ;)

Ahh, I tried :P Will test this script after I get home :)

reinstalled Simba now it started to run… will see if it works ! :)

From: kimalia
reinstalled Simba now it started to run… will see if it works ! :)

kimalia, i got the same error, but i fixed it… put the attachement on simba/includes/sps/img/runescape_other and change the image name to lrc_custom…. that should fix

From: alevere4
Go to line 49 of the script in Simba and change the Antiban procedure there to the one below.

Procedure AntiBan;
Begin
  Case Random(400) Of
    100: SleepAndMoveMouse(500);
    175: PickUpMouse;
    250: RandomMovement;
    325: HoverSkill('Fishing',False);
    399: CompassMovement(45,90,true);
  End;
End; 

@vengeofw71 Thanks for helping people out. Got your post telling people how to save the map in the original post so hopefully that will lower the number of people asking for help with that issue.

@AJunky Thanks for the proggy. Got it added to the main post. It stays there till you or someone else beats it ;)

Great! Im mining runite atm but ill probably run this script again soon for an insane proggie. :)

No spot found, relocating…
Moving to spot 3…
Starting to fish!
Checking for fight….

this thing comes and it stops fishing and go to lobby in sometime..

alevere4 can u help me with this?

From: rexen
this thing comes and it stops fishing and go to lobby in sometime..

alevere4 can u help me with this?

Same problem here. and it is evrytime when it says : "Checking for figth…."

i dont know anything about it but i think the mistake is there it just complete pause the script.

is anyone getting fps lag spikes?

Quick question, i filled out all of the player information, but once i start the bot, and smart opens, it just sits there and doesnt log me in….any idea what i've done wrong?

From: rexen
this thing comes and it stops fishing and go to lobby in sometime..

alevere4 can u help me with this?

From: botuser112
Same problem here. and it is evrytime when it says : "Checking for figth…."

i dont know anything about it but i think the mistake is there it just complete pause the script.

Both of you use the newest version I just put in the original post. I used the code someone posted (Nava2) earlier in the thread, so I think that will fix the issue.

From: maxtin5395
Quick question, i filled out all of the player information, but once i start the bot, and smart opens, it just sits there and doesnt log me in….any idea what i've done wrong?

Not sure. If you filled the info in then it should log you in.

From: AJunky
back from school! Still going strong with 15 hours now. :) Going for 24hr proggie!
(Put it in your thread!!)

How did you get the s.m.a.r.t manager??

Yeah i was missing something, i got the bot to load, and start up but the fps drop makes it impossible to play in, the bot continuously logs out and it freezes, any idea how to fix the fps?

From: the goods
How did you get the s.m.a.r.t manager??

You have to download it and set it up from here:
http://villavu.com/forum/showthread.php?t=76404

so has anyone else experienced these lag spikes? and is it possible to fix them?

Yeh me too im having these lag spikes.

Sometimes runs to the corner and takes a little bit to relocate, but other than that excellent scripting :)

I died using this today, i was in edgeville when i logged back on, idk how it happen but im going to use the updated verison and see how it works. I only like like 300 minerals tho but i got 400 rocktails so didnt lose anything really.

works like a charm :D

its working very well now :D

Once I get the right fishing level, I'll be using this. :P

But from what I can see, nice release.

i just tried it again and it works

it starts great but after like 10 minutes it just logs off too lobby

So if you die with this script it wouldn't walk back to LRC?
Script seems very promising but LRC worlds are really laggy LOL.

From: hammad911
it starts great but after like 10 minutes it just logs off too lobby

Make sure you are using the newest version in the original post.

From: allanlin
So if you die with this script it wouldn't walk back to LRC?
Script seems very promising but LRC worlds are really laggy LOL.

No, right now there is no death walk. I should have a death walk version by the end of the weekend to test for bugs though.

ok i fixed the original problem i had, but now it wont click on the fishing spots, it goes over them but just doesnt click then moves to a different spot. its the latest version

thanks mate fishied about 600 rocktails and got 99 fish now :)

got logged out at 6 hours :S (to bad it cant keep going after the 6 hours :S )

6 hour progress… (2nd one…ran 12 hours total)

Getting..

[Error] C:\Simba\Includes\sps/sps.simba(300:3): Unknown identifier 'SPS_FilterMinimap' at line 299
Compiling failed.

How do I fix?

You need SPS I would figure, the newest version I would assume. Open up Simba, go to SPS, update it fully, close reopen, try to update again to be sure it worked, then run the script.
You need the SPS map from the first post. Read the instructions.
Setup
1.) Put the image that is attached in Simba/Includes/SPS/img/runescape_other and name it custom_lrc
*Thumnail attachment is on the first page (the map)*

For some reason, just this script is causing my SMART to hog up to 98% of my cpu.. And yes, it's just this script. Other than that, nicely done. Botting my secondary account to make a little side cash while playing legit on my main. Thanks :)

This fails at banking with me, it runs to the deposit, hovers the deposit and runs away. I know this is a known error, but still :S

Note: Fishing Cavefish

From: kevin33
You need SPS I would figure, the newest version I would assume. Open up Simba, go to SPS, update it fully, close reopen, try to update again to be sure it worked, then run the script.
You need the SPS map from the first post. Read the instructions.
Setup
1.) Put the image that is attached in Simba/Includes/SPS/img/runescape_other and name it custom_lrc
*Thumnail attachment is on the first page (the map)*

Says SPS is fully updated. And the SPS map? How do I add?

its working very well :D

From: RSBRAH
Says SPS is fully updated. And the SPS map? How do I add?

go to the first post , it is all there

From: Castiel1
This fails at banking with me, it runs to the deposit, hovers the deposit and runs away. I know this is a known error, but still :S

Note: Fishing Cavefish

Thanks for the note on fishing Cavefish. Made me realize what was missing in the script. I think it should be banking fine for everyone now!

From: cprince
Who cares what he did on scythe. This is SRL. He shouldn't be giving money back to anyone. They paid and got their use. Now everyone else can get their use too. And why is everyone so worried about prices falling…its a game with tons of bot. Releasing one script on one site will not effect the prices. Also if this is your only way of money then just go ahead and quit.

fuck you fucking leech….

From: serexcety
fuck you fucking leech….

He has nothing to do with me releasing the script. I JUST sent you a pm on here telling you to pm on Sythe. Villavu and Sythe are two different sites, we will handle the refund there. Thank you.

inb4rocktailsR200gp.

i'm leveling defence, just for this script, aha hopefully it's worth it.
seemed pretty nice. <3

Very nicely done, and much appreciated.
Much thanks, cheers.

Error: Exception: Access violation at line 305
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, 4]
[Error] (43:35): Unknown identifier 'MMCX' at line 42
Compiling failed.

What am I doing wrong?

Very nice script, getting 70k fish xp/hr and real good money

will upload proggy when i hit 10hours :) thanks

You just made alot of leachers exceptionally happy. Script looks great, and props to giving refunds, shows that you wanna go back on your wrong doings. Time to save this script to my computer, before you get bugged into removing it from the public section.

What would you say the best level is to start using this script?

From: alevere4
Thanks for the note on fishing Cavefish. Made me realize what was missing in the script. I think it should be banking fine for everyone now!

Ahh thanks! :D Was irritating me haha =P Took a look at the code but couldn't work it out :P Need to do more looking around

EDIT: Now it opens the deposit box, but doesn't deposit the raw cavefish. It opens the box, runs back to a spot, then repeats.

This looks awesome, not trying it at the moment though working on my own basic scripts, alcher/superheater, power chopper/miner/fisher before I start to learn the more complicated stuff that includes walking and banking.

Thanks for your hard work, I now I fully appreciate due to trying to learn to make my own scripts :)

working very well :D

I am going to use this! Thanks! I was going to buy this, thanks for releasing! :D
<3 Will use for 99!

Awesome, Working very well with the Rocktails no problems at all..
:f:

Im a Noob. So Can Anyone Tell me How I can Make this script/bot run more than 6 hrs? Thanks

I have fixed a few anti leeches but this one i dont get
im new at scri[ting and i really want to learn so if you could send a link to a scripting tutorial to help with this it would be much obliged

Buggy for me… getting round 20k per hour at 95 fishing :s. First time it was stood next to a grave by a fishing spot and not fishing, second time it went to cavefish when the rocktail spot dissapeared, didnt click it even and just stood there :s idk whats up, got the right graphics settings and everything

Loving this! working on a proggie atm

banking still not working for cavefish

From: the goods
Yeah i dragged your attached file picture to the runescape_other folder
Maybe i was suppose to save it as custom_lrc instead of dragging it???

I smell Wrong Graphics settings…

From: Zerkeronrs7
Couple of questions: Does this work with SPS 1? Or do you need SPS 2?
Also why is there a pin option, it banks the rocktails at the pulley lift which doesn't require a pin right? Thanks :)

EDIT: Also getting this compiling error: [Error] C:\Users\Jack\Desktop\AlsLRCFisher.simba(639:13): Unknown identifier 'RUNESCAPE_OTHER' at line 638
Compiling failed.

Did everything you said right :(

You Need SPSV2 by the looks of that error.

Great release will be using this :)

From: Gajesh
Im a Noob. So Can Anyone Tell me How I can Make this script/bot run more than 6 hrs? Thanks

I'm not sure if you can. 6 hours is maximum game time. You'll have to reopen a client.

If it doesn't move then you've saved the picture to small. read the bugs on page one, took me forever to figure it out then i read that simple post -.-

The walking is kinda bot like, lands on the same places when looking for a fishing spot

You haven't been on skype, i bought one, please go on skype?

From: Fortune
You haven't been on skype, i bought one, please go on skype?

Please pm on Sythe. Can't discuss it on Villavu.

This is a fab script thanks bro

From: alevere4
Please pm on Sythe. Can't discuss it on Villavu.

I don't own an account on Scythe, get on skype.

Just a reminder - Cavefish banking still not working. Opens deposit box and then runs away, doesn't deposit them.

From: Castiel1
Just a reminder - Cavefish banking still not working. Opens deposit box and then runs away, doesn't deposit them.

I believe I have fixed that in the newest version of the script. Give it a try and report back!

From: alevere4
I believe I have fixed that in the newest version of the script. Give it a try and report back!

I'll start it up now. If it fails at banking again, I'll video it for you.

Took me 30 minutes to get an inv, haha, but I don't mind =P
It's banking perfectly with Cavefish now. Thank you :)

Can anyone tell me the exp/hour on this? I might use it for 99.

how to start this script i start it in the lrc and all it does is just sitts there

From: beanerbeater23
how to start this script i start it in the lrc and all it does is just sitts there

You need to re-read the original post. That issue is clearly stated and solved there.

—

From: Fortune
Still waiting for you to go on skype for refund.

You need to make an account on Sythe and pm me there. I can not do any of that here on Villavu. You can PM if you need any further assistance.

This guy isn't going to refund if you've bought. Blocked me. Besides that, the script works pretty well.

Tips to help you out :
Use rune armor, helps a lot.
Boots of lightness/spottier cape
&if leaving on overnight, 300-1k bait should be enough if your curious.

From: Fortune
This guy isn't going to refund if you've bought. Blocked me. Besides that, the script works pretty well.

Tips to help you out :
Use rune armor, helps a lot.
Boots of lightness/spottier cape
&if leaving on overnight, 300-1k bait should be enough if your curious.

You have to be kidding me. I told you I would be right back. I had to run to get food and I am posting this from my phone. You need to learn some patience. Add me back on Skype whenever you are ready for your refund…

I am getting this error everytime I try to run the script:
Error: Exception: Access violation at line 305
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, 4]

Line 305: FoundMatches := SPS_FindMapInMap(P.x, P.y, SPS_AreaMaps, SmallMap, SPS_Tolerance);

From: deathmoon
I am getting this error everytime I try to run the script:
Error: Exception: Access violation at line 305
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, 4]

Line 305: FoundMatches := SPS_FindMapInMap(P.x, P.y, SPS_AreaMaps, SmallMap, SPS_Tolerance);

Generally an SPS error has to do with your SPS being out of date. I haven't seen this particular error though, so I can't be sure.

Al, working on sps 2 i presume?

From: Jonno
Al, working on sps 2 i presume?

Yep! Will probably always stay with the most current updates.

From: alevere4
Yep! Will probably always stay with the most current updates.

Yeah probably best, don't want the thread being spammed with herp a derp what do and a million solutions being posted! Thanks for letting me know!

From: alevere4
Generally an SPS error has to do with your SPS being out of date. I haven't seen this particular error though, so I can't be sure.

I have the latest sps if that helps.

Hey - first post here, so sorry for looking like a bit of a leecher..

I have a bit of a problem.

I have followed all the instructions and have the correct graphics settings but I seem to be running into a "stalling" pattern. Basically the bot just sits there after the fishing spot is done and never moves again, unless i stop and restart the script.

I'm new to Simba so i'm not sure if Simba only works by having a timer, or is it just bugged?

Any help would be appreciated.

Other than that the script works flawlessly!

From: Gurgleas
Hey - first post here, so sorry for looking like a bit of a leecher..

I have a bit of a problem.

I have followed all the instructions and have the correct graphics settings but I seem to be running into a "stalling" pattern. Basically the bot just sits there after the fishing spot is done and never moves again, unless i stop and restart the script.

I'm new to Simba so i'm not sure if Simba only works by having a timer, or is it just bugged?

Any help would be appreciated.

Other than that the script works flawlessly!

Hmm. Are you starting it at the deposit box? I feel like this still has something to do with the saving of the custom lrc map.

From: alevere4
Hmm. Are you starting it at the deposit box? I feel like this still has something to do with the saving of the custom lrc map.

Yeah, I saved in the runescape_other.

From: Gurgleas
Yeah, I saved in the runescape_other.

Are you possibly wearing something brown that would match the color of the fishing pole? My only guess would be the script is detecting that you are still fishing when you are not.

From: alevere4
Are you possibly wearing something brown that would match the color of the fishing pole? My only guess would be the script is detecting that you are still fishing when you are not.

Hm, thats actually reasonable, my hair does sort of match the color of the fishing pole. I'll change it and see if that helps.

From: Gurgleas
Hm, thats actually reasonable, my hair does sort of match the color of the fishing pole. I'll change it and see if that helps.

The area that it checks for the fishing pole should be below your hair, but it is a possibility. Change it and let me know if that fixes the issue. Maybe I'll make it a requirement in the first post that you change your character's hair color to blue so I can see how many people are using my script ;)

From: alevere4
The area that it checks for the fishing pole should be below your hair, but it is a possibility. Change it and let me know if that fixes the issue. Maybe I'll make it a requirement in the first post that you change your character's hair color to blue so I can see how many people are using my script ;)

My clothes are dark red– and my skin is kinda dark…. ;)

I think it was my skin or some coincidence, it seems to be working fine right now
EDIT: nope

It stays still like that and dosnt move

From: Gurgleas
I think it was my skin or some coincidence, it seems to be working fine right now

Ah, glad to hear it!

Hey this is a great script!
I love you for making this.


Still running ;)
I can get you more proggies if you need :)

beats the best proggie !! :D
working very well for me :D

Nice script! but my level 3 skiller keeps dying LOL.
not your fault though :)

Nice job I will try It out when im 80 fishing;)

From: rexen
beats the best proggie !! :D
working very well for me :D

Your proggy is going in the main post now! Congrats haha.

From: Stanger
Nice job I will try It out when im 80 fishing;)

It's 85 Fishing for cavefish and 90 for Rocktails I believe.
also you should get 85 fishing though this script is really good.

Your proggy is going in the main post now! Congrats haha.

thanks! :D

My apologizes for not providing a log or anything ,
But as of 30-5-2012, Cavefish banking is currently not working. I have downloaded an enlarged custom_lrc, acouple of times, and placed in the correct folders. I am unsure on what to try now/next. Any information would be brillant, apart from banking the script, Finding fishing spots, reaction times are simply how fluent it is, is great! Can't wait to get to rocktails.

amazing script al, love it, the only problem i see that it is having now is that when it is waiting for your health to regen it will sometimes log out and i would presume it is continuing to try to check health, but after log out it will click on set recoveries i know for fact that is what is causing it and there is nothing malicious with it lol, but i will come back to 200+ windows open all on RS lol. if i catch it happening again then i will try to get a pic and post it up here for you

So flawless. Haven't had a single problem yet! :)

From: usk
My apologizes for not providing a log or anything ,
But as of 30-5-2012, Cavefish banking is currently not working. I have downloaded an enlarged custom_lrc, acouple of times, and placed in the correct folders. I am unsure on what to try now/next. Any information would be brillant, apart from banking the script, Finding fishing spots, reaction times are simply how fluent it is, is great! Can't wait to get to rocktails.

Can you watch it and tell me at what step it is failing in the Cavefish baking? Like is it failing to open the deposit box, or it opens the box but doesn't deposit the fish? Thanks!

From: tvjj
amazing script al, love it, the only problem i see that it is having now is that when it is waiting for your health to regen it will sometimes log out and i would presume it is continuing to try to check health, but after log out it will click on set recoveries i know for fact that is what is causing it and there is nothing malicious with it lol, but i will come back to 200+ windows open all on RS lol. if i catch it happening again then i will try to get a pic and post it up here for you

I think this may have been caused by the fact that I had the character resting until the HP was a random integer between 1-149 PLUS the WTRA. I lowered the random integer to between 1-49 and added an instruction after the WTRA variable to make sure it is set to be at least 50 below your maximum health. So check if your WTRA plus 150 would have been over your max HP and therefore impossible to ever achieve.

As for the spam clicking, I will have to look more in depth at that tonight. I have a logged in fail-safe in that loop so it should log you in rather than spam clicking but I will look over it tonight.

I get an error saying Exception in script: Plugin {libsmart32} has not been found.. What am I doing wrong?

From: kieran1243
I get an error saying Exception in script: Plugin {libsmart32} has not been found.. What am I doing wrong?

Have you checked for updates under tools, SRL, and SPS. I think your issue has to do with getting your SRL up to date.

http://lmgtfy.com/?q=rocktail+grand+exchange#

i honestly think you should add an anti leach, but that's me. lol.

From: the guy couple posts above
I get an error saying Exception in script: Plugin {libsmart32} has not been found.. What am I doing wrong?

seriously? lol. use the search button.

From: Loca People
http://lmgtfy.com/?q=rocktail+grand+exchange#

i honestly think you should add an anti leach, but that's me.

Not a big fan of adding anti leeches. I would like it if people took the time to search a little more often lol.

Getting this error

SPS_GetArea ERROR: Exception: Error while reading stream: File "F:\Simba\Includes\SPS\img\runescape_other\custom_lrc.png" does not exist

please help :D

Great script… :D

From: Protozero3
Getting this error

SPS_GetArea ERROR: Exception: Error while reading stream: File "F:\Simba\Includes\SPS\img\runescape_other\custom_lrc.png" does not exist

please help :D

Go to page 1.

Read it.

Save the image file where it tells you to.

Thanks a million man :3 btw not leeching

Thanks for this script Al! Powerleveling my alt. acc like no other :)

Amazing. Thankyou :thumbsup:

Okay, so my character starts to fish and as soon as he does so I get this error:

Error: Exception: Access violation at line 89
The following DTMs were not freed: [SRL - Lamp bitmap, 1, 2, 3, 4, 5, 6]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap]

…and the bot instantly stops running until he logs out.

This is line 89: function IsFKeyDown(FKey : integer) : boolean;

I followed every instruction to the T, or so I think, including enlarging the image and placing it in the correct folder. I know this bot has worked well for many others and I've been searching for a good one for days. I want to make it work. Helpwould be very appreciated. Thank you. :)

False alarm! I figured it out. I failed to download the NEWEST version of Simba. :P

Another great free script cant ask for anything else to be done apart from tweaks here and there all i would reccomend is showing in writing how and were to save the attached PNG image as some people wont know :)

From: chrisman
Another great free script cant ask for anything else to be done apart from tweaks here and there all i would reccomend is showing in writing how and were to save the attached PNG image as some people wont know :)

From: The OP
Setup
1.) Put the image that is attached in Simba/Includes/SPS/img/runescape_other and name it custom_lrc
2.) Fill in all user information
3.) Have bait and fishing rod in inventory or toolbelt.
4.) Start at the deposit pulley.
5.) Post progress reports, bugs, and thank yous!

he does say where to save it ?..

Look at G.E. graph. I like the big drop. :D

Awesome script. went from 93-97 so far. will be 98 tomorrow night with this :)

Keeping all the fish for bosses and pking lol =p

Amazing script! Recommend it for everyone who is trying to get 99 fishing and trying to get cash.

Script is running smoothly. :) The only thing wrong I've noticed is that it takes a while for the bot to realize when the fishing spot moves. He just stands there for like 5-10 minutes. Thanks again for the great script!

From: kvagnier
Script is running smoothly. :) The only thing wrong I've noticed is that it takes a while for the bot to realize when the fishing spot moves. He just stands there for like 5-10 minutes. Thanks again for the great script!

Check if you are wearing something that might be similar to the color of the fishing pole. The script should move when the color of the fishing pole is no longer detected so perhaps something is giving a false positive.

From: Excel
Amazing script! Recommend it for everyone who is trying to get 99 fishing and trying to get cash.

Awesome! Will put the 99 pic in the main post when I get home.

From: b_lone
Look at G.E. graph. I like the big drop. :D

Why would you like that? It is the reason 99% of decent money making scripts are not released to the public. It is less profit for all of us.

Honestly, I dont see why people care about price drops or rises. The point is you profit + get exp.

getting error

SPS_FilterMinimap(Minimap)

[Error] C:\Simba\Includes\sps/sps.simba(300:3): Unknown identifier 'SPS_FilterMinimap' at line 299
Compiling failed.


?????????????????????????????????

From: Gems
getting error

SPS_FilterMinimap(Minimap)

[Error] C:\Simba\Includes\sps/sps.simba(300:3): Unknown identifier 'SPS_FilterMinimap' at line 299
Compiling failed.


?????????????????????????????????

Your SPS is not up to date. One question mark one have done the trick as well.

From: alevere4
Can you watch it and tell me at what step it is failing in the Cavefish baking? Like is it failing to open the deposit box, or it opens the box but doesn't deposit the fish? Thanks!


Thanks for the reply, It clicks on the pulley, waits on the screen with all items ready to be banked, then runs back to the fishing spot(s). Hope this helps.

Surprised to seee a release like this public :o time for 99 fishing i suppose

From: TheAnubis
Surprised to seee a release like this public :o time for 99 fishing i suppose

Be sure to get a picture of 99 for the thread!

hey mate! great script! i have gotten from 92 to 96 so far… will go for 99!!!

also i had an idea… when the bot makes it stay at bank to get health… could u make it check if the bot has a excalibur? and if it does then use the special att to get health that way ?! (its used for LRC miners)

would be a cool feature… but its good as it is… just an idea…

I get this error Exception in Script: Define not closed. i almost had it working now it wont work at all. can someone help me out please. by the way nice script thanks for the release

From: alevere4
Your SPS is not up to date. One question mark one have done the trick as well.

No SPS update available.

From: Gems
No SPS update available.

It is related to SPS or SPS plugin which is under a SRL update. Google around. Not hard to fix.

From: alevere4
It is related to SPS or SPS plugin which is under a SRL update. Google around. Not hard to fix.

i click SPS> Check for update and it says
No SPS update available.

what am i even doing wrong?

From: Gems
i click SPS> Check for update and it says
No SPS update available.

what am i even doing wrong?

Did you check for updates under SRL and Tools?

From: alevere4
Did you check for updates under SRL and Tools?

yeah it's all updated, i've checked over it mutiple times.


[Error] C:\Simba\Includes\sps/sps.simba(300:3): Unknown identifier 'SPS_FilterMinimap' at line 299
Compiling failed.


so frustrating!

I think this is SPS 1.0 not 2.0 so downgrade and try again

From: illuminatiswag
I think this is SPS 1.0 not 2.0 so downgrade and try again

No, it is SPS 2.0. If you have it working with SPS 1.0 then I am quite impressed haha!

I still have 3K bait to 99! :D <3
Thanks bro… I love you :D

From: alevere4
No, it is SPS 2.0. If you have it working with SPS 1.0 then I am quite impressed haha!

Really mines is working on SPS 1.0 lol.

From: illuminatiswag
Really mines is working on SPS 1.0 lol.

Interesting! Maybe it doesn't really matter since it is a custom map. I also made it when SPS 2.0 was downloadable on the forums but not pushed out as an update yet. So who knows!

From: alevere4
Interesting! Maybe it doesn't really matter since it is a custom map. I also made it when SPS 2.0 was downloadable on the forums but not pushed out as an update yet. So who knows!

Wait your right its meant for 2.0 best used on 1.0 but it was all buggy then when seen you said was meant for 2.0 just started and its running flawlessly

Does it support urns and cavefish?

From: illuminatiswag
Wait your right its meant for 2.0 best used on 1.0 but it was all buggy then when seen you said was meant for 2.0 just started and its running flawlessly

I think you are saying it is meant for 2.0, and that is correct!

From: Bot4Fun
Does it support urns and cavefish?

Don't even know what urns are! It does support Cavefish though.

From: Bot4Fun
Does it support urns and cavefish?

Yes it does it asks in the settup it ask if you want to fish cavefish or rocktails

From: alevere4
I think you are saying it is meant for 2.0, and that is correct!

Yea thats what i meant i used on 1.0 but it wouldnt walk to bank correctly or even other fishing spots

Works flawless apart from one or two bugs:

1) Sometimes switches fishing spot when it doesn't need too, I'm not wearing anything brown either (blue colours)

2) Tries to bait cavefish, when I'm wanting to fish rocktails, baiting cavefish needs a different type of bait I believe.

Apart from that, the script is sweet, thanks for this.

http://runescape.wikia.com/wiki/Decorated_fishing_urn This is a urn :) But its maybe not so good to use it in LRC since you mostly fish there for the money. So its probably better to use when fishing Barbarian or something.

got a 6 hour run last night :)

Error: Exception: Access violation at line 305
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, 4]
can some1 help i wish there was a video on youtube or something bc i ran this script and it does nothing also i have no idea how he poped up smart manager

Heres a little over 3 hour run had to stop to get more bait im scared to take alot incase i die does ring of life help down there ?

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 356 fish. That equals 108 fish per hour!
You have gained 135280 xp. That equals xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

From: illuminatiswag
Heres a little over 3 hour run had to stop to get more bait im scared to take alot incase i die does ring of life help down there ?

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 356 fish. That equals 108 fish per hour!
You have gained 135280 xp. That equals xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

Well I see that I need to fix the XP per hour display haha. I have never died using this script, but I am also lvl 100. Not sure about the ring of life either. Are you a low lvl?

stands at pully and does nothing.. says it can't find Spot 2, etc etc, probably thinks it's already at the fishing spot when it clearly isn't.

From: allanlin
stands at pully and does nothing.. says it can't find Spot 2, etc etc, probably thinks it's already at the fishing spot when it clearly isn't.

Please read the first post. Under common issues it directly addresses this problem. You have not saved the custom map correctly.

It doesn't think you are fishing. It can't find the coordinates because you do not have the map saved correctly so it does not do the walking to fishing spot procedure and goes directly to the fishing procedure.

This error is on your end, nothing to do with the script.

From: alevere4
Please read the first post. Under common issues it directly addresses this problem. You have not saved the custom map correctly.

It doesn't think you are fishing. It can't find the coordinates because you do not have the map saved correctly so it does not do the walking to fishing spot procedure and goes directly to the fishing procedure.

This error is on your end, nothing to do with the script.

I have done that lmao…

From: allanlin
I have done that lmao…

Then I suppose you are out of luck. Your error is directly related to the map or SPS. Not the script.

From: alevere4
Then I suppose you are out of luck. Your error is directly related to the map or SPS. Not the script.

nvm it started working finally ;) So I can't really die with this script right..? since it runs back to pully if HP is really low..? How long does it stay there? Until it heals over the HP you set for it to run away?

From: allanlin
nvm it started working finally ;) So I can't really die with this script right..? since it runs back to pully if HP is really low..? How long does it stay there? Until it heals over the HP you set for it to run away?

The way it works is if it detects a fight then it will run to the bank and wait a few seconds. If your HP is below what you have set the variable at then it will rest until it reaches that level plus a random amount between 1-50 then return to fishing. If your HP is above that level when it runs to the bank then it immediately returns to fishing.

You can die if your character can be 5 shotted or less because the fight detection is not instantaneous, because instant detection is about impossible ;)

is there any other world suitable for this script? ( which many ppl do fishing it other than w88)

plus how can i change the world from the script to another one if so?

From: Eustass
is there any other world suitable for this script? ( which many ppl do fishing it other than w88)

plus how can i change the world from the script to another one if so?

Not sure what the unofficial fishing worlds for LRC are but that is easy enough to Google for yourself ;)

As for switching worlds, all you have to do is change the World variable under the constants section.

From: allanlin
nvm it started working finally ;) So I can't really die with this script right..? since it runs back to pully if HP is really low..? How long does it stay there? Until it heals over the HP you set for it to run away?

Yes you can die i just got back to a 5 hour run but ended up dieing losing like 2k minerals but cant complain have made well more then that and + almost 2 lvls from 92 now almost lvl 94 in what 2 days ?

From: illuminatiswag
Yes you can die i just got back to a 5 hour run but ended up dieing losing like 2k minerals but cant complain have made well more then that and + almost 2 lvls from 92 now almost lvl 94 in what 2 days ?

What level is your character? What is your max HP and what did you have your WTRA variable set to?

From: illuminatiswag
Yes you can die i just got back to a 5 hour run but ended up dieing losing like 2k minerals but cant complain have made well more then that and + almost 2 lvls from 92 now almost lvl 94 in what 2 days ?

My account is maxed in melee so I don't think I have that high of a chance at dying :P Script is amazing btw :) worked flawlessly for 6 hours, and SMART manager just restarted it

great script, gonna have 99 in no time anyway here was my run last night (without smart manager) ran for 8 1/2 hours and still running
====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 901 fish. That equals 106 fish per hour!
You have gained 342380 xp. That equals xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

If someone can help me i'll love them forever.


Thank you if you help me fix it.

lol i fucked up pretty bad with your script. I bought 10k living minerals and forgot to bank most of them, ran the script and ended up dead :(. my fault though completely, it has nothing to do with you.

This script is pretty good sir. Obviously not as responsive as scripts coded for a reflection client, but this is damn near one of the best fishing scripts here at villavu. I've been running this script for a while trying to get the greatest proggie i could, and today I believe I have it :)


keep up the good work sir, this script is truly exceptional for a free script.

EDIT: just hit 8 straight hours with your script.

From: danielyuplyr
lol i fucked up pretty bad with your script. I bought 10k living minerals and forgot to bank most of them, ran the script and ended up dead :(. my fault though completely, it has nothing to do with you.

This script is pretty good sir. Obviously not as responsive as scripts coded for a reflection client, but this is damn near one of the best fishing scripts here at villavu. I've been running this script for a while trying to get the greatest proggie i could, and today I believe I have it :)

Any idea what caused you to die? Like where your character was and what he was doing?

Also, what level is your character and what did you have your WTRA variable set to?

hey there
i tried running this script, and it doesnt work for me. it says:
[Error] (597:13): Unknown identifier 'runescape_other' at line 596
Compiling failed.
i tried a lot of things, i downgraded sps, i tried to declare the runescape other as variable (only tried it cause it said it on a thread with common scripting errors), obviously that didnt work too, though it didnt get any compiling error then. however, i cant get the script running which is a pity, cause i could rlly use it O.o
any ideas on how i can get it running? i'd really appreciate it :)

edit: oh, and before anyone asks: i did save the picture in the right folder ;)

From: LIM
hey there
i tried running this script, and it doesnt work for me. it says:
[Error] (597:13): Unknown identifier 'runescape_other' at line 596
Compiling failed.
i tried a lot of things, i downgraded sps, i tried to declare the runescape other as variable (only tried it cause it said it on a thread with common scripting errors), obviously that didnt work too, though it didnt get any compiling error then. however, i cant get the script running which is a pity, cause i could rlly use it O.o
any ideas on how i can get it running? i'd really appreciate it :)

edit: oh, and before anyone asks: i did save the picture in the right folder ;)

Sounds like you didn't have SPS 2.0 up to date.

Hmmm im kinda scared to ask but does this bank?

From: jack15
Hmmm im kinda scared to ask but does this bank?

of course it does :)

From: alevere4
Sounds like you didn't have SPS 2.0 up to date.

well no, actually i downgraded it, because some scripts didnt seem to work. after the downgrade they started working. so you think i should update sps to sps2?

From: LIM
well no, actually i downgraded it, because some scripts didnt seem to work. after the downgrade they started working. so you think i should update sps to sps2?

Yes, this script requires SPS 2.0.

From: alevere4
Yes, this script requires SPS 2.0.

ok, ill have to update it then. i've been checking the forum here, but i cant find a way to update it manually. i ticked the automatically > update and check for updated, and even clicked to update, but nothing is happening, it says no update available, even though i downgraded it :/
im sry if this question is stupid, im still trying to understand all this new stuff O.o

edit: nevermind, it works. i dont know why, but now it updated properly. script starts normally now, ima test it right away :)
and thanks for the help, i hope im not annoying, i always have a bit trouble in understanding all this, specially, since im not that good in english :/

If someone can help me i'll love them forever.

Can nobody fix this……
Thank you if you help me fix it.

From: Just Ganja
If someone can help me i'll love them forever.

Can nobody fix this……
Thank you if you help me fix it.

Did you even download the correct script? because i seatched in the script for the lines that are marked in yours, but there not even in the lrc script. and the name of yours is rocktail bot, which obviously isnt this one here. if its the wrong one, go back to the first post here and download the image and script.

im trying to start the bot but it just sits still at the bank.and i cant seem to understand the whole picture concept.

From: slimshady202
im trying to start the bot but it just sits still at the bank.and i cant seem to understand the whole picture concept.

okay bro you need to click on the picture on front page, when it enlarges you need to save it to your SRl includes folder where there is otehr maps saved.

can u help me plox . i am getting this error. SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);

From: XxBlackNinja97xX
can u help me plox . i am getting this error. SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);

You obviously haven't follow the directions on the first page… Specifically, the part about saving the map in the correct location. If you do not have the Runescape_Other folder then you need to update your SPS to 2.0.

This script is flawless for me.

thank you alevere and sorry for wasting your time.

Error: Exception: Access violation at line 89

–>function IsFKeyDown(FKey : integer) : boolean; <–

Does this script support the use of familiars like the ibis or the granite lobster, or any others that help with fishing?

From: alevere4
You obviously haven't follow the directions on the first page… Specifically, the part about saving the map in the correct location. If you do not have the Runescape_Other folder then you need to update your SPS to 2.0.

dude, honestly, don't help the leechers that don't even read the OP..

I've put the image in rs other and i still get image error? what am i doing wrong?

EDIT: uninstalled simba and reinstalled it. Script worked after that. The problem was that my sps was donwgraded from 2.0 for a script i was using. So if you have a rs_other folder but this script doesnt work then you are probably downgraded and forgot about it.
Working great btw. I'll edit with proggies.
EDIT: First proggie
Stopped at 5:23
====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 458 fish. That equals 84 fish per hour!
You have gained 174040 xp. That equals xp per hour!

im loving the script its stable and very sweet i wanne thank you thank you for the nice script keep up the good work!

grz arjan

—

Excellent script! Very talented scripters put a lot of work in this.

Would like to say thanks for 99 fishing, didn't get a screenshot though. :(

Error: Exception: Access violation at line 305
Help?

From: MotorMouse
Error: Exception: Access violation at line 305
Help?

Most likely something is not up to date. Checks for updates under SPS, SRL, and Tools.

From: TehNeonFishy
Would like to say thanks for 99 fishing, didn't get a screenshot though. :(

Awesome! I will start a 99 list when I get home.

95 fishing so far from 92 in like 3-4 days thx for that :) once im 99 ill post scrennie and everything also do you mind if i PM you about a script idea i got ?

From: illuminatiswag
95 fishing so far from 92 in like 3-4 days thx for that :) once im 99 ill post scrennie and everything also do you mind if i PM you about a script idea i got ?

Awesome! You are more than welcome to PM about anything.

I also got 99 fishing from 92 with this script. DIdnt screen as well since it was an overnight thing. Thank you as well.

From: vengeofw71
I also got 99 fishing from 92 with this script. DIdnt screen as well since it was an overnight thing. Thank you as well.

Good to hear! Will add you to the list as well.

Will be hitting 99 soon, about 1M xp away. This script is nearly flawless, except for the fact that it sometimes gets stuck at some spots in the caverns.

Somehow wandered off into the North-Western area of the cavern and stood there while being pounded on by a monster, good thing I was babysitting, I almost died @_@. I looked on Simba and it didn't detect any fight.. kinda strange. It usually does and runs away

From: allanlin
Somehow wandered off into the North-Western area of the cavern and stood there while being pounded on by a monster, good thing I was babysitting, I almost died @_@. I looked on Simba and it didn't detect any fight.. kinda strange. It usually does and runs away

Interesting. Wish you could have seen what led up to this.

From: allanlin
Somehow wandered off into the North-Western area of the cavern and stood there while being pounded on by a monster, good thing I was babysitting, I almost died @_@. I looked on Simba and it didn't detect any fight.. kinda strange. It usually does and runs away

You incorrectly downloaded the custom lrc picture and probably tried to start at the fishing spots. So when it was trying to bank, it kept clicking that area on the minimap.

It happened to be before when i incorrectly added the custom_lrc pic.

heyy al, im getting this error now, i have saved it in the runescape other folder like you told me and then when i run it says this SPS_FilterMinimap(Minimap);

Gonna try this soon 90-99 fishing!

standby for some epic proggies.

So i start the script beside the pulley lift, and it just stand there. I put the picture in the proper folder and named it custom_lrc and everything, but its still now working. :/ it just stands there. Then when i stop the script it says The following DTMs were not freed: [2, 3, 4, 5] Help? :(

From: xTheWayOfTheWarriorx
So i start the script beside the pulley lift, and it just stand there. I put the picture in the proper folder and named it custom_lrc and everything, but its still now working. :/ it just stands there. Then when i stop the script it says The following DTMs were not freed: [2, 3, 4, 5] Help? :(

You aren't doing something right with the saving of the custom map. Standing next to the pulley will always be related to that.

From: alevere4
You aren't doing something right with the saving of the custom map. Standing next to the pulley will always be related to that.

What could i have done wrong? its not that hard to save something in a folder and name it custom_lrc lol. Idk where i messed up?

What gear do IWear to not die while running?

Nice script! Also maybe you could a failsafe that when resting, it will click on at some space like the XP toggle or something so it wouldn't log out from inactivity.

Keep up the good work!

This is a great bot. Been using it for the past few hours. Here is a proggy after 5 hours.

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 565 fish. That equals 107 fish per hour!
You have gained 214700 xp. That equals xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

Few things I saw though, when it goes to spot 2, it sometimes confuses the cave fish spot with the rocktail one and runs off to spot 3. Also the detection of the spot moving is a little slow, is there a way I can speed that up? But all in all its works great :D

BTW I got 99 from this sexy bot!
Didnt screen cap though :[
It was well I was asleep about 2-3 weeks ago right as this bot got released for free!
Thanks I got cheated out of my bank so I am botting Rocktails for cash! Thanks! <3

Oke now i will start using this from 90-99 !

Amazing script but the randoms are being a bit bitchy.
Could you update the script voor randoms?

From: MotorMouse
Amazing script but the randoms are being a bit bitchy.
Could you update the script voor randoms?

Random solving is done by the client, not individual scripts.

DAT NEW LONGEST PROGGY!

Last request please,
Could you add anti-leech?
Rocktails are dropping like hell D:

From: MotorMouse
Last request please,
Could you add anti-leech?
Rocktails are dropping like hell D:

Wait dafuq…
You Joined THIS YEAR >,<

************************ Als LRC Fisher ****************************
====================================================================
You have caught 571 fish. That equals 95 fish per hour!
You have gained 216980 xp. That equals  xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

Thanks!

From: Mew
Wait dafuq…
You Joined THIS YEAR >,<

Whats the problem with that mate?

i start the script it stops and this error shows

[Error] (43:35): Unknown identifier 'MMCX' at line 42
Compiling failed.

could you tell me how to fix it or help me through team viewer please?

i start it and it just stands there near bank, then i added the img as it says, and then the bot stops with an error as line 42.

From: N3mo
i start the script it stops and this error shows

[Error] (43:35): Unknown identifier 'MMCX' at line 42
Compiling failed.

could you tell me how to fix it or help me through team viewer please?

From: N3mo
i start it and it just stands there near bank, then i added the img as it says, and then the bot stops with an error as line 42.

All I can suggest is make sure everything is up to date and if that doesn't work you could try reinstalling Java and Simba from scratch.

Exp/hr?

From: MotorMouse
Last request please,
Could you add anti-leech?
Rocktails are dropping like hell D:

Well its leech free I assume because we don't care about the prices… it makes cooking cheaper / rocktail cheaper for PVM/PVP situations

Doesn't work for me :/
How do I put the map in the program?

From: TrueExpressions
Doesn't work for me :/
How do I put the map in the program?

you have to actually go into the simba files in simba in your desktop browser thing, then follow the instructions. (sorry about my bad explanation)

also

90-95 fishing doing this going for 99

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 262 fish. That equals 93 fish per hour!
You have gained 99560 xp. That equals xp per hour!


not my best proggy but one for the thread, another will be here when i have 99!

Fixed.

Nice script.. im almost 90 fishinig now, so will soon catch rocktails! Thank you! :)

From: Bot4Fun
Nice script.. im almost 90 fishinig now, so will soon catch rocktails! Thank you! :)

the same place as where you can DL the script, bottom of the very first posts :)

From: ekolan88
the same place as where you can DL the script, bottom of the very first posts :)

Sorry for editing my post.. lol must have done it just before u answered. I found it my self, and then i thought my post was really dumb. :)

When i try to run the script, it opens a new tab named "sps" and i get this error,

[Error] C:\Simba\Includes\sps/sps.simba(38:17): Unknown type 'T4DIntegerArray' at line 37
Compiling failed.
[Error] (38:17): Unknown type 'T4DIntegerArray' at line 37
Compiling failed.

It is this script:

*
SPS ~ SRL Positioning System
============================

Concept and original work done by marpis @ SRL-Forums.

*)

{$loadlib sps}

const
  // Path where all the SPS files are
  SPS_IMG_PATH   = IncludePath + 'SPS\img\';
  SPS_IMG_FMT    = '.png';

  // Supported SPS surfaces
  RUNESCAPE_SURFACE    = 1;
  DUNGEON_ESSENCE_MINE = 2;
  DWARVEN_MINE         = 3;
  RUNECRAFTING_ALTARS  = 4;
  DOMINION_TOWER       = 5;

type
  TSPSSurface = record
    Name, ImagePath: string;
    Constant: integer;
    FactorX, FactorY: integer; // used in SPS_LocalToGlobal
    TileOffsetX, TileOffSetY: extended; // used for tile <-> SPS conversions
    Tolerance: extended;
  end;

// SPS Global variables
var
  SPS_Loaded, SPS_Debug, SPS_Continue: boolean;
  SPS_Areas: TStringArray;
  SPS_Surface: TSPSSurface;
  SPS_Worldmap: T4DIntegerArray;

procedure SPS_DebugStr(msg: string);
begin
  if (SPS_Debug) then
    Writeln('[SPS] '+msg);
end;

// Should be called in scripts to setup SPS
// Needs to be called each time the surface changes (i.e. from runescape_surface to essence_mine)
procedure SPS_Setup(surface: integer; areas: TStringArray);
begin
  SPS_Areas := areas;

  case surface of
    RUNESCAPE_SURFACE:
      with SPS_Surface do
      begin
        Name        := 'Runescape Surface';
        ImagePath   := SPS_IMG_PATH + 'runescape_surface\';
        FactorX     := 400;
        FactorY     := 400;
        TileOffsetX := -1;
        TileOffSetY := -1;
        Tolerance   := 0.3;
      end;

    DUNGEON_ESSENCE_MINE:
      with SPS_Surface do
      begin
        Name        := 'Essence Mine';
        ImagePath   := SPS_IMG_PATH + 'essence_mine\';
        FactorX     := 400;
        FactorY     := 1;
        TileOffsetX := -1;
        TileOffSetY := -1;
        Tolerance   := 0.5;
      end;

    DWARVEN_MINE:
      with SPS_Surface do
      begin
        Name        := 'Dwarven Mine';
        ImagePath   := SPS_IMG_PATH + 'dwarven_mine\';
        FactorX     := 400;
        FactorY     := 340;
        TileOffsetX := -1;
        TileOffSetY := -1;
        Tolerance   := 0.35;
      end;

    RUNECRAFTING_ALTARS:
      with SPS_Surface do
      begin
        Name        := 'Runecrafting Altars';
        ImagePath   := SPS_IMG_PATH + 'runecrafting_altars\';
        FactorX     := 400;
        FactorY     := 400;
        TileOffsetX := -1;
        TileOffSetY := -1;
        Tolerance   := 0.5;
      end;

    DOMINION_TOWER:
      with SPS_Surface do
      begin
        Name        := 'Dominion Tower';
        ImagePath   := SPS_IMG_PATH + 'dominion\';
        FactorX     := 400;
        FactorY     := 400;
        TileOffsetX := -1;
        TileOffSetY := -1;
        Tolerance   := 0.3;
      end;
  end;

  SPS_Surface.Constant := surface;

  if (SPS_Debug) then
  begin
    SPS_DebugStr('[SPS] SPS_Surface: ' + SPS_Surface.Name);
    SPS_DebugStr('[SPS] SPS_Areas: ' + toStr(SPS_Areas));
  end;

  SPS_Loaded := false;
end;

procedure SPS_WarnUser(proc, error: string);
begin
  if (not SPS_Continue) then
  begin
    ShowMessage('SPS: ' + error + ' in ' + proc + #10+#13+#10+#13+
      'Please run Simba as an administrator by right clicking and ' + #10+#13+
      'choosing "Run as administrator."  You may also have to restart ' + #10+#13+
      'Simba a few times.  ' + #10+#13+#10+#13+'Sorry for the inconvenience.');
    TerminateScript();
  end;
end;

// Gets the map pieces that appear on the minimap
function SPS_GatherMinimap: T3DIntegerArray;
var
  bmp: TMufasaBitmap;
  c: TClient;
begin
  try
    bmp := TMufasaBitmap.Create;
    bmp.SetSize(100, 100);

    c := getTClient;
    bmp.CopyClientToBitmap(
        c.IOManager, false, 0,0, MMCX-50, MMCY-50, MMCX+50, MMCY+50
      );

    Result := SPS_BitmapToMap(bmp);
  finally
    bmp.free;
  except
    SPS_DebugStr('[ERROR] in SPS_GatherMinimap: '+ExceptionToString(ExceptionType, ExceptionParam));
    SPS_WarnUser('SPS_GatherMinimap', ExceptionToString(ExceptionType, ExceptionParam));
  end;
end;

procedure SPS_GetAreaCoords(Area: string; var x, y: integer);
var
  p: integer;
begin
  p := pos('_', Area);
  if (p <= 0) then
    // raise an exception if Area is of wrong format
    RaiseException(erCustomError, 'Invalid Area passed: ' + area);

  x := StrToIntDef(copy(Area, 1, p-1), -1);
  y := StrToIntDef(copy(Area, p+1, Length(Area)-p), -1);

  SPS_DebugStr(format('[SPS] Area coords (%d, %d)', [x, y]));
end;

// Converts a point from a map piece to a point on the entire map
function SPS_LocalToGlobal(Area: string; x, y: integer): TPoint;
var
  cx, cy: integer;
begin
  SPS_GetAreaCoords(Area, cx, cy);
  Result.x := cx * SPS_Surface.FactorX + x;
  Result.y := cy * SPS_Surface.FactorY + y;
end;

// Gets SPS ready to be used (this doesn't have to be called in scripts)
procedure SPS_Load;
var
  L, i, timer : integer;
  img: TMufasaBitmap;
begin
  timer := getSystemTime;
  L := Length(SPS_Areas);

  if (L <= 0) then
  begin
    SPS_DebugStr('[SPS] WARNING: SPS_Areas hasn''t been set');
    exit;
  end;

  if (SPS_Surface.Name = '') then
  begin
    SPS_DebugStr('[SPS] WARNING: SPS_Surface isn''t set! Using Runescape Surface as default');
    SPS_Setup(RUNESCAPE_SURFACE, SPS_Areas);
  end;

  // clean up the old one just in case, we do not want copies in wrong places.
  SetLength(SPS_WorldMap, 0);
  SetLength(SPS_Worldmap, L);

  for i := L-1 downto 0 do
  begin
    try
      img := TMufasaBitmap.Create;
      img.LoadFromFile(SPS_Surface.ImagePath + SPS_Areas[i] + SPS_IMG_FMT);
      SPS_Worldmap[i] := SPS_BitmapToMap(img);
    finally
      img.free;
    except
      SPS_DebugStr('[SPS] ERROR: SPS_Load: '+ExceptionToString(ExceptionType, ExceptionParam));
      SPS_WarnUser('SPS_Load', ExceptionToString(ExceptionType, ExceptionParam));
    end;
  end;

  SPS_DebugStr('[SPS] Maps loaded in '+ToStr(getSystemTime - timer)+'ms.');
  SPS_Loaded := True;
end;

// Returns the SPS position of the player
function SPS_GetMyPos: TPoint;
var
  Minimap: T3DIntegerArray;
  t, map, ang: integer;
begin
  Result := Point(-1, -1);

  if not LoggedIn then
    Exit;

  if not SPS_Loaded then
    SPS_Load;

  // we should just rotate the minimap according to the minimap angle.
  ang := round(rs_GetCompassAngleDegrees());
  SPS_DebugStr('[SPS] Compass Angle: '+toStr(ang));

  if (inRange(ang, 10, 350)) then
    {$IFDEF SRL5}
    ClickNorth(SRL_ANGLE_HIGH);
    {$ELSE}
    ClickNorth(True);
    {$ENDIF}

  t := getSystemTime;
  Minimap := SPS_GatherMinimap;
  if (High(Minimap) < 0) then
  begin
    SPS_DebugStr('[SPS] Did not gather Minimap.');
    Exit;
  end;

  try
    map := SPS_FindMapInMapEx(
        Result.X, Result.Y, SPS_Worldmap, Minimap, SPS_Surface.Tolerance
      );

    if ((Result.X > 0) and (Result.Y > 0)) then
    begin
      Result := SPS_LocalToGlobal(SPS_Areas[map], Result.X, Result.Y);
    end;

    SPS_DebugStr(format('[SPS] GetMyPos: Finished in %d ms. Location = %s',
        [getSystemTime - t, toStr(result)]));

  except
    SPS_DebugStr('[SPS] ERROR in SPS_GetMyPos: ' + ExceptionToString(ExceptionType, ExceptionParam));
    SPS_WarnUser('SPS_GetMyPos', ExceptionToString(ExceptionType, ExceptionParam));
  end;
end;

// Converts an SPS pos to a tile
function SPS_PosToTile(pos: TPoint): TPoint;
begin
  result := point(-1, -1);

  if (SPS_Surface.TileOffsetX = -1) then
  begin
    SPS_DebugStr('No conversion available for ' + SPS_Surface.Name);
    exit;
  end;

  result.X := round(SPS_Surface.TileOffsetX + (pos.x / 4));
  result.Y := round(SPS_Surface.TileOffsetY - (pos.y / 4));
end;

// Converts a tile to and SPS point, or "pos"
function SPS_TileToPos(tile: TPoint): TPoint;
begin
  result := point(-1, -1);

  if (SPS_Surface.TileOffsetX = -1) then
  begin
    SPS_DebugStr('No conversion available for ' + SPS_Surface.Name);
    exit;
  end;

  result.X := round((tile.x - SPS_Surface.TileOffsetX) * 4);
  result.Y := round((SPS_Surface.TileOffsetY - tile.y) * 4);
end;

// Converts a tile path to an SPS path
function SPS_TilePathToPos(tiles: TPointArray): TPointArray;
var
  i: integer;
begin
  setLength(result, length(tiles));

  for i := 0 to high(result) do
    result[i] := SPS_TileToPos(tiles[i]);
end;

// Finds position P in minimap by checking your own location
function SPS_PosToMM(P: TPoint): TPoint;
var
  MyPos: TPoint;
begin
  if not LoggedIn then Exit;
  Result := Point(-1, -1);
  MyPos := SPS_GetMyPos;
  if Distance(MyPos.X, MyPos.Y, P.X, P.Y) < 72 then
    Result := Point(MMCX + P.X - MyPos.X,
                    MMCY + P.Y - MyPos.Y);
end;

// Walks to position. If walking paths, please use WalkPath.
function SPS_WalkToPos(P: TPoint): boolean;
var
  MM: TPoint;
begin
  if not LoggedIn then Exit;
  MM := SPS_PosToMM(P);

  if (MM.X > 0) then
  begin
    Mouse(MM.X, MM.Y, 0, 0, True);
    if WaitFunc(@IsMoving, 1, 3000 + random(500)) then
      while IsMoving do
        Flag;
    Result := True;
  end;
end;

// Returns true if the point "Pt" is on the minimap
function SPS_PosOnMM(Pt: TPoint): Boolean;
var
  p: TPoint;
begin
  p := SPS_PosToMM(Pt);
  Result := rs_OnMinimap(p.x, p.y);
end;

// Walks the path "Path"; always walks to the furthest point possible
function SPS_WalkPath(Path: TPointArray): boolean;
var
  I, H, T, D: integer;
  P, MM: TPoint;
begin
  H := High(Path);
  T := GetSystemTime + 20000 + Random(5000);
  while (not Result) and (GetSystemTime < T) do
  begin
    RunEnergy(20);
    FindNormalRandoms();

    P := SPS_GetMyPos;
    for I := H downto 0 do
    begin
      MM.X := MMCX + Path[I].X - P.X;
      MM.Y := MMCY + Path[I].Y - P.Y;

      D := Distance(MM.X, MM.Y, MMCX, MMCY);

      if (D < 10) then
        break
      else begin
        if (D < 70) then
        begin
          MouseFlag(MM.X, MM.Y, 0, 0, Integer(I<>H)*15);
          T := getSystemTime + 20000 + Random(1000);
            Break;
        end;
      end;
    end;

    Result := (I = H);
  end;
end;    

Have you read the entire first post regarding the img?
There is a quote that explains about the picture, that seems to be the common problem


Click on the picture to enlarge it, then right click it to download it.
Move it into the proper folder, and hit F5 to refresh.
Restart Simba and it should work

If this had supported familiar's i would had married it and had it's babies.

Plan on running this to 99' will keep you guys updated :)

Can see how this problem should have any connection to the picture anyway? It seems to be a problem with my sps?

And i cant "download" the picture, i can only "save picture as?"

My account never got stuck and i have been running this script for 48+ hours right now.


Small proggy:

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 258 fish. That equals 108 fish per hour!
You have gained 98040 xp. That equals  xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

From: allanlin

you get banned?

Would it be possible to have it anti-banning or something while waiting for hp to get back up? It normally logs me out and then doesn't manage to realise that it is logged out. >.<

""Quote:
Originally Posted by N3mo
i start the script it stops and this error shows

[Error] (43:35): Unknown identifier 'MMCX' at line 42
Compiling failed.

could you tell me how to fix it or help me through team viewer please?
Quote:
Originally Posted by N3mo
i start it and it just stands there near bank, then i added the img as it says, and then the bot stops with an error as line 42.
All I can suggest is make sure everything is up to date and if that doesn't work you could try reinstalling Java and Simba from scratch.""



Everything is up to date, i've reinstalled java and simba several times still doesnt work.

I start the scrip (picture is in place), runescpae loads, my account is logged into world 88, the this error comes up.

Error: Exception: Access violation at line 305
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, 4]

Anybody please help.
$5 donation for your help if it works.

From: N3mo
I start the scrip (picture is in place), runescpae loads, my account is logged into world 88, the this error comes up.

Error: Exception: Access violation at line 305
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, 4]

Anybody please help.
$5 donation for your help if it works.

Did you copy paste the script og DL it to Simba?

The most common issues:
Simba SRL / SPS and so on is out of date
-Try to update everything, if not reinstall simba and run updates again

Copy pasted the script into Simba
-Download it instead

The last option could be the picture.
-Remember to left click on the small picture on the first page, when it pops up to the larger version, right click and save it (make sure to check the spelling!)


I had a few problems myself with it since im new to Simba, but doing thoose 3 steps made everything work

From: TehNeonFishy
Would it be possible to have it anti-banning or something while waiting for hp to get back up? It normally logs me out and then doesn't manage to realise that it is logged out. >.<

Are you using world 88?
If not do that, and just wear some basic armour like granite or so..
36 hours not, and i haven't been hit one time

Looks like this script has gotten alot of attention, perhaps on your top post it would be neat to post where it fishes etc, what requirements you need etc.

OMG, Great script running it for 3 hours now.

When I first ran this script and it was still very new, I kept getting killed by the orge deals, but now with the LRC miner and this fisher, It's like the old reflection days down there

Thank you so much for this script, I'll try to get a proggy to you ASAP.

Once again such an amazing script! and i will keep firing these proggy's at you!

Hey Al, just dropping by to let you know that this script is a masterpiece, :) can run for aslong as 6 hours (The Browser Timeout). I have used this bot from 90-95 fishing so far and it is great. It makes an occasional mistake, but then it loops and fixes itself right back up again. Hopefully ill try to get a screenshot of 99 for you, but I may not be around to see, again thank you for this incredible script!

Could someone please explain to me how you're supposed to add the picture correctly? I can't even find Simba/Includes/…

From: Athymy
Could someone please explain to me how you're supposed to add the picture correctly? I can't even find Simba/Includes/…

Should be in your "C drive" aka the harddisk, open that by "my computer"
There's a simba case, and just follow the directions from there on.

If not reinstall simba and make sure you know where it's installed

Just experienced something new:
When there's still fish at fishing spot 1, it runs to fishing spot 2 for no reason?

Eko, I have experianced this aswell. This is really no biggie at all the script still runs fine its probably just a failsafe incase the spot were to dissapear and also to stop you from going inactive and getting auto logged out by Runescape.

Lol i died with 4,2k minerals i dont blame you! just come here to warn the people that to not take all the minerals with you, you might die.

From: Bob The Cat
Lol i died with 4,2k minerals i dont blame you! just come here to warn the people that to not take all the minerals with you, you might die.

I haven't died once, also if you dont feel safe, bring a ring of life.

From: vengeofw71
I haven't died once, also if you dont feel safe, bring a ring of life.

I do feel save but currently not taking more then 2k minerals with me.


E: Still love this script.

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 383 fish. That equals 101 fish per hour!
You have gained 145540 xp. That equals  xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

My script just runs to one cavefishing shoal, fishes it until the shoal dissappears, then the bot just stands there. It wont walk to any other cavefish shoals.

From: Cujjoz
My script just runs to one cavefishing shoal, fishes it until the shoal dissappears, then the bot just stands there. It wont walk to any other cavefish shoals.

Are you starting it at the bank pulley?

Awesome script man. So far has gotten me 91-98 fishing, at this rate i'll be 99 in the next couple of days :)

Compiling failed.
[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600

Edit: Fixed that line, but the bot used to work for me, now it just stands at the bank. Eventually saying moving to spot 2… But never left bank lol

From: alevere4
Are you starting it at the bank pulley?

Yep.

Exception in Script: Plugin(libsmart32) has not been found

What does this mean?

Ok so I fixed the plugin issue wasn't easy I had to try and figure it out before realising I just needed to manually update it. Anyways Now the script will actually start up, an I start at the pulleys I have the thumbnail in the correct place. I used the script then I got messed it up somehow so I have reinstalled simba. Now I start at the pulley an it tilts the screen up has the Good luck mesage. But it never moves to the fishingspots. Im in fixed min setting max brightness. If I manually move it to fish spot one it will do its job until full inv. Then It will click far west to fishing spot 3 by the wall and click the rocktail over an over trying to use it on something? lol Help please

Edit: So I just figured it out. Thank god no one ever replies to my post =p. Thanks anyways

Hey guys! I keep getting the:

[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600

I'm running win xp and my picture is saved in C:\Simba\Includes\SPS\img\RUNESCAPE_OTHER and picture is named: "custom_lrc". I run the script and I keep getting this error. I'm pretty sure I'm not an idiot. What am I doing wrong?

From: kozak94
Hey guys! I keep getting the:

[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600

I'm running win xp and my picture is saved in C:\Simba\Includes\SPS\img\RUNESCAPE_OTHER and picture is named: "custom_lrc". I run the script and I keep getting this error. I'm pretty sure I'm not an idiot. What am I doing wrong?

Did you enlarge en img before downloading it?
If yes, try removing Simba and update everything again. :)

SPS_GetArea ERROR: Exception: Error while reading stream: File "C:\Simba\Includes\SPS\img\runescape_other\custom_lrc.png" does not exist
Current player: Tjmacgregor
Error: Exception: Access violation at line 305
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, 4]

what do i do..??

From: basebalguys
SPS_GetArea ERROR: Exception: Error while reading stream: File "C:\Simba\Includes\SPS\img\runescape_other\custom_lrc.png" does not exist
Current player: Tjmacgregor
Error: Exception: Access violation at line 305
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, 4]

what do i do..??

Probably wouldn't hurt to read the very first post.

For the first time i also died tonight for some reason, but that's about the only problem i've had with it :)
But one death and i've gotten from 90-94 flawlessly so far, can't complain :D

Download the picture to your desktop (fullsize)
Then type C:\Simba into your documents file in the address bar at the top.
It will open and then follow the rest of the insstructions on the forum.

For everyone still struggling, just hit 98 fishing will post at 99!

From: pker x414
Download the picture to your desktop (fullsize)
Then type C:\Simba into your documents file in the address bar at the top.
It will open and then follow the rest of the insstructions on the forum.

For everyone still struggling, just hit 98 fishing will post at 99!

Adding this to the first post as well! Thanks for helping people out.

=================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 316 fish. That equals 95 fish per hour!
You have gained 120080 xp. That equals  xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

Omg 90-95 so far awesome script!!!

From: pker x414
Download the picture to your desktop (fullsize)
Then type C:\Simba into your documents file in the address bar at the top.
It will open and then follow the rest of the insstructions on the forum.

For everyone still struggling, just hit 98 fishing will post at 99!

I've actually done this and it still has the debug lines:

[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600
Compiling failed.

I'm using SPS 1.0, is it only compatible with 2.0?

there is not a runescape_other folder could u add me on msn or make a vid showing how to get this script to work
[email]rsmaxlevels@hotmail.com[/email]

rocktail fisher

From: MaxLevel
there is not a runescape_other folder could u add me on msn or make a vid showing how to get this script to work

Have you downgraded SPS at any point? if not I don't think you have followed the bot setup procedure properly

Its a really, really good script man.
But just take a look of what you have done:
That is the price for living mineral, you can only buy it for 600gp+
Could you also please, or someone else create a creature miner script?
So the prices gets a bit lower?

Gonna try again:
Reinstall Simba, update everything and read the last 3 pages of this Thread.

From: MotorMouse
Its a really, really good script man.
But just take a look of what you have done:
That is the price for living mineral, you can only buy it for 600gp+
Could you also please, or someone else create a creature miner script?
So the prices gets a bit lower?

I believe they've just crashed.

From: ashihtaka
I've actually done this and it still has the debug lines:

[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600
Compiling failed.

I'm using SPS 1.0, is it only compatible with 2.0?

From: MaxLevel
there is not a runescape_other folder could u add me on msn or make a vid showing how to get this script to work
[email]rsmaxlevels@hotmail.com[/email]

rocktail fisher

Both of you need to upgrade to SPS 2.0. Should be easy to find a thread on how to do it somewhere here on the forums!

From: MotorMouse
Its a really, really good script man.
But just take a look of what you have done:
That is the price for living mineral, you can only buy it for 600gp+
Could you also please, or someone else create a creature miner script?
So the prices gets a bit lower?

Price swings are unfortunately a side effect of releasing a heavily desired public script here on Villavu. I personally don't have time to make a mineral miner but maybe someone on here will. Sorry!

Hey,

Just a quick question, are you able to put summoning support in later?
Like ibis, granite lobster etc. that invisible boost really helps ^_^.

Very nice script by the way!

~Mayx

From: mayx
Hey,

Just a quick question, are you able to put summoning support in later?
Like ibis, granite lobster etc. that invisible boost really helps ^_^.

Very nice script by the way!

~Mayx

I have honestly never even used a single summoning skill :redface: I have gotten to level 48 summoning by using all exp lamps and random rewards I get on the skill. I might eventually add support for it, but that is not any time soon.

From: alevere4
I have honestly never even used a single summoning skill :redface: I have gotten to level 48 summoning by using all exp lamps and random rewards I get on the skill. I might eventually add support for it, but that is not any time soon.

Thanks dude, I love you. I had a 32 hour proggy but my computer gave me the blue screen >,<

I still have like so many minerals left! :D

To be honest, we're not really the ones causing the prices to crash, There way more injection botters at LRC.

From: Bob The Cat
To be honest, we're not really the ones causing the prices to crash, There way more injection botters at LRC.

Oh, I wasn't aware there was any public injection bots for LRC. I just know I have seen a slow, but constant decrease in raw rocktail prices since I made this public. I hadn't even thought to look at mineral prices, but clearly they have been on the rise as well haha.

Had I been smarter, I would have bought up minerals before I made it public then sold them now ;)

From: alevere4
Oh, I wasn't aware there was any public injection bots for LRC. I just know I have seen a slow, but constant decrease in raw rocktail prices since I made this public. I hadn't even thought to look at mineral prices, but clearly they have been on the rise as well haha.

Had I been smarter, I would have bought up minerals before I made it public then sold them now ;)

Haha i see your a merchanter :P just write another script as in high demand as this and go ahead. I challenge you :D

I bought all the living minerals to get me 99 at the start!
When they were 350gp! 500k xp to 99 :)!

From: alevere4
I have honestly never even used a single summoning skill :redface: I have gotten to level 48 summoning by using all exp lamps and random rewards I get on the skill. I might eventually add support for it, but that is not any time soon.

Ahh no worries hehe, at the moment I just summon manually and it keeps on fishing even with the pouches in my inventory :smile:.

About the minerals, I'm sure it's not only your script that has crashed the rocktail prices and risen the minerals prices, as someone said there's injection bot too.
And the minerals are really easy to get with a combat of about 100+, it's even a new money making way ;).

~Mayx

I have just updated to sps2 but still gets this error:

[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600
Compiling failed.

And i am pretty sure i saved it the right place.



Is this the right place? Right dimensions? Right size?

Did you enlarge it before download?
We can't tell if it's the right size from that picture you uploaded :)
If you did try closing everything and open it again

it says in the bottom of the uploaded pic its 500x500?

yes, i clicked the picture.

My computer is on another language, so i dont see any "download" button. Only a save picture as? In my language "Gem billede som"

9K+ minerals to go then im 99 fishing thanks to this script :D



E: 500K to 97!

Proggy, epic script!

I deleted simba and reinstalled it to fix a problem for another script. Now, i have problems with this script which was working before.


Could someone help me? :o

making a steady 200k+ an hour great script :D

P.S. it is definately worthwhile to babysit the script a little bit and see if you can loot off of other dead bots when they get owned by the living rocks, gotten about 3.5k living minerals this way

From: Bot4Fun
I have just updated to sps2 but still gets this error:

[Error] (601:13): Unknown identifier 'RUNESCAPE_OTHER' at line 600
Compiling failed.

And i am pretty sure i saved it the right place.



Is this the right place? Right dimensions? Right size?

Havde ikke set du var dansk :)
Men jeg ved ikke meget om scripts, men hvis du har afinstalleret Simba også geninstalleret det. Opdateret alt igen.
Derefter ser det ud til du har gjort det rigtigt med billedet, både størrelse og location.
Har du sat dine game grafik til minimum med maksimum lys?
Står du ved "pully"/banken når du starter scriptet?

From: AusKingdom
I deleted simba and reinstalled it to fix a problem for another script. Now, i have problems with this script which was working before.


Could someone help me? :o

Have you tried to read the last 3-4 forum pages?
Would be neat if you could do that and see what error's people got, and what helped the others.

But:
If you updated everything (including simba?)
Then made sure the map is enlarged before you right clicked and saved it?
Checked the file name and location
Checked if you filled everything out right, or downloaded the script again incase you messed something up?

I don't know jack-peep out scripts, but i can only tell what 9/10 error's is caused by

300k to 98 fishing !!!

Might try this to get myself 20m Fishing xp, but fishing is easy enough to legit at LRC.

Thanks for getting me 99 from 90 with this script. Forgot screen though ^^

The cavefish fishing is really, really buggy. I know this isn't a major concern for you as not many people use it, but it would certainly be a great help if you fixed it.

this doesnt bank for me? it goes to the deposit box and just clicks the minimap infinitely until I fix it..

From: bslaya
this doesnt bank for me? it goes to the deposit box and just clicks the minimap infinitely until I fix it..

It isn't finding the deposit box so it is clicking on the bank symbol then looking for it again so it just stays in that loop. If your settings are correct then the deposit box colors may have changed. I will look into it this evening. If it is working for anyone else please let me know!

From: alevere4
It isn't finding the deposit box so it is clicking on the bank symbol then looking for it again so it just stays in that loop. If your settings are correct then the deposit box colors may have changed. I will look into it this evening. If it is working for anyone else please let me know!

My settings are definitely correct, it fishes fine but I receive the error above.

From: bslaya
My settings are definitely correct, it fishes fine but I receive the error above.

Sounds like the deposit box colors have changed. I'll look into it this evening.

Have been using this script a while, got my main from 90-98 so far. I started also lvling my pure with this scrip but it murders my cpu usuage due to having two simbas opened. Can you help me add multiplayer support for one more char. I tried it but came up with all sorts of compiling errors.

Can someone tell me what i'm doing wrong? This script use to work for me before i deleted simba and reinstalled it. I enlarged the image beforehand and saved it in the correect folder. Am i missing anything?

From: vengeofw71
I had the same issue as you before. Apparently this is what you have to do.

First you click on the pic on the first page to enlarge it. Then you dl it and move it to the folder that he specified. Otherwise the picture in the png will appear small and your char wont move L

Oh hell, I was trying to figure this out for about a week and I couldn't figure out. Your advice was perfect! thanks for posting it.

SPS_GetArea ERROR: Exception: Error while reading stream: File "C:\Simba\Includes\SPS\img\runescape_other\custom_lrc.png" does not exist
Current player: *********@Gmail.Com
Error: Exception: Access violation at line 305
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, 4]
I got this error, i blocked out the email :o
What do i do?

From: bottingisforcoolpeople
SPS_GetArea ERROR: Exception: Error while reading stream: File "C:\Simba\Includes\SPS\img\runescape_other\custom_lrc.png" does not exist
Current player: *********@Gmail.Com
Error: Exception: Access violation at line 305
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, 4]
I got this error, i blocked out the email :o
What do i do?

Read the OP and follow the instructions?
Seriously, read the error code as well, the problem's in plain sight ._.

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 468 fish. That equals 92 fish per hour!
You have gained 177840 xp. That equals xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================
:P nice script

I've deleted java7 because the pop-up problem is really annoying
Then i've randomly got this problem: Error: Exception: Access violation at line 101 at SMART
What?

From: MotorMouse
I've deleted java7 because the pop-up problem is really annoying
Then i've randomly got this problem: Error: Exception: Access violation at line 101 at SMART
What?

That is a Java related error. You said you deleted 7, I assume you still have an older version right?

Great script!

Although when it looks for the bank it always hovers over the stack of bags(? I haven't looked closely at them, I just go down rope and start up the bot, lol). Besides that great script! Could run it forever if I didn't get randoms :p

Bot is broken right now.
I updated to 0.99 and now its not working
Please fix!

Edit: NVM: It just started working!

EDIT 2: Seems to be a SMART manager problem!

Thank You Sir!

Anyone know how to fix it?:fiery::fiery:

good thing i know how to read. fixed my own problem. thanks.

From: suffrage
Anyone know how to fix it?:fiery::fiery:

Have you solved this issue yet? Would love for you to post it if you have. Would help others out if they experience the same problem.

I set up mine like the ts suggested

i copyed the image to runescape_other,
when i start it at deposit box or at fishing spot it does nothing.
no debug nothing.. any idea?

From: chuckyb0y
I set up mine like the ts suggested

i copyed the image to runescape_other,
when i start it at deposit box or at fishing spot it does nothing.
no debug nothing.. any idea?

Sounds like the map is saved incorrectly or your SPS is not up to date.

Man I stop running this script for a few days and when I try it's not running for me. The script compiles without any issues but then it just sits at the login screen forever. I see the red dot slightly above the login line. Eventually it puts in the name but not the password. when I look in the console I get the following

formWriteln: 'One minute has passed… Debug: 932'
SMART Disabled
Replacing Canvas Drawing Surface
Disabeling Events
Starting Image Transfer
SMART Enabled
Transfer Thread Entered

If I manually log in the script will write my name and attempt to write my password on screen.

BTW I still think that this script is great! ! For everyone that's talking about how expensive lving minerals are getting just remember that the rockfish still sell for a lot more so you are still positive on the cash flow.

SMART is done for the time being because of update.
http://villavu.com/forum/showthread.php?t=86107&page=11

From: rsplayer001
Man I stop running this script for a few days and when I try it's not running for me. The script compiles without any issues but then it just sits at the login screen forever. I see the red dot slightly above the login line. Eventually it puts in the name but not the password. when I look in the console I get the following

formWriteln: 'One minute has passed… Debug: 932'
SMART Disabled
Replacing Canvas Drawing Surface
Disabeling Events
Starting Image Transfer
SMART Enabled
Transfer Thread Entered

If I manually log in the script will write my name and attempt to write my password on screen.

BTW I still think that this script is great! ! For everyone that's talking about how expensive lving minerals are getting just remember that the rockfish still sell for a lot more so you are still positive on the cash flow.

From: Bennigan
SMART is done for the time being because of update.
http://villavu.com/forum/showthread.php?t=86107&page=11

Yep. The last update has messed up Smart for the time being. You can scroll through the thread that Bennigan posted and see that many people are working hard to get a fix out for the community. If you get the chance, stop by the thread and give them a big thank you!

From: alevere4
Yep. The last update has messed up Smart for the time being. You can scroll through the thread that Bennigan posted and see that many people are working hard to get a fix out for the community. If you get the chance, stop by the thread and give them a big thank you!

First of all the script is broken for SMARTManager on .99

Can you try to see if you can fix that?

I think I will test it after the smart has been updated back. I still not figure my problem yet.
The script has stopped automatically after clicking on "bait rocktail".

Latest Simba with up to date SRL/SPS etc..

There's two problems with the paintsmart function

procedure SMART_SetupDebug();
begin
  SmartSetDebug(True);
  SMART_Canvas := TBitmap.Create;
  SMART_Canvas.canvas.handle := SmartGetDebugDC;
  SMART_DebugSetup := true;
end; 

[Error] C:\Simba\Includes\SRL/SRL/misc/paintsmart.simba(41:33): Unknown identifier 'SmartGetDebugDC' at line 40
Compiling failed.

–

procedure SMART_ClearMS;
begin
  SMART_ClearCanvasArea(MSBox);
end;   

[Error] C:\Simba\Includes\SRL\SRL\misc\paintsmart.simba(135:25): Unknown identifier 'MSBox' at line 134
Compiling failed.


This one leads to drawboxMS & drawline issues further down the line

I'm having the same exact problem :/
would love it if someone could help…

From: shams1485
I'm having the same exact problem :/
would love it if someone could help…

Getting moved back into my apartment for college so I have been a little busier with that and just the social aspect of being back in a college town. I think I should have the time to get this working with the newest Simba and Smart sometime tomorrow. Thanks for being patient guys.

From: iBlank
Getting moved back into my apartment for college so I have been a little busier with that and just the social aspect of being back in a college town. I think I should have the time to get this working with the newest Simba and Smart sometime tomorrow. Thanks for being patient guys.

Take your time, I'm still 80 fishing ;), gonna be using this script by the time I reach 90 though, so you better have it ready by then! Jk lol. I can probably fix it myself anyways

thanks iBlank. I appreciate your efforts to help the community :D

decided to look over the code on what needs fixing to work…

Beginning of the code changed to this:

{$DEFINE SMART}
{$i SRL/srl.simba}
{$i sps/sps.simba}
{$i srl/srl/skill/fighting.simba}
{$I SRL/SRL/MISC/SMARTGRAPHICS.SIMBA}   

And the beginning of the mainloop(ending of the coding) to this:

Begin;
  ClearDebug
  MouseSpeed := RandomRange(18,23);
  SRL_SIXHOURFIX := TRUE;
  SMART_FIXSPEED := TRUE;
  SetupSRL;  

Then in the middle of the coding, where its the Canvas part this:

{ Canvas := TCANVAS.Create;
  Canvas.Handle := SmartGetDebugDC;
  DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
  DrawBitmap(Pic2, Canvas, 100,10);
  FreeBitmap(Pic);
  FreeBitmap(Pic2);}  

I had saw earlier when they had done the fixing, the canvas coding can be commented out, it shouldn't affect the running script - but if you want it fixed you can see Brandons post which explains how to do it: http://villavu.com/forum/showthread.php?t=84334

Then the rest, if something is off when clicking(as in not clicking where it needs to) then that means every single "Y" coordinate in the code needs to be changed with +50 pixels. Sorry I didn't ran the script (it did compile successfully) to see if it works but this is my assumption on how it needs to be to work.

I'm trying to use this script but it keeps opening up another tab when i hit run and the tabs name is "paintsmart" and it keeps showing this

[Error] C:\Simba\Includes\SRL\SRL\misc\paintsmart.simba(41:3): Unknown identifier 'SmartSetDebug' at line 40
Compiling failed.

Help please, i have 17m in living minerals…kinda need to fish lol

Blinkblink I am Finding it hard to understand were you are saying to put the 2nd bit of text are you able to put it in the code and reupload or put it in a way i can understand :/ sorry

From: PvP THC
I'm trying to use this script but it keeps opening up another tab when i hit run and the tabs name is "paintsmart" and it keeps showing this

[Error] C:\Simba\Includes\SRL\SRL\misc\paintsmart.simba(41:3): Unknown identifier 'SmartSetDebug' at line 40
Compiling failed.

Help please, i have 17m in living minerals…kinda need to fish lol

Err, did you even read any of this thread at all? Specifically the post right above yours..

If you for some reason can't follow that post, then here's the link to the main script updating thread:

http://villavu.com/forum/showthread.php?t=84334

Ok to save people from getting pm's and to save the thread from unnecessary questions I will post the script in compiled form Note** it may not work you will have to test it yourselves but it will compiile….

I have recieved Als permission to post so yea. Here it is as it is a popular script and Al will updae it completely in a bit:)

Program Als_LRC_Fisher;
{$DEFINE SRL5}
{$DEFINE SMART}  // Edit this line out to rn the script in your browser.
{$i SRL/srl.simba}
{$i sps/sps.simba}
{$i srl/srl/skill/fighting.simba}
{$I SRL/SRL/Misc/SmartGraphics.Simba}

//////////////////////// Fill The Variables Below In \\\\\\\\\\\\\\\\\\\\\\\\\\\

Const
WTRA         = 550;  // Enter how low health can go before resting. Must be at least 50 below your maximum health.
FishTimer    = 5000; // Do NOT touch this variable.
World        = 88;   // Enter world you want to fish in.
PP           = '';   // Enter your pin here.
OnScreenProg = 0;    // 0 for an On Screen Report or 1 for no On Screen Report.
FishValue    = 2235; // Enter current price of the fish you are catching.
FishType     = 0;    // 0 to catch Rock Tails and 1 to catch Cave Fish.
Crashing     = True; // True if you are using SMART Manager or Crash Smart. False if not.

SRLStats_User     = ''; /// SRL Stats Username.
SRLStats_Password = ''; /// SRL Stats Password.


/////////////////////////////// NO Touchy \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Var
x,y,RFish,CFish,bankbox,FC,Fish_Caught,Fish_XP,XP,FPH,TimeGone,P: Integer;
fshield,fdamage,fvalue: Integer;
FishCaught,FishXP,Info1,Info2,Info3,Info4,XPPH2,FPH2,FFC,FVN: String;
ToFish,ToBankBox,FSpot1,FSpot2,FSpot3,Restart,RunAwayN: TPointArray;

////////////////////////// Fill In Log In Info \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  Players[0].Name :='';     // Enter your username here.
  Players[0].Pass :=''; // Enter your password here.
  Players[0].Nick :='';    // Enter nickname for progres report.
  Players[0].Active:=True;
  Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins'];
  Players[0].WorldInfo := [False, World];
End;

////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
///////////////////////DO NOT TOUCH ANYTHING PAST HERE \\\\\\\\\\\\\\\\\\\\\\\\\
////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure AntiBan;
Begin
  Case Random(500) Of
    100: SleepAndMoveMouse(500);
    200: PickUpMouse;
    300: RandomMovement;
    400: HoverSkill('Fishing',False);
    500: CompassMovement(45,90,true);
  End;
End;

Procedure IfRandoms;
Begin
  FindNormalRandoms;
  AntiBan;
End;

Procedure PrintOnSmart(TP: TStringArray; Placement: TPoint; Colour: integer);
Var
  mx, my, Pic, Pic2, I, B, H, TPH, Numb: Integer;
  TTP: TPointArray;
  Canvas: TCanvas;
Begin
  SmartSetDebug(True);
  GetClientDimensions(mx, my);
  Pic  := BitmapFromString(mx, my, '');
  Pic2 := BitmapFromString(360,71,'me');
  TPH := High(TP);
  For I := 0 To TPH Do
  Begin
    TTP := LoadTextTPA(TP[i], SmallChars, H);
    For B := 0 To High(TTP) Do
    Begin
      Numb := ((I + 1) * 13);
      FastSetPixel(Pic, TTP[b].x + 1, TTP[b].y + Numb + 1,8388736);
      FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
    End;
  End;
  Canvas := TCANVAS.Create;
  //Canvas.Handle := SmartGetDebugDC;
  DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
  DrawBitmap(Pic2, Canvas, 100,10);
  FreeBitmap(Pic);
  FreeBitmap(Pic2);
end;

Procedure OnScreenUpdate;
Begin
  Begin
    SRLRandomsReport;
    Stats_Commit;
    IncEx(Fish_Caught, FC);
    IncEx(Fish_XP, XP);
    TimeGone   := (GetTimeRunning/1000);
    FishCaught := IntToStr(Fish_Caught);
    FishXP     := IntToStr(Fish_XP);
    FValue     := (Fish_Caught*FishValue);
    FVN        := IntToStr(FValue)
    FPH        := (3600*(Fish_Caught))/((TimeGone));
    FPH2       := IntToStr(FPH);
    Info1      := ('Fish Caught = ' + FishCaught)
    Info2      := ('Fising XP = ' + FishXP)
    Info3      := ('Fish Per Hr = ' + FPH2)
    Info4      := ('Money Made = ' + FVN)
  End;

  If (OnScreenProg=0) Then
    Begin
      PrintOnSmart(['Last banked at '+(TheTime)],Point(15,210),296906);
      PrintOnSmart([('Time script has run ')+MsToTime(GetTimeRunning,Time_Bare)],Point(15,240),296906);
      PrintOnSmart([Info1+' so '+Info3],Point(15,270),296906);
      PrintOnSmart([Info2+' and '+Info4],Point(15,300),296906);
    End;

  Begin
    Writeln('');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('You have caught ' + FishCaught + ' fish. That equals ' + FPH2 + ' fish per hour!');
    Writeln('You have gained ' + FishXP + ' xp. That equals ' + XPPH2 + ' xp per hour!');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('');
  End;
End;

Procedure SetDTMs;
Begin
  RFish    := DTMFromString('mrAAAAHic42BgYMhmYmDIBOJCIK4C4iIgzgHiRCCOBeLnQDV3gfgWlH4LxJ+B+AMQvwBij2APIMmEE3MBSXyYkQCGAQD1rAvw');
  CFish    := DTMFromString('mrAAAAHic42BgYLBlYmCwAmJXIPYHYg8gdgJiCyC2B2IORqAiKGYGYm4gFgJiFiD+BxRevLwASDLhxPwM+AEjAQwDAIoYBTU=');
  BankBox  := DTMFromString('mggAAAHicY2NgYDgJxKeheA8QbwPie0C8AIhboGJNQLwTiGcAcU91HENyuDNDWbITQ060LUNRggNDYqgjAz9QDhtmxIEhAABB1g9T');
  FShield  := DTMFromString('mrAAAAHic42BgYOAFYgEg5gdiHiBmB2I+IGaBijECMRMQs0LlQOJcUBqkl9XUCS8mBBgJYBgAAK0nBH8=');
  FDamage  := DTMFromString('mbQAAAHicY2VgYNBmhGAdINYDYn0glgZiBSBWBmI5IJYA4nQ2NoYEPj4wns3DA6a5gPrRMSMWDAYAIPEEVA==');
End;

Procedure FreeDTMSet;
Begin
  FreeDTM(RFish);
  FreeDTM(CFish);
  FreeDTM(BankBox);
  FreeDTM(FShield);
  FreeDTM(FDamage);
End;

Function HPLevel: Integer;
Var
ColourString: String;
Begin
  Result:= GetMMLevels('HP', ColourString);
End;

Procedure AllMyPaths;
Begin
  ToFish     := [Point(303, 303), Point(307, 323), Point(279, 363), Point(249, 404)];
  ToBankBox  := [Point(147, 379), Point(191, 379), Point(231, 387), Point(279, 379), Point(303, 335), Point(307, 299), Point(287, 287)];
  RunAwayN   := [Point(185, 385), Point(235, 385), Point(275, 370), Point(305, 330), Point(288, 287)];
  FSpot1     := [Point(247, 407)];
  FSpot2     := [Point(183, 400)];
  FSpot3     := [Point(150, 380)];
  Restart    := [Point(180, 395), Point(220, 395), Point(251, 395)];
End;

Procedure HealthCheck;
Begin
  If HPLevel < (WTRA) Then
    Begin
      If (Not FindSymbolIn(x,y,'Bank',600,60,640,100)) Then SPS_WalkPath(ToBankBox);
      Writeln('Resting until hp gets back up!');
      setrest;
        Repeat;
          If (Not LoggedIn) Then LoginPlayer;
          wait(randomrange(1500,2500));
          AntiBan;
        Until HPLevel > (WTRA + random(49));
    End;
End;

Procedure ToFishing;
Begin
  HealthCheck;
  SetRun(True);
  MakeCompass('n');
  SPS_WalkPath(ToFish);
  While isMoving Do
  wait(100+random(50));
  IfRandoms;
End;

Function FindPulley(x, y: Integer): Boolean;
Var
  CTS, I: Integer;
  TPA: TPointArray;
  ATPA: Array of TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.05, 0.18);
  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 6521492, MSX1, MSY1, MSX2, MSY2, 3);
  ColorToleranceSpeed(CTS);
  ATPA := TPAToATPAEx(TPA, 60, 60);

  For I := 0 To High(ATPA) Do
  Begin
    MiddleTPAEx(ATPA[i], x, y);
    MMouse(x, y, 0, 0);
    If(WaitUpTextMulti(['dep','osit','pul','ull','ley','lif','ift'],500)) Then
    Begin
      Result := True;
      GetMousePos(x, y);
      Break;
    End;
  End;
End;

Procedure Banking;
Begin
  If (FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Or FindDTM(CFish,x,y,MIX1,MIY1,MIX2,MIY2)) Then
    Begin
      If (FindPulley(X,Y)) Then
        Begin
          If FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Then FC  := CountItems('dtm', RFish, []) Else FC  := CountItems('dtm', CFish, []);
          XP  := (FC*380);
          FFC := IntToStr(FC);
          Writeln('Trying to bank ' + FFC + ' fish!');
          OnScreenUpdate;
          ClickMouse2(True);
          Wait(RandomRange(2250,2750));
          If PinScreen Then InPin(PP);
          Wait(RandomRange(1000,1250));
          If (FindDTM(RFish, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(CFish, x, y, MSX1, MSY1, MSX2, MSY2)) Then
            Begin
              Mouse(x,y,3,3,False);
              Wait(RandomRange(700,850));
              ChooseOption('ll');
              ToFishing;
            End Else ToFishing;
        End Else
        Begin
          SymbolAccuracy := 0.35
          FindSymbol(x,y,'bank');
          Mouse(x,y,0,0,true);
          Wait(RandomRange(1000,1300));
          SymbolAccuracy := 0.80
          Banking;
        End;
    End Else ToFishing;
End;

Procedure ToBank;
Begin
  SetRun(True);
  MakeCompass('N');
  SPS_WalkPath(ToBankBox);
  While isMoving Do wait(100+random(50));
  IfRandoms;
  Banking;
End;

Procedure RunAwayNow;
Begin
  SetRun(True);
  MakeCompass('n');
  Writeln('Fight detected. To the bank!');
  SPS_WalkPath(RunAwayN);
  While isMoving Do wait(100+random(50));
  Writeln('Banking, then returning to fish!');
  Banking;
  IfRandoms;
End;

/// Credits to putonajonny ///
Procedure CheckFight;
Var
 i: integer;
Begin
  If Not InFight Then Exit;
  WriteLn('Checking for fight....');
  For i := 0 To 7 Do
  Begin
    If (FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    Begin
      RunAwayNow;
      Exit;
    End;
    Wait(200+Random(50));
  End;
  WriteLn('No fight detected.');
End;

Function PColor: Integer;
Var
  arP: TPointArray;
  arC: TIntegerArray;
  tmpCTS, i, arL: Integer;
  X, Y, Z: Extended;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 1.00);

  FindColorsSpiralTolerance(MSCX, MSCY, arP, 859691, MSX1, MSY1, MSX2, MSY2, 2);
  If (Length(arP) = 0) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  arC := GetColors(arP);
  ClearSameIntegers(arC);
  arL := High(arC);

  For i := 0 to arL Do
  Begin
    ColorToXYZ(arC[i], X, Y, Z);

    If (X >= 1.12) And (X <= 2.02) And (Y >= 1.07) And (Y <= 1.93) And (Z >= 0.45) And (Z <= 0.74) Then
    Begin
      Result := arC[i];
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
End;

Function IsFishing: Boolean;
Var
  CTS: Integer;
  TPA: TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  Begin
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.07, 0.75);
    FindColorsSpiralTolerance(x, y, TPA, PColor, 245, 130, 285, 195, 3);
    ColorToleranceSpeed(CTS);
    result := (Length(TPA) > 0);
    If result Then
      Exit;
  End;
End;

Procedure FishingWait;
Var
  T: Integer;
Begin
  Marktime(T);
  Repeat
    CheckFight;
    If IsFishing Then
      Marktime(T);
    If (InvCount=28) or (FindNPCChatText('carry',Nothing)) Then
      Begin
        WriteLn('All full. Time to bank the fish!');
        ToBank;
      End;
    AntiBan;
    IfRandoms;
  Until(TimeFromMark(T) >= (FishTimer+(RandomRange(300,600))));
  Exit;
End;

Function FindFishingSpot(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 to arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('ockt', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    Exit;
  End;

  GetMousePos(fx, fy);
End;

Function FindFishingSpotC(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 To arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('vefis', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    //Writeln('No Rocktail spot found. Relocating....');
    Exit;
  End;

  GetMousePos(fx, fy);
end;

Procedure StartFishing;
Var
  X,Y: Integer;
Begin;
  CheckFight;

  If (Not FindSymbol(x,y,'fish')) Then ToFishing;

  If (FishType=0) Then
  Begin;
    If (FindFishingSpot(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;
    If Not (FindFishingSpot(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

  If (FishType=1) Then
  Begin;
    If (FindFishingSpotC(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;

    If Not (FindFishingSpotC(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

IfRandoms;
End;

Procedure Relocate;
Begin;

  SymbolAccuracy := 0.40;
  MarkTime(P);
  Repeat;
  If InvFull or (FindNPCChatText('carry',Nothing)) Then
    Begin
      WriteLn('All full. Time to bank the fish!');
      ToBank;
    End;

  If FindSymbolIn(x,y,'Fish',620,30,750,120) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Fish',575,85,635,125) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 3...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot3);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Mine',605,60,640,90) Then
    Begin
      HealthCheck;
      WriteLn('Back to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      If (FindFishingSpot(X, Y)) Then
        Begin
          SymbolAccuracy := 0.80;
          StartFishing;
        End Else
        Begin
          HealthCheck;
          Writeln('Back to spot 1...');
          SPS_WalkPath(FSpot1);
          SymbolAccuracy := 0.80;
          StartFishing;
        End;
    End;
  Until (TimeFromMark(P) >= 5000)

  IfRandoms;
End;

Procedure MainLoop;
Begin
  If Not (LoggedIn) Then Exit;
  SetDTMs;
  MakeCompass('n');
  SetAngle(0);
  ToFishing;
  StartFishing;
  Relocate;
  FreeDTMSet;
End;

Begin;
  ClearDebug
  MouseSpeed := RandomRange(18,23);
    {$IFDEF SIMBAMAJOR980}//<--- THIS
  Smart_Server := 0;
  Smart_Members := False;
  Smart_Signed := True;
  Smart_SuperDetail := False;
  {$ELSE}//<--- THIS
  SRL_SIXHOURFIX := TRUE;
  SMART_FIXSPEED := TRUE;
  {$ENDIF}
  SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);
  SetupSRLStats(1135, SRLStats_User, SRLStats_Password);
  ActivateClient;
  DeclarePlayers;
  LoginPlayer;
  SMART_ClearCanvas;
  wait(1000);
  PrintOnSmart(['A progress report will appear after banking. Good luck!'],Point(15,300),65674);
  AllMyPaths;
  If (Crashing = True) Then
    Begin
      SPS_WalkPath(ToBankBox);
      Wait(500+Random(500));
      Flag;
    End;
  Repeat;
    Mainloop;
  Until(AllPlayersInactive);
  SMART_ClearCanvas;
  OnScreenUpdate;
End.  

for anyone getting that error, just wait until al updates the script, or do what the people above told u to

From: kevin33
Ok to save people from getting pm's and to save the thread from unnecessary questions I will post the script in compiled form Note** it may not work you will have to test it yourselves but it will compiile….

I have recieved Als permission to post so yea. Here it is as it is a popular script and Al will updae it completely in a bit:)

Program Als_LRC_Fisher;
{$DEFINE SRL5}
{$DEFINE SMART}  // Edit this line out to rn the script in your browser.
{$i SRL/srl.simba}
{$i sps/sps.simba}
{$i srl/srl/skill/fighting.simba}
{$I SRL/SRL/Misc/SmartGraphics.Simba}

//////////////////////// Fill The Variables Below In \\\\\\\\\\\\\\\\\\\\\\\\\\\

Const
WTRA         = 550;  // Enter how low health can go before resting. Must be at least 50 below your maximum health.
FishTimer    = 5000; // Do NOT touch this variable.
World        = 88;   // Enter world you want to fish in.
PP           = '';   // Enter your pin here.
OnScreenProg = 0;    // 0 for an On Screen Report or 1 for no On Screen Report.
FishValue    = 2235; // Enter current price of the fish you are catching.
FishType     = 0;    // 0 to catch Rock Tails and 1 to catch Cave Fish.
Crashing     = True; // True if you are using SMART Manager or Crash Smart. False if not.

SRLStats_User     = ''; /// SRL Stats Username.
SRLStats_Password = ''; /// SRL Stats Password.


/////////////////////////////// NO Touchy \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Var
x,y,RFish,CFish,bankbox,FC,Fish_Caught,Fish_XP,XP,FPH,TimeGone,P: Integer;
fshield,fdamage,fvalue: Integer;
FishCaught,FishXP,Info1,Info2,Info3,Info4,XPPH2,FPH2,FFC,FVN: String;
ToFish,ToBankBox,FSpot1,FSpot2,FSpot3,Restart,RunAwayN: TPointArray;

////////////////////////// Fill In Log In Info \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  Players[0].Name :='';     // Enter your username here.
  Players[0].Pass :=''; // Enter your password here.
  Players[0].Nick :='';    // Enter nickname for progres report.
  Players[0].Active:=True;
  Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins'];
  Players[0].WorldInfo := [False, World];
End;

////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
///////////////////////DO NOT TOUCH ANYTHING PAST HERE \\\\\\\\\\\\\\\\\\\\\\\\\
////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure AntiBan;
Begin
  Case Random(500) Of
    100: SleepAndMoveMouse(500);
    200: PickUpMouse;
    300: RandomMovement;
    400: HoverSkill('Fishing',False);
    500: CompassMovement(45,90,true);
  End;
End;

Procedure IfRandoms;
Begin
  FindNormalRandoms;
  AntiBan;
End;

Procedure PrintOnSmart(TP: TStringArray; Placement: TPoint; Colour: integer);
Var
  mx, my, Pic, Pic2, I, B, H, TPH, Numb: Integer;
  TTP: TPointArray;
  Canvas: TCanvas;
Begin
  SmartSetDebug(True);
  GetClientDimensions(mx, my);
  Pic  := BitmapFromString(mx, my, '');
  Pic2 := BitmapFromString(360,71,'me');
  TPH := High(TP);
  For I := 0 To TPH Do
  Begin
    TTP := LoadTextTPA(TP[i], SmallChars, H);
    For B := 0 To High(TTP) Do
    Begin
      Numb := ((I + 1) * 13);
      FastSetPixel(Pic, TTP[b].x + 1, TTP[b].y + Numb + 1,8388736);
      FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
    End;
  End;
  Canvas := TCANVAS.Create;
  //Canvas.Handle := SmartGetDebugDC;
  DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
  DrawBitmap(Pic2, Canvas, 100,10);
  FreeBitmap(Pic);
  FreeBitmap(Pic2);
end;

Procedure OnScreenUpdate;
Begin
  Begin
    SRLRandomsReport;
    Stats_Commit;
    IncEx(Fish_Caught, FC);
    IncEx(Fish_XP, XP);
    TimeGone   := (GetTimeRunning/1000);
    FishCaught := IntToStr(Fish_Caught);
    FishXP     := IntToStr(Fish_XP);
    FValue     := (Fish_Caught*FishValue);
    FVN        := IntToStr(FValue)
    FPH        := (3600*(Fish_Caught))/((TimeGone));
    FPH2       := IntToStr(FPH);
    Info1      := ('Fish Caught = ' + FishCaught)
    Info2      := ('Fising XP = ' + FishXP)
    Info3      := ('Fish Per Hr = ' + FPH2)
    Info4      := ('Money Made = ' + FVN)
  End;

  If (OnScreenProg=0) Then
    Begin
      PrintOnSmart(['Last banked at '+(TheTime)],Point(15,210),296906);
      PrintOnSmart([('Time script has run ')+MsToTime(GetTimeRunning,Time_Bare)],Point(15,240),296906);
      PrintOnSmart([Info1+' so '+Info3],Point(15,270),296906);
      PrintOnSmart([Info2+' and '+Info4],Point(15,300),296906);
    End;

  Begin
    Writeln('');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('You have caught ' + FishCaught + ' fish. That equals ' + FPH2 + ' fish per hour!');
    Writeln('You have gained ' + FishXP + ' xp. That equals ' + XPPH2 + ' xp per hour!');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('');
  End;
End;

Procedure SetDTMs;
Begin
  RFish    := DTMFromString('mrAAAAHic42BgYMhmYmDIBOJCIK4C4iIgzgHiRCCOBeLnQDV3gfgWlH4LxJ+B+AMQvwBij2APIMmEE3MBSXyYkQCGAQD1rAvw');
  CFish    := DTMFromString('mrAAAAHic42BgYLBlYmCwAmJXIPYHYg8gdgJiCyC2B2IORqAiKGYGYm4gFgJiFiD+BxRevLwASDLhxPwM+AEjAQwDAIoYBTU=');
  BankBox  := DTMFromString('mggAAAHicY2NgYDgJxKeheA8QbwPie0C8AIhboGJNQLwTiGcAcU91HENyuDNDWbITQ060LUNRggNDYqgjAz9QDhtmxIEhAABB1g9T');
  FShield  := DTMFromString('mrAAAAHic42BgYOAFYgEg5gdiHiBmB2I+IGaBijECMRMQs0LlQOJcUBqkl9XUCS8mBBgJYBgAAK0nBH8=');
  FDamage  := DTMFromString('mbQAAAHicY2VgYNBmhGAdINYDYn0glgZiBSBWBmI5IJYA4nQ2NoYEPj4wns3DA6a5gPrRMSMWDAYAIPEEVA==');
End;

Procedure FreeDTMSet;
Begin
  FreeDTM(RFish);
  FreeDTM(CFish);
  FreeDTM(BankBox);
  FreeDTM(FShield);
  FreeDTM(FDamage);
End;

Function HPLevel: Integer;
Var
ColourString: String;
Begin
  Result:= GetMMLevels('HP', ColourString);
End;

Procedure AllMyPaths;
Begin
  ToFish     := [Point(303, 303), Point(307, 323), Point(279, 363), Point(249, 404)];
  ToBankBox  := [Point(147, 379), Point(191, 379), Point(231, 387), Point(279, 379), Point(303, 335), Point(307, 299), Point(287, 287)];
  RunAwayN   := [Point(185, 385), Point(235, 385), Point(275, 370), Point(305, 330), Point(288, 287)];
  FSpot1     := [Point(247, 407)];
  FSpot2     := [Point(183, 400)];
  FSpot3     := [Point(150, 380)];
  Restart    := [Point(180, 395), Point(220, 395), Point(251, 395)];
End;

Procedure HealthCheck;
Begin
  If HPLevel < (WTRA) Then
    Begin
      If (Not FindSymbolIn(x,y,'Bank',600,60,640,100)) Then SPS_WalkPath(ToBankBox);
      Writeln('Resting until hp gets back up!');
      setrest;
        Repeat;
          If (Not LoggedIn) Then LoginPlayer;
          wait(randomrange(1500,2500));
          AntiBan;
        Until HPLevel > (WTRA + random(49));
    End;
End;

Procedure ToFishing;
Begin
  HealthCheck;
  SetRun(True);
  MakeCompass('n');
  SPS_WalkPath(ToFish);
  While isMoving Do
  wait(100+random(50));
  IfRandoms;
End;

Function FindPulley(x, y: Integer): Boolean;
Var
  CTS, I: Integer;
  TPA: TPointArray;
  ATPA: Array of TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.05, 0.18);
  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 6521492, MSX1, MSY1, MSX2, MSY2, 3);
  ColorToleranceSpeed(CTS);
  ATPA := TPAToATPAEx(TPA, 60, 60);

  For I := 0 To High(ATPA) Do
  Begin
    MiddleTPAEx(ATPA[i], x, y);
    MMouse(x, y, 0, 0);
    If(WaitUpTextMulti(['dep','osit','pul','ull','ley','lif','ift'],500)) Then
    Begin
      Result := True;
      GetMousePos(x, y);
      Break;
    End;
  End;
End;

Procedure Banking;
Begin
  If (FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Or FindDTM(CFish,x,y,MIX1,MIY1,MIX2,MIY2)) Then
    Begin
      If (FindPulley(X,Y)) Then
        Begin
          If FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Then FC  := CountItems('dtm', RFish, []) Else FC  := CountItems('dtm', CFish, []);
          XP  := (FC*380);
          FFC := IntToStr(FC);
          Writeln('Trying to bank ' + FFC + ' fish!');
          OnScreenUpdate;
          ClickMouse2(True);
          Wait(RandomRange(2250,2750));
          If PinScreen Then InPin(PP);
          Wait(RandomRange(1000,1250));
          If (FindDTM(RFish, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(CFish, x, y, MSX1, MSY1, MSX2, MSY2)) Then
            Begin
              Mouse(x,y,3,3,False);
              Wait(RandomRange(700,850));
              ChooseOption('ll');
              ToFishing;
            End Else ToFishing;
        End Else
        Begin
          SymbolAccuracy := 0.35
          FindSymbol(x,y,'bank');
          Mouse(x,y,0,0,true);
          Wait(RandomRange(1000,1300));
          SymbolAccuracy := 0.80
          Banking;
        End;
    End Else ToFishing;
End;

Procedure ToBank;
Begin
  SetRun(True);
  MakeCompass('N');
  SPS_WalkPath(ToBankBox);
  While isMoving Do wait(100+random(50));
  IfRandoms;
  Banking;
End;

Procedure RunAwayNow;
Begin
  SetRun(True);
  MakeCompass('n');
  Writeln('Fight detected. To the bank!');
  SPS_WalkPath(RunAwayN);
  While isMoving Do wait(100+random(50));
  Writeln('Banking, then returning to fish!');
  Banking;
  IfRandoms;
End;

/// Credits to putonajonny ///
Procedure CheckFight;
Var
 i: integer;
Begin
  If Not InFight Then Exit;
  WriteLn('Checking for fight....');
  For i := 0 To 7 Do
  Begin
    If (FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    Begin
      RunAwayNow;
      Exit;
    End;
    Wait(200+Random(50));
  End;
  WriteLn('No fight detected.');
End;

Function PColor: Integer;
Var
  arP: TPointArray;
  arC: TIntegerArray;
  tmpCTS, i, arL: Integer;
  X, Y, Z: Extended;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 1.00);

  FindColorsSpiralTolerance(MSCX, MSCY, arP, 859691, MSX1, MSY1, MSX2, MSY2, 2);
  If (Length(arP) = 0) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  arC := GetColors(arP);
  ClearSameIntegers(arC);
  arL := High(arC);

  For i := 0 to arL Do
  Begin
    ColorToXYZ(arC[i], X, Y, Z);

    If (X >= 1.12) And (X <= 2.02) And (Y >= 1.07) And (Y <= 1.93) And (Z >= 0.45) And (Z <= 0.74) Then
    Begin
      Result := arC[i];
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
End;

Function IsFishing: Boolean;
Var
  CTS: Integer;
  TPA: TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  Begin
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.07, 0.75);
    FindColorsSpiralTolerance(x, y, TPA, PColor, 245, 130, 285, 195, 3);
    ColorToleranceSpeed(CTS);
    result := (Length(TPA) > 0);
    If result Then
      Exit;
  End;
End;

Procedure FishingWait;
Var
  T: Integer;
Begin
  Marktime(T);
  Repeat
    CheckFight;
    If IsFishing Then
      Marktime(T);
    If (InvCount=28) or (FindNPCChatText('carry',Nothing)) Then
      Begin
        WriteLn('All full. Time to bank the fish!');
        ToBank;
      End;
    AntiBan;
    IfRandoms;
  Until(TimeFromMark(T) >= (FishTimer+(RandomRange(300,600))));
  Exit;
End;

Function FindFishingSpot(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 to arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('ockt', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    Exit;
  End;

  GetMousePos(fx, fy);
End;

Function FindFishingSpotC(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 To arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('vefis', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    //Writeln('No Rocktail spot found. Relocating....');
    Exit;
  End;

  GetMousePos(fx, fy);
end;

Procedure StartFishing;
Var
  X,Y: Integer;
Begin;
  CheckFight;

  If (Not FindSymbol(x,y,'fish')) Then ToFishing;

  If (FishType=0) Then
  Begin;
    If (FindFishingSpot(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;
    If Not (FindFishingSpot(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

  If (FishType=1) Then
  Begin;
    If (FindFishingSpotC(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;

    If Not (FindFishingSpotC(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

IfRandoms;
End;

Procedure Relocate;
Begin;

  SymbolAccuracy := 0.40;
  MarkTime(P);
  Repeat;
  If InvFull or (FindNPCChatText('carry',Nothing)) Then
    Begin
      WriteLn('All full. Time to bank the fish!');
      ToBank;
    End;

  If FindSymbolIn(x,y,'Fish',620,30,750,120) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Fish',575,85,635,125) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 3...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot3);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Mine',605,60,640,90) Then
    Begin
      HealthCheck;
      WriteLn('Back to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      If (FindFishingSpot(X, Y)) Then
        Begin
          SymbolAccuracy := 0.80;
          StartFishing;
        End Else
        Begin
          HealthCheck;
          Writeln('Back to spot 1...');
          SPS_WalkPath(FSpot1);
          SymbolAccuracy := 0.80;
          StartFishing;
        End;
    End;
  Until (TimeFromMark(P) >= 5000)

  IfRandoms;
End;

Procedure MainLoop;
Begin
  If Not (LoggedIn) Then Exit;
  SetDTMs;
  MakeCompass('n');
  SetAngle(0);
  ToFishing;
  StartFishing;
  Relocate;
  FreeDTMSet;
End;

Begin;
  ClearDebug
  MouseSpeed := RandomRange(18,23);
    {$IFDEF SIMBAMAJOR980}//<--- THIS
  Smart_Server := 0;
  Smart_Members := False;
  Smart_Signed := True;
  Smart_SuperDetail := False;
  {$ELSE}//<--- THIS
  SRL_SIXHOURFIX := TRUE;
  SMART_FIXSPEED := TRUE;
  {$ENDIF}
  SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);
  SetupSRLStats(1135, SRLStats_User, SRLStats_Password);
  ActivateClient;
  DeclarePlayers;
  LoginPlayer;
  SMART_ClearCanvas;
  wait(1000);
  PrintOnSmart(['A progress report will appear after banking. Good luck!'],Point(15,300),65674);
  AllMyPaths;
  If (Crashing = True) Then
    Begin
      SPS_WalkPath(ToBankBox);
      Wait(500+Random(500));
      Flag;
    End;
  Repeat;
    Mainloop;
  Until(AllPlayersInactive);
  SMART_ClearCanvas;
  OnScreenUpdate;
End.  

Have many people gotten the chance to test this version that compiles and see what does and does not work? I have let my Runescape membership run out and I am not sure when I will re-up it and get back to working on scripts for Simba.

If anyone would like to post a version that works, not just compiles, then I will be more than happy to put it in the main post and give you credit for the fixes. I hope someone can get it up and running for the community!

From: iBlank
Have many people gotten the chance to test this version that compiles and see what does and does not work? I have let my Runescape membership run out and I am not sure when I will re-up it and get back to working on scripts for Simba.

If anyone would like to post a version that works, not just compiles, then I will be more than happy to put it in the main post and give you credit for the fixes. I hope someone can get it up and running for the community!

I tried kevin's version and pressed play and got this error (and yes I put the minimap picture in the OP in the right area):

Error: Exception: The bitmap[0] does not exist at line 551

The "global" tab is the one that popped up. I'm not sure what went wrong, but I'd just thought I'd let kevin and you know.

@iBlank Idk you would have to ask them. I cannot use the script cuz I cantfish rocktails on my main yet nor can I use it as I am on vacation.

@Austin: Are you using the latest version of Smart, SRL, SPS, and MSI? Try updating them all even forcing an update of each in order to try the script again and see if the error re appears. Also try to re load the script a few times as it may just be an issue that occurs once in a while during compiling.

From: kevin33
@iBlank Idk you would have to ask them. I cannot use the script cuz I cantfish rocktails on my main yet nor can I use it as I am on vacation.

@Austin: Are you using the latest version of Smart, SRL, SPS, and MSI? Try updating them all even forcing an update of each in order to try the script again and see if the error re appears. Also try to re load the script a few times as it may just be an issue that occurs once in a while during compiling.

Nope, tried what you just said. Still has the same error. I've exited and re-opened the script at least 10 times and force updated everything (which just resulted in a SmartParams error which I had to fix again). So idk what the problem is :(

Hmm wish I could look more into this but the internet at my resort sucks. It will be another week before I can do much of anything. Someone else with an idea feel free to share. May be a problem we need pushed because it covers a broader range like an issue in globals itself. If need be we can wait another day and make a seperate thread on the issue. I will continue to slowly try different things out and respond here if I come up with anything.

I'm still getting this error:/

(41:33): Unknown identifier 'SmartGetDebugDC' at line 40
Compiling failed.

This compiles fine but when I run it in LRC, I receive this error.

Error: Exception: The bitmap[0] does not exist at line 551

It is refering to this…

(*
GetFightBarTPA
~~~~~~~~~~~

.. code-block:: pascal

Function GetFightBarTPA(SearchArea: TBox): TPointArray;

Used in various fighting functions, including srl_InFight

.. note::

by Narcle

Example:
// This blank line is line 551 where the error occurs, it is highlighted in orange.
.. code-block:: pascal


*)
Function GetFightBarTPA(SearchArea: TBox): TPointArray;
var
T: TPoint;
H, I: integer;
Colors: TIntegerArray;
ATPA: T2DPointArray;
begin
Colors := [HP_BAR_COLOR1, HP_BAR_COLOR2];
H := High(Colors);
SetArrayLength(ATPA, H+1);
T := point((MFBox.x2+MFBox.x1) div 2,(MFBox.y2+MFBox.y1) div 2);
for i := 0 to H do
with SearchArea do
FindColorsSpiralTolerance(T.x, T.y, ATPA, Colors, X1, Y1, X2, Y2, 2);
Result := MergeATPA(ATPA);
end;

Can't seem to get it working..

[Hint] C:\Program Files\Simba\Includes\SRL/SRL/core/antirandoms\randomtool.simba(215:3): Variable 'T' never used at line 214
[Error] C:\Program Files\Simba\Includes\SRL/SRL/misc/paintsmart.simba(42:33): Unknown identifier 'SmartGetDebugDC' at line 41
Compiling failed.

Note: I am a complete noob in this area.

From: MagicClty
This compiles fine but when I run it in LRC, I receive this error.


It is refering to this…

You are not including the SetupSRL in the main loop

It should look like this

Begin;
  ClearDebug
  MouseSpeed := RandomRange(18,23);
    {$IFDEF SIMBAMAJOR980}//<--- THIS
  Smart_Server := 0;
  Smart_Members := False;
  Smart_Signed := True;
  Smart_SuperDetail := False;
  {$ELSE}//<--- THIS
  SRL_SIXHOURFIX := TRUE;
  SMART_FIXSPEED := TRUE;
  {$ENDIF}
  SetupSRL();
  SetupSRLStats(1135, SRLStats_User, SRLStats_Password);
  SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);
  ActivateClient;
  DeclarePlayers;
  LoginPlayer;
  SMART_ClearCanvas;
  wait(1000);
  PrintOnSmart(['A progress report will appear after banking. Good luck!'],Point(15,300),65674);
  AllMyPaths;
  If (Crashing = True) Then
    Begin
      SPS_WalkPath(ToBankBox);
      Wait(500+Random(500));
      Flag;
    End;
  Repeat;
    Mainloop;
  Until(AllPlayersInactive);
  SMART_ClearCanvas;
  OnScreenUpdate;
End.                  

So glad you used my function :)
Fixed this up, if you want a working version pm me…

wow ty guys i got mine to work
pretty much combine Kevin33 and vacacow1's edits and it works

Just started using this today, here's a proggy:

====================================================================
************************ Als LRC Fisher ****************************
====================================================================
You have caught 399 fish. That equals 78 fish per hour!
You have gained 151620 xp. That equals 29642 xp per hour!
====================================================================
************************ Als LRC Fisher ****************************
====================================================================

that's @ lvl 90 fishing. Great script!

howd u get it to work mine says some shit about nav bar =(

Error: Exception: Canvas does not allow drawing at line 92
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, SRL - NavBar Bitmap, 4, 5, 6]

From: aus tom
howd u get it to work mine says some shit about nav bar =(

From: aus tom
Error: Exception: Canvas does not allow drawing at line 92
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, SRL - NavBar Bitmap, 4, 5, 6]

Firstly, swearing is not allowed on these forums, please don't do it.
Secondly, check you have everything fully updated, and then have a look at what previous posters have said. Maybe there is already a solution.

sorry about swearing you can remove that or something i was kinda angry at the time
And I've checked all the solutions and they have the same problem

This is where the problem is

DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
DrawBitmap(Pic2, Canvas, 100,10);
FreeBitmap(Pic);
FreeBitmap(Pic2);

I looked up your can't paint error, apparently its a bug in your simba installation. Try to force an update or reinstall, then fully update everything. If it still doesn't work, just comment out the painting procedures, they aren't necessary.
E: Double posting is also not allowed here. I suggest you look up the rules to prevent future infractions.

If anyone is able to help please help this is the error I get.


Error: Exception: Canvas does not allow drawing at line 92
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, SRL - NavBar Bitmap, 4, 5, 6]

this script dont work for me for some reson

Can anyone help fix this script?

Program Als_LRC_Fisher;
{$DEFINE SRL5}
{$DEFINE SMART}  // Edit this line out to rn the script in your browser.
{$i SRL/srl.simba}
{$i sps/sps.simba}
{$i srl/srl/skill/fighting.simba}
{$i SRL/SRL/misc/smartgraphics.simba}

//////////////////////// Fill The Variables Below In \\\\\\\\\\\\\\\\\\\\\\\\\\\

Const
WTRA         = 550;  // Enter how low health can go before resting. Must be at least 50 below your maximum health.
FishTimer    = 5000; // Do NOT touch this variable.
World        = 88;   // Enter world you want to fish in.
PP           = '';   // Enter your pin here.
OnScreenProg = 0;    // 0 for an On Screen Report or 1 for no On Screen Report.
FishValue    = 2235; // Enter current price of the fish you are catching.
FishType     = 0;    // 0 to catch Rock Tails and 1 to catch Cave Fish.
Crashing     = True; // True if you are using SMART Manager or Crash Smart. False if not.

SRLStats_User     = ''; /// SRL Stats Username.
SRLStats_Password = ''; /// SRL Stats Password.


/////////////////////////////// NO Touchy \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Var
x,y,RFish,CFish,bankbox,FC,Fish_Caught,Fish_XP,XP,FPH,TimeGone,P: Integer;
fshield,fdamage,fvalue: Integer;
FishCaught,FishXP,Info1,Info2,Info3,Info4,XPPH2,FPH2,FFC,FVN: String;
ToFish,ToBankBox,FSpot1,FSpot2,FSpot3,Restart,RunAwayN: TPointArray;

////////////////////////// Fill In Log In Info \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  Players[0].Name :='';     // Enter your username here.
  Players[0].Pass :=''; // Enter your password here.
  Players[0].Nick :='';    // Enter nickname for progres report.
  Players[0].Active:=True;
  Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins'];
  Players[0].WorldInfo := [False, World];
End;

////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
///////////////////////DO NOT TOUCH ANYTHING PAST HERE \\\\\\\\\\\\\\\\\\\\\\\\\
////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Procedure AntiBan;
Begin
  Case Random(500) Of
    100: SleepAndMoveMouse(500);
    200: PickUpMouse;
    300: RandomMovement;
    400: HoverSkill('Fishing',False);
    500: CompassMovement(45,90,true);
  End;
End;

Procedure IfRandoms;
Begin
  FindNormalRandoms;
  AntiBan;
End;

Procedure PrintOnSmart(TP: TStringArray; Placement: TPoint; Colour: integer);
Var
  mx, my, Pic, Pic2, I, B, H, TPH, Numb: Integer;
  TTP: TPointArray;
  Canvas: TCanvas;
Begin
  SmartSetDebug(True);
  GetClientDimensions(mx, my);
  Pic  := BitmapFromString(mx, my, '');
  Pic2 := BitmapFromString(360,71,'me');
  TPH := High(TP);
  For I := 0 To TPH Do
  Begin
    TTP := LoadTextTPA(TP[i], SmallChars, H);
    For B := 0 To High(TTP) Do
    Begin
      Numb := ((I + 1) * 13);
      FastSetPixel(Pic, TTP[b].x + 1, TTP[b].y + Numb + 1,8388736);
      FastSetPixel(Pic, TTP[b].x, TTP[b].y + Numb, Colour);
    End;
  End;
  Canvas := TCANVAS.Create;
  Canvas.Handle := GetDebugBitmap;
  DrawBitmap(Pic, Canvas, Placement.x, Placement.y);
  DrawBitmap(Pic2, Canvas, 100,10);
  FreeBitmap(Pic);
  FreeBitmap(Pic2);
end;

Procedure OnScreenUpdate;
Begin
  Begin
    SRLRandomsReport;
    Stats_Commit;
    IncEx(Fish_Caught, FC);
    IncEx(Fish_XP, XP);
    TimeGone   := (GetTimeRunning/1000);
    FishCaught := IntToStr(Fish_Caught);
    FishXP     := IntToStr(Fish_XP);
    FValue     := (Fish_Caught*FishValue);
    FVN        := IntToStr(FValue)
    FPH        := (3600*(Fish_Caught))/((TimeGone));
    FPH2       := IntToStr(FPH);
    Info1      := ('Fish Caught = ' + FishCaught)
    Info2      := ('Fising XP = ' + FishXP)
    Info3      := ('Fish Per Hr = ' + FPH2)
    Info4      := ('Money Made = ' + FVN)
  End;

  If (OnScreenProg=0) Then
    Begin
      PrintOnSmart(['Last banked at '+(TheTime)],Point(15,210),296906);
      PrintOnSmart([('Time script has run ')+MsToTime(GetTimeRunning,Time_Bare)],Point(15,240),296906);
      PrintOnSmart([Info1+' so '+Info3],Point(15,270),296906);
      PrintOnSmart([Info2+' and '+Info4],Point(15,300),296906);
    End;

  Begin
    Writeln('');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('You have caught ' + FishCaught + ' fish. That equals ' + FPH2 + ' fish per hour!');
    Writeln('You have gained ' + FishXP + ' xp. That equals ' + XPPH2 + ' xp per hour!');
    Writeln('====================================================================');
    Writeln('************************ Als LRC Fisher ****************************');
    Writeln('====================================================================');
    Writeln('');
  End;
End;

Procedure SetDTMs;
Begin
  RFish    := DTMFromString('mrAAAAHic42BgYMhmYmDIBOJCIK4C4iIgzgHiRCCOBeLnQDV3gfgWlH4LxJ+B+AMQvwBij2APIMmEE3MBSXyYkQCGAQD1rAvw');
  CFish    := DTMFromString('mrAAAAHic42BgYLBlYmCwAmJXIPYHYg8gdgJiCyC2B2IORqAiKGYGYm4gFgJiFiD+BxRevLwASDLhxPwM+AEjAQwDAIoYBTU=');
  BankBox  := DTMFromString('mggAAAHicY2NgYDgJxKeheA8QbwPie0C8AIhboGJNQLwTiGcAcU91HENyuDNDWbITQ060LUNRggNDYqgjAz9QDhtmxIEhAABB1g9T');
  FShield  := DTMFromString('mrAAAAHic42BgYOAFYgEg5gdiHiBmB2I+IGaBijECMRMQs0LlQOJcUBqkl9XUCS8mBBgJYBgAAK0nBH8=');
  FDamage  := DTMFromString('mbQAAAHicY2VgYNBmhGAdINYDYn0glgZiBSBWBmI5IJYA4nQ2NoYEPj4wns3DA6a5gPrRMSMWDAYAIPEEVA==');
End;

Procedure FreeDTMSet;
Begin
  FreeDTM(RFish);
  FreeDTM(CFish);
  FreeDTM(BankBox);
  FreeDTM(FShield);
  FreeDTM(FDamage);
End;

Function HPLevel: Integer;
Var
ColourString: String;
Begin
  Result:= GetMMLevels('HP', ColourString);
End;

Procedure AllMyPaths;
Begin
  ToFish     := [Point(303, 303), Point(307, 323), Point(279, 363), Point(249, 404)];
  ToBankBox  := [Point(147, 379), Point(191, 379), Point(231, 387), Point(279, 379), Point(303, 335), Point(307, 299), Point(287, 287)];
  RunAwayN   := [Point(185, 385), Point(235, 385), Point(275, 370), Point(305, 330), Point(288, 287)];
  FSpot1     := [Point(247, 407)];
  FSpot2     := [Point(183, 400)];
  FSpot3     := [Point(150, 380)];
  Restart    := [Point(180, 395), Point(220, 395), Point(251, 395)];
End;

Procedure HealthCheck;
Begin
  If HPLevel < (WTRA) Then
    Begin
      If (Not FindSymbolIn(x,y,'Bank',600,60,640,100)) Then SPS_WalkPath(ToBankBox);
      Writeln('Resting until hp gets back up!');
      setrest;
        Repeat;
          If (Not LoggedIn) Then LoginPlayer;
          wait(randomrange(1500,2500));
          AntiBan;
        Until HPLevel > (WTRA + random(49));
    End;
End;

Procedure ToFishing;
Begin
  HealthCheck;
  SetRun(True);
  MakeCompass('n');
  SPS_WalkPath(ToFish);
  While isMoving Do
  wait(100+random(50));
  IfRandoms;
End;

Function FindPulley(x, y: Integer): Boolean;
Var
  CTS, I: Integer;
  TPA: TPointArray;
  ATPA: Array of TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.05, 0.18);
  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 6521492, MSX1, MSY1, MSX2, MSY2, 3);
  ColorToleranceSpeed(CTS);
  ATPA := TPAToATPAEx(TPA, 60, 60);

  For I := 0 To High(ATPA) Do
  Begin
    MiddleTPAEx(ATPA[i], x, y);
    MMouse(x, y, 0, 0);
    If(WaitUpTextMulti(['dep','osit','pul','ull','ley','lif','ift'],500)) Then
    Begin
      Result := True;
      GetMousePos(x, y);
      Break;
    End;
  End;
End;

Procedure Banking;
Begin
  If (FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Or FindDTM(CFish,x,y,MIX1,MIY1,MIX2,MIY2)) Then
    Begin
      If (FindPulley(X,Y)) Then
        Begin
          If FindDTM(RFish,x,y,MIX1,MIY1,MIX2,MIY2) Then FC  := CountItems('dtm', RFish, []) Else FC  := CountItems('dtm', CFish, []);
          XP  := (FC*380);
          FFC := IntToStr(FC);
          Writeln('Trying to bank ' + FFC + ' fish!');
          OnScreenUpdate;
          ClickMouse2(True);
          Wait(RandomRange(2250,2750));
          If PinScreen Then InPin(PP);
          Wait(RandomRange(1000,1250));
          If (FindDTM(RFish, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(CFish, x, y, MSX1, MSY1, MSX2, MSY2)) Then
            Begin
              Mouse(x,y,3,3,False);
              Wait(RandomRange(700,850));
              ChooseOption('ll');
              ToFishing;
            End Else ToFishing;
        End Else
        Begin
          SymbolAccuracy := 0.35
          FindSymbol(x,y,'bank');
          Mouse(x,y,0,0,true);
          Wait(RandomRange(1000,1300));
          SymbolAccuracy := 0.80
          Banking;
        End;
    End Else ToFishing;
End;

Procedure ToBank;
Begin
  SetRun(True);
  MakeCompass('N');
  SPS_WalkPath(ToBankBox);
  While isMoving Do wait(100+random(50));
  IfRandoms;
  Banking;
End;

Procedure RunAwayNow;
Begin
  SetRun(True);
  MakeCompass('n');
  Writeln('Fight detected. To the bank!');
  SPS_WalkPath(RunAwayN);
  While isMoving Do wait(100+random(50));
  Writeln('Banking, then returning to fish!');
  Banking;
  IfRandoms;
End;

/// Credits to putonajonny ///
Procedure CheckFight;
Var
 i: integer;
Begin
  If Not InFight Then Exit;
  WriteLn('Checking for fight....');
  For i := 0 To 7 Do
  Begin
    If (FindDTM(FShield, x, y, MSX1, MSY1, MSX2, MSY2) Or FindDTM(FDamage, x, y, MSX1, MSY1, MSX2, MSY2)) Then
    Begin
      RunAwayNow;
      Exit;
    End;
    Wait(200+Random(50));
  End;
  WriteLn('No fight detected.');
End;

Function PColor: Integer;
Var
  arP: TPointArray;
  arC: TIntegerArray;
  tmpCTS, i, arL: Integer;
  X, Y, Z: Extended;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 1.00);

  FindColorsSpiralTolerance(MSCX, MSCY, arP, 859691, MSX1, MSY1, MSX2, MSY2, 2);
  If (Length(arP) = 0) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  arC := GetColors(arP);
  ClearSameIntegers(arC);
  arL := High(arC);

  For i := 0 to arL Do
  Begin
    ColorToXYZ(arC[i], X, Y, Z);

    If (X >= 1.12) And (X <= 2.02) And (Y >= 1.07) And (Y <= 1.93) And (Z >= 0.45) And (Z <= 0.74) Then
    Begin
      Result := arC[i];
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
End;

Function IsFishing: Boolean;
Var
  CTS: Integer;
  TPA: TPointArray;
Begin
  CTS := GetColorToleranceSpeed;
  Begin
    ColorToleranceSpeed(2);
    SetColorSpeed2Modifiers(0.07, 0.75);
    FindColorsSpiralTolerance(x, y, TPA, PColor, 245, 130, 285, 195, 3);
    ColorToleranceSpeed(CTS);
    result := (Length(TPA) > 0);
    If result Then
      Exit;
  End;
End;

Procedure FishingWait;
Var
  T: Integer;
Begin
  Marktime(T);
  Repeat
    CheckFight;
    If IsFishing Then
      Marktime(T);
    If (InvCount=28) or (FindNPCChatText('carry',Nothing)) Then
      Begin
        WriteLn('All full. Time to bank the fish!');
        ToBank;
      End;
    AntiBan;
    IfRandoms;
  Until(TimeFromMark(T) >= (FishTimer+(RandomRange(300,600))));
  Exit;
End;

Function FindFishingSpot(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 to arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('ockt', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    Exit;
  End;

  GetMousePos(fx, fy);
End;

Function FindFishingSpotC(var fx, fy: Integer): Boolean;
Var
  arP: TPointArray;
  ararP: T2DPointArray;
  tmpCTS, i, arL: Integer;
  P: TPoint;
Begin
  tmpCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.10, 0.40);

  If Not(FindColorsTolerance(arP, 11971492, MSX1, MSY1, MSX2, MSY2, 10)) Then
  Begin
    ColorToleranceSpeed(tmpCTS);
    SetColorSpeed2Modifiers(0.2, 0.2);
    Exit;
  End;

  SortTPAFrom(arP, Point(MSCX, MSCY));
  ararP := SplitTPAEx(arP, 10, 10);
  arL := High(ararP);

  For i := 0 To arL Do
  Begin
    P := MiddleTPA(ararP[i]);
    MMouse(P.x, P.y, 5, 5);
    If (waituptext('vefis', 1000)) Then
    Begin;
      Result := True;
      Break;
    End;
  End;

  ColorToleranceSpeed(tmpCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);

  If (i = arL + 1) Then
  Begin
    //Writeln('No Rocktail spot found. Relocating....');
    Exit;
  End;

  GetMousePos(fx, fy);
end;

Procedure StartFishing;
Var
  X,Y: Integer;
Begin;
  CheckFight;

  If (Not FindSymbol(x,y,'fish')) Then ToFishing;

  If (FishType=0) Then
  Begin;
    If (FindFishingSpot(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;
    If Not (FindFishingSpot(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

  If (FishType=1) Then
  Begin;
    If (FindFishingSpotC(X, Y)) Then
      Begin;
        wait(300+randomrange(200,400));
        ClickMouse2(True);
        While isMoving Do
        wait(100+random(50));
        Writeln('Starting to fish!');
        FishingWait;
      End;

    If Not (FindFishingSpotC(X, Y)) Then
      Begin;
        Writeln('No spot found, relocating...');
      End;
  End;

IfRandoms;
End;

Procedure Relocate;
Begin;

  SymbolAccuracy := 0.40;
  MarkTime(P);
  Repeat;
  If InvFull or (FindNPCChatText('carry',Nothing)) Then
    Begin
      WriteLn('All full. Time to bank the fish!');
      ToBank;
    End;

  If FindSymbolIn(x,y,'Fish',620,30,750,120) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Fish',575,85,635,125) Then
    Begin
      HealthCheck;
      WriteLn('Moving to spot 3...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot3);
      While isMoving Do
      wait(100+random(50));
      IfRandoms;
      SymbolAccuracy := 0.80;
      StartFishing;
    End;

  If FindSymbolIn(x,y,'Mine',605,60,640,90) Then
    Begin
      HealthCheck;
      WriteLn('Back to spot 2...');
      SetRun(True);
      MakeCompass('n');
      SPS_WalkPath(FSpot2);
      While isMoving Do
      wait(100+random(50));
      If (FindFishingSpot(X, Y)) Then
        Begin
          SymbolAccuracy := 0.80;
          StartFishing;
        End Else
        Begin
          HealthCheck;
          Writeln('Back to spot 1...');
          SPS_WalkPath(FSpot1);
          SymbolAccuracy := 0.80;
          StartFishing;
        End;
    End;
  Until (TimeFromMark(P) >= 5000)

  IfRandoms;
End;

Procedure MainLoop;
Begin
  If Not (LoggedIn) Then Exit;
  SetDTMs;
  MakeCompass('n');
  SetAngle(0);
  ToFishing;
  StartFishing;
  Relocate;
  FreeDTMSet;
End;

Begin;
  ClearDebug
  MouseSpeed := RandomRange(18,23);
  Smart_FixSpeed := True;
  SRL_SixHourFix := True;
  SetupSRL;
  SPS_Setup(RUNESCAPE_OTHER,['custom_lrc']);
  SetupSRLStats(1135, SRLStats_User, SRLStats_Password);
  ActivateClient;
  DeclarePlayers;
  LoginPlayer;
  SMART_ClearCanvas;
  wait(1000);
  PrintOnSmart(['A progress report will appear after banking. Good luck!'],Point(15,300),65674);
  AllMyPaths;
  If (Crashing = True) Then
    Begin
      SPS_WalkPath(ToBankBox);
      Wait(500+Random(500));
      Flag;
    End;
  Repeat;
    Mainloop;
  Until(AllPlayersInactive);
  SMART_ClearCanvas;
  OnScreenUpdate;
End.

All compiled using http://villavu.com/forum/showthread.php?t=88578