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 

 C-Control Station V1.1 Probelauf Kategorie: C-Control I V1.1 (von maxhelene - 29.01.2008 0:08)
maxhelene nutzt:  CC1-Station V1.1
Hallo,

ich habe an eine C_control Station 1 zwei Relais mit einem zusätzlichen Netzteil siehe

Bild angeschlossen.

Ich möchte 4 Verbraucher (Glühlampen) mit den F-Tasten der Station ein und ausschalten.

Nach dem Aufspielen des Codes


'**********************************************************
' C-Control Station
'
' Folien-Taste F1 -> K1 ein/aus (LED1)
' Folien-Taste F2
'
' ein Programm soll 4 Betriebsarten zum Schalten von
' Relais K1 haben:
' mode0 - Relais aus
' mode1 - K1 schaltet im 5s-Takt
' mode2 - K1 schaltet jede Minute fuer 10s ein
' mode3 - manueller Modus, K1 wird nach jedem Tastendruck
'         fuer 20s eingeschaltet
'
' Simulatortip: aktivieren Sie das Digitalports-Fenster
' und die Ueberwachten Variablen, ueberwachen Sie den
' Wert von second und offtime
'**********************************************************

' --- Definitionen ---

' das Relais
define K1 port[7]
define K2 port[8]

' die Folien-Funktionstasten
define F1 port[9]
define F2 port[10]
define F3 port[11]
define F4 port[12]

' die LEDs
define LED1 port[13]
define LED2 port[14]
define LED3 port[15]
define LED4 port[16]

' Definition zweier Byte-Variablen
define K1einaus byte '0=aus 1=ein
define K2einaus byte '0=aus 1=ein
define offtime byte


' --- das Programm ---

' Initialisierung
gosub Initialisiere

' Endlosschleife
#loop

  ' Tastenabfrage
  if not F1 then gosub SchalteK1einaus
  if not F2 then gosub SchalteK2einaus

  if K2einaus <> 0 then gosub K2hinundher
goto loop

' Relais-Betrieb
#SchalteK1einaus
  beep 1000,10,0
  if K1einaus = 0 then K1ein else K1aus
  wait F1
return

#SchalteK2einaus
  beep 2000,10,0
  if K2einaus = 0 then K2ein else K2aus
  wait F2
return

#Initialisiere
  beep 200,5,0    ' die Dauer des Quittungstons entprellt die Taste
  gosub LEDsOFF   ' alle LEDs aus
  beep 400,5,0    ' die Dauer des Quittungstons entprellt die Taste
  K1einaus = 0
  K1 = OFF        ' K1 ausschalten
  K2einaus = 0
  beep 600,5,0    ' die Dauer des Quittungstons entprellt die Taste
return

#LEDsOFF
  LED1 = OFF
  LED2 = OFF
  LED3 = OFF
  LED4 = OFF
return

#K1ein
  if K2einaus = 0 then K1einaus = 1
  if K2einaus = 0 then K1 = ON
  if K2einaus = 0 then LED1 = ON
  if K2einaus = 0 then wait F1
return

#K1aus
  K1einaus = 0
  K1 = OFF
  LED1 = OFF
  wait F1
return

#K2ein
  K2einaus = 1
  LED2 = ON
  wait F2
return

#K2aus
  K2einaus = 0
  LED2 = OFF
  wait F2
return

#K2hinundher
  if SECOND MOD 5 = 0 then gosub K2schalteeinaus
return

#K2schalteeinaus
  if K2einaus = 1 then K2 = ON else K2 = OFF
  if K2einaus = 2 then K2einaus = 1 else K2einaus = 2
return



habe ich folgendes Phänomen.

Nach dem Reset, leuchtet der 4 Verbraucher, der der F4-Taste  zugeordnet ist, obwohl ich die Station noch nicht gestartet habe. Starte ich die Station und betätige die Tasten F1 - F4, leuchten alle Kontrolllampen und Verbraucher und beim neuerlichen betätigen der F-Tasten werden die Verbraucher dann abgeschaltet, usw. usw.

Warum leuchtet der Verbraucher (F4) wenn ich einen Reset durchführe, obwohl ich den Startknopf noch nicht betätigt habe. Ich habe schon, da ich zwei Stationen besitze,genau wie die Relais und das Netzteil ausgetausch, es ist bleibt immer gleich.

Liegt es an dem Code? Vielleicht kennt jemand das Phänomen und kann mir einen Tip geben denn langsam bin ich am Verzweifeln, und das ist erst der Anfang.

lg

maxhelene

 Antwort schreiben

Bisherige Antworten:

Re: C-Control Station V1.1 Probelauf (von ManfredW - 29.01.2008 11:31)
Re: C-Control Station V1.1 Probelauf (von Tido - 29.01.2008 9:18)
Re: C-Control Station V1.1 Probelauf (von Achim - 29.01.2008 1:43)
    Re: C-Control Station V1.1 Probelauf (von maxhelene - 29.01.2008 22:09)
        Re: C-Control Station V1.1 Probelauf (von ManfredW - 30.01.2008 0:11)