Erstmal hallo zum ganzen Forum. Ich verfolge schon sehr lange die geschehnisse in diesem Forum und ich muss sagen ihr macht ne klasse arbeit!
so nun zu meinem kleinen hilfsprogramm!es ist definitiv nichts besonderes und es ist eher aus langeweile entstanden aber ich wollte es doch noch etwas weiterentwickeln also könnt ihr mir vllt sagen was ich besser machen kann und was ich gut gemacht hab und ggf noch hinzufügen / ändern sollte?
Danke im vorraus
Code
Code
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=pfeil.ico
#AutoIt3Wrapper_Res_LegalCopyright=Benedikt Schubert
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
HotKeySet ( "^s", "_save")
Func _save()
IniWrite (@ScriptDir & "\Koordinaten.ini",$Stunde & ":" & $Minute & ":" & $Sekunde,"X-Coord",$mouse[0])
IniWrite (@ScriptDir & "\Koordinaten.ini",$Stunde & ":" & $Minute& ":" & $Sekunde,"Y-Coord",$mouse[1])
IniWrite (@ScriptDir & "\Koordinaten.ini",$Stunde & ":" & $Minute& ":" & $Sekunde,"Decmial Color",$Farbe)
IniWrite (@ScriptDir & "\Koordinaten.ini",$Stunde & ":" & $Minute& ":" & $Sekunde,"Hex Color","0x" & Hex($Farbe, 6))
EndFunc
HotKeySet ( "^p", "_pause")
Func _pause()
Sleep (10000)
ToolTip ("",0,0,"")
EndFunc
While 1
$mouse = MouseGetPos ()
$Farbe = PixelGetColor($mouse[0],$mouse[1])
$mouse[0] = $mouse[0] +10
$mouse[1] = $mouse[1] +10
ToolTip ( "X:" & $mouse[0] & @CRLF & "Y:" & $mouse[1] & @CRLF & "Hex Color:" & "0x" &Hex($Farbe, 6)& @CRLF & "Decimal:" & $Farbe,$mouse[0],$mouse[1],"Informations")
$Stunde = @HOUR
$Minute = @MIN
$Sekunde = @SEC
WEnd
Alles anzeigen