#Include <Date.au3>
;Opt("TrayIconHide", 1)
#include <file.au3>
#include <Array.au3>

Dim $ZEILE[100]
If Not _FileReadToArray("Geplante Tasks.txt", $ZEILE) Then
    MsgBox(4096, "Fehler", "Fehler beim Einlesen der Datei in das Array!" & @CRLF & "Fehlercode: " & @error)
    Exit
EndIf



;---------------------------------------------------------------------------------------
;ohne ENDE  ->

While 1=1

For $x = 1 To $ZEILE[0]


; EINMALIG ->
If StringLeft($ZEILE[$x],1) = "#" Then
$ZSPLIT = StringSplit( $ZEILE[$x], "#" )
If $ZSPLIT[2] = @YEAR & "/" & @MON & "/" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC Then
Run($ZSPLIT[3])
EndIf
EndIf


; JEDEN TAG ->
If StringLeft($ZEILE[$x],1) = "#" Then
$ZSPLIT = StringSplit( $ZEILE[$x], "#" )
If $ZSPLIT[2] =  @HOUR & ":" & @MIN & ":" & @SEC Then
Run($ZSPLIT[3])
EndIf
EndIf



; JEDEN STUNDE ->
If StringLeft($ZEILE[$x],1) = "#" Then
$ZSPLIT = StringSplit( $ZEILE[$x], "#" )
If $ZSPLIT[2] = @MIN & ":" & @SEC Then
Run($ZSPLIT[3])
EndIf
EndIf




Next

Sleep(1000)
Wend