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

Thread: Auto Miner Dropping Ores

  1. #1
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Auto Miner Dropping Ores

    I have a minner and i have the drop 2,28 thing but it says couldnt find question logging out i need something to locate the question or something help would be appreciated and ill give rep

  2. #2
    Join Date
    Dec 2006
    Location
    Third rock from the sun.
    Posts
    2,510
    Mentioned
    4 Post(s)
    Quoted
    1 Post(s)

    Default

    Post script please?

  3. #3
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    kk
    SCAR Code:
    program MyWorkingPowerMiner;
    {.include SRL\SRL.scar}

    //Ore Color needed on line 23

    //CopperColor       = 4286610;
    //TinColor          = 9277080;
    //ClayColor         = 4553880;
    //IronColor         = 1910851;
    //SilverColor       = 12434885;
    //CoalColor         = 2834753;
    //GoldColor         = 1881051;
    //MithrilColor      = 7359564;
    //AdamantColor      = 6322272;
    //RuniteColor       = 8681306;


    const
      RockWait = 6000;//Time to hit rock again change if to fast
      NumberOfUsers = 1;//can only do one 1 at the moment
      StartPlayer = 1;//Cant be anything else at the moment
      RockColor = 9277080;//use ore color above for what u want to powermine
      RunDir         =    'S'; // RunDirection, choose it wisely.
    {--------------------------------------------------------

    Procedure DeclarePlayers;

    --------------------------------------------------------}


    Procedure DeclarePlayers;

      Begin
         HowManyPlayers := NumberOfUsers;
         NumberOfPlayers( HowManyPlayers );
         CurrentPlayer := StartPlayer;

         Players[0].Name :='username here';//Username here
         Players[0].Pass :='password here';//Password here
         Players[0].Nick :='nick';//3 Lowercase letters of youre name
         Players[0].Active:=True;

    end;
    procedure Miner;

    begin

      repeat

        FindColorSpiral(x, y, RockColor, 3, 3, 515, 336)

        MMouse(x, y, 3, 3)

        IsTextAt2(9, 9, 'Mine', 20)

        Mouse(x, y, 2, 2, True)

        Wait(RockWait + Random(300))

      until(InvFull)

      if(InvFull = True)then
    end;

    procedure Randoms;
    begin
      TalkToRand;
      FindNormalRandoms;
      if (FindFight) then
      begin
        RunWhere(RunDir, false);
        Wait(10000 + random(200))
          RunBack;
      end;
      begin
        RunWhere(RunDir, false);
        Wait(2000 + random(1000));
        RunBack;
        WriteLn('Waiting For Gas to Stop ..');
        Wait(10000 + random(2000));
      end;
      if (FindNewBox) then
      begin
        writeln('Found Strange Box Trying To Solve..')
          OpenBox;
        SolveBox;
        wait(1000);
      end;
      if (FindNewBox) then
      begin
        GambleNewBox;
      end;
      if (FindNewBox) then
      begin
        LogOut;
        Writeln('Unable To Solve Box....Terminating');
        TerminateScript;
      end;
      begin
        LoadSandArray;
        LoadSWBitMaps;
        SetupSandwich;
        ReleasesandWich;
        GetSandQuestion;
        SolveSandwich;
        SolveFrog;
      end;
    end;
    function DoAntiBan: Boolean;
    begin
      AntiBan;
      wait(50 + random(100));
      BoredEvery(3 + random(3));
      wait(100 + random(100))
        RotateEvery(7 + random(4));
      wait(750 + random(250));
      LeaveScreenEvery(5 + random(7));
      wait(500 + random(150));
    end;


    procedure DropOres;

    begin

      DropTo(2, 28);

    end;




    begin

      SetupSRL;

      repeat

      DeclarePlayers;
        Miner;
        LoadSandArray;
        LoadSWBitMaps;
        SetupSandwich;
        ReleasesandWich;
        GetSandQuestion;
        SolveSandwich;
        SolveFrog;
        DropOres;

      until(False)

    end.

  4. #4
    Join Date
    Feb 2007
    Location
    SparklesProd.com
    Posts
    2,406
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Compiles ok. Whats the problem ?

  5. #5
    Join Date
    Jan 2007
    Posts
    248
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Not smart to put in your username and pass into the const for everyone to see. I'd suggest taking it out.

  6. #6
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Doh any1 can have the acc if they want a level 5 noob yes it all works but when it gets to the dropping it dnt drop it says cant find question or something then log outs


    EDIT

    Now it just goes to the top righthand corner plz help


    SCAR Code:
    program MyWorkingPowerMiner;
    {.include SRL\SRL.scar}

    //Ore Color needed on line 23

    //CopperColor       = 4286610;
    //TinColor          = 9277080;
    //ClayColor         = 4553880;
    //IronColor         = 1910851;
    //SilverColor       = 12434885;
    //CoalColor         = 2834753;
    //GoldColor         = 1881051;
    //MithrilColor      = 7359564;
    //AdamantColor      = 6322272;
    //RuniteColor       = 8681306;


    const
      RockWait = 6000;//Time to hit rock again change if to fast
      NumberOfUsers = 1;//can only do one 1 at the moment
      StartPlayer = 0;//Cant be anything else at the moment
      RockColor = 9277080;//use ore color above for what u want to powermine
      RunDir         =    'S'; // RunDirection, choose it wisely.
    {--------------------------------------------------------

    Procedure DeclarePlayers;

    --------------------------------------------------------}


    Procedure DeclarePlayers;

      Begin
         HowManyPlayers := NumberOfUsers;
         NumberOfPlayers( HowManyPlayers );
         CurrentPlayer := StartPlayer;

         Players[0].Name :='Username';//Username here
         Players[0].Pass :='Password';//Password here
         Players[0].Nick :='nickname';//3 Lowercase letters of youre name
         Players[0].Active:=True;

    end;
    procedure Miner;

    begin

      repeat

        FindColorSpiral(x, y, RockColor, 3, 3, 515, 336)

        MMouse(x, y, 3, 3)

        IsTextAt2(9, 9, 'Mine', 20)

        Mouse(x, y, 2, 2, True)

        Wait(RockWait + Random(300))

      until(InvFull)

      if(InvFull = True)then
    end;

    procedure Randoms;
    begin
      TalkToRand;
      FindNormalRandoms;
      if (FindFight) then
      begin
        RunWhere(RunDir, false);
        Wait(10000 + random(200))
          RunBack;
      end;
      begin
        RunWhere(RunDir, false);
        Wait(2000 + random(1000));
        RunBack;
        WriteLn('Waiting For Gas to Stop ..');
        Wait(10000 + random(2000));
      end;
      if (FindNewBox) then
      begin
        writeln('Found Strange Box Trying To Solve..')
          OpenBox;
        SolveBox;
        wait(1000);
      end;
      if (FindNewBox) then
      begin
        GambleNewBox;
      end;
      if (FindNewBox) then
      begin
        LogOut;
        Writeln('Unable To Solve Box....Terminating');
        TerminateScript;
      end;
      begin
        LoadSandArray;
        LoadSWBitMaps;
        SetupSandwich;
        ReleasesandWich;
        GetSandQuestion;
        SolveSandwich;
        SolveFrog;
      end;
    end;
    function DoAntiBan: Boolean;
    begin
      AntiBan;
      wait(50 + random(100));
      BoredEvery(3 + random(3));
      wait(100 + random(100))
        RotateEvery(7 + random(4));
      wait(750 + random(250));
      LeaveScreenEvery(5 + random(7));
      wait(500 + random(150));
    end;


    procedure DropOres;

    begin

      DropTo(2, 28);

    end;




    begin

      SetupSRL;

      repeat

      DeclarePlayers;
        Miner;
        LoadSandArray;
        LoadSWBitMaps;
        SetupSandwich;
        ReleasesandWich;
        GetSandQuestion;
        SolveSandwich;
        SolveFrog;
        DropOres;

      until(False)

    end.

  7. #7
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    Dude you put your username and password in!
    umm where did u get your randoms and gas thing. i need for mine. can i use?

  8. #8
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    i no bt the pass lol lvl 5 -.- i dont care if any 1 takes it lol yes u can use it and do u no y mine just goes to the top left corner

  9. #9
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    when does it do it?
    one sec i'll download but i know nothing about scripting

  10. #10
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol asa soon as i start it it goes to top left yesterday it works i mite start from scratch again -.-

  11. #11
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    It's ur anti randoms and anti ban...somewhere in there cos as soon as i added to script it did same thing

  12. #12
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    i think its the randoms cause i onli had antiban yesterday

    EDIT nope i took out anitrandoms still dont work and antiban still dont work so nothing to do with them

  13. #13
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    ok this is a piece of bullcrap lol i put your stuff in it didn't work took it out everything exactly the same as last time and now its doing the same thing yours did but mine wasn't doing it before! how retarded lol
    I even saved it before i put your stuff in and that version not working hmm.

  14. #14
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    nearly fixed i changed the Mouse bit it looks in my inventory then goes back to top left just need to change a few more things

  15. #15
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    i fixed mine just changed the ore color in my const lol.
    post what u changd

  16. #16
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    the MMouse and Mouse but ill try const

    EDIT

    ty very much it was the const lol 1 major problem it dont drop for some reason please helppppppppppp

  17. #17
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    use this works perfectly for me put after invent full thingy:
    procedure Drop;
    begin
    DropAll;
    end;
    also did u get it working with your antiban/randoms?

  18. #18
    Join Date
    Sep 2006
    Posts
    5,219
    Mentioned
    4 Post(s)
    Quoted
    1 Post(s)

    Default

    2,28 is for not dropping a non wielded pick

  19. #19
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    huh im confused i need it to drop 2,28 incase of pick not equpted yeah antiban and anti randoms work

  20. #20
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    lol our scripts are very alike from me looking at them lol. think we used same TUT
    err boreas or sum1 where do i get pickhead stuff for when it comes off etc?

  21. #21
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol i used jad the things the beggingng tuts dont teach u

  22. #22
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    same rofl
    err i just got smoking rock and it didn't run away why? can u post ur new script rude
    wanna check your randoms

  23. #23
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    i took that out ill add back in a min i need to know how to drop the ores properly first weres youre changed version of my script?

  24. #24
    Join Date
    Jan 2007
    Location
    Not here
    Posts
    1,604
    Mentioned
    2 Post(s)
    Quoted
    19 Post(s)

    Default

    what?

  25. #25
    Join Date
    Dec 2006
    Posts
    2,244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I took the gas procedure out because it werent working i will put it back in when i fix the droppping procedure post the current script u got with the working dropping procedure then i put gas into it.

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)

Similar Threads

  1. need a good script , auto miner auto banker plz!!
    By samuel in forum RS3 Outdated / Broken Scripts
    Replies: 27
    Last Post: 11-19-2007, 08:46 AM
  2. auto miner
    By C000LIN in forum OSR Help
    Replies: 3
    Last Post: 07-28-2007, 07:53 PM
  3. auto miner for ess
    By xist2spire in forum RS3 Outdated / Broken Scripts
    Replies: 6
    Last Post: 03-04-2007, 06:40 AM
  4. My auto miner v2
    By HarryJames in forum OSR Help
    Replies: 2
    Last Post: 03-01-2007, 10:11 PM

Posting Permissions

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