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: beleuchtungsdauer Kategorie: Programmierung Basic (von Naturbanause - 31.10.2005 21:20)
 Als Antwort auf Re: beleuchtungsdauer von Frank - 31.10.2005 15:13
Naturbanause nutzt:  CC1-M-Unit V1.1
Hallo,

hätte ich es im Simulator getestet, dann wäre mir der Fehler aufgefallen. Statt "licht=ein" muss es "licht=on" heißen. Hab das ganze nun noch einmal durch Simulator gejagt und dabei ständig Systemzeit und -datum verändert. Hat funktioniert.

Gruß Mario

Das nun hoffentich funktionierende Programm:


define licht port[1]

define Zeit word
define kuerzer byte

define LichtEin  730   ' Einschaltzeit im Format hhmm
define LichtAus 2130   ' Ausschaltzeit im Format hhmm

#loop
'
'
'
if second = 59 then goto weiter  'Vermeidung evtl. Fehlschaltungen bei Minuten- bzw. Stundenwechsel
if month > 3 or month < 10 then kuerzer = 0             ' Apr. bis Sept. keine Änderung
if month >= 10 then kuerzer = (month - 10) * 30 + day   ' Okt. bis Dez. Tage werden "kĂźrzer"
if month <= 3 then kuerzer = (4 - month) * 30 + 1 - day ' Jan. bis März Tage werden wieder "länger"
Zeit = hour * 60 + minute
if Zeit >= LichtAus / 100 * 60 + LichtAus mod 100 - kuerzer then goto aus
if Zeit >= LichtEin / 100 * 60 + LichtEin mod 100 + kuerzer then goto ein
#aus
licht = off
goto weiter
#ein
licht = on
#weiter
'
'
'
goto loop



>
> > Hallo,
>
> schade, aber habe gerade mal getestet. Läuft aber leider nicht. Licht bleibt aus :-(
>
> Hilflose Grüße, Frank
>

 Antwort schreiben

Bisherige Antworten:

Re: beleuchtungsdauer (von frank - 31.10.2005 21:53)