Page 1 of 38 12311 ... LastLast
Results 1 to 25 of 945

Thread: Simple FightCaveTrainer

  1. #1
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default Simple FightCaveTrainer

    This is for use with the SRL-OSR include, not P07Include.
    Go to https://github.com/SRL/SRL-OSR to download and contribute towards the include!

    Code is as follows, no antileech. For me, knowing how to install the include is good enough replacement for antileech. You'll probably need the 07 fonts as well, not going to tell you where to get them. (Hint: Check up on old SRL 4 include, and rename the font folders!)
    You can find a tutorial on installation for SRL-OSR here: http://villavu.com/forum/showthread.php?t=100543

    NOTE: THERE HAVE BEEN REPORTS OF BANS FROM PEOPLE THAT HAVE USED THIS SCRIPT! WHILE WE CANNOT BE SURE THIS SCRIPT CAUSED THOSE BANS, THERE IS NO ANTIBAN INCLUDED AND MANY PEOPLE HAVE BEEN RUNNING IT FOR LONG PERIODS OF TIME! I PERSONALLY DO NOT RECOMMEND RUNNING THIS SCRIPT FOR VERY LONG!

    Some credits go to mx1000 for cave detection base code.
    Simba Code:
    program FightCaveTrainer;

    {$DEFINE SMART}
    {$i SRL-OSR/Srl.simba}

    Const
      caveTol = 2;
      version = '0.6';

    Var
      counter, caveEntrances: Integer;
      caveEntranceWhite: TIntegerArray;

    Procedure DeclarePlayers;
    Begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;

      Players[0].Name := '';
      Players[0].Pass := '';
      Players[0].Nick := '';
      Players[0].Active := True;
    End;

    Function FightCaveSleep(sleepx, sleepy: Integer; retaliate: Boolean): Boolean;
    Var
      x , y, sleepTime: Integer;
      loop : Boolean;
    Begin
      loop := true;
      counter := 0;
      sleepTime := RandomRange(sleepx, sleepy);
      While loop Do
      Begin
        If FindObjCustom(x, y, [' '], caveEntranceWhite, caveTol) Then
        Begin
          Result := false;
          loop := false;
          WriteLn('We see cave entrance!');
        End Else If (not (InRange(Length(GetFightBarTPA(IntToBox(MSX1, MSY1, MSX2, MSY2))), 30, 150))) and (retaliate) Then
        Begin
          Result := false;
          loop := false;
        End Else If (sleepTime - counter > 0) and loop = true Then
        Begin
          wait(10);
          counter := (counter + 10);
        End Else
        Begin
          Result := True;
          loop := False;
        End;
      End;
    End;

    Procedure FightCaveLoop;
    Var
      x, y : Integer;
    Begin
        If FindObjCustom(x, y, ['nter'], caveEntranceWhite, caveTol) Then
        Begin
          WriteLn('Found correct cave!');
          ClickMouse2(True);
          While FindObjCustom(x, y, ['nter'], caveEntranceWhite, caveTol) Do
          Begin
            ClickMouse2(true);
            Wait(RandomRange(500, 1000));
          End;
          If RandomRange(1, 10) > 8 Then
          Begin
            SetRun(true);
            GameTab(tab_Stats);
          End;
          caveEntrances := (caveEntrances + 1);
          WriteLn('Entered cave.');
          ClearDebug;

          WriteLn('-*         FightCaveTrainer v'+version);
          WriteLn('-*         ');
          WriteLn('-*         Entered: ' + intToStr(caveEntrances));
          WriteLn('-*         Runtime: ' + TimeRunning);

          Wait(RandomRange(4000, 5000));
          SetAngle(0);
        End Else
        If (Not FindObjCustom(x, y, ['nter'], caveEntranceWhite, caveTol)) and (CountDots('yellow') > 0) Then
        Begin
          FightCaveSleep(200,500,False);
          If InRange(Length(GetFightBarTPA(IntToBox(MSX1, MSY1, MSX2, MSY2))), 30, 150) Then
          Begin
            If (FightCaveSleep(3000,5000,True)) Then
            Begin
              If InRange(Length(GetFightBarTPA(IntToBox(MSX1, MSY1, MSX2, MSY2))), 30, 150) Then
              Begin
                Retaliate(False);
                Wait(RandomRange(500,700));
                Retaliate(True);
                GameTab(tab_Stats);
                FightCaveSleep(3000,5000,False);
              End;
            End;
          End;
        End Else MakeCompass(185);
    End;

    Begin
      SetupSRL;
      DeclarePlayers;
      SetRun(True);
      GameTab(tab_Stats);
      caveEntranceWhite := [7763583, 8553356];
      MouseSpeed := 15;

      While(True) Do
      Begin
        If not LoggedIn Then
        Begin
          LogInPlayer;
          SetRun(True);
          GameTab(tab_Stats);
          MakeCompass(185);
          SetAngle(0);
        End;
        FightCaveLoop;
      End;
    End.
    Last edited by SeanStar; 04-02-2013 at 07:07 AM.

  2. #2
    Join Date
    Feb 2012
    Posts
    35
    Mentioned
    0 Post(s)
    Quoted
    10 Post(s)

    Default

    This is a ripped version of RareFightCave, please remove this.

  3. #3
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by Im fkn rare View Post
    This is a ripped version of RareFightCave, please remove this.
    Ripped? It's heavily modified. Not only that, but you used mx1000's fight caver for your base as well...

    EDIT: This in fact does not use any of your code at all, the functions I used from your caver are originally mx1000's to begin with. And I modified his script a whole lot more than you did.
    For the record, all you did was add a small progress report, an additional color to the cave colors array, changed some wait times, and removed his useless "WriteLn" status updates.

    This script has a completely redone fight detection + somewhat advanced auto retaliate toggle instead of right clicking to attack, I removed useless function that basically uses another function for it's result, cleaned up everything, and rewrote it for use with the (going to be official) SRL-OSR include.

    For you to say this is a ripped version of your script is completely laughable, and insulting. Get the hell out.

    For anyone wishing to take a look, RareFightCave vs mxFightCave: http://dl.dropbox.com/u/32529420/comparison.htm
    Last edited by SeanStar; 03-09-2013 at 09:02 PM.

  4. #4
    Join Date
    Feb 2012
    Posts
    35
    Mentioned
    0 Post(s)
    Quoted
    10 Post(s)

    Default

    Get outta here skiddo.

  5. #5
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by Im fkn rare View Post
    Get outta here skiddo.
    Can't tell if troll or just stupid.

  6. #6
    Join Date
    Mar 2006
    Posts
    13,241
    Mentioned
    228 Post(s)
    Quoted
    267 Post(s)

    Default

    OP is correct. The similarities your scripts share both originate from mx1000's script and he has already credited him as such.
    STOP PM'ING ME

  7. #7
    Join Date
    Sep 2008
    Posts
    754
    Mentioned
    8 Post(s)
    Quoted
    275 Post(s)

    Default

    Ok i guess am the only person that actually tried to run this script?
    Since you offered no input what so ever, i am going to assume you gave up on this thread and probably won't even read this message.

    Anyway, went to this link, http://villavu.com/forum/showthread.php?t=98324 grabbed OSR-SRL and the fonts.


    Your script didn't work.

    Error:

    function DeleteOnTerminate(const proc : string) : boolean;
    [Error] E:\Simba\Includes\SRL-OSR/SRL/core/simba.simba(465:14): Unknown identifier '' at line 464
    Compiling failed.

    So it didn't work.

  8. #8
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by samerdl View Post
    Ok i guess am the only person that actually tried to run this script?
    Since you offered no input what so ever, i am going to assume you gave up on this thread and probably won't even read this message.

    Anyway, went to this link, http://villavu.com/forum/showthread.php?t=98324 grabbed OSR-SRL and the fonts.


    Your script didn't work.

    Error:

    function DeleteOnTerminate(const proc : string) : boolean;
    [Error] E:\Simba\Includes\SRL-OSR/SRL/core/simba.simba(465:14): Unknown identifier '' at line 464
    Compiling failed.

    So it didn't work.
    SRL-OSR isn't technically ready yet, so you may have downloaded a bad version. Would probably be best to wait a day or two and download it again, see if the problem fixes itself.

  9. #9
    Join Date
    Oct 2012
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    dat flawlessness

    -* FightCaveTrainer v0.6
    -*
    -* Entered: 105
    -* Runtime: 5 Hours, 58 Minutes and 27 Seconds
    We see cave entrance!

  10. #10
    Join Date
    Sep 2008
    Posts
    754
    Mentioned
    8 Post(s)
    Quoted
    275 Post(s)

    Default

    Quote Originally Posted by SeanStar View Post
    SRL-OSR isn't technically ready yet, so you may have downloaded a bad version. Would probably be best to wait a day or two and download it again, see if the problem fixes itself.
    Yeah but i didn't find any actual thread about SRL-OSR, just that github with little information/explanations, am not expecting you to post any information so...

  11. #11
    Join Date
    Mar 2012
    Posts
    8
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    is "SRL-OSR" out i cant find the thread to it unless someone wants to link me.

  12. #12
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by kidnappings View Post
    is "SRL-OSR" out i cant find the thread to it unless someone wants to link me.
    There is no thread as it isn't really released yet. It's on github still being worked on for release (although it works for the most part)

    In other news...
    -* FightCaveTrainer v0.6
    -*
    -* Entered: 721
    -* Runtime: 49 Hours, 26 Minutes and 58 Seconds

  13. #13
    Join Date
    Mar 2013
    Posts
    15
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Which download am I downloading from this file?

  14. #14
    Join Date
    Nov 2007
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    -* FightCaveTrainer v0.6
    -*
    -* Entered: 205
    -* Runtime: 6 Hours, 36 Minutes and 16 Seconds

    Holy crap, this script is literally flawless. Great job! I'm gonna leave it on while I go to work and see if it's still running when I get back. That should put it at ~18 hours runtime. :P

  15. #15
    Join Date
    Sep 2008
    Posts
    754
    Mentioned
    8 Post(s)
    Quoted
    275 Post(s)

    Default

    Didn't really check specific onto what changes you amended to the script, but its working now =)

    Just one little thing, when i run it - it works but on the simba panel below the script input, it keeps repeating the message
    "We see cave entrance!" until it dies, this occurs once the script enters the cave - when it triple clicks it it doesn't show that message, once i enter and start walking north automatically, simba relays the message repeatedly "We see cave entrance!".

    Good script overall, i switch between this one and others just to mix my gameplay thank you sir! now all we need is a prayer working cave script :0

  16. #16
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by samerdl View Post
    Didn't really check specific onto what changes you amended to the script, but its working now =)

    Just one little thing, when i run it - it works but on the simba panel below the script input, it keeps repeating the message
    "We see cave entrance!" until it dies, this occurs once the script enters the cave - when it triple clicks it it doesn't show that message, once i enter and start walking north automatically, simba relays the message repeatedly "We see cave entrance!".

    Good script overall, i switch between this one and others just to mix my gameplay thank you sir! now all we need is a prayer working cave script :0
    Don't wear anything white. Including white hair.

  17. #17
    Join Date
    Sep 2008
    Posts
    754
    Mentioned
    8 Post(s)
    Quoted
    275 Post(s)

    Default

    Quote Originally Posted by SeanStar View Post
    Don't wear anything white. Including white hair.

    ah i was using desert boots = white, gotcha

  18. #18
    Join Date
    Jan 2009
    Posts
    27
    Mentioned
    1 Post(s)
    Quoted
    19 Post(s)

    Default

    [Error] C:\Simba\Includes\SRL-OSR/SRL/core/text.simba(805:13): Unknown identifier 'UpChars07' at line 804
    Compiling failed.

  19. #19
    Join Date
    Mar 2012
    Posts
    32
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    Currently using this script. Very simple, I think I'm going to add in a bit of camera rotation or something because it seems a little to bland without searching for anything or just looking like someones bored etc. Thanks for creating this script

  20. #20
    Join Date
    Feb 2013
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Exception in Script: Unable to find file 'SRL-OSR/Srl.simba' used from ''

    is this anti-leech?

  21. #21
    Join Date
    Mar 2013
    Posts
    63
    Mentioned
    0 Post(s)
    Quoted
    16 Post(s)

    Default

    One of the most flawless scripts I have ever used on Old School RS! Exceptional work. For those having problems, re download SRL-OSR re extract everything, thats what I did and all my scripts work flawlessly now.

    Does this support range?

  22. #22
    Join Date
    Mar 2013
    Posts
    63
    Mentioned
    0 Post(s)
    Quoted
    16 Post(s)

    Default

    Quote Originally Posted by huxley19 View Post
    Exception in Script: Unable to find file 'SRL-OSR/Srl.simba' used from ''

    is this anti-leech?
    Redownload SRL-OSR, you probably downloaded an older version that was bugged. Try it after you extract the new version.

  23. #23
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by fluffycluffy View Post
    Redownload SRL-OSR, you probably downloaded an older version that was bugged. Try it after you extract the new version.
    Implying he even had it downloaded at all and in the right spot. :P

  24. #24
    Join Date
    Mar 2013
    Posts
    63
    Mentioned
    0 Post(s)
    Quoted
    16 Post(s)

    Default

    Quote Originally Posted by SeanStar View Post
    Implying he even had it downloaded at all and in the right spot. :P
    Very true, nice script btw.

    Does it support range? Haven't tried range yet, but from what I've read in the code, it looks like it should.

  25. #25
    Join Date
    Jul 2012
    Posts
    113
    Mentioned
    7 Post(s)
    Quoted
    34 Post(s)

    Default

    Quote Originally Posted by fluffycluffy View Post
    Very true, nice script btw.

    Does it support range? Haven't tried range yet, but from what I've read in the code, it looks like it should.
    Yes it does, but it won't pick up ammunition used.

Page 1 of 38 12311 ... LastLast

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •