DavidLago Posted August 2, 2012 Posted August 2, 2012 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?
DavidLago Posted August 2, 2012 Author Posted August 2, 2012 (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 August 2, 2012 by HellFrost
DavidLago Posted August 2, 2012 Author Posted August 2, 2012 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...
DavidLago Posted August 7, 2012 Author Posted August 7, 2012 AutoHotKey solved my problem ~$*Lbutton:: Loop { GetKeyState, var, LButton, P If var = U Break Send {LButton} sleep 20 }
water Posted August 7, 2012 Posted August 7, 2012 You are no longer alone here My UDFs and Tutorials: Spoiler UDFs: Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs: Excel - Example Scripts - Wiki Word - Wiki Tutorials: ADO - Wiki WebDriver - Wiki
DavidLago Posted August 14, 2012 Author Posted August 14, 2012 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?
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now