Der Titel sagt doch alles
In einem Tooltip wird live gezeigt wie viele Meter die Maus seit Programmstart zurückgelegt hat.
Skript:
Spoiler anzeigen
HotKeySet("{ESC}", "terminate")
$dir = @ScriptDir&"\mausometer.ini"
if FileExists( $dir) then
else
IniWrite($dir,"Data","Meter","0")
EndIf
$run = IniRead($dir,"Data","Meter","0")
$pxconst = 0.026458333
While 1
$pos = MouseGetPos()
Sleep(1)
$tx = MouseGetPos(0)
$ty = MouseGetPos(1)
If $tx < $pos[0] Then
$run = $run + $pos[0] - $tx
EndIf
If $tx > $pos[0] Then
$run = $run + $tx - $pos[0]
EndIf
If $ty < $pos[1] Then
$run = $run + $pos[1] - $ty
EndIf
If $ty > $pos[1] Then
$run = $run + $ty - $pos[1]
EndIf
ToolTip("Meter: "&Round($run*$pxconst/100, 2))
WEnd
Func terminate()
_save()
Exit
EndFunc
func _save()
IniWrite($dir,"Data","Meter",$run)
EndFunc
Danke an noir für die Speicherfunktion!