Page 3 of 3 FirstFirst 123
Results 51 to 61 of 61

Thread: [AeroLib][Reflection] Davi's powerminer

  1. #51
    Join Date
    Jan 2016
    Posts
    77
    Mentioned
    0 Post(s)
    Quoted
    44 Post(s)

    Default

    Quote Originally Posted by AFools View Post
    The powerminer uses both includes; hopefully by the end of the day it will be strictly reflection only; (without aerolib). i will then post the powerminer..

    Once i have 60 mining which wont take long... i will fix the guild miner && post that too. Which 'should' not take very long to put together. I have tried to make everything as simple as possible.. so you guys can learn from it/ edit/ maintain.

    PS. the power miner is pretty dam quick between rock responses! i struggled with getting it so quick a year ago. Amazing how quick we learn..


    - I never got enough feedback from the scripts i posted.. so i lost interest maintaining them.. my AIO i might re-write the EZFORM then you will have a smithing script once again.
    Thats great news! I look forward to seeing them! Thank you for taking the effort to simplify them for newer members like me to learn.

    As for what you mentioned with the lack of feedback I've been trying to try out a variety of scripts here to help with maintenance (as it is the only thing I can do right now since I havent learned the scripting) and I'll definitely continue doing so until I can be of more use when I learn scripting in the summer.

    Also I had a question about scripts like these;

    you mentioned you managed to increase the speed between rock clicks but Ive always wondered if that was a good or bad thing. I thought someone consistently clicking at the same rate may seem more botlike. Is that the case? I would presume it isnt since I havent seen many people complain about being banned from the mining scripts, where repetitve clicking is a need.

  2. #52
    Join Date
    Feb 2012
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    This script is still awesome. You'll need to update the IDs but after that it's still very effective. I enjoy the true or false misclick function as well. Thanks

  3. #53
    Join Date
    Jan 2011
    Posts
    335
    Mentioned
    0 Post(s)
    Quoted
    23 Post(s)

    Default

    Ran this script for 13 hours, fingers crossed no bans.
    Minor adjustments are needed...

    1. In rimmington mine it does not detect closest iron ores and runs back and forth between to ores far apart

    2. When it mines a different ore other than specified the script shuts down (very bad since misclicks were added in)

    3. Dismiss randoms needs to be added in, I feel this is a big thing that is getting accounts banned.
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly.

  4. #54
    Join Date
    May 2013
    Posts
    205
    Mentioned
    1 Post(s)
    Quoted
    85 Post(s)

    Default

    i set it to mine iron in edge village dungeon it's mining coal

    EDIT:
    ran the bot for about 3 hour in remmington, banne behaves a lot like a bot maybe change how the drop function work? instead of dropping on full inventory once full drop one and mine. runs to farther rock when there is an available rock nearby

  5. #55
    Join Date
    Jun 2016
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Doesn't work for me. Even when I select IRON it keeps mining Clay, tried Copper and wasnt able to detect.
    How to fix this?

  6. #56
    Join Date
    Feb 2014
    Location
    UDFj-39546284
    Posts
    76
    Mentioned
    1 Post(s)
    Quoted
    43 Post(s)

    Default

    Works better.. Kinda. I didn't update IDs except some iron. I removed antiban because I won't be afking or using it really, can easily add it back in if you want xd



    thing

    Code:
    program MixMashPowerMinerNoCredit;
    {$DEFINE SMART}
    {$i AeroLib/AeroLib.Simba}
    {$i Reflection/Reflection.Simba}
    
    var RockIDs, MineAnimationIDs, PickAxeIDs: TIntegerArray;
        ReflectPlayer : TReflectLocalPlayer;
    
    
    procedure setupScriptVars;
    begin
      RockIDs := [13711, 13710, 7487, 7488, 7455, 7489, 7486, 7484, 7483, 7481, 9669, 9670, 9671, 14886, 14885, 14884, 7486, 7484];
      MineAnimationIDs := [624, 625, 626, 627, 628, 629];
      PickAxeIDs := [1265, 1273, 11920, 1275, 1271, 1269, 1267];
    
      Me.Active := true;
      Me.Name := 'USERNAME'; // Enter the account email here
      Me.Pass := 'PASSWORD';  // Enter the account password here
    
    
    end;
    
    
    procedure randomMouseInput(pnt:Tpoint; ranx, rany:integer);
    begin
      case random(3) of
        0:humanMMouse(pnt, ranx, rany);
        1:missMouse(pnt, ranx, rany);
        2:mouse(pnt, ranx, rany, mouse_move);
      end;
    end;
    
    function R_TileOnMS(Tile : TPoint; var OutputPoint : TPoint; x : integer = 0; y : integer = 0; z : integer = 0):boolean;
    var tempB : TBox;
    begin
      OutputPoint := TReflectionTiles.TileToMS(Tile, x, y, z);
      tempB := intToBox(MSX1, MSY1, MSX2, MSY2);
      result := PointInBox(OutputPoint, tempB);
    end;
    
    procedure doDrop;
    var RSTile : TPoint;
      _objects : TReflectObjectArray;
      _items : TReflectInvItemArray;
      i, h : integer;
    begin
      begin
       sleep(100+random(50));
        _items.GetAll;
          for h:=0 to high(_items) do begin
           if not inIntArray(PickAxeIDs, _items[h].getId) and itemInSlot(_items[h].getinvslot) then begin
           interactSlot(_items[h].getinvSlot, 'Drop');
            end;
            i:=high(_objects);
          end;
        end;
      end;
    
    
    procedure Mineore;
    var RSTile : TPoint;
      tempObject : TReflectObject;
      _objects : TReflectObjectArray;
      i : integer;
    begin
        _objects.GetAll(ObjGame, 30);
          if inIntArray(RockIDs, _objects[i].getId) then begin
            RSTile := TReflectionTiles.TileToMS(_objects[i].GetTile);
              if not PointInBox(RStile, AREA_MS) then begin
                if TReflectionTiles.NearTile(_objects[i].GetTile, 150) then
                  ReflectPlayer.BlindWalkMM(_objects[i].GetTile, 5);
                RSTile := TReflectionTiles.TileToMS(_objects[i].GetTile);
              end;
            if PointInBox(RStile, AREA_MS) then begin
             Mouse(RSTile, -5, 5, mouse_left);
             wait(70+random(50));
              while didClick(true, 120) or (ReflectPlayer.GetAnimation <> -1) do wait(randomrange(5,20));
              FFlag(0);
               RSTile := _objects[i].getTile;
                tempObject.GetAt(ObjGame, RSTile);
                while inIntArray(RockIDs, tempObject.getID) and inIntArray(MineAnimationIDs, ReflectPlayer.GetAnimation) and isLoggedIn do begin
                tempObject.GetAt(ObjGame, RSTile);
               end;
              end;
            i := high(_objects);
          end;
    end;   
    
    begin
      initAL;
      Reflect.Setup;
      setupScriptVars;
      if isLoggedIn then begin
        setCompass('N');
        setAngle(ANGLE_HIGH);
        ReflectPlayer.Create;
      end;
      repeat
        if isLoggedIn then begin
          if(getRunEnergy >= 50) and not isUsingRun then
              toggleRunning(true);
          if isInvFull then begin
            doDrop;
          end else begin
            Mineore;
          end;
        end else begin
          if loginPlayer(false) then begin
            setCompass('N');
            setAngle(ANGLE_HIGH);
            ReflectPlayer.Create;
          end;
        end;
      until(false);
    end.

  7. #57
    Join Date
    Oct 2015
    Posts
    27
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    Great script it runs smoothly

  8. #58
    Join Date
    Feb 2017
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    The script doesnt work this is the console when trying to compile

    Error: Expected variable of type "Int32", got "AnsiString" at line 252, column 11 at line 252
    Compiling failed.

    i have both reflection and aerolib not sure why not working

  9. #59
    Join Date
    Jun 2013
    Location
    Scranton
    Posts
    496
    Mentioned
    5 Post(s)
    Quoted
    220 Post(s)

    Default

    Quote Originally Posted by Skyencez View Post
    The script doesnt work this is the console when trying to compile

    Error: Expected variable of type "Int32", got "AnsiString" at line 252, column 11 at line 252
    Compiling failed.

    i have both reflection and aerolib not sure why not working
    Change line 252 to this:
    Simba Code:
    RSW.Init('WorldMap');

  10. #60
    Join Date
    Feb 2017
    Posts
    6
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    Ah nice its working now thanks!

  11. #61
    Join Date
    Sep 2017
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Capture.PNG


    i cant open please help me i try all scripts i know the problem on me but please tell me with video

Page 3 of 3 FirstFirst 123

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
  •