Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren INFO - FAQ - CC2-Forum - CCPro-Forum

Re: Kann mir wer helfen Kategorie: Programmierung Basic (von Jens - 21.08.2005 22:31)

Als Antwort auf Re: Kann mir wer helfen von tom - 21.08.2005 21:22

Jens nutzt:  CC1-M-Unit V1.1, Micro, Open-Micro, Open-Mini

Hallo > ein standbye sollte es ermöglichen wenn die Freigabe von der Heizung kommt das  Pool zu erhitzen, > und es über ein Zeitprogramm zum Filtrieren > für die Displayanzeige die 3 Stellungen: aus nichts; manuel ein "mP"; standbye "P" und wenn "a" für Pumpe läuft   Ich habe mal eben schnell ein Grundgitter zusemmengebastelt. Du kannst es auf die Open-Micro laden und dir anschauhen was passiert. Die Testausgabe funktioniert über ein Terminal und das PE-Board der Open-Micro ist für diesen Test wie geschaffen. :-) Poste mal ob das Programm so ausreichend ist... LG Jens '------------------------------------------------------------ '--- Pool Steuerung mit der Open-Micro ---------------------- '------------------------------------------------------------ '--- Definition der A-Ports --------------------------------- define RS232    port[1]    ' serielle Eindraht-Schnittstelle define freigabe port[2]    ' Freigabe von dem Heitzkreis (10K Pull-UP / schalten gegen Masse) define Taster   port[3]    ' Taster für die Schaltzustände (10K Pull-UP / schalten gegen Masse) define Relais   port[4]    ' Relais von der Pumpe define SDA      port[5]    ' I2C-Bus Display define SCL      port[6]    ' I2C-Bus Display '--- Voreinstellung ----------------------------------------- Relais = off               ' Relais aus '--- Hauptprogramm ------------------------------------------ #Pumpe_aus                 ' Sprungpunkt Pumpe aus pause 3                    ' Schalterentprellung if not Taster then goto Pumpe_aus ' Selbsthaltung Taster #Pumpe_aus_loop ' Programm ' Programm print "Pumpe aus"          ' Testausgabe pause 25                   ' Testpause ' Programm ' Programm if not Taster then goto Pumpe_standbye ' wenn betätigt, dann zum Pumpen Standbye goto Pumpe_aus_loop        ' Entlosschleife '------------------------------------------------------------ #Pumpe_standbye            ' Sprungpunkt Pumpe Standbye pause 3                    ' Schalterentprellung if not Taster then goto Pumpe_standbye ' Selbsthaltung Taster #Pumpe_standbye_loop ' Programm ' Programm print "Pumpe Standbye"     ' Testausgabe pause 25                   ' Testpause ' Programm ' Programm if not Taster then goto Pumpe_ein ' wenn betätigt, dann zum Pumpen ein goto Pumpe_standbye_loop   ' Endlosschleife '------------------------------------------------------------ #Pumpe_ein                 ' Sprungpunkt Pumpe ein pause 3                    ' Schalterentprellung if not Taster then goto Pumpe_ein ' Selbsthaltung Taster #Pumpe_ein_loop ' Programm ' Programm print "Pumpe ein"          ' Testausgabe pause 25                   ' Testpause ' Programm ' Programm if not Taster then goto Pumpe_aus ' wenn betätigt, dann zum Pumpen aus goto Pumpe_ein_loop   ' Endlosschleife '------------------------------------------------------------ end

Antwort schreiben

Bisherige Antworten: