SRL Archive - SRL Bugs

Uh... MouseCircle?


Jethr0x

2009-10-16 08:30:19

{*******************************************************************************
procedure MouseCircle(MidX, MidY, Radius, clickType: Integer);
By: Mixster
Description: Same as MouseOval, but clicks within a circle instead.
*******************************************************************************}
procedure MouseCircle(MidX, MidY, Radius, clickType: Integer);
begin
MouseOval(MidX - Radius, MixY - Radius, MidX + Radius, MidY + Radius, clickType);
end;

needs to be updated to

{*******************************************************************************
procedure MouseCircle(MidX, MidY, Radius, clickType: Integer);
By: Mixster
Description: Same as MouseOval, but clicks within a circle instead.
*******************************************************************************}
procedure MouseCircle(MidX, MidY, Radius, clickType: Integer);
begin
MouseOval(MidX - Radius, MidY - Radius, MidX + Radius, MidY + Radius, clickType);
end;

In Mouse.scar, was a typo, someone typed "MixY", rather than "MidY"

rogeruk

2009-10-16 10:12:11

Should have been posted in Bugs.

Wizzup?

2009-10-16 10:51:53

Fixed in 270.