Sleep(5000)
Run("D:\script\00-00-00.exe")
Run("C:\Program Files\Opera\Opera.exe")
WinWaitActive("Schnellwahl - Opera")
Send("{Tab}{Tab}{Tab}{Tab}{Tab}{Tab}{Tab}{Tab}{Tab}{Tab}{Enter}")
Sleep(3000)
Send("{Tab} The One And Only Happy New Year Topic {TAB} am 1.1.09 um genau 00:00:00 {TAB} Ich wünsche allen ein gesundes neues Jahr und hoffe auf ein tolles 2009 hier auf D2Jsp. {Enter} Ich hoffe mal das dies Topic hier das erste seiner Art ist. WEnn nicht dann war meine Mühsame Arbeit den Tag über umsonst. {Enter}{Enter} Natürlich sitze ich gerade nicht vor dem PC und erstelle so ein Topic hier. Ich bin gerade mit Fam und CO einen anstoßen aufs neue Jahr. {Enter} Wie ich diese Topic hier realisiert habe ohne am Rechner zu sitzen steht ja mal gar nicht zur Frage . {Enter}{Enter} Postet hier ein paar Grüße rein oder holt euch sonst irgendwie eurer plus 1 ab :p . {TAB}{TAB}{TAB}{Enter}{TAB}{TAB}{TAB}{Enter}{TAB}{Enter}{TAB}{TAB}{TAB}{TAB}")
WinWaitActive("happy new year")
Send("{Enter}")
Sleep(100)
Send("{Enter}")
Exit

;{TAB}{TAB}{TAB}{Enter}{TAB}{TAB}{TAB}{Enter}{TAB}{Enter}{TAB}{TAB}{TAB}{TAB}

$s = 00
$mi = 00
$sec = 00
$t = 01
$m = 01
$j = 2009

While 1
If @HOUR = $s And @MIN = $mi And @SEC = $sec And @MDAY = $t And @MON = $m And @YEAR = $j Then
 MsgBox(0,"happy new year","01.01.2009 // 00:00:00")
 Sleep(100)
 Exit
Else
 Sleep(900)
EndIf
WEnd