Laimonas171
2012-11-29 13:34:36
Hey Just noticed that with new skill interface we can have some problems.
yeah so my point is if he "random" click at center of screen on skilling interface cancel button. he will get 2 cancel options.
screen shoot.
(*
RandomRClick
~~~~~~~~~~~~
.. code-block:: pascal
procedure RandomRClick
Performs random right click to stay active.
.. note::
Author: phantombmx/EvilChicken!, idea by Naum
Last Modified: Unknown
Example:
.. code-block:: pascal
RandomRClick;
*)
procedure RandomRClick;
var
I: TBooleanArray;
II, M, R: Byte;
Inv: Boolean;
begin
if (not LoggedIn) then exit;
M := MouseSpeed;
MouseSpeed := 7 + Random(25);
Inv := (GetCurrentTab = tab_Inv);
if (Inv) then Inv := ((not InvEmpty) and (Random(3) > 0));
if (not Inv) then
MouseBox(MSX1, MSY1, MIX2, MIY2, mouse_right)
else
begin
SetLength(I, 28);
for II := 0 to 27 do
I[II] := ExistsItem(II + 1);
R := RandomRange(1, 28);
while (not I[R - 1]) do
R := RandomRange(1, 28);
InvMouse(R, mouse_right);
end;
Inv := False;
if (Random(3) > 0) then
Inv := ChooseOption('xamine');
if (not Inv) then ChooseOption('ancel');
MouseSpeed := M;
end;
yeah so my point is if he "random" click at center of screen on skilling interface cancel button. he will get 2 cancel options.
- Cancel - Cancel current process (smithing gold ores as in image)
- Cancel - to cancel right click interface
screen shoot.