Log in

View Full Version : New mousebox



Derek-
08-21-2007, 07:24 AM
There's no way to NOT click in the new mousebox huh...
(well without messing with the procedure)

because well the procedure is..

procedure MouseBox(xs, ys, xe, ye: Integer; click: Boolean);
var
a, b: Integer;
begin
a := Max(xs, xe) - Min(xs, xe);
b := Max(ys, ye) - Min(ys, ye);
a := Random(a);
b := Random(b);
MMouse(xs + a, ys + b, 0, 0);
case click of
True: Mouse(xs + a, ys + b, 0, 0, True);
False: Mouse(xs + a, ys + b, 0, 0, False);
else Exit;
end;
end;

so for 'click' you can only input true or false but true leftclicks and false rightclicks...


EDIT : Thx to iloveit8's page i found the way around this for now lol thx iloveit you saved me a lot of time =]

heres the page if you're having the same problem
http://www.villavu.com/forum/showthread.php?t=15403

Markus
08-21-2007, 07:26 AM
There is
MouseBox(x1, x2, y1, y2, click : integer);
If click is 0 it doesn't click.
If click is 1 it clicks with the left button.
If click is 2 it clicks with the right button.

Derek-
08-21-2007, 07:27 AM
I'm using the new srl 4 beta

they made it boolean now instead of integer

Markus
08-21-2007, 08:00 AM
Oh, then just use MMouse(x1+random(x2-x1), y1+random(y2-y1), 0, 0);

ZephyrsFury
08-21-2007, 09:04 AM
I'm using the new srl 4 beta

they made it boolean now instead of integer

Its still is an integer in my version of SRL 4.

mat_de_b
08-21-2007, 03:28 PM
it shouldnt be :D