hey!
kleines Tool um die Mouse ohne Systemsteuerung schneller zu machn:P
Shift-Alt-s : schneller
Shift-Alt-x : langsamer
-> geht von -5 bis +5; negativ werden die Mousebewegungen umgekehrt
Shift-Alt-a : beenden
ohne GUI, mit TrayIcon^^
un noch der Code:
Spoiler anzeigen
;#NoTrayIcon
HotKeySet("+!a", "_end")
HotKeySet("+!s", "_speedUp")
HotKeySet("+!x", "_speedDown")
Global $infN, $infO, $mvchk = True, $speed = 1
[/autoit] [autoit][/autoit] [autoit]$infN = MouseGetPos()
$infO = MouseGetPos()
AdlibEnable("_do", 25)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]While 1
Sleep(1000)
ToolTip("")
WEnd
Func _do()
$infN = MouseGetPos()
If $infN[0] <> $infO[0] Or $infN[1] <> $infO[1] Then
MouseMove($infN[0]+$speed*($infN[0]-$infO[0]), $infN[1]+$speed*($infN[1]-$infO[1]), 0)
$infN = MouseGetPos()
$infO = MouseGetPos()
EndIf
$infO = $infN
EndFunc
Func _speedUp()
$speed += 0.5
If $speed > 5 Then $speed = 5
ToolTip("Speed: " & $speed)
EndFunc
Func _speedDown()
$speed -= 0.5
If $speed < -5 Then $speed = -5
ToolTip("Speed: " & $speed)
EndFunc
Func _end()
Exit
EndFunc
greetz syne
