Results 1 to 2 of 2

Thread: help with looop

  1. #1
    Join Date
    Mar 2008
    Posts
    426
    Mentioned
    1 Post(s)
    Quoted
    116 Post(s)

    Default help with looop

    SOLVED -

    why wont it do the ismining thing.. it works on other function but i tried to put this new function in n it just doesnt seem to want to wait after clicking..

    Code:
    function addycolor
    begin
    end;
    
    Function  FindAddy: Boolean;
    var
     // B: TBox;
      TPA: TPointArray;
      i,CTS,X,Y, Addycounter, q: Integer;
      ATPA: T2DPointArray;
    begin
      Result := False;
    
      if (not loggedin) then exit;
    
      CTS := GetColorToleranceSpeed;
    
      ColorToleranceSpeed(2);
      SetColorSpeed2Modifiers(0.08, 0.51);
      FindColorsSpiralTolerance(MSCX, MSCY, TPA, AddyColor, MSX1, MSY1, MSX2, MSY2, 15);
      SetColorSpeed2Modifiers(0.02, 0.02);
      ColorToleranceSpeed(CTS);
    
      if (Length(TPA) < 1) then Exit;
    
      ATPA := TPAToATPAEx(TPA, 10, 10);
      filterTPAsBetween(ATPA, 10, 100)
      SortATPAFromFirstpoint(ATPA, Point(MSCX, MSCY));
      smart_debugATPA(true,ATPA);
      for i := 0 to High(ATPA) do
      begin
        MiddleTPAEx(ATPA[i], X, Y);
        HumanMMouse(x, y, 2, 2);
        Wait(RandomRange(50,150));
        if WaitUpTextMulti(['ine','damantite'], 600) then
        begin
          Mouse(x, y, 0, 0, true);
          StatsGuise('Mining Addy');
          Result := true;
          makecompass('w');
            While IsMining Do
            begin
              if InvCount = AddyCounter then
                exit;
              if TimeFromMark(q) > MineRuneFor then
                exit;
             StatsGuise('waiting for rrune ore');
             MouseAntiBan;
             end;
        end else
        begin
        StatsGuise('No Addy left');
        GetEmAlls := GetEmAlls + 1;
        BotherWalking := BotherWalking + 1;
        end;
        end;
      end;   
    
    begin
    repeat
      findaddy
    until(false)
    end.



  2. #2
    Join Date
    Nov 2011
    Location
    United States
    Posts
    815
    Mentioned
    6 Post(s)
    Quoted
    284 Post(s)

    Default

    Did you make sure you IsMining function is called before this loop?

    And if it relys on pixel shift, you might need to adjust the ratios some, might not be detecting if its mining or not correctly.

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
  •