MouseCircle(); doesn't work, I created a whole new procedure for it.
Clicks randomly within the circle whos midpoint is (midx, midy) and has a radius of Radius.
Simba Code:
Procedure MouseCircle(midx, midy, Radius: integer; button: variant);
var
x, y: Variant;
begin
x := RandomRange((midx - Radius), (midx + Radius + 1));
case Random(2) of
0: y := Round(sqrt(sqr(Radius) - sqr(x-midx)) + midy);
1: y := midy + (midy - (Round(sqrt(sqr(Radius) - sqr(x-midx)) + midy)));
end;
y := RandomRange(midy, y+ 1);
Mouse(x, y, 0, 0, Button);
end;