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 

 Programm leuft nicht Kategorie: C-Control I Micro (von Martin - 4.12.2005 16:26)
Martin nutzt:  Micro
Mein Programm leuft nicht !
Es läst sich zwar ohne Fehlermeldung übertragen aber dann tud sich nichts,
Port 3 läge ich beim Starten manuell an Spannung.

Weis jemand Rat ?





define WC            Port [6]
define Bad           Port [5]
define Ventilator    Port [3]

define Wc_Ventilator  Bit [1]
define Bad_Ventilator Bit [2]
define Wc_Merker      Bit [3]
define Bad_Merker     Bit [4]

define Zeit_Wc       Byte [2]
define Zeit_Bad_ein  Byte [3]
define Zeit_Bad_aus  Byte [4]

#Start
if Wc then Zeit_Wc = Minute + 5
if Wc then Wc_Merker = 1
if Zeit_Wc > 59 then Zeit_Wc = Zeit_Wc - 59
Wc_Ventilator = not Wc and Wc_Merker and Zeit_Wc <> Minute
if not Wc and Zeit_Wc = Minute then Wc_Merker = 0

if Bad and not Bad_Merker then goto Bad_ein
#Bad_weiter_ein
if not Bad and Bad_Merker then goto Bad_aus
#Bad_weiter_aus
if Bad_Merker and Zeit_Bad_ein = Minute then Bad_Ventilator = 1
if not Bad_Merker and Zeit_Bad_aus = Minute then Bad_Ventilator = 0

Ventilator = Wc_Ventilator or Bad_Ventilator
goto Start

#Bad_ein
Bad_Merker = 1
Zeit_Bad_ein = Minute + 5
if Zeit_Bad_ein > 59 then Zeit_Bad_ein = Zeit_Bad_ein - 60
goto Bad_weiter_ein

#Bad_aus
Zeit_Bad_aus = Minute + 10
if Zeit_Bad_aus > 59 then Zeit_Bad_aus = Zeit_Bad_aus - 60
Bad_Merker = 0
goto Bad_weiter_aus

 Antwort schreiben

Bisherige Antworten:

Re: Programm leuft nicht (von Martin - 8.12.2005 21:02)
    Re: Programm leuft nicht (von pasta - 13.12.2005 21:33)
Re: Programm leuft nicht (von Achim - 6.12.2005 23:13)
Re: Programm leuft nicht (von Jens - 5.12.2005 16:37)