Parade
2012-06-25 12:19:57
So was curious if it is possible to click in a certain distance away from a symbol. Say… You have a mining symbol on the minimap, and you want to click just a little bit south of it, would this be possible?
2012-06-25 12:19:57
2012-06-25 12:33:24
program new;
{$i SRL\SRL.simba}
Function Compas: Integer;
Begin
Result := Round( RS_GetCompassAngleDegrees);
End;
Function PolToPt( A, H: Integer; C: Tpoint): TPoint;
//Convert a angle'A'to a point'Result'from the center'C'.
//'H'is the distance from the point'C'.
Var
P: TPoint;
Rh: Integer;
Begin
A := 360 - A;
P.X := Round( - 100 * Sin( Radians( Compas + A )));
P.Y := Round( - 100 * Cos( Radians( Compas + A )));
Rh := Round( Hypot( P.X, P.Y));
P.X := C.X + H * P.X / Rh
P.Y := C.Y + H * P.Y / Rh;
Result:= P;
End;
Var
T: TPoint;
begin
SetupSRL;
If FindSymbol( T.X, T.Y, 'arrow') Then
Begin
T := PolToPt( 180, 75, T);
Mouse( T.X, T.Y, 0, 0, True);
End;
end.
T:=PolToPt( 180, 75, T);
2012-06-25 12:34:15
2012-06-25 12:52:56
if(FindSymbol(x,y,'mining')) then
mouse(x,(y + 50),3,3,1);
2012-06-25 13:04:20
2012-06-27 05:10:04

2012-06-27 05:49:42
2012-06-27 09:51:34
procedure Test;
var
i: Integer;
X, Y: Array of Integer;
begin
repeat
FindSymbol(X[i], Y[i], 'Mining');
Inc(i);
until not(FindSymbol(X[i], Y[i], 'Mining'));
i := High(Y)
MMouse(X[i], Y[i], RandomRange(-2, 2), RandomRange(-2, 2));
end;
2012-06-28 13:03:43
2012-06-28 13:09:55