über "Pulsein" schalten

Hallo,
ich habe eine Hi-Signal am Eingang und wenn das Signal eine bestimmte mindest Länge hat, soll ein Ausgang gesetzt werden. Wenn das Signal kürzer wird oder weg bleibt soll der Ausgang GESETZT BLEIBEN! bis diese mindest Länge ein 2. Mal erreicht/überschritten wird.

Was muss ich machen damit der Ausgang so lange gesetzt bleibt?
In meinem Programm habe ich erst eine "Tastfunktion" realisiert bekommen.

Wer hat eine Idee?

vielen Dank,

Tobias
______________________
Programm (Tastfunktion):

Dim Pulsbreite1 As Word

Do

'KANAL:1 als Taster

Pulsein Pulsbreite1 , Pind , 2 , 1 'Pulsbreite auslesen

If Pulsbreite1 > 140 Then 'Puls länger als 140 dann:
Portd. 3 = 1 'PD 3 auf Hi
Else 'sonst
Portd. 3 = 0 'PD 3 auf low
End If

If Pulsbreite1 < 100 Then
Portd. 4 = 1
Else
Portd. 4 = 0
End If


Loop

hat denn keiner eine Idee?!

ich möchte doch nur etwas speichernd einschalten wie bei einem Taster:
Ein mal drücken=an nochmal drücken = aus...

Nun, wenn die Länge reicht, wird nicht ein- oder aus-, sondern UMGESCHALTET
also z.B.

Code:

---

If Pulsbreite1 > 140 Then 'Puls länger als 140 dann:
 toggle Portd. 3          ' UMSCHALTEN

---

alles andere wird ignoriert.

schön das doch noch jemand eine idee hat ;-)
Was heißt denn genau wechseln?
Also ich möchte damit eine Lampe einschalten und erst ausschalten wenn diese 140 ein 2. mal überschritten werden. (vorher müssen die 140 natürlich ünterschritten werden und beim erneuten überschreiten soll geschaltet werden)


Tobias

Also laut Hilfe von Bascom is das wohl genau das was ich suche. Aber bei mir kommt immer eine Fehlermeldung:
Invalid datatype
muss da noch eine Variable oder so rein?

SUPER es funktioniert!!!!!

war mein Fehler:
toggle Portd. 3

da ist das Lerzeichen zuviel!!! muss heißen:
toggle Portd.3

Vielen DANK!!!

Tobias

SO haben wir es gern. Den Thread hast du (fast) alleine bestritten. :-)

Das stimmt ABER die Idee mit "toggle" kam ja wohl von dir und so etwas findet man in keiner Bascom Hilfe (man kan ja nur nach Befehlen suchen und nicht formulieren was man braucht) ;-)
Also noch mal vielen Dank!!

Tobias

Zitat:

---

..man kan ja nur nach Befehlen suchen und nicht formulieren was man braucht)

---

Das stimmt. Da hilft wirklich nur fragen und viiiiel fremde Programme studieren ("wie hat der das gemacht") das gibt dann "ach so, is ja eigentlich logo" - Erlebnisse.

also, weiterhin viel Erfolg !