Results 1 to 7 of 7

Thread: Mining procedure

  1. #1
    Join Date
    Nov 2006
    Posts
    2,369
    Mentioned
    4 Post(s)
    Quoted
    78 Post(s)

    Default Mining procedure

    I need help with making good procedure that finds the middle of nearest rock
    Quote Originally Posted by DeSnob View Post
    ETA's don't exist in SRL like they did in other communities. Want a faster update? Help out with updating, otherwise just gotta wait it out.

  2. #2
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    While finding colors with FindColorsTolerance/Spiral you can put MSCX and MSCY at the start(TPA's). FindObjCustom and FindObjTPA Searchs for the nearest color too.


  3. #3
    Join Date
    Nov 2006
    Posts
    2,369
    Mentioned
    4 Post(s)
    Quoted
    78 Post(s)

    Default

    Quote Originally Posted by Cazax View Post
    While finding colors with FindColorsTolerance/Spiral you can put MSCX and MSCY at the start(TPA's). FindObjCustom and FindObjTPA Searchs for the nearest color too.
    I have already tried FindObjTPA but it finds the rock that has best results. Not the nearest one.
    And the others you told doesn't find the middle
    Quote Originally Posted by DeSnob View Post
    ETA's don't exist in SRL like they did in other communities. Want a faster update? Help out with updating, otherwise just gotta wait it out.

  4. #4
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by antti mies View Post
    I have already tried FindObjTPA but it finds the rock that has best results. Not the nearest one.
    And the others you told doesn't find the middle
    Yes they find the nearest one...FindColors... try this:
    SCAR Code:
    function FindObjMid(var x,y : integer, Color, Tol, ObjWidth, ObjH : Integer; UpText : String): boolean;
    var
      TPA : TPointArray;
      TPAA : T2DPointArray;
      i,TTime : integer;
    begin
      MarkTime(TTime);
      FindColorsSpiralTolerance(MSCX, MSCY, TPA, Color, MSX1, MSY1, MSX2, MSY2, Tol);
      if length(TPA) > 0 then
      begin
        TPAA := TPAtoATPAEx(TPA, ObjWidth, ObjH);
        Writeln('Finding obj took: '+inttostr(TimeFromMark(TTime)));
        for i:=0 to high(TPAA) do
        begin
          MiddleTPAEx(TPAA[i], x, y);
          MMouse(x, y, 3, 3);
          wait(50+random(50))
          if isuptext(UpText) then
          begin
            GetMousePos(x, y);
            Result := True;
            Exit;
          end else Continue;
        end;
      end else
      Result := False;
    end;


  5. #5
    Join Date
    Nov 2006
    Posts
    2,369
    Mentioned
    4 Post(s)
    Quoted
    78 Post(s)

    Default

    Ok I will try that findobjmid. I think it could work becouse you toke off the colortolerancespeed

    EDIT1:P.S. I remember that someone relased script that reads image and tells what color and tolerance you should use. Does anyone know where I could get it?

    EDIT2:It worked perfectly. Tytytyty.
    I will credit you if it's ok?
    Quote Originally Posted by DeSnob View Post
    ETA's don't exist in SRL like they did in other communities. Want a faster update? Help out with updating, otherwise just gotta wait it out.

  6. #6
    Join Date
    Nov 2006
    Posts
    2,369
    Mentioned
    4 Post(s)
    Quoted
    78 Post(s)

    Default

    Ahh.. One more problem. I need function like cazaxs but it should find many colors using TIntegerArray and put them all to same TPointArray.
    It would be really useful and cool function

    Edit: I got it done myself I just had to use CombineTPA function
    Quote Originally Posted by DeSnob View Post
    ETA's don't exist in SRL like they did in other communities. Want a faster update? Help out with updating, otherwise just gotta wait it out.

  7. #7
    Join Date
    Apr 2007
    Posts
    994
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    The colouring aid you were talking about up there...
    http://www.villavu.com/forum/showthread.php?t=26944
    [QUOTE]<GoF`> oh no its Raymooond
    <Raymooond> Heya
    <GoF`> is it ray or some other ray?
    <LeeLokHin> No idea
    <LeeLokHin> Raymond, what's the game you like the most?
    <Raymooond> Runescape
    <-- LeeLokHin has kicked Raymooond from #srl (Faker.)[/QUOTE]

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Mining Procedure Help
    By massive630 in forum OSR Help
    Replies: 12
    Last Post: 01-13-2008, 02:54 PM
  2. help with my mining procedure
    By stuckman in forum OSR Help
    Replies: 4
    Last Post: 06-01-2007, 06:31 AM
  3. help w/ mining procedure...
    By stupedspam in forum OSR Help
    Replies: 7
    Last Post: 04-04-2007, 02:32 AM
  4. Mining Procedure
    By stol3n in forum OSR Help
    Replies: 6
    Last Post: 04-03-2007, 07:09 AM
  5. Mining Procedure
    By ben123321 in forum OSR Help
    Replies: 9
    Last Post: 11-25-2006, 09:33 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
  •