; Clipboard Historie von Huggy *stolzbin omg lol*

HotKeySet("^x", "_Clip")

sleep(100)

While 1

sleep(100)
WEnd


Func _Clip()
	
	If FileExists(@ScriptDir & "\clip.ini") Then
		
	Else
		
		IniWrite("clip.ini", "count", "count", "0")
		
	EndIf
	
		
		
	
	
	$key = IniRead("clip.ini", "count", "count", "0")
	
	$keyneu = $key + 1
	
	$clip2 = ClipGet()
	
	IniWrite("clip.ini", "Text" & $keyneu, $keyneu, $clip2)
	IniWrite("clip.ini", "count", "count", $keyneu)

	
	


$date = @HOUR & "/" & @MIN & "/" &@SEC


$file = FileOpen("log.txt", 1)

If $file = -1 Then
    MsgBox(0, "Error", "Bitte erstellen sie eine .txt datei namens: log.txt im scriptordner.")
    Exit
EndIf

FileWrite($file, $date & ":      ")
FileWrite($file, $clip2 & @CRLF)

FileClose($file)

	
EndFunc