Results 1 to 5 of 5

Thread: Power miner??????

  1. #1
    Join Date
    Jun 2007
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Power miner??????

    program PowerMiner;
    {.include SRL/SRL.scar}
    const
    Normal=10263720;
    begin
    findColor
    Mouse(righclick)
    end;
    end.

    ^am i on the right track this is my first script^

  2. #2
    Join Date
    Dec 2006
    Location
    .̿̂̔͋͗̎̆ͥ̍̒ͤ͂̾̌̀̅
    Posts
    3,012
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    Hm.. a bit You need to add more parameters to the commands though.

  3. #3
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Hm.. a bit You need to add more parameters to the commands though.
    I'd Say A Bit To

  4. #4
    Join Date
    Jun 2007
    Location
    Tampa, FL
    Posts
    39
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    your kind of there, but the problem with that is that the mouse parameters are way off. I would try this
    SCAR Code:
    program PowerMiner;
    {.include SRL/SRL.scar}
    var Tries: Integer
    const
    orename = orecolor
     begin
      repeat    
        FindColorTolerance(x,y,orename,MSX1,MSY1,MSX2,MSY2,3);
        if(not(FindColorTolerance(x,y,orename,MSX1,MSY1,MSX2,MSY2,3))) then
        begin
          Tries:=0;
          repeat
            Wait(400 + random(50));
            Tries := Tries + 1;
            If Tries=20 then
            Begin
              Writeln('Cant find Ore');
              Terminate Script;
            end;
          until FindColorTolerance(x,y,orename,MSX1,MSY1,MSX2,MSY2,3);
        MMouse(x,y,0,0)
        Mouse(x,y,0,0)
        Wait(5000)
      until (InvFull)
    end.
    What this does is it would find the color, and if you can't find the color, it would try to find it until you do or if you've tried 20 times. After 20 tries it would end the script. And it wont stop mining until your inventory is full.
    Can't sleep Clowns will eat me
    Can't eat Clowns will sleep with me

  5. #5
    Join Date
    May 2006
    Posts
    1,230
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    his^^^ but fixed up

    SCAR Code:
    program PowerMiner;
    {.include SRL/SRL.scar}
    var
      Tries: Integer;
    const
    orecolor = 0;

    begin
      repeat
        if(not(FindColorTolerance(x,y,orecolor,MSX1,MSY1,MSX2,MSY2,3))) then
        begin
          Tries:=0;
          repeat
            Wait(400 + random(50));
            Tries := Tries + 1;
            If Tries=20 then
            Begin
              Writeln('Cant find Ore');
              TerminateScript;
            end;
          until FindColorTolerance(x,y,537161,MSX1,MSY1,MSX2,MSY2,3);
        end;
        MMouse(x,y,0,0)
        Mouse(x,y,0,0, True)
        Wait(5000);
      until (InvFull)
    end.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. power miner
    By loliker123 in forum RS3 Outdated / Broken Scripts
    Replies: 1
    Last Post: 08-28-2008, 09:12 PM
  2. Power Miner help
    By Harkonnen in forum OSR Help
    Replies: 6
    Last Post: 07-14-2008, 02:12 AM
  3. I need help with my power miner
    By dallas574 in forum OSR Help
    Replies: 3
    Last Post: 04-27-2008, 04:26 PM
  4. Power Miner
    By yanix in forum RS3 Outdated / Broken Scripts
    Replies: 1
    Last Post: 11-11-2007, 06:51 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
  •