Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: Zeitschaltuhr mit c-control 1.1 Kategorie: C-Control I V1.1 (von joergm6 - 30.10.2008 7:46)
 Als Antwort auf Re: Zeitschaltuhr mit c-control 1.1 von alex - 30.10.2008 1:13
joergm6 nutzt:  CC1-Station V2.0
Hallo Alex,

Prinzipiell richtig, nur was soll die Abfrage auf 0 und59 Sekunden?
Als DCF Empfänger kannst du z.B. von Conrad Artikel 641138 kaufen.

Das Programm sollte funktionieren, habe es simuliert. Im Simulator kann man nicht die Zeit setzen, es wird im nächsten Befehl wieder die PC-Zeit verwendet!

Gruß Jörg

define Lüfter  port[1]
define Lüfter2 port[2]
define Licht   port[3]
define Uhrzeit word
define s byte

hour=4
minute=0
second=0

#Uhrloop
if s=second goto Uhrloop
 Uhrzeit=(hour*100)+minute
'zeitschaltuhr
 if Uhrzeit=400 then gosub LüfterAN
 if Uhrzeit=500 then gosub LichtAN
 if Uhrzeit=600 then gosub Lüfter2AN
 if Uhrzeit=2200 then gosub LüfterAUS
 if Uhrzeit=2300 then gosub LichtAUS
 if Uhrzeit=2330 then gosub Lüfter2AUS
 s=second
goto Uhrloop

'Geräte
'Schaltzustand
#LüfterAN
Lüfter=1
return

#LüfterAUS
Lüfter=0
return

#Lüfter2AN
Lüfter2=1
return

#Lüfter2AUS
Lüfter2=0
return

#LichtAN
Licht=1
return

#LichtAUS
Licht=0
return  

> so nochmal n test..... wenn ich das simuliere am pc.. die uhr auf 4 vorgestellt wird dann leuchtet der port 1 nicht bei basic im simulator... jetz weis ich nich wie das aussieht wenn ich den controller starte.. aber ist das programm so richtig?
>
>
> 'uhr
> hour=4
> minute=00
> second=00
> define Uhrzeit word
> #Uhrloop
> if second=0 or second=59 then goto Uhrloop
> Uhrzeit=hour*100+minute
> 'zeitschaltuhr
> if Uhrzeit=400 then gosub LüfterAN
> if Uhrzeit=500 then gosub LichtAN
> if Uhrzeit=600 then gosub Lüfter2AN
> if Uhrzeit=2200 then gosub LüfterAUS
> if Uhrzeit=2300 then gosub LichtAUS
> if Uhrzeit=2330 then gosub Lüfter2AUS
> goto Uhrloop
> 'Geräte
> define Lüfter  port[1]
> define Lüfter2 port[2]
> define Licht   port[3]
> 'Schaltzustand
> #LüfterAN
> Lüfter=1
> return
> #LüfterAUS
> Lüfter=0
> return
> #Lüfter2AN
> Lüfter2=1
> return
> #Lüfter2AUS
> Lüfter2=0
> return
> #LichtAN
> Licht=1
> return
> #LichtAUS
> Licht=0
> return

 Antwort schreiben

Bisherige Antworten:

Re: Zeitschaltuhr mit c-control 1.1 (von ManfredW - 30.10.2008 16:45)
    Re: Zeitschaltuhr mit c-control 1.1 (von Alex - 30.10.2008 23:42)
    Re: Zeitschaltuhr mit c-control 1.1 (von joergm6 - 30.10.2008 19:03)
        Re: Zeitschaltuhr mit c-control 1.1 (von Alex - 31.10.2008 0:03)
            Re: Zeitschaltuhr mit c-control 1.1 (von joergm6 - 31.10.2008 0:41)
                Re: Zeitschaltuhr mit c-control 1.1 (von joergm6 - 31.10.2008 0:48)