D
Size: a a a
Ra
Ra
;https://www.autoitscript.com/autoit3/docs/functions/MouseGetPos.htm
;https://www.autoitscript.com/autoit3/docs/functions/ToolTip.htm
;https://www.autoitscript.com/autoit3/docs/functions/AutoItSetOption.htm#MouseCoordMode
;https://www.autoitscript.com/autoit3/docs/functions/WinGetPos.htm
;https://www.autoitscript.com/forum/topic/82096-script-to-wait-for-mouse-click-to-get-mouse-coords-resolved/
;https://www.autoitscript.com/autoit3/docs/functions/OnAutoItExitRegister.htm
#include <MsgBoxConstants.au3>
#include <Misc.au3>
HotKeySet("{ESC}", "Terminate")
OnAutoItExitRegister("Terminate")
Global $user32dll = DllOpen("user32.dll")
Func ShowInfo($msg = "")
Local $aMPos = MouseGetPos()
Local $iMPosX = $aMPos[0]
Local $iMPosY = $aMPos[1]
Local $aWPos = WinGetPos("[ACTIVE]")
Local $iWPosX = $aWPos[0]
Local $iWPosY = $aWPos[1]
Local $sMouseInfo = "Mouse X:" & $iMPosX& " Y:" & $iMPosY
Local $sWindowInfo = "Window X:" & $iWPosX& " Y:" & $iWPosY
Local $sRelativeInfo = "Relative X:" & $iMPosX-$iWPosX& " Y:" & $iMPosY-$iWPosY
Local $sInfo = $sMouseInfo & @CRLF & $sWindowInfo & @CRLF & $sRelativeInfo & @CRLF & $msg
;ConsoleWrite($sInfo & @CRLF)
ToolTip( $sInfo , $iMPosX+10 , $iMPosY+10)
EndFunc
While True
Sleep(10)
If _IsPressed("01", $user32dll) Then
ShowInfo("LCM")
;While _IsPressed("01", $user32dll)
; Sleep(10)
;WEnd
ElseIf _IsPressed("02", $user32dll) Then
ShowInfo("RCM")
;While _IsPressed("02", $user32dll)
; Sleep(10)
;WEnd
Else
ShowInfo()
EndIf
WEnd
Func Terminate()
DllClose($user32dll)
Exit 0
EndFunc