INFO - FAQ - CC2-Forum - CCPro-Forum |
> > > > > > 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 |