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

Thread: sunnys first powerminer

  1. #1
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default sunnys first powerminer

    hello this is my first script(although its from a tut so does that count as mine?)

    anyway can someone plz read through it for me and give me someadvise on stuff to add and all that and for errors because im sure i stuffed up somewhere

    *edit* it seems to make my pc run realy slow aswell not sure if theres something i can do about that or not

    thats the most up to date one VVV
    SCAR Code:
    program MyFirstPowerMiner;
    {.include SRL/SRL.scar}
    //////////////////////////////////////////////////////////////////////////////
    //   this is my first powerminer thanks Torrent of Flame for the great [TUT]//
    //                                                                          //
    //                                                                          //
    // thanks to NaumanAkhlaQ for all the help fixing this script               //
    //  and to Nava2 for the droprocks procedure and help with the script       //
    //////////////////////////////////////////////////////////////////////////////
    const
    RockColour1=5475809;//use dibber to get colour


    var
    x, y, Tries: integer;
    f,l: integer;

    procedure DeclarePlayers;
    begin
       HowManyPlayers :=1;
       NumberOfPlayers(HowManyPlayers);
       CurrentPlayer:= 0 ;

       Players[0].name   := '';//RS username
       Players[0].Pass   := '';//RS password
       Players[0].Nick   := '';//4 letters from user name with no spaces
       Players[0].Active := True;//do you want to use this user

    end;

    procedure AntiRandoms;
    begin
      If(FindFight)then
      RunAway('N', True,1,15000);
      FindNormalRandoms;
      FindLamp('Mining');
      end;

    procedure AntiBan;
    begin
      if not LoggedIn then exit;
      case random(10) of
        1: RandomRClick;
        2: HoverSkill('Mining', False);
        3: RandomMovement;
        4: BoredHuman;
        5: AlmostLogout;
        6: DoEmote(4 +Random(9))

        end;
    end;

    procedure MineRock;
    begin
     if not LoggedIn then
      Exit;
     
      repeat
        if (FindObjCustom(x, y,['ine'], [RockColour1],8))then
          begin
            MMouse(x, y, 0, 0,);
            If IsUpText('ine') then
              Mouse(x,y,1,1,true);
              Repeat
    MineRocks
    Loads:=Loads+1;
    Until(Loads > 27)

                AntiRandoms;
         end;
    end;

    {*******************************************************************************
    procedure DropItems(f,l: integer);
    By: Nava2
    Description: Drops items in slots f-l.
    *******************************************************************************}

    procedure DropItems(f, l: integer);
    var i, TMSpeed: integer;
    begin
      if not LoggedIn then
      begin
        ReasonEnded := 'Not Logged In';
        PlayerReport;
        Exit;
      end;
      if not InvFull then exit;
      TMSpeed := MouseSpeed;
      MouseSpeed := 20 + random(5);
      for i:= f to l do
      DropItem(i);
      MouseSpeed := TMSpeed;
    end;

    begin
     SetupSRL;
     repeat
       RockMining;
       DropItems;
       AntiBan;
     until (false)
    end.

    thanks

  2. #2
    Join Date
    Nov 2007
    Location
    Poland
    Posts
    139
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Seems like a good first script.
    But:
    ~~You never used your AntiRandoms;
    ~~Insted
    SCAR Code:
    if(Tries = 20)
    use
    SCAR Code:
    if(Tries >=5)
    20 is too more
    ~~ I'm always clicking left on rock not right choosing option mine so:
    insted:
    SCAR Code:
    case (Random(2)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1: Mouse(x, y, 4, 4, True);
        end;
    use:
    SCAR Code:
    case (Random(5)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1, 2, 3, 4: Mouse(x, y, 4, 4, True);
        end;

  3. #3
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by iroki View Post
    Seems like a good first script.
    But:
    ~~You never used your AntiRandoms;
    ~~Insted
    SCAR Code:
    if(Tries = 20)
    use
    SCAR Code:
    if(Tries >=5)
    20 is too more
    ~~ I'm always clicking left on rock not right choosing option mine so:
    insted:
    SCAR Code:
    case (Random(2)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1: Mouse(x, y, 4, 4, True);
        end;
    use:
    SCAR Code:
    case (Random(5)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1, 2, 3, 4: Mouse(x, y, 4, 4, True);
        end;

    cool i'll have a fiddle, how do i turn the anti randoms on?

  4. #4
    Join Date
    Apr 2008
    Posts
    12
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    1 Thing first: Take out ur Username/PW =P

    With your drop script, you could try using a DTM to drop your ores instead of using FindObjCustom.
    Reality is for those who can't handle dreams...

  5. #5
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Deathjoey View Post
    1 Thing first: Take out ur Username/PW =P

    With your drop script, you could try using a DTM to drop your ores instead of using FindObjCustom.
    thanks is DTM the bitmap thing?

  6. #6
    Join Date
    Nov 2007
    Location
    Poland
    Posts
    139
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    No DTM isn't Bitmap.
    If you want 'turn on' your antirandom procedure you should put somewhere in you mining procedure AntiRandoms;
    ~~If you want drop your ores you can use this:
    SCAR Code:
    For I := 2 To 28 Do
      Begin
        If ExistsItem(I) Then
        Begin
          MouseItem(I, False);
          Wait(RandomRange(400, 500));
          ChooseOption('All');
          Wait(1200 + Random(500));
        End;
      End;

  7. #7
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by iroki View Post
    No DTM isn't Bitmap.
    If you want 'turn on' your antirandom procedure you should put somewhere in you mining procedure AntiRandoms;
    ~~If you want drop your ores you can use this:
    SCAR Code:
    For I := 2 To 28 Do
      Begin
        If ExistsItem(I) Then
        Begin
          MouseItem(I, False);
          Wait(RandomRange(400, 500));
          ChooseOption('All');
          Wait(1200 + Random(500));
        End;
      End;

    i didnt think there was an option for drop all?

  8. #8
    Join Date
    Nov 2007
    Location
    Poland
    Posts
    139
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Yeah.. not all but 'drop'. My fauld.

  9. #9
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by iroki View Post
    Yeah.. not all but 'drop'. My fauld.
    ok havnt got round to fixing the script anyway probly do it tomorow after work. will let you know how it goes, might have a read about DTM

  10. #10
    Join Date
    Apr 2008
    Posts
    0
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    qite goodd for a 1st script =[) keep it up

  11. #11
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Umm martyn can you stop spamming!

    @Rest of you, There was quite a nifty function in SRL called DropToPosition but it was taken out,
    Also you might want to try this function:

    SCAR Code:
    DropInv

    Hope I Helped

  12. #12
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by NaumanAkhlaQ View Post
    Umm martyn can you stop spamming!

    @Rest of you, There was quite a nifty function in SRL called DropToPosition but it was taken out,
    Also you might want to try this function:

    SCAR Code:
    DropInv

    Hope I Helped
    thanks
    with the dropinv would that drop my pick aswell if i had it in there?

    and how do i know what srl revision my script is for so i can put it at the start?

  13. #13
    Join Date
    Jan 2008
    Location
    Stanford, CA
    Posts
    329
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Quote Originally Posted by sunny View Post
    thanks
    with the dropinv would that drop my pick aswell if i had it in there?

    and how do i know what srl revision its for?
    Make sure i noticed that you put something with Tries=20 but there was no repeat/until that would cause tries to be 20, so in that aspect that failsafe would not be that great.

    neway for the dropinv it would drop the ores that u mined. but u have to make sure to place it AFTER your mining procedure.

    and for the SRL revision u can just go to i think inventory.scar? and check if there is any function for dropping from a specified area in ur inventory to another. i think 15 might have it or it mightve been takin out....im not sure

  14. #14
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ok heres the modifide script

    got this when i tried to compile it

    [Error]: Access violation at address 0052B566 in module 'scar.exe'. Read of address 0000000C

    and i want to add a proggie and srl stats any help would be great



    SCAR Code:
    program MyFirstPowerMiner;
    {.include SRL/SRL.scar}
    //////////////////////////////////////////////////////////////////////////////
    //   this is my first powerminer thanks Torrent of Flame for the great [TUT]//
    //   fill out lines 10,11,17,19,21 to 24                                    //
    //                                                                          //
    //                                                                          //
    //////////////////////////////////////////////////////////////////////////////
    const
    RockColour1=5475809;//use dibber to get colour
    RockColour2=7381226;//use dibber to get colour

    var x, y, Tries: integer;


    procedure DeclarePlayers;
    begin
       HowManyPlayers :=1;
       NumberOfPlayers(HowManyPlayers);
       CurrentPlayer:= 0 ;
       
       Players[0].name   := '';//RS username
       Players[0].Pass   := '';//RS password
       Players[0].Nick   := '';//4 letters from user name with no spaces
       Players[0].Active := True;//do you want to use this user
       
    end;

    procedure AntiRandoms;
    begin
      If(FindFight)then
      RunAway('N', True,1,15000);
      FindNormalRandoms;
      FindLamp('Mining');
      end;

    procedure AntiBan;
    begin
      if not LoggedIn then exit;
      case random(30) of
        1: RandomRClick;
        2: HoverSkill('Mining', False);
        3: RandomMovement;
        4: BoredHuman;
        5: AlmostLogout;
        6: DoEmote(400 +Random(90))
        end;
    end;

    procedure RockMining;
    begin
    if not LoggedIn then
     Exit;
     if (not (FindObjCustom(x, y, ['Mi', 'ne'], [RockColour1, RockColour2], 7))) then
     Wait(100+random(100));
     Tries := Tries + 1;
     if(Tries >= 5)then
       begin
         Logout;
         Exit;
       end else
     if FindObjCustom(x, y, ['Min', 'ine'], [RockColour1, RockColour2], 7) then
     repeat
        case (Random(5)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1, 2, 3, 4: Mouse(x, y, 4, 4, True);

         AntiRandoms:;

        end;

      until (InvFull)
    end;

    procedure DropRocks;

    begin
      if ExistsItem(I) Then
      Begin
        MouseItem(I, False);
        Wait(RandomRange(400, 500));
        ChooseOption('drop');
        Wait(1200 + Random(500));
      end;
    end;

    begin
     SetupSRL;
     repeat
       RockMining;
       DropRocks;
       AntiBan;
     until (false)
    end.

  15. #15
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Its the
    SCAR Code:
    DTM: Integer
    If you dont have a dtm linked to that then you get an access violation

    Hope I Helped

  16. #16
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by NaumanAkhlaQ View Post
    Its the
    SCAR Code:
    DTM: Integer
    If you dont have a dtm linked to that then you get an access violation

    Hope I Helped
    oh forgot i had that in there, thanks heaps

    ok got rid of that

    but still getting
    [Error]: Access violation at address 0052B566 in module 'scar.exe'. Read of address 0000000C

  17. #17
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You have to load the dtm?
    and you have to free it ebfore you load it again..

    Add FreeDTM(TheNameOFTHEDTM) After you used the dtm
    ~Hermen

  18. #18
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Tried my best to fix it but i'm bamboozled this is a close as I got

    • There's a big problem with your rock mining procedure, thats where the error is.
    • Also you need a WaitWhileMining procedure otherwise it will click infinately.


    This is as far as i got:

    SCAR Code:
    program MyFirstPowerMiner;
    {.include SRL/SRL.scar}
    //////////////////////////////////////////////////////////////////////////////
    //   this is my first powerminer thanks Torrent of Flame for the great [TUT]//
    //   fill out lines 10,11,17,19,21 to 24                                    //
    //                                                                          //
    //                                                                          //
    //////////////////////////////////////////////////////////////////////////////
    const
    RockColour1=5475809;//use dibber to get colour
    RockColour2=7381226;//use dibber to get colour

    var
    x, y, Tries: integer;


    procedure DeclarePlayers;
    begin
       HowManyPlayers :=1;
       NumberOfPlayers(HowManyPlayers);
       CurrentPlayer:= 0 ;

       Players[0].name   := '';//RS username
       Players[0].Pass   := '';//RS password
       Players[0].Nick   := '';//4 letters from user name with no spaces
       Players[0].Active := True;//do you want to use this user

    end;

    procedure AntiRandoms;
    begin
      If(FindFight)then
      RunAway('N', True,1,15000);
      FindNormalRandoms;
      FindLamp('Mining');
      end;

    procedure AntiBan;
    begin
      if not LoggedIn then exit;
      case random(10) of
        1: RandomRClick;
        2: HoverSkill('Mining', False);
        3: RandomMovement;
        4: BoredHuman;
        5: AlmostLogout;
        6: DoEmote(4 +Random(9))
        end;
    end;

    procedure RockMining;  // trouble with this might need to re-write
    begin
    if not LoggedIn then
     Exit;
    Repeat
     if (not (FindObjCustom(x, y, ['Mi', 'ne'], [RockColour1, RockColour2], 7))) then
     Wait(100+random(100));
     Tries := Tries + 1;
     Until(Tries >= 5)
     if(Tries >= 5)then
       begin
         Logout;
         Exit;
       end;
     if FindObjCustom(x, y, ['Min', 'ine'], [RockColour1, RockColour2], 7) then
     repeat
        case (Random(5)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1, 2, 3, 4: Mouse(x, y, 4, 4, True);

         AntiRandoms:;

        end;

      until (InvFull)
    end;

    procedure DropRocks;
    begin
     For i:= 2 to 28 do
      if ExistsItem(I) Then
      Begin
        MouseItem(I, False);
        Wait(RandomRange(400, 500));
        ChooseOption('drop');
        Wait(1200 + Random(500));
      end;
    end;

    begin
     SetupSRL;
     repeat
       RockMining;
       DropRocks;
       AntiBan;
     until (false)
    end.

    Hope I Helped

  19. #19
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ok thanks with the mining procedure is there another way to find the rock other than findobjcustom?

    *EDIT*
    ok heres the script with Nava2's drop procedure and NaumanAkhlaQ's changes havnt fixed mining procedure yet still working on it

    SCAR Code:
    program MyFirstPowerMiner;
    {.include SRL/SRL.scar}
    //////////////////////////////////////////////////////////////////////////////
    //   this is my first powerminer thanks Torrent of Flame for the great [TUT]//
    //   fill out lines 10,11,17,19,21 to 24                                    //
    //                                                                          //
    // thanks to NaumanAkhlaQ for all the help fixing this script               //
    //  and to Nava2 for the droprocks procedure and help with the script       //
    //////////////////////////////////////////////////////////////////////////////
    const
    RockColour1=5475809;//use dibber to get colour
    RockColour2=7381226;//use dibber to get colour

    var
    x, y, Tries: integer;
    f,l: integer;

    procedure DeclarePlayers;
    begin
       HowManyPlayers :=1;
       NumberOfPlayers(HowManyPlayers);
       CurrentPlayer:= 0 ;

       Players[0].name   := '';//RS username
       Players[0].Pass   := '';//RS password
       Players[0].Nick   := '';//4 letters from user name with no spaces
       Players[0].Active := True;//do you want to use this user

    end;

    procedure AntiRandoms;
    begin
      If(FindFight)then
      RunAway('N', True,1,15000);
      FindNormalRandoms;
      FindLamp('Mining');
      end;

    procedure AntiBan;
    begin
      if not LoggedIn then exit;
      case random(10) of
        1: RandomRClick;
        2: HoverSkill('Mining', False);
        3: RandomMovement;
        4: BoredHuman;
        5: AlmostLogout;
        6: DoEmote(4 +Random(9))
        end;
    end;

    procedure RockMining;  // trouble with this might need to re-write
    begin
    if not LoggedIn then
     Exit;
    Repeat
     if (not (FindObjCustom(x, y, ['Mi', 'ne'], [RockColour1, RockColour2], 7))) then
     Wait(100+random(100));
     Tries := Tries + 1;
     Until(Tries >= 5)
     if(Tries >= 5)then
       begin
         Logout;
         Exit;
       end;
     if FindObjCustom(x, y, ['Min', 'ine'], [RockColour1, RockColour2], 7) then
     repeat
        case (Random(5)) of
          0: begin
             Mouse(x, y, 4, 4,false);
             ChooseOption('ine');
             end;
          1, 2, 3, 4: Mouse(x, y, 4, 4, True);

         AntiRandoms:;

        end;

      until (InvFull)
    end;

    {*******************************************************************************
    procedure DropItems(f,l: integer);
    By: Nava2
    Description: Drops items in slots f-l.
    *******************************************************************************}

    procedure DropItems(f, l: integer);
    var i, TMSpeed: integer;
    begin
      if not LoggedIn then
      begin
        ReasonEnded := 'Not Logged In';
        PlayerReport;
        Exit;
      end;
      if not InvFull then exit;
      TMSpeed := MouseSpeed;
      MouseSpeed := 20 + random(5);
      for i:= f to l do
      DropItem(i);
      MouseSpeed := TMSpeed;
    end;

    begin
     SetupSRL;
     repeat
       RockMining;
       DropRocks;
       AntiBan;
     until (false)
    end.

  20. #20
    Join Date
    Dec 2006
    Location
    Boss central
    Posts
    811
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by sunny View Post
    ok thanks with the mining procedure is there another way to find the rock other than findobjcustom?
    Theres

    FindobjTpa

    umm

    theres Findcolorspiral

    and some more which i dont off the top of my head
    Being A Boss

  21. #21
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by hayhay89 View Post
    Theres

    FindobjTpa

    umm

    theres Findcolorspiral

    and some more which i dont off the top of my head
    ok im going to have a look through all the TUTs see what seems the best way

    *EDIT*
    ok im working on my mining procedure so far im using findcolortolerance then i wanted to do the bit where you move the mouse there and it clicks if it sees mine in the top left corner ho do i do that?

    *EDIT AGAIN*

    ok this is what i have so far for mining procedure but im not sure what to put next.

    SCAR Code:
    procedure MineRock;
    begin
      repeat
        if (FindColorTolerance(x, y, 4948692, 0, 0, 700, 500, 4))then
        begin
        MMouse(x, y, 0, 0,);
        GetUpText
    end.

  22. #22
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    This should work better:

    SCAR Code:
    procedure MineRock;
    begin
      repeat
        if (FindObjCustom(x, y,['ine'], [4948692],8))then
          begin
            MMouse(x, y, 0, 0,);
            If IsUpText('ine') then
              Mouse(x,y,1,1,true);
         end;
    end.

    Hope I Helped

  23. #23
    Join Date
    Apr 2008
    Posts
    86
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by NaumanAkhlaQ View Post
    This should work better:

    SCAR Code:
    procedure MineRock;
    begin
      repeat
        if (FindObjCustom(x, y,['ine'], [4948692],8))then
          begin
            MMouse(x, y, 0, 0,);
            If IsUpText('ine') then
              Mouse(x,y,1,1,true);
         end;
    end.

    Hope I Helped

    oh thanks isnt FindColorTolerance very good for this type of thing?

    added it thanks heaps.
    you know on some scripts when all you have to do is right like copper or tin for what you want to mine how do i add that, i know i've seen a list of ore names and numbers in some scripts but im not sure what your sposed to do

    thanks,

  24. #24
    Join Date
    Dec 2006
    Location
    Boss central
    Posts
    811
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    case (Lowercase(Players[CurrentPlayer].Strings[2])) of
          'copper'    : OreColour[0] := 5010850;
          'tin'       : OreColour[0] := 6184806;
          'iron'      : OreColour[0] := 2240075;
          'silver'    : OreColour[0] := 11513785;
          'coal'      : OreColour[0] := 2768446;
          'gold'      : OreColour[0] := 4566465;
          'mithril', 'mith' : OreColour[0] := 7688015;
          'adamant', 'addy' : OreColour[0] := 4346690;
          'runite', 'rune'  : OreColour[0] := 0;
        end;

    then for like how to put it in the mining procedure u do this

    SCAR Code:
    [OreColour[0]]
    where the color is ment to be pritty easy u fiddle with the colors and studd
    Being A Boss

  25. #25
    Join Date
    Mar 2008
    Location
    New Jersey
    Posts
    1,673
    Mentioned
    1 Post(s)
    Quoted
    9 Post(s)

    Default

    idk if this is causing the error, but I'm surprised nobody caught this, I caught it right away, in your procedure rockmining, for antirandoms, you put antirandoms:; it should be antirandoms; (you put a colon after randoms)

    EDIT: just saw now this thread has a 2nd page, and that you started your mining procedure over, it's not in there anymore, but when you put it in there (anitrandom), make sure not to copy and paste it, if you do take out the colon.

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. Which Powerminer is Better?
    By Daniel in forum SRL Site Discussion
    Replies: 13
    Last Post: 05-14-2007, 03:59 PM
  2. My Powerminer v. 3.00
    By GoF in forum RS3 Outdated / Broken Scripts
    Replies: 17
    Last Post: 01-22-2007, 02:08 AM
  3. Need Help On My First PowerMiner
    By Buckleyindahouse in forum OSR Help
    Replies: 3
    Last Post: 12-23-2006, 06:08 PM
  4. powerminer
    By shadowblade in forum OSR Help
    Replies: 20
    Last Post: 12-15-2006, 12:34 AM
  5. my powerminer
    By shadowblade in forum OSR Help
    Replies: 3
    Last Post: 12-09-2006, 03:04 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
  •