Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C Quellcode formatieren: <code>Quellcode</code> BASIC Quellcode formatieren: <basic>Quellcode</basic> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! -> I > Hallo Peter, > Man sollte eben die Beschreibung lesen. Alles funktioniert perfekt, auch Schaltjahre sind richtig. > > Danke auch für den Str_Printf() Tip - Ausgabe nun viel besser. > > Eine Frage noch: gibt es bei Msg Ausgaben auch den "Home" Befehl damit ich wie bei LCD > überschreiben kann? die Krönung wäre ein Befehl "eine Zeile zurück" ich nutze derzeit > ein 40x4 LCD (mit 2 Enable) damit ich Zwischenergebnisse ohne Debuger sehe. > > Danke! > Gruß Ernst H. > > Str_Printf (Text, " Zeit= %2u:%2u:%2u > Datum= %2u %2u 20%2u",_ > Clock_GetVal(Std), Clock_GetVal(Min), > Clock_GetVal(Sec),Clock_GetVal(Tag)+1,_ > Clock_GetVal(Monat)+1,Clock_GetVal(Jahr)) > Msg_WriteText(Text) > Msg_WriteChar(13 ) 'CR Zeilenvorschub > > Zeit= 23:59:58 Datum= 28 2 2013 > Zeit= 23:59:59 Datum= 28 2 2013 'Schaltjahr richtig - kein 29.2 > > Zeit= 0: 0: 0 Datum= 1 3 2013 > Zeit= 0: 0: 1 Datum= 1 3 2013 > > > > > > Hallo Ernst, > > > > was steht hinter dem roten Pfeil in der Doku zu Funktion "Clock_SetDate()"? > > > > Sieh Dir mal Str_Printf() an, Du kannst da bei der Ausgabe eine Menge Arbeit > > sparen. > > > > Gruss Peter > > > > > <basic>' Datumsumschaltung innere Uhr eventuell Fehlerhaft? > > > 'verwende neue Beta 2.12.03 > > > 'Test der Internen Uhrzeit mit Datumsumschaltung > > > > > > 'bei der Datumsumschaltung kommt bei mir teilweise 0 für den Tag heraus > > > ' im November wird das Jahr erhöht, Dezember wird nicht erreicht. > > > ' > > > 'Fertiges Programm - einfach kopieren und starten: > > > ' > > > /* > > > Interpreter gestartet - 4kb RAM > > > Zeit=23:59:57 31 1 10 > > > Zeit=23:59:58 31 1 10 > > > Zeit=23:59:59 31 1 10 'nach dem 31. Jan kommt 0.Feb > > > Zeit=0:0:0 0 2 10 > > > Zeit=0:0:1 0 2 10 > > > Zeit=0:0:2 0 2 10 > > > Zeit=0:0:3 0 2 10 > > > Zeit=23:59:57 0 2 10 > > > Zeit=23:59:58 0 2 10 > > > Zeit=23:59:59 0 2 10 'nach den 0. Februar > > > Zeit=0:0:0 1 2 10 'kommt 1. Februar > > > Zeit=0:0:1 1 2 10 > > > Zeit=0:0:2 1 2 10 > > > Zeit=23:59:57 1 2 10 > > > Zeit=23:59:58 1 2 10 > > > Zeit=23:59:59 1 2 10 > > > Zeit=0:0:0 28 2 10 > > > Zeit=0:0:1 28 2 10 > > > Zeit=0:0:2 28 2 10 > > > Zeit=0:0:3 28 2 10 > > > Zeit=23:59:57 28 2 10 > > > Zeit=23:59:58 28 2 10 > > > Zeit=23:59:59 28 2 10 > > > Zeit=0:0:0 29 2 10 'nach dem 28. Feb kommt 29.Feb > > > Zeit=0:0:1 29 2 10 > > > Zeit=0:0:2 29 2 10 > > > Zeit=23:59:57 29 2 10 'Schaltjahr wird offensichtlich nicht berücksichtigt > > > Zeit=23:59:58 29 2 10 > > > Zeit=23:59:59 29 2 10 > > > Zeit=0:0:0 30 2 10 '30.Feb kommt > > > Zeit=0:0:1 30 2 10 > > > Zeit=0:0:2 30 2 10 > > > Zeit=0:0:3 30 2 10 > > > Zeit=23:59:57 30 2 10 > > > Zeit=23:59:58 30 2 10 > > > Zeit=23:59:59 30 2 10 > > > Zeit=0:0:0 0 3 10 'nach 30.Feb kommt 0.März > > > Zeit=0:0:1 0 3 10 > > > Zeit=0:0:2 0 3 10 > > > Zeit=0:0:3 0 3 10 > > > Zeit=23:59:57 0 3 10 > > > Zeit=23:59:58 0 3 10 > > > Zeit=23:59:59 0 3 10 > > > Zeit=0:0:0 1 3 10 > > > Zeit=0:0:1 1 3 10 > > > Zeit=0:0:2 1 3 10 > > > Zeit=0:0:3 1 3 10 > > > Zeit=23:59:57 1 3 10 > > > Zeit=23:59:58 1 3 10 > > > Zeit=23:59:59 1 3 10 > > > Zeit=0:0:0 2 3 10 > > > Zeit=0:0:1 28 3 10 > > > Zeit=0:0:2 28 3 10 > > > Zeit=0:0:3 28 3 10 > > > Zeit=23:59:57 28 3 10 > > > Zeit=23:59:58 28 3 10 > > > Zeit=23:59:59 28 3 10 > > > Zeit=0:0:0 29 3 10 > > > Zeit=0:0:1 29 3 10 > > > Zeit=0:0:2 29 3 10 > > > Zeit=23:59:57 29 3 10 > > > Zeit=23:59:58 29 3 10 > > > Zeit=23:59:59 29 3 10 ' nach dem 29. März kommt 0.April > > > Zeit=0:0:0 0 4 10 'also 30. und 31. März gibts nicht > > > Zeit=0:0:1 0 4 10 > > > Zeit=0:0:2 0 4 10 > > > Zeit=0:0:3 0 4 10 > > > Zeit=23:59:57 0 4 10 > > > Zeit=23:59:58 0 4 10 > > > Zeit=23:59:59 0 4 10 > > > Zeit=0:0:0 1 4 10 > > > Zeit=0:0:1 1 4 10 > > > Zeit=0:0:2 1 4 10 > > > Zeit=0:0:3 1 4 10 > > > Zeit=23:59:57 1 4 10 > > > Zeit=23:59:58 1 4 10 > > > Zeit=23:59:59 1 4 10 > > > Zeit=0:0:0 28 4 10 > > > Zeit=0:0:1 28 4 10 > > > Zeit=0:0:2 28 4 10 > > > Zeit=0:0:3 28 4 10 > > > Zeit=23:59:57 28 4 10 > > > Zeit=23:59:58 28 4 10 > > > Zeit=23:59:59 28 4 10 > > > Zeit=0:0:0 29 4 10 > > > Zeit=0:0:1 29 4 10 > > > Zeit=0:0:2 29 4 10 > > > Zeit=0:0:3 29 4 10 > > > Zeit=23:59:57 29 4 10 > > > Zeit=23:59:58 29 4 10 > > > Zeit=23:59:59 29 4 10 > > > Zeit=0:0:0 30 4 10 > > > Zeit=0:0:1 30 4 10 > > > Zeit=0:0:2 30 4 10 > > > Zeit=0:0:3 30 4 10 > > > Zeit=23:59:57 30 4 10 > > > Zeit=23:59:58 30 4 10 > > > Zeit=23:59:59 30 4 10 > > > Zeit=0:0:0 0 5 10 '0.Mai > > > Zeit=0:0:1 0 5 10 > > > Zeit=0:0:2 0 5 10 > > > Zeit=0:0:3 0 5 10 > > > Zeit=23:59:57 0 5 10 > > > Zeit=23:59:58 0 5 10 > > > Zeit=23:59:59 0 5 10 > > > Zeit=0:0:0 1 5 10 > > > Zeit=0:0:1 1 5 10 > > > Zeit=0:0:2 1 5 10 > > > Zeit=0:0:3 1 5 10 > > > Zeit=23:59:57 1 5 10 > > > Zeit=23:59:58 1 5 10 > > > Zeit=23:59:59 1 5 10 > > > Zeit=0:0:0 28 5 10 > > > Zeit=0:0:1 28 5 10 > > > Zeit=0:0:2 28 5 10 > > > Zeit=23:59:57 28 5 10 > > > Zeit=23:59:58 28 5 10 > > > Zeit=23:59:59 28 5 10 > > > Zeit=0:0:0 29 5 10 > > > Zeit=0:0:1 29 5 10 > > > Zeit=0:0:2 29 5 10 > > > Zeit=0:0:3 29 5 10 > > > Zeit=23:59:57 29 5 10 > > > Zeit=23:59:58 29 5 10 > > > Zeit=23:59:59 29 5 10 > > > Zeit=0:0:0 0 6 10 '30. und 31 Mai gibts nicht > > > Zeit=0:0:1 0 6 10 > > > Zeit=0:0:2 0 6 10 > > > Zeit=0:0:3 0 6 10 > > > Zeit=23:59:57 0 6 10 > > > Zeit=23:59:58 0 6 10 > > > Zeit=23:59:59 0 6 10 > > > Zeit=0:0:0 1 6 10 > > > Zeit=0:0:1 1 6 10 > > > Zeit=0:0:2 1 6 10 > > > Zeit=23:59:57 1 6 10 > > > Zeit=23:59:58 1 6 10 > > > Zeit=23:59:59 1 6 10 > > > Zeit=0:0:0 28 6 10 > > > Zeit=0:0:1 28 6 10 > > > Zeit=0:0:2 28 6 10 > > > Zeit=23:59:57 28 6 10 > > > Zeit=23:59:58 28 6 10 > > > Zeit=23:59:59 28 6 10 > > > Zeit=0:0:0 29 6 10 > > > Zeit=0:0:1 29 6 10 > > > Zeit=0:0:2 29 6 10 > > > Zeit=23:59:57 29 6 10 > > > Zeit=23:59:58 29 6 10 > > > Zeit=23:59:59 29 6 10 > > > Zeit=0:0:0 30 6 10 > > > Zeit=0:0:1 30 6 10 > > > Zeit=0:0:2 30 6 10 > > > Zeit=0:0:3 30 6 10 > > > Zeit=23:59:57 30 6 10 > > > Zeit=23:59:58 30 6 10 > > > Zeit=23:59:59 30 6 10 > > > Zeit=0:0:0 0 7 10 > > > Zeit=0:0:1 0 7 10 > > > Zeit=0:0:2 0 7 10 > > > Zeit=0:0:3 0 7 10 > > > Zeit=23:59:57 0 7 10 > > > Zeit=23:59:58 0 7 10 > > > Zeit=23:59:59 0 7 10 > > > Zeit=0:0:0 1 7 10 > > > Zeit=0:0:1 1 7 10 > > > Zeit=0:0:2 1 7 10 > > > Zeit=0:0:3 1 7 10 > > > Zeit=23:59:57 1 7 10 > > > Zeit=23:59:58 1 7 10 > > > Zeit=23:59:59 1 7 10 > > > Zeit=0:0:0 28 7 10 > > > Zeit=0:0:1 28 7 10 > > > Zeit=0:0:2 28 7 10 > > > Zeit=23:59:57 28 7 10 > > > Zeit=23:59:58 28 7 10 > > > Zeit=23:59:59 28 7 10 > > > Zeit=0:0:0 29 7 10 > > > Zeit=0:0:1 29 7 10 > > > Zeit=0:0:2 29 7 10 > > > Zeit=0:0:3 29 7 10 > > > Zeit=23:59:57 29 7 10 > > > Zeit=23:59:58 29 7 10 > > > Zeit=23:59:59 29 7 10 > > > Zeit=0:0:0 30 7 10 > > > Zeit=0:0:1 30 7 10 > > > Zeit=0:0:2 30 7 10 > > > Zeit=0:0:3 30 7 10 > > > Zeit=23:59:57 30 7 10 > > > Zeit=23:59:58 30 7 10 > > > Zeit=23:59:59 30 7 10 > > > Zeit=0:0:0 0 8 10 > > > Zeit=0:0:1 0 8 10 > > > Zeit=0:0:2 0 8 10 > > > Zeit=0:0:3 0 8 10 > > > Zeit=23:59:57 0 8 10 > > > Zeit=23:59:58 0 8 10 > > > Zeit=23:59:59 0 8 10 > > > Zeit=0:0:0 1 8 10 > > > Zeit=0:0:1 1 8 10 > > > Zeit=0:0:2 1 8 10 > > > Zeit=0:0:3 1 8 10 > > > Zeit=23:59:57 1 8 10 > > > Zeit=23:59:58 1 8 10 > > > Zeit=23:59:59 1 8 10 > > > Zeit=0:0:0 28 8 10 > > > Zeit=0:0:1 28 8 10 > > > Zeit=0:0:2 28 8 10 > > > Zeit=0:0:3 28 8 10 > > > Zeit=23:59:57 28 8 10 > > > Zeit=23:59:58 28 8 10 > > > Zeit=23:59:59 28 8 10 > > > Zeit=0:0:0 29 8 10 > > > Zeit=0:0:1 29 8 10 > > > Zeit=0:0:2 29 8 10 > > > Zeit=0:0:3 29 8 10 > > > Zeit=23:59:57 29 8 10 > > > Zeit=23:59:58 29 8 10 > > > Zeit=23:59:59 29 8 10 > > > Zeit=0:0:0 0 9 10 '30.Aug fehlt > > > Zeit=0:0:1 0 9 10 > > > Zeit=0:0:2 0 9 10 > > > Zeit=0:0:3 0 9 10 > > > Zeit=23:59:57 0 9 10 > > > Zeit=23:59:58 0 9 10 > > > Zeit=23:59:59 0 9 10 > > > Zeit=0:0:0 1 9 10 > > > Zeit=0:0:1 1 9 10 > > > Zeit=0:0:2 1 9 10 > > > Zeit=0:0:3 1 9 10 > > > Zeit=23:59:57 1 9 10 > > > Zeit=23:59:58 1 9 10 > > > Zeit=23:59:59 1 9 10 > > > Zeit=0:0:0 28 9 10 > > > Zeit=0:0:1 28 9 10 > > > Zeit=0:0:2 28 9 10 > > > Zeit=23:59:57 28 9 10 > > > Zeit=23:59:58 28 9 10 > > > Zeit=23:59:59 28 9 10 > > > Zeit=0:0:0 29 9 10 > > > Zeit=0:0:1 29 9 10 > > > Zeit=0:0:2 29 9 10 > > > Zeit=0:0:3 29 9 10 > > > Zeit=23:59:57 29 9 10 > > > Zeit=23:59:58 29 9 10 > > > Zeit=23:59:59 29 9 10 > > > Zeit=0:0:0 30 9 10 > > > Zeit=0:0:1 30 9 10 > > > Zeit=0:0:2 30 9 10 > > > Zeit=23:59:57 30 9 10 > > > Zeit=23:59:58 30 9 10 > > > Zeit=23:59:59 30 9 10 > > > Zeit=0:0:0 0 10 10 > > > Zeit=0:0:1 0 10 10 > > > Zeit=0:0:2 0 10 10 > > > Zeit=0:0:3 0 10 10 > > > Zeit=23:59:57 0 10 10 > > > Zeit=23:59:58 0 10 10 > > > Zeit=23:59:59 0 10 10 > > > Zeit=0:0:0 1 10 10 > > > Zeit=0:0:1 1 10 10 > > > Zeit=0:0:2 1 10 10 > > > Zeit=0:0:3 1 10 10 > > > Zeit=23:59:57 1 10 10 > > > Zeit=23:59:58 1 10 10 > > > Zeit=23:59:59 1 10 10 > > > Zeit=0:0:0 2 10 10 > > > Zeit=0:0:1 28 10 10 > > > Zeit=0:0:2 28 10 10 > > > Zeit=0:0:3 28 10 10 > > > Zeit=23:59:57 28 10 10 > > > Zeit=23:59:58 28 10 10 > > > Zeit=23:59:59 28 10 10 > > > Zeit=0:0:0 29 10 10 > > > Zeit=0:0:1 29 10 10 > > > Zeit=0:0:2 29 10 10 > > > Zeit=0:0:3 29 10 10 > > > Zeit=23:59:57 29 10 10 > > > Zeit=23:59:58 29 10 10 > > > Zeit=23:59:59 29 10 10 > > > Zeit=0:0:0 0 11 10 > > > Zeit=0:0:1 0 11 10 > > > Zeit=0:0:2 0 11 10 > > > Zeit=0:0:3 0 11 10 > > > Zeit=23:59:57 0 11 10 > > > Zeit=23:59:58 0 11 10 > > > Zeit=23:59:59 0 11 10 > > > Zeit=0:0:0 1 11 10 > > > Zeit=0:0:1 1 11 10 > > > Zeit=0:0:2 1 11 10 > > > Zeit=0:0:3 1 11 10 > > > Zeit=23:59:57 1 11 10 > > > Zeit=23:59:58 1 11 10 > > > Zeit=23:59:59 1 11 10 > > > Zeit=0:0:0 2 11 10 > > > Zeit=0:0:1 28 11 10 > > > Zeit=0:0:2 28 11 10 > > > Zeit=0:0:3 28 11 10 > > > Zeit=23:59:57 28 11 10 > > > Zeit=23:59:58 28 11 10 > > > Zeit=23:59:59 28 11 10 > > > Zeit=0:0:0 29 11 10 > > > Zeit=0:0:1 29 11 10 > > > Zeit=0:0:2 29 11 10 > > > Zeit=0:0:3 29 11 10 > > > Zeit=23:59:57 29 11 10 > > > Zeit=23:59:58 29 11 10 > > > Zeit=23:59:59 29 11 10 > > > Zeit=0:0:0 30 11 10 > > > Zeit=0:0:1 30 11 10 > > > Zeit=0:0:2 30 11 10 > > > Zeit=23:59:57 30 11 10 > > > Zeit=23:59:58 30 11 10 > > > Zeit=23:59:59 30 11 10 > > > Zeit=0:0:0 0 0 11 'nach dem 30.Nov 10 kommt 0.0.2011 > > > Zeit=0:0:1 0 0 11 > > > Zeit=0:0:2 0 0 11 > > > Zeit=0:0:3 0 0 11 > > > Zeit=23:59:57 0 0 11 > > > Zeit=23:59:58 0 0 11 > > > Zeit=23:59:59 0 0 11 > > > Zeit=0:0:0 1 0 11 'dann kommt Monat 0 > > > Zeit=0:0:1 1 0 11 > > > Zeit=0:0:2 1 0 11 > > > Zeit=23:59:57 1 0 11 > > > Zeit=23:59:58 1 0 11 > > > Zeit=23:59:59 1 0 11 > > > Zeit=0:0:0 28 0 11 > > > Zeit=0:0:1 28 0 11 > > > Zeit=0:0:2 28 0 11 > > > Zeit=0:0:3 28 0 11 > > > Zeit=23:59:57 28 0 11 > > > Zeit=23:59:58 28 0 11 > > > Zeit=23:59:59 28 0 11 > > > Zeit=0:0:0 29 0 11 > > > Zeit=0:0:1 29 0 11 > > > Zeit=0:0:2 29 0 11 > > > Zeit=0:0:3 29 0 11 > > > Zeit=23:59:57 29 0 11 > > > Zeit=23:59:58 29 0 11 > > > Zeit=23:59:59 29 0 11 > > > Zeit=0:0:0 30 0 11 > > > Zeit=0:0:1 30 0 11 > > > Zeit=0:0:2 30 0 11 > > > Zeit=23:59:57 30 0 11 > > > Zeit=23:59:58 30 0 11 > > > Zeit=23:59:59 30 0 11 > > > Zeit=0:0:0 0 1 11 > > > Zeit=0:0:1 0 1 11 > > > Zeit=0:0:2 0 1 11 > > > Zeit=0:0:3 0 1 11 > > > Zeit=23:59:57 0 1 11 > > > Zeit=23:59:58 0 1 11 > > > Zeit=23:59:59 0 1 11 > > > Zeit=0:0:0 1 1 11 > > > Zeit=0:0:1 1 1 11 > > > Zeit=0:0:2 1 1 11 > > > Zeit=0:0:3 1 1 11 > > > Zeit=23:59:57 1 1 11 > > > Zeit=23:59:58 1 1 11 > > > Zeit=23:59:59 1 1 11 > > > Zeit=0:0:0 2 1 11 > > > Zeit=0:0:1 28 1 11 > > > Zeit=0:0:2 28 1 11 > > > Zeit=0:0:3 28 1 11 > > > Zeit=23:59:57 28 1 11 > > > Zeit=23:59:58 28 1 11 > > > Zeit=23:59:59 28 1 11 > > > Zeit=0:0:0 0 2 11 > > > Zeit=0:0:1 0 2 11 > > > Zeit=0:0:2 0 2 11 > > > Zeit=0:0:3 0 2 11 > > > Zeit=23:59:57 0 2 11 > > > Zeit=23:59:58 0 2 11 > > > Zeit=23:59:59 0 2 11 > > > Zeit=0:0:0 1 2 11 > > > Zeit=0:0:1 1 2 11 > > > Zeit=0:0:2 1 2 11 > > > Zeit=0:0:3 1 2 11 > > > Zeit=23:59:57 1 2 11 > > > Zeit=23:59:58 1 2 11 > > > Zeit=23:59:59 1 2 11 > > > Zeit=0:0:0 2 2 11 > > > Zeit=0:0:1 28 2 11 > > > Zeit=0:0:2 28 2 11 > > > */ > > > > > > > > > > > > Dim Text(20) As Char > > > Dim AlteSec As Byte > > > #define Sec 0 'Zeitanzeige ... Registernummern 'Def > > > #define Min 1 'Def > > > #define Std 2 'Def > > > #define Tag 3 'Def > > > #define Monat 4 'Def > > > #define Jahr 5 > > > > > > > > > Sub main() > > > > > > Clock_SetTime(23,59,57,0 ) > > > > > > Clock_SetDate(31,1,10 ) > > > Do While (1) > > > > > > If Clock_GetVal(Sec) <> AlteSec Then > > > Msg_Ausgeben() > > > AlteSec = Clock_GetVal(Sec) > > > End If > > > > > > > > > If Clock_GetVal(Sec) = 3 Then > > > Clock_SetTime(23,59,57,0 ) > > > End If > > > > > > If Clock_GetVal(Tag) = 2 Then > > > Clock_SetDate(28, Clock_GetVal(Monat), Clock_GetVal(Jahr) ) > > > End If > > > > > > End While > > > End Sub 'main > > > > > > > > > > > > Sub Msg_Ausgeben() > > > > > > Text = "Zeit=" > > > Msg_WriteText(Text) > > > Msg_WriteWord(Clock_GetVal(Std) ) > > > Msg_WriteChar(58 ) 'Doppelpunkt > > > Msg_WriteWord(Clock_GetVal(Min) ) > > > Msg_WriteChar(58 ) 'Doppelpunkt > > > Msg_WriteInt(Clock_GetVal(Sec) ) > > > Msg_WriteChar(32 ) 'Leerzeichen > > > Msg_WriteChar(32 ) 'Leerzeichen > > > Msg_WriteWord(Clock_GetVal(Tag) ) > > > Msg_WriteChar(32 ) 'Leerz > > > Msg_WriteWord(Clock_GetVal(Monat) ) > > > Msg_WriteChar(32 ) 'Leerz > > > Msg_WriteInt(Clock_GetVal(Jahr) ) > > > Msg_WriteChar(13 ) 'CR Zeilenvorschub > > > > > > End Sub</basic>