#include <Date.au3>
While 1

$clip = ClipGet ()

Do
	Sleep (500)
	$clip2 = ClipGet()
Until $clip <> $clip2

FileWriteLine ("Clipboard.txt",_NowCalc() & "      " & $clip2)

WEnd