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
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
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
da werde ich leider nicht schlau raus
bin ein Anfänger...
magst du mir den Code schicken ?
Hi hoppi1978,
was hältst Du von dieser Lösung?
Gruß,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
Lev
bei der Zeile
Relaisvor = 1 - Relaisvor
meckert Bascom leider...
schade
Gruß
Dennis
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
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
Toggle entspricht etwa in C die '^=' Funktion (Invertieren)
Nobody is Perfect
Visit www.ringo.roboterbastler.de last update: 23.05.2009
Danke Ringo, den Befehl kannte ich in C noch nicht. Man lernt halt nie aus.
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
Lesezeichen