Sign in to follow this  
Followers 0
DavidLago

Turn Click and Hold to Turbo Click

7 posts in this topic

Hello all.

I need a script that understands while my left mouse button is clicked (and held) and turns into a double click "with sleep(100) between the clicks. But I don't know the best way to do it..

I thought about: (its only to test, then I'd swap the filewriteline for clicks)

#include <Misc.au3>

$dll = DllOpen("user32.dll")

While 1
If _IsPressed("01", $dll) = 1 Then
Do
;MouseClick("left")
FileWriteLine(@ScriptDir & "\" & "HOLDTIME.txt", @CRLF & "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!")
Sleep(100)
Until _IsPressed("01", $dll) = 0
FileWriteLine(@ScriptDir & "\" & "RELEASE.txt", @CRLF & "RELEASE")
EndIf
WEnd

Does anyone know a better way to do it?


Just a server analyst that has never been into programming that much. So, small fish here :)

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

For testing purposes, look at this:

#include <Misc.au3>

$dll = DllOpen("user32.dll")
$count = 0

While 1
If _IsPressed("01", $dll) = 1 Then
Do
;MouseClick("left")
FileWriteLine(@ScriptDir & "log" & $count &".txt", @CRLF & "!!!!!!!!!")
$count = $count + 1
Sleep(500)
Until _IsPressed("01", $dll) = 0
FileWriteLine(@ScriptDir & "log" & "_____RELEASE.txt", @CRLF & "RELEASED")
EndIf
WEnd
Edited by HellFrost

Just a server analyst that has never been into programming that much. So, small fish here :)

Share this post


Link to post
Share on other sites

But when you do this:

#include <Misc.au3>

$dll = DllOpen("user32.dll")
$count = 0

While 1
If _IsPressed("01", $dll) = 1 Then
Do
MouseClick("left")
FileWriteLine(@ScriptDir & "log" & $count &".txt", @CRLF & "!!!!!!!!!")
$count = $count + 1
Sleep(500)
Until _IsPressed("01", $dll) = 0
EndIf
WEnd

It doesn't work, Probably because the left mouse click disables the pressed left button...


Just a server analyst that has never been into programming that much. So, small fish here :)

Share this post


Link to post
Share on other sites

AutoHotKey solved my problem :)

~$*Lbutton::

Loop

{

GetKeyState, var, LButton, P

If var = U

Break

Send {LButton}

sleep 20

}


Just a server analyst that has never been into programming that much. So, small fish here :)

Share this post


Link to post
Share on other sites

LOL, I feel forever alone here ...


Just a server analyst that has never been into programming that much. So, small fish here :)

Share this post


Link to post
Share on other sites

You are no longer alone here ;)


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

AutoHotKey solved my problem :)

~$*Lbutton::

Loop

{

GetKeyState, var, LButton, P

If var = U

Break

Send {LButton}

sleep 20

}

Guys (or guy),

Do you think there is a way to translate this script to AutoIT?


Just a server analyst that has never been into programming that much. So, small fish here :)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0