my autoranger is failing miserably, it's placed at scorpions in the dwarven mines, on the falador side, my problem is that i don't know what to do to make the guy go back to the same place every time. i've tried rotatedDTM's but they work one time, and when i stop it, it never works again. so my question is...
what should i do to make the guy go the same place every time?
here is what i have so far for walking there, it doesn't work though
SCAR Code:
program SafeRangeScorpion;
{.include srl\srl.scar}
{.include srl\srl\skill\fighting.scar}
var
atrocks,rocks,x,y,a,b: integer;
procedure Loadstuff;
begin
AtRocks := DTMFromString('78DA632C646260086340014E8E0E609A11CA6' +
'72C06AA094555F3FFFF7F543575403551A86AAA8AE450D5E400D5' +
'84A0AA91929440555304549380AA464F5707450D00034509AA');
Rocks := DTMFromString('78DA63CC636260F06540017E7E3E609A11CA6' +
'7AC04AA09425553552487AAA602A82618558D94A404AA1A905D61' +
'A86A9C1C1D50D56400D5F8A1AAD1D3D541510300F3100767');
end;
function InSpot: Boolean;
begin
makecompass('N');
repeat
wait(200);
until(flag = false);
wait(200);
if dtmrotated(atrocks,x,y,540,2,708,165) = true then
begin
result := true;
writeln('youre at the spot');
end
end;
function NearSpot: Boolean;
begin
makecompass('N');
repeat
wait(200);
until(flag=false);
wait(200);
if dtmrotated(rocks,a,b,540,2,708,165) = true then
begin
result := true;
writeln('found the spot');
end
end;
procedure GetInSpot;
begin
if inspot = true then
begin
exit;
end
if nearspot = true then
begin
makecompass('N');
repeat
nearspot;
mouse(a,b,1,1,true);
repeat
wait(250);
until(flag = false);
wait(500);
until(inspot = true);
end
end;
Begin
mousespeed:=10;
LoadStuff;
Activateclient;
Repeat;
InSpot;
NearSpot;
GetInSpot;
until(false);
End.