Naike
2009-05-27 20:57:47
Found a thing that might be useful.
The update one by Rasta Magican didn't include one.
He used the similiar method in another function, but it's useful to have this one stand by its own.
Which means that SwitchQuickPrayer needs a small change..
Edit: This will not break any scripts(Might aswell say it).
The update one by Rasta Magican didn't include one.
He used the similiar method in another function, but it's useful to have this one stand by its own.
{*******************************************************************************
Function QPrayerActivated: Boolean;
By: N1ke!
Description: Checks if Quick Prayer on / off
*******************************************************************************}
Function QPrayerActivated: Boolean;
begin
Result := (GetColor(724, 78) = 10006172);
end;
Which means that SwitchQuickPrayer needs a small change..
{*******************************************************************************
Procedure SwitchQuickPrayer(TurnOn: boolean);
By: Rasta Magician
Description: Turns Quick Prayer on / off
*******************************************************************************}
procedure SwitchQuickPrayer(TurnOn: boolean);
var
Str: string;
begin
if (GetMMLevels('prayer', str) < 1) then exit;
if TurnOn xor QPrayerActivated then
Mouse(711, 54, 40, 15, True);
End;
Edit: This will not break any scripts(Might aswell say it).