#include <Misc.au3>
$sText = 'Press Esc to exit'
$iStart = TimerInit()
While 1
If TimerDiff($iStart) >= 1000 Then
$sTime = @MDAY & '.' & @MON & '.' & StringRight(@YEAR, 2) & ' ' & @HOUR & ':' & @MIN & ':' & @SEC
ToolTip($sTime & @LF & $sText, 0, 0)
$iStart = TimerInit()
EndIf
If _IsPressed('1B') Then Exit
Sleep(20)
WEnd