DavidLago Posted August 2, 2012 Share 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? Link to comment Share on other sites More sharing options...
DavidLago Posted August 2, 2012 Author Share 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 Link to comment Share on other sites More sharing options...
DavidLago Posted August 2, 2012 Author Share 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... Link to comment Share on other sites More sharing options...
DavidLago Posted August 7, 2012 Author Share Posted August 7, 2012 AutoHotKey solved my problem ~$*Lbutton:: Loop { GetKeyState, var, LButton, P If var = U Break Send {LButton} sleep 20 } Link to comment Share on other sites More sharing options...
DavidLago Posted August 7, 2012 Author Share Posted August 7, 2012 LOL, I feel forever alone here ... Link to comment Share on other sites More sharing options...
water Posted August 7, 2012 Share Posted August 7, 2012 You are no longer alone here My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
DavidLago Posted August 14, 2012 Author Share 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? Link to comment Share on other sites More sharing options...
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