![]() ![]() INFO - FAQ - CC2-Forum - CCPro-Forum |
> Hallo, > wie kann ich das Datum und die Uhrzeit in der C-Control stellen?? Hallo Chriss Ich habe die Uhr bis jetzt nur mit der DCF Antenne gestellt. Vielleicht helfen dir jedoch die folgenden Programme weiter, ich habe jedoch keine Erfahrung damit. Gruss Martin Das Kommando 14 ermöglicht ein automatisches Stellen der Uhr auch ohne eine aktive DFF77-Antenne. Das folgend kleine VB3-Programm überträgt die Zeitinformationen des PC an die CC-Unit. Sub Form_Load () Comm1.CommPort = 2 Comm1.Settings = "9600,N,8,1" Comm1.InputLen = 1 Comm1.PortOpen = True If Comm1.PortOpen = False Then Comm1.CommPort = 1 Comm1.PortOpen = True End If MsgBox "C-Control Uhr stellen", 0 Sende 14 'Kommando Uhr stellen Sende Second(Now) Mod 256 Sende Minute(Now) Mod 256 Sende Hour(Now) Mod 256 Sende Weekday(Now) Mod 256 Sende Day(Now) Mod 256 Sende Month(Now) Mod 256 Sende (Year(Now) Mod 100) Mod 256 End End Sub Zum Testen sollen die Zeitinformationen über die serielle Schnittstelle ausgegeben werden. Dazu benötigt man ein kleines Hilfsprogramm: define Sekunde byte #Loop print hour, minute, second print day, month, year #Loop2 if Sekunde = second then goto Loop2 Sekunde = second goto Loop end |
Antwort schreiben |