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: Munit Macht nicht das was ich progamiert habe Kategorie: Programmierung Basic (von Martin - 3.11.2004 20:19)
 Als Antwort auf Re: Munit Macht nicht das was ich progamiert habe von ManfredW - 2.11.2004 19:31

>
> >
> > > Hallo,
> > >
> > > > Dafür verwende ich 3 M_Units, 2 für jeweils einen Rolladen und Eine für Automatic,Fernbedinung
> > > > und Buskonntrolle.
> > > > Die 3 Units sind Ãœber Bus verbunden.
> > >
> > > upps, warum kommt mir da der Spruch mit den Kanonen und den Spatzen in den
> > > Sinn? Richtig konzipiert kommt man da locker mit genau einer M-Unit aus (und hat
> > > noch Platz fr weitere Spielereien),
> > >
> > > > Leider Macht die Steuerung etwas anderes als ich ihr sage ( glaub ich Jedenfalls),
> > >
> > > Immer wenn ein Programm nicht das tut, was der Programmierer sich vorstellt,
> > > kann man davon ausgehen, daß er einen bis viele Fehler gemacht hat.
> > >
> > > > immer wenn ich einen Fehler ausgemertz habe kommt ein neuer dazu.
> > >
> > > Da hilft nur sytematisches Arbeiten. Jede Routine zunächst auf fehlerfreies Arbeiten
> > > testen, sich ein Flußdiagramm zu pinseln und vor allem genau zu wissen, was bei
> > > der Programmiererei denn dann zu Schluß herauskommen soll.
> > >
> > > > vieleicht könnt ihr mir helfen? Danke im vorraus
> > >
> > > Mancher hier würde Dir sicher gerne helfen, dafür fehlt es aber an "Input".
> > > Außer das Du mit zuviel zu wenig erreichst, wissen wir ja überhaupt nix von
> > > Deinem Vorhaben. Wo klemmt es denn nun im Einzelnen konkret?
> > >
> > > Grüße
> > > Henrik
> > hallo Henrik danke das du dich meines Proplems annimmst.
> > Zunächst ein paar Facten. Ich hab ein Glasdach im Wohnzimmer.
> > Der Rolladen würde von alein nicht rauskommen (Normallerweise würde es die Scherkraft erledigen)
> > deshalb gibt es einen zusatzmotor.
> > Ich benötige 5 Relais:
> > Rolladen Auf
> > Rolladen Ab
> > Zusatzmotor Ein
> > Zusatzmoter Richtung umkehren
> > Hauptschalter
> > Jedes Relais wird auf Funktion überprüft 5 weitere Eingänge
> > 3 Positionen:
> > Rolladen Oben
> > Rolladen Unten
> > Zusatzmotor in Endlage
> > Der Motorstrom für den Zusatzmotor wird überwacht
> > 2 Eingänge für die Tasten Auf und Ab
> > 2 Ausgänge um den Busbaustein anzusteuern
> > 2 Ausgänge für Anzeigen
> > 1 Eingang um auf Busbetrieb umzuschalten
> >
> > Ergibt: 16 Ports und 7 AD Eingänge
> >
> > Für die Automatic:
> >
> > 4x Tasten
> > 4x Befehl für Rollaäden
> > 1x Ausgang für Busbetrieb
> > 4x Ausgänge für Busbausteine (PC-Schnittstelle)
> > 2x für Fernbedinung
> > 3x AD für Temperatur und Licht
> > '#########################################################################
> > '################# Ausgangspunkt #########################################
> > '#########################################################################
> > #Ausgangspunkt
> > if Taste_Ab = -1 and not Rolladen_Unten and not Tastensperre and Systemstop = ON then gosub Rolladen_Ab
> > if Taste_Auf = -1 and not Rolladen_Oben and Endposition and not Tastensperre and Systemstop = ON then gosub Rolladen_Auf
>
> Bei obigen Zeilen besteht die Gefahr, dass sowohl Rollladen_Ab als auch -Auf eingeschaltet wird.
>
> > if RXTX then gosub Datenbus
>
> Was ist RXTX ?
>
> > if not RXTX then Empfang = Off
> > gosub Stoerung
> > if not Endposition and not Systemstop then gosub Notprogramm
> > if not Taste_Ab and not Taste_Auf then Tastensperre = 0
> > Second1 = second mod 2
>
> Second1 ist hier byte oder word, in der folgenden Zeile ein Bit wegen -1 ?
>
> > if Filefree < Speicher_lerr and Filefree > Speicher_voll or Filefree < Speicher_voll and Second1 = -1 then Anzeige_Speicher = 1 else Anzeige_Speicher = 0
> > if Stoerung_bit and Systemstop = Off or Systemstop = On and Second1 then Anzeige_Stoerung = 1 else Anzeige_Stoerung = 0
> > Warten = 0
> > Bit_Ende = 0
> > goto Ausgangspunkt
> >
> > Wenn RXTX logisch eins hüpt das Programm nicht zum Datenbus
> > Bei jeder Änderung Speichere ich das Programmm neu ab.
> > Bei der letzten Änderung wurde der Programmteil nicht geändert trotzdem springt es nicht mehr zum Datenbus.
> > Grus Martin
> >
> Hallo Martin,
> ohne define durchschaut man nicht den Programm-Auschnitt.
> Einige Hinweise habe ich oben eingefügt.
> Ich würde anders strukturieren. Vielleicht hilft Dir meine homepage.
> Viel Erfolg wünscht Dir
> ManfredW
Hallo Manfred
RXTX ist ein Eingang, mit diesen Eingang springe ich in den Bus-betrieb
Ein gleichzeitiges AUF und AB ist nicht möglich da bei betätigung einer Taste das bit Tastensperre gesetzt wird.
hier ist define:
define Taste_Auf Port [1]'Auf Masse gezogen
define Taste_Ab Port [2]'Auf Masse gezogen
define Rolladen_Oben Port [3]'Auf Masse gezogen
define Rolladen_Unten Port [4]'Auf Masse gezogen
define Gurtmotor_Retur Port [5] 'K2
define Netzgeraet Port [6] 'K1
define Rolladen_Ab Port [7] 'K3
define Rolladen_Auf Port [8] 'K4
define Anzeige_Stoerung Port [9]
define Neustart Port [10]
define Hauptschalter Port [11] 'K5
define Anzeige_Speicher Port [12]
define Bus Port [13]
define Empfang Port [14]
define RXTX Port [15]'Auf Masse gezogen
define Endposition Port [16]'Auf Masse gezogen
'################# AD ####################################################
define Motorstrom AD [1]
'define Text AD [2]'Auf Masse gezogen
define Seite AD [3]'Auf Masse gezogen
define Gurtmotor_Ein AD [4]'Auf Masse gezogen
define Netzgeraet_Ein AD [5]'Auf Masse gezogen
define Rolladen_Auf_Ein AD [6]'Auf Masse gezogen
define Hauptschalter_Ein AD [7]'Auf Masse gezogen
define Rolladen_Ab_Ein AD [8]'Auf Masse gezogen
'################# DA ####################################################
'define Display_Senden DA [1]
'define Display_Empfangen DA [2]
'################# Words #################################################
define Zeit_Rolladen_Auf Word [11]
define Zeit_Rolladen_Ab Word [12]
'################# Bytes #################################################
define Frequenz Byte [7]
define Speicher Byte [8]
define Zeit_Notprogramm Byte [9]
define Warten Byte [10]
define Puffer Byte [11]
define Zeit_Stoerung_Zentral Byte [12]
define Zeit_Stoerung_Gurtmotor_Retur Byte [13]
define Zeit_Stoerung_Hauptschalter Byte [14]
define Zeit_Stoerung_Rolladen_Auf Byte [15]
define Zeit_Stoerung_Rolladen_Ab Byte [16]
define Zeit_Stoerung_Netzgeraet Byte [17]
define Zeit_Unten Byte [18]
define Zeit_Gurtmotor Byte [19]
define Zeit_Netzgeraet Byte [20]
'define _________ Byte [29]
define Systemstop Byte [69]'59
define Zustand_Automatic Byte [60]
'################# Bits ##################################################
define Tastensperre Bit [1]
define Netzgeraet_Stoerung Bit [2]
define Hauptschalter_Stoerung Bit [3]
define Rolladen_Auf_Stoerung Bit [4]
define Rolladen_Ab_Stoerung Bit [5]
define Gurtmotor_Retur_Stoerung Bit [6]
define Endposition_Stoerung Bit [7]
define Stoerung_Endposition Bit [8]
define Stoerung_Netzgeraet Bit [9]
define Stoerung_Rolladen_Ab Bit [10]
define Stoerung_Gurtmotor_Retur Bit [11]
define Stoerung_Rolladen_Auf Bit [12]
define Stoerung_Zeitueberschreitung_Auf Bit [13]
define Stoerung_Zeitueberschreitung_Ab Bit [14]
define Stoerung_Hauptschalter Bit [15]
define Stoerung_Bit Bit [16]
define Stoerung_Netzgeraet_Gespeichert Bit [17]
define Stoerung_Gurtmotor_Gespeichert Bit [18]
define Stoerung_Rolladen_Ab_Gespeichert Bit [19]
define Stoerung_Rolladen_Auf_Gespeichert Bit [20]
define Stoerung_Hauptschalter_Gespeichert Bit [21]
define Stoerung_Zeitueberschreitung_Auf_Gespeichert Bit [22]
define Stoerung_Zeitueberschreitung_Ab_Gespeichert Bit [23]
define Stoerung_Endposition_Gespeichert Bit [24]
define Second1 Bit [25]
'define Procesor_Bit_2 Bit [26]
'define Procesor_Bit_3 Bit [27]
'define Procesor_Bit_4 Bit [28]
'define Procesor_Bit_5 Bit [29]
define Gespeichert Bit [30]
define Bit_Aufzeichnung Bit [31]
define Bit_Loeschen Bit [32]
define Bit_Ende Bit [33]
'################# Konstanten ############################################
define Stop 254
define Ein 200
define Aus 0
define Strom 100
define Verlaengern 15
define Retur 200
define Stoerung 4 '2
define Zeit_Auf 100
define Zeit_Ab 150
define Speicher_Voll 14'7
define Speicher_Lerr 1300 ' 1136
define Reset 2'2
define Eingaenge 5
define Ausgaenge 4
define Auslesen 3
define Loeschen 2
define Reseten 1
define Zeit_TXD_Gesendet 10 'Zeit nach Senden
define Zeit_TXD_Anfang 200 'Zeit nach Senden bei Beginn eines Telegramms
define Zeit_TXD_Empfang 1'100
define Zeit_TXD_Senden 100

würde gerne beide Programme posten sind aber zu groß
Danke im vorraus Martin

 Antwort schreiben

Bisherige Antworten:

Re: Munit Macht nicht das was ich progamiert habe (von ManfredW - 4.11.2004 0:26)
    Re: Munit Macht nicht das was ich progamiert habe (von Martin - 4.11.2004 18:10)
        Re: Munit Macht nicht das was ich progamiert habe (von Martin - 14.11.2004 20:06)