SRL Archive - SRL Bugs

MouseMM Not Working.


Home

2009-10-05 23:15:48

Hey there, MouseMM is not working and QuickMarch's one works perfect.

procedure MouseMM(x, y, xmod, ymod: Integer);
var
D2, R, Ang, MX, MY: Integer;

begin
Ang := Round(Degrees(ArcTan2(y - MMCY, x - MMCX)) + 90);
while Ang < 0 do Ang := Ang + 360;
D2 := Ang - Round(rs_GetCompassAngleDegrees);
R := Distance(MMCX, MMCY, x, y);
MX := MMCX + Round(R * Cos(Radians(D2 - 90)));
MY := MMCY + Round(R * Sin(Radians(D2 - 90)));
if rs_OnMiniMap(MX, MY) then Mouse(MX, MY, xmod, ymod, True);
end;


Replace or what?

P.S Is RotatePoint Scar's own Function ?

~Home

Baked0420

2009-10-05 23:18:57

yes, rotate point is scar's own function. You can just hit ctrl + space to find out next time for yourself ;)

Replacing or not is not my decision though :p but I wouldn't see why not if that one works and the other doesn't.

Naum

2009-10-05 23:52:44

Actually RotatePoint(), is in WizzyPlugin.

Also, explaining what it does may help :)

Home

2009-10-05 23:59:59

From: NaumanAkhlaQ
Actually RotatePoint(), is in WizzyPlugin.

Also, explaining what it does may help :)


Ye, Naum ;) Found out already. But thanks anyways :)

~Home