rs_GetUpText doesn't work...

[Kasmember18]

program New;
        {. Include SRL/SRL.Scar}
        
        Var
        Say: String;
        

begin
     Repeat
     wait(1000);
      if rs_GetUpText = 'ock'  then
     Writeln('Found Rock')
     else
     Writeln('Found Nothing');
     until(false)
end.

No matter how long I hold the mouse over the rock it will never come up as Rock found...Please help I realy need it quick...

 

[cazax]

Change:
rs_GetUpText = 'ock'
To:
Pos(rs_GetUpText, 'ock') > 0

When you hover a rock it doesn't only says 'ock' it says '/ one more option' and other stuff.

 

[Kasmember18]

Didn't work

program New;
        {. Include SRL/SRL.Scar}
        
        Var
        Say: String;
        
        Rockcolor, x, y: Integer;


     procedure Mine;

     begin
      Rockcolor:= 6832706 ;//Insert color here

     ClearDeBug;

     wait(1000);
     if FindColor(x, y, Rockcolor, 1, 1, 640, 640) then
     begin
     Writeln('Found Color.');
     MoveMouseSmooth(x, y);
     if Pos(rs_GetUpText, 'ock') > 0  then
     begin
     Writeln('Found Rock.')
     wait(1000);
     ClickMouse(x, y, True);
     end
     else
     Writeln('That color was not a rock.');
      end
        else
     Writeln('Color of rock not found.');
    end;//procedure
    
    Begin Mine;

end.

Error:

Found Color.
That color was not a rock.
Successfully executed

 

[cazax]

Your color is static, try using FindColorTolerance

 

[Kasmember18]

It finds the color, moves over the rock, but it won't click on it because it's not a rock. But it is a rock.


Its not regestering the

if Pos(rs_GetUpText, 'ock') > 0

It cant tell if it is a rock.

 

[cazax]

Put a wait(500);
after movemousesmooth

 

[Kasmember18]

That still didn't work, It goes over the rock but will not click on it.
Please help me out.

Thanks to everyone who has help thus far and is going to help.

 

[cazax]

Change ClickMouse to Mouse(X, Y, 0, 0, True);

 

[Kasmember18]

That's not a valid function.

Ugh, this is a royal pain in my butt.

I don't think that the program gets past finding that it is a rock. It doesn't say "Found Rock". So the clicking wouldn't be the problem...I guess.

 

[Jethr0x]

Due to the fact that Jagex's Anti-Macro System puts random spaces in names in the UpText:

"Mine Rock" might be
M ine Ro ck
Mine R o ck
etc.

I suggest using

IsUpTextMultiCustom(['ine', 'ne', 'ock', 'ck');

Or just use reflection

 

[cazax]

That's not a valid function.

Ugh, this is a royal pain in my butt.

I don't think that the program gets past finding that it is a rock. It doesn't say "Found Rock". So the clicking wouldn't be the problem...I guess.

Valid function? I have had the same problem while experimenting with ClickMouse and it sometimes doesn't click...

 

[Kasmember18]

Due to the fact that Jagex's Anti-Macro System puts random spaces in names in the UpText:

"Mine Rock" might be
M ine Ro ck
Mine R o ck
etc.

I suggest using


Or just use reflection

Where did you find that function? I looked in the manaul and it was not included.
Can you sugest how to utalize that piece of code?
also whats reflection?