SRL Archive - Help

New mousebox


Derek-

2007-08-21 03:24:19

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

2007-08-21 03:26:05

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-

2007-08-21 03:27:20

I'm using the new srl 4 beta

they made it boolean now instead of integer

Markus

2007-08-21 04:00:29

Oh, then just use MMouse(x1+random(x2-x1), y1+random(y2-y1), 0, 0);

ZephyrsFury

2007-08-21 05:04:10

From: Derek-
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

2007-08-21 11:28:08

it shouldnt be :D