- MultiPlus Wechselrichter Insel und Nulleinspeisung Conrad         
Seite 1 von 2 12 LetzteLetzte
Ergebnis 1 bis 10 von 11

Thema: Anfänger braucht Hilfe !Relais mit Taster steuern

  1. #1
    Neuer Benutzer Öfters hier
    Registriert seit
    16.01.2007
    Beiträge
    11

    Anfänger braucht Hilfe !Relais mit Taster steuern

    Anzeige

    Powerstation Test
    Hallo Leute !
    habe ein Problem...
    ich möchte wenn ich einen Taster drücke ein Relais einschalten und wenn ich den Taster noch einmal drücke das Relais wieder ausschalten.

    Mein Beispielprogramm schaltet das Relais wenn ich den Taster drücke und wenn ich den Taster wieder loslasse fällt das Relais wieder ab...



    Config Portc.0 = Output
    Relaisvor Alias Portc.0

    Config Pind.1 = Input
    Tasterd1 Alias Pind.1
    Portd.1 = 1

    Do
    If Tasterd1 = 0 Then
    Relaisvor = 1

    Else
    Relaisvor = 0

    End If
    Waitms 100

    Loop


    Bitte helft mir Dennis

  2. #2
    Erfahrener Benutzer Roboter Genie
    Registriert seit
    06.11.2006
    Beiträge
    1.078
    Hallo
    1 wenn Taster ein und Relais ein dann Relais aus.X=1 gehe zu 4
    2 Wenn Taster ein und Relais aus dann Relais ein.X=1 gehe zu 4
    3 X=0
    4 wenn Taster ein und X=1 goto 4
    warte
    gehe zu 1

    Mit freundlichen Grüßen
    Benno
    Wo man nicht mit Vernunft handelt, da ist auch Eifer nichts nütze; und wer hastig läuft, der tritt fehl.
    Ein König richtet das Land auf durchs Recht; wer aber viel Steuern erhebt, richtet es zugrunde

  3. #3
    Neuer Benutzer Öfters hier
    Registriert seit
    16.01.2007
    Beiträge
    11
    da werde ich leider nicht schlau raus
    bin ein Anfänger...
    magst du mir den Code schicken ?

  4. #4
    Benutzer Stammmitglied
    Registriert seit
    22.02.2007
    Ort
    Köln
    Alter
    49
    Beiträge
    88
    Hi hoppi1978,

    was hältst Du von dieser Lösung?

    Code:
    Config Portc.0 = Output 
    Relaisvor Alias Portc.0 
    
    Config Pind.1 = Input 
    Tasterd1 Alias Pind.1 
    Portd.1 = 1 
    
    Relaisvor = 0
    
    Do 
      If Tasterd1 = 0 Then 
        Waitms 100 
        Relaisvor = 1 - Relaisvor
      End If 
    
    Loop
    Gruß,
    Lev

  5. #5
    Neuer Benutzer Öfters hier
    Registriert seit
    16.01.2007
    Beiträge
    11
    bei der Zeile
    Relaisvor = 1 - Relaisvor
    meckert Bascom leider...

    schade
    Gruß
    Dennis

  6. #6
    Erfahrener Benutzer Roboter-Spezialist
    Registriert seit
    04.09.2004
    Ort
    Bürstadt
    Alter
    37
    Beiträge
    383
    wie wärs mit toggle..

    If Tasterd1 = 0 Then
    Waitms 100
    toggle relaisvor
    End If
    Nobody is Perfect
    Visit www.ringo.roboterbastler.de last update: 23.05.2009

  7. #7
    Benutzer Stammmitglied
    Registriert seit
    22.02.2007
    Ort
    Köln
    Alter
    49
    Beiträge
    88
    Hi hoppi1978,

    ich kann leider nur C - und da funktioniert der Lösungsweg einwandfrei.
    Probier mal Ringos Lösung aus. Den Befehl toggle kannte ich noch nicht.


    Gruß,
    Lev

  8. #8
    Erfahrener Benutzer Roboter-Spezialist
    Registriert seit
    04.09.2004
    Ort
    Bürstadt
    Alter
    37
    Beiträge
    383
    Toggle entspricht etwa in C die '^=' Funktion (Invertieren)
    Nobody is Perfect
    Visit www.ringo.roboterbastler.de last update: 23.05.2009

  9. #9
    Benutzer Stammmitglied
    Registriert seit
    22.02.2007
    Ort
    Köln
    Alter
    49
    Beiträge
    88
    Danke Ringo, den Befehl kannte ich in C noch nicht. Man lernt halt nie aus.

  10. #10
    Erfahrener Benutzer Roboter-Spezialist
    Registriert seit
    04.09.2004
    Ort
    Bürstadt
    Alter
    37
    Beiträge
    383
    Ich bin gerade dabei C zu erlenen (wobei man wohl nie wirklich sagen kann man kanns )

    Das war so ziemlich das erste was ich mir an Funktionen beigebracht habe, weil man damit ganz einfach LEDs blinken lassen kann ^^

    MfG
    Ringo
    Nobody is Perfect
    Visit www.ringo.roboterbastler.de last update: 23.05.2009

Seite 1 von 2 12 LetzteLetzte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •  

fchao-Sinus-Wechselrichter AliExpress