Jump to content

MouseClickDragDelay


Alptekin
 Share

Recommended Posts

Hi, i tryed my first script. Working fine but i want to run TARA function only mouse left clicked not draged and free draging with left click

and i want to activate/Pause TARA function with Capslock. Thanks

#include <Misc.au3>

global $paused
HotKeySet("{F2}", "Tara")
HotKeySet("{F3}", "Togglepause")
HotKeySet("{ESC}", "Terminate")
While 1
Sleep(100)
WEnd

Func TogglePause()
$Paused = Not $Paused
While $Paused
     ToolTip('Script is "Paused"', 0, 0)
     Sleep(10000000)
WEnd
ToolTip("")
EndFunc ;==>TogglePause
Func Terminate()
Exit 0
EndFunc ;==>Terminate

Func Tara()
$dll = DllOpen("user32.dll")
ToolTip("")
While 1
     If _IsPressed("01", $dll) Then
         Sleep (100)
         ControlSend("xwindow", "", "", "ç")
         Sleep (100)
         ControlSend("x window", "", "", "c")
     EndIf
WEnd

DllClose($dll)
EndFunc
Exit
;;;;;;;;
Edited by Alptekin
Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...