Page 1 of 2 12 LastLast
Results 1 to 25 of 44

Thread: [SRL-OSR] Mafia Miles Fly Fisher[SMART]

  1. #1
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

    Default [SRL-OSR] Mafia Miles Fly Fisher[SMART]


    Mafia Miles Fisher
    Introducing my Barbarian Village Fly Fisher.

    As soon as it recognizes that there is a fish in the inventory it will drop it. Later versions will include cooking and dropping the cooked fish. I might add a banking feature if SPSWALK on rs Gets fixed.

    IMPORTANT
    Only keep 7 items in first 7 inventory spots. Fly fish rod BRING MULTIPLE, feathers
    Only Afk if your willing to die. Randoms appear, No antirandom yet.
    BabySit Your Bot!

    Realeasing because I can only use SRL-OSR in my simba. The other fly fisher has a p07 include that I cant get to run.


    Code:
    program Fisher1;
    {$DEFINE SMART8}
    {$I SRL-OSR/SRL.Simba}
    {$I SRL-OSR/SRL/Misc/Debug.Simba}
    
    var x, y, i: integer;
    const
      AccountLogin = '';
      AccountPass = '';
      CharacterName = '';
      version = '1.1';               //fish1drop1  Wont Drop Featers or Rod When Placed In
                                     //the 1st-7th spot. Fill 1-7 invy spot with feathers and Rods :)
    
    //Declare your username and password
    procedure DeclarePlayer;
    begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
          Players[0].Name := AccountLogin;
          Players[0].Pass := AccountPass;
          Players[0].Nick := CharacterName; //Important for antirandoms
          Players[0].Active := True;
      end;
    
    Procedure AntiBan;
    begin
      //writeln('antiban debug!');
      Case Random(130) Of
        1: HoverSkill(skill_fishing, false);
        3: Boredhuman;
        4: Wait(2500 + random(4500));
        5: PickUpMouse;
        6: RandomMovement;
        7: RandomRClick;
        8: MakeCompass('random');
      end;
    end;
    
    
    
    Procedure DebugShiftCount;
    Var
    PBox: TBox;
    
    Begin
      PBox := IntToBox(245, 130, 285, 195);
      Writeln(IntToStr(AveragePixelShift(PBox, 250, 500)));
    End;
    
    
    Function isfishing: Boolean;   //Average PixelShift from Flights TuT (THANKS FLIGHT!!)
      var
        PBox: TBox;
      begin
        PBox := IntToBox(230, 165, 290, 260);
        Result := (AveragePixelShift(PBox, 300, 600) > 100); //Only 50 cause you are the only thing moving, so a little movement means chopping :)
      end;
    
    
    
    Procedure DropFish;
    var
      i: Integer;
    begin
      Writeln('Inventory full! Dropping Fishys!');
      if(InvFull) then
      for i := 7 to 28 do
      begin
        if ExistsItem(i) then
          DropItem(i);
          wait(50+random(50));
      end;
    end;
    
    procedure Fish;
    var
    x, y, i: integer;
    begin
          if not(isfishing) then
             wait(500);
          if (FindObjCustom(x, y, ['ure', 'ishin', 'ot'], [14597535, 15123609, 14794914, 14858129, 13216647, 14597268, 15123625, 14398100, 14729121], 3) ) then
          begin
            wait(600 + random(500));
            mouse(x,y,1,1,1)
            wait(5000 + random(100));
    
          Repeat
          if(InvFull) then
          DropFish;
          Until not(isfishing)
          end;
    end;
    
    
    
    
    begin
    SetupSRL;
      activateclient;
      DeclarePlayer;
      LoginPlayer;
      wait(500);
      repeat
        begin
        Antiban;
        Fish;
        end;
        until(false);
    end.
    BarbVillageFisher.simba
    Fisher1.simba

    Last edited by mafia miles; 04-19-2013 at 06:16 PM.

  2. #2
    Join Date
    Mar 2013
    Posts
    34
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    Seems like a really nice script, will test!

    May I ask does it work on other fishing spots?

  3. #3
    Join Date
    Mar 2013
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    22 Post(s)

    Default

    will test it

  4. #4
    Join Date
    Mar 2013
    Posts
    26
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

    Its pretty nice, wouldnt it gain more xp if you wait until inv is full then drop?

  5. #5
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

    Default

    Yes it would, but I am having trouble getting it to drop every time its full. So I went with a more simple dropper.

  6. #6
    Join Date
    Mar 2013
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    22 Post(s)

    Default

    Quote Originally Posted by mafia miles View Post
    Yes it would, but I am having trouble getting it to drop every time its full. So I went with a more simple dropper.
    hey mate, your script runs great. With some help I was able to adjust it to drop after a full inventory. Now I need to get it to recognize when it's fishing and when not to prevent mass clicking on fishing spots. When I got it done perfectly I will let you know

  7. #7
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

    Default

    Thanks, feel free to post the code here, and with you permission Ill add your adjusted code into the script(with credits ofc)!

  8. #8
    Join Date
    Mar 2013
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    22 Post(s)

    Default

    Quote Originally Posted by mafia miles View Post
    Thanks, feel free to post the code here, and with you permission Ill add your adjusted code into the script(with credits ofc)!
    Sure will do mate.

  9. #9
    Join Date
    Apr 2013
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

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

  10. #10
    Join Date
    Mar 2013
    Posts
    26
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

    I think if you add a wait ( Amount of time it takes for full inv + random (some number)); it would work for full inv But thats a maybe.

  11. #11
    Join Date
    Mar 2013
    Posts
    34
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    I think you could use InvFull to detect if the inventory is full then DropAllExcept the first 2 slots. Works nice except the dropping of fish and some randoms!

    Good job man!

  12. #12
    Join Date
    Mar 2013
    Posts
    26
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

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


    You need to download SRL-OSR and put it in your includes folder. and rename it to SRL-OSR

  13. #13
    Join Date
    Apr 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    Changing between fishing spots all the time, thats only thing that bugging me.

  14. #14
    Join Date
    Feb 2013
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    11 Post(s)

    Default

    nice script, its functional but not flawsless. Looking forward to cooking support.

  15. #15
    Join Date
    Mar 2012
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Script doesnt detect randoms and lost my fly fishing rod

  16. #16
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

    Default

    As stated before you need to babysit. Its not perfect. Ill add random detection and spot changing after more randoms are solved by the community.

  17. #17
    Join Date
    May 2012
    Posts
    35
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Is there any anti-ban? even simple? it doesnt seem like it, im scared ill get banned lol

  18. #18
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

    Default

    Dont Bot if your not willing to get banned. Last I heard Bottings not very bannable right now. Yes theres a antiban but it is simple and not very evolved. There are not very many people using my scripts so the ban chance is low. Go for it in my opinion.

  19. #19
    Join Date
    Mar 2013
    Posts
    34
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    Quote Originally Posted by tsaopower View Post
    Script doesnt detect randoms and lost my fly fishing rod
    To get around this you could do this:

    Code:
    begin
        oo:= RandomRange(200, 400)
        for i:= 4 to 28 do
        if ExistsItem(i) then
        begin
          MouseItem(i, mouse_right);
          WaitOptionEx('rop', 'action', ClickLeft, oo);
        end;
    end;
    Change that to:

    Code:
    begin
        oo:= RandomRange(200, 400)
        for i:= 8 to 28 do
        if ExistsItem(i) then
        begin
          MouseItem(i, mouse_right);
          WaitOptionEx('rop', 'action', ClickLeft, oo);
        end;
    end;
    Now you can get 1 slot feathers and 7 slots rod's. You will need a couple more randoms to loose all your rods.

  20. #20
    Join Date
    Sep 2012
    Location
    Netherlands
    Posts
    2,752
    Mentioned
    193 Post(s)
    Quoted
    1468 Post(s)

    Default

    HoverSkill(skill_hitpoints, false) should be changed to hoverskill(skill_fishing, false). Right? It seems odd when you keep watching your hp xp while you are fishing. Other than that, nice basic script keep updating it and it will turn in a flawless and awesome fisher

  21. #21
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

    Default

    Updating Script to 1.1. Now Hovers over fishing skill occasionally. Will now DETECT if fishing, so it will NOT spam click No Random support yet, please link me on how to detect if in a area, or if randoms are around. Thank You and Fish On!

  22. #22
    Join Date
    Apr 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    Still jumps from spot to spot if that worked the bot would be very good.

  23. #23
    Join Date
    Dec 2011
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    26 Post(s)

  24. #24
    Join Date
    Apr 2013
    Posts
    12
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    hi, i would really like the silk thiever since i need 53 thiefing haha,
    does it drop full inventory when its full? because that would be the best.
    you should release it ! or share with me haha XD

  25. #25
    Join Date
    Apr 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    What is happening with the bot?

Page 1 of 2 12 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
  •