
|
INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
> > > > Ich haben neue C-CONTROL I STATION 2.0 kaufen. Wie kann ich programiren das eine licht brennen ab 9.00 bis 21.00 uhr on relai K1. Danke > > > > > > > > > #loop > > > k1 = hour >= 9 AND hour <= 20 > > > goto loop > > > > > > DCF natürlich vorausgesetzt und annehmend, dass um 21.00.00 das Licht ausgehen soll. > > > Kann ich ohne DCF das tun? > > Du kannst die aktuelle Uhrzeit nach jedem Einschalten natürlich auch von Hand setzen und von Zeit zu Zeit nachkorrigieren - entsprechendes Programm vorausgesetzt.. > > Bye > Achim Ist fur zeit die program richtig? Wie must ich kombinirung mit relei? attributes ccproject ccproject end ccproject end attributes 'IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 'III BASIC++ DEMO ZUM BASIC-COMPUTER UNIT M 1.2/2.0 IIIII 'IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII '-------------------------------------------------------------------- ' Beispiel zum BASIC-COMPUTER mit dem Programmer/Application-Board '-------------------------------------------------------------------- ' ANWENDUNG: ECHTZEITUHR ' SECOND ' MINUTE ' HOUR ' DOW ' MONTH ' YEAR '-------------------------------------------------------------------- ' Dieses Beispiel zeigt die Vorgehensweise um die SYSTEMUHR zu stellen ' bzw. abzufragen. ' ' Beschreibung: ' Das Betriebssystem stellt alle für eine Zeitsteuerung (inklusive ' des Datums)notwendigen Variablen als SYSTEMVARIABLEN zur Verfügung. ' Die Variablen können für die Einstellung der Uhr natürlich auch ' beschrieben werden. ' Für eine automatische Einstellung ist an FREQ1 der Anschluss eines ' DCF77 Empfangsmoduls vorgesehen. Ist ein passendes Empfangsmodul ' angeschlossen, so stellt sich die RTC nach etwa 3 bis 5 min selbst. ' Die interne Echtzeituhr läuft ohne DCF77 Synchronisierung mit einer ' für Quarzuhren typischen Ungenauigkeit. ' Anmerkung: ' Bei den Demos zu den EXTENDED FUNCTIONS finden Sie eine weitere Version ' dieses Programms, das spezielle Aspekte der DCF77 Synchronisierung ' beschreibt. '----------------------------------------------------------------------- '-------------------------- '------ I/O PORTS --------- '-------------------------- define LIGHT as port[16] '-------------------------- '---- SYSTEM MEMORY ------- '-------------------------- define OLDSEC as byte #INIT LIGHT=off LCD.INIT LCD.CLR '-------- WILLKÜRLICHE VOREINSTELLUNG ------------- hour=23 minute=59 second=58 day=31 month=12 year=3 '-------------------------------------------------------------------- ' Beispielprogramm Abfrage ECHTZEITUHR '-------------------------------------------------------------------- #LOOP '------- AUF DEN SEKUNDENWECHSEL WARTEN ---------- if OLDSEC=SECOND then goto LOOP OLDSEC=SECOND pause 5 '------- ZEIT AUF LCD AUSGEBEN ------------------- LCD.POS 1,5 if HOUR<10 then LCD.PRINT "0" 'FÜHRENDE NULL SCHREIBEN LCD.PRINT HOUR 'STUNDEN AUSGEBEN LCD.PRINT ":" 'TRENNZEICHEN SCHREIBEN if MINUTE<10 then LCD.PRINT "0" 'FÜHRENDE NULL SCHREIBEN LCD.PRINT MINUTE LCD.PRINT ":" 'TRENNZEICHEN SCHREIBEN if SECOND<10 then LCD.PRINT "0" 'FÜHRENDE NULL SCHREIBEN LCD.PRINT SECOND LCD.PRINT " " '--------- DATUM AUF LCD AUSGEBEN ---------------- LCD.POS 2,1 SELECT CASE dow 'WOCHENTAG ZUWEISEN CASE 1 LCD.PRINT "MO" CASE 2 LCD.PRINT "DI" CASE 3 LCD.PRINT "MI" CASE 4 LCD.PRINT "DO" CASE 5 LCD.PRINT "FREI" CASE 6 LCD.PRINT "SA" CASE 7 LCD.PRINT "SO" END SELECT '------------------------------------------------- LCD.PRINT " " LCD.PRINT DAY LCD.PRINT "." LCD.PRINT MONTH LCD.PRINT "." LCD.PRINT "200" LCD.PRINT YEAR LCD.PRINT " " '------------------------------------------------- goto LOOP DANKE |
| Antwort schreiben |