Da wir grad schon das Thema mit Geschwindigkeit im anderen Thread hatten, wollte ich
mal gucken ob ich meine MouseClick Func umschreiben kann da sie immo Dll's benutzt
die ich ungern teile Also hab ich mir mal die Windows Dll's angeguckt und was
gebastelt, nur steckt irgendwo noch der Wurm drin.
Spoiler anzeigen
#include <Timers.au3>
Opt("MouseClickDelay", 0)
Opt("MouseClickDownDelay", 0)
Sleep(5000)
[/autoit] [autoit][/autoit] [autoit];HyperMouse
$Cords = MouseGetPos()
$Timer = _Timer_Init()
_HyperMouse(WinGetTitle("[active]"), "left", $Cords[0], $Cords[1], 100)
$Res = _Timer_Diff($Timer)
ConsoleWrite("Das brauchte jetzt: " & $Res / 1000 & " Sekunden" & @CRLF)
;Funktion
Func _HyperMouse($W, $B, $XP, $YP, $HP_C)
$User32 = DllOpen("user32.dll")
Switch $B
Case "left"
For $ic = 0 To $HP_C
DllCall($User32, "int", "SendMessage", "hwnd", WinGetHandle($W), "int", 0x0200, "int", 0, "long", _MakeLong($XP, $YP))
DllCall($User32, "int", "SendMessage", "hwnd", WinGetHandle($W), "int", 0x0201, "int", 0x0001, "long", _MakeLong($XP, $YP))
DllCall($User32, "int", "SendMessage", "hwnd", WinGetHandle($W), "int", 0x0202, "int", 0x0001, "long", _MakeLong($XP, $YP))
Next
Case "right"
For $ic = 0 To $HP_C
DllCall($User32, "int", "SendMessage", "hwnd", WinGetHandle($W), "int", 0x0200, "int", 0, "long", _MakeLong($XP, $YP))
DllCall($User32, "int", "SendMessage", "hwnd", WinGetHandle($W), "int", 0x0204, "int", 0x0002, "long", _MakeLong($XP, $YP))
DllCall($User32, "int", "SendMessage", "hwnd", WinGetHandle($W), "int", 0x0205, "int", 0x0002, "long", _MakeLong($XP, $YP))
Next
EndSwitch
DllClose($User32)
EndFunc ;==>_HyperMouse
Func _MakeLong($LoWord, $HiWord)
Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc ;==>_MakeLong
Wird denke ich nur ein Denkfehler sein.
Nur fällt mir nicht auf wo er liegt