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 frank - 31.10.2005 21:53)
 Als Antwort auf Re: beleuchtungsdauer von Naturbanause - 31.10.2005 21:20

> 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
> >
>
o je, so einfach kann die Lösung sein. Werde es morgen mal testen. Danke.

MfG Frank

 Antwort schreiben

Bisherige Antworten: