Well...Really easy procedure, double clicks 
Good for opening files, and also a good anti ban. It's a good anti ban, because some times I, and most likely most of yous, click multiple times on something in RuneScape
Well...Here it is
SCAR Code:
{*******************************************************************************
Procedure DoubleMouse(ax,ay,ashx,ashy: Integer; ashe: Boolean);
By: Ashur2Good
Description: Double clicks mouse( You can choose left or right click ).
*******************************************************************************}
Procedure DoubleMouse(ax,ay,ashx,ashy: Integer; ashe: Boolean);
begin
Mouse(ax,ay,ashx,ashy,ashe);
FTWait(2)//To wait for possible lag
Mouse(ax,ay,ashx,ashy,ashe);
end;
And something i call CoolMouse ( Don't laugh 
)
SCAR Code:
{*******************************************************************************
Procedure CoolMouse(ux,uy,auhx,auhy: Integer; auhe: Boolean);
By: Ashur2Good
Description: Clicks the mouse, but with anti ban :)
*******************************************************************************}
Procedure CoolMouse(ux,uy,auhx,auhy: Integer; auhe: Boolean);
begin
case random(3) of
1: DoubleMouse(ux,uy,auhx,auhy,auhe);
2: Mouse(ux,uy,auhx,auhy,auhe);
end;
end;
Well, run this , but the cross hair on you're desktop, it should click on the top left corner icon
SCAR Code:
program new;
{.include SRL/SRL.scar}
{*******************************************************************************
Procedure DoubleMouse(ax,ay,ashx,ashy: Integer; ashe: Boolean);
By: Ashur2Good
Description: Double clicks mouse.
*******************************************************************************}
Procedure DoubleMouse(ax,ay,ashx,ashy: Integer; ashe: Boolean);
begin
Mouse(ax,ay,ashx,ashy,ashe);
FTWait(2)//To wait for possible lag
Mouse(ax,ay,ashx,ashy,ashe);
end;
{*******************************************************************************
Procedure CoolMouse(ux,uy,auhx,auhy: Integer; auhe: Boolean);
By: Ashur2Good
Description: Clicks the mouse, but with anti ban :)
*******************************************************************************}
Procedure CoolMouse(ux,uy,auhx,auhy: Integer; auhe: Boolean);
begin
case random(3) of
1: DoubleMouse(ux,uy,auhx,auhy,auhe);
2: Mouse(ux,uy,auhx,auhy,auhe);
end;
end;
begin
Mousespeed:=30;
DoubleMouse(34,34,0,0,true);
Wait(1000);
end.
Lol, i know these are really simple, if these are already made please tell me.
-Ashur
DoubleMouse
Reply With Quote
Originally Posted by SantaClause
