Hallo Leute,

der DCF-Empfang kann auf 2 Arten zu jeder Stunde gestartet werden.
Bei der Version mit Uhrenquarz:
Code:
  If _min = 0 And Dcfstatus.7 = 0 Then            '1x pro Stunde:
    Dcfstatus.5 = 0                               'Zeit inaktuell
    Dcfstatus.6 = 0                               'Datum inaktuell
  End If
  'Wenn Uhr oder Datum inaktuell, dann nach DCF stellen:
  'Timer0 ist nur aktiv, solange DCF-Empfang läuft!!!
  If Dcfstatus.5 = 0 Or Dcfstatus.6 = 0 Then
    Dcfstatus.7 = 1
    Enable Timer0
  Else
    Dcfstatus.7 = 0
    Disable Timer0
  End If
... und ohne Uhrenquarz:
Code:
  If _min = 0 And Dcfstatus.7 = 0 Then            '1x pro Stunde:
    Dcfstatus.5 = 0                               'Zeit inaktuell
    Dcfstatus.6 = 0                               'Datum inaktuell
  End If
  'Wenn Uhr oder Datum inaktuell, dann nach DCF stellen:
  If Dcfstatus.5 = 0 Or Dcfstatus.6 = 0 Then Dcfstatus.7 = 1 Else Dcfstatus.7 = 0
Bei dieser Version darf natürlich der Timer nicht disabled werden, weil dann die Softuhr stehen bleibt.

Gruß Dirk