Results 1 to 7 of 7

Thread: DoubleMouseClick

  1. #1
    Join Date
    Oct 2007
    Posts
    742
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default DoubleMouseClick

    Ok i dont know if this procedure/function is in SRL, but watever, i just made it.
    It double clicks the coordinates you choose. If you wanna use it in any script you make, sure you can but please credit me .

    SCAR Code:
    program ULTRAProgram;

    //The Procedure.
    procedure DoubleMouseClick(UX, UY, URX, URY: Integer; Left: Boolean);
    begin
    Mouse(UX, UY, URX, URY, Left);
    Wait(50+random(50));
    Mouse(UX, UY, URX, URY, Left);
    end;
    //The Procedure.

    begin
    DoubleMouseClick(123{X}, 123{Y}, 3{RandomX}, 3{RandomY}, True{True = Left Click, False = Right Click});
    end.
    Woot woot.

  2. #2
    Join Date
    Dec 2006
    Location
    UK!!
    Posts
    910
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    turn it into a function... so u can use it like
    SCAR Code:
    DoubleMouse(x,y,2,2);
    lol cos then that would be cool if u can do it :P

    ~Spaz

  3. #3
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Yea ive done spazzes idea for you:


    SCAR Code:
    program ULTRAProgram;

    //The Procedure.
    procedure DoubleMouseClick(UX, UY, URX, URY: Integer; Left:boolean);
    begin
    Mouse(UX, UY, URX, URY, left);
    Wait(50+random(50));
    Mouse(UX, UY, URX, URY, left);
    end;
    //The Procedure.

    begin
    DoubleMouseClick(123{X}, 123{Y}, 3{RandomX}, 3{RandomY},False {Choose between False or True});
    end.

  4. #4
    Join Date
    Oct 2007
    Posts
    742
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Well i dont think its gonna be pretty usefull to double-right click... :P
    Woot woot.

  5. #5
    Join Date
    Jul 2007
    Posts
    1,431
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    To make it more human like...
    This:
    SCAR Code:
    procedure DoubleMouseClick(UX, UY, URX, URY: Integer; Left:boolean);
    begin
    Mouse(UX, UY, URX, URY, left);
    Wait(50+random(50));
    Mouse(UX, UY, URX, URY, left);
    end;

    Should be this
    SCAR Code:
    procedure DoubleMouseClick(UX, UY, URX, URY: Integer; Left:boolean);
    begin
    Mouse(UX, UY, URX, URY, left);
    Wait(50+random(50));
    Mouse(UX, UY, 0, 0, left);
    end;

    else it clicks mouse, waits, moves mouse again and clicks...
    [CENTER][SIZE="4"]Inactive[/SIZE]I forgot my password[/CENTER]

  6. #6
    Join Date
    Oct 2007
    Posts
    742
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Alright i did that
    Woot woot.

  7. #7
    Join Date
    Aug 2007
    Posts
    1,404
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by negaal
    Should be this

    SCAR Code:
    procedure DoubleMouseClick(UX, UY, URX, URY: Integer; Left:boolean);
    begin
    Mouse(UX, UY, URX, URY, left);
    Wait(50+random(50));
    Mouse(UX, UY, 0, 0, left);
    end;
    else it clicks mouse, waits, moves mouse again and clicks...
    That would still do the same with clicking, moving and clicking again, most likely

    If you set it to click on 100,100 with randomness 5,5 it can end on 102,103.
    That means it will click on 102,103
    Wait 50 + random 50
    Click 100,100.

    This is the correct way:
    SCAR Code:
    procedure DoubleMouseClick(UX, UY, URX, URY: Integer; Left:boolean);
    var a,b: Integer;
    begin
      Mouse(UX, UY, URX, URY, left);
      Wait(50+random(50));
      GetMousePos(a,b);
      Mouse(a,b, URX, URY, left);
    end;

    -Knives

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •