Bei Fehler -> Lampe blinken?

[sYn]

Hallo

Kann mir jemand auf die Sprünge helfen wie ich in meinem  Program, bei einem Fehler ein Ausgang nutzen kann der eine Lampe zum blinken bringt? Sozusagen eine einfache visuelle Fehleranzeige . Sollte doch irgendiwe möglich sein oder?

[Programmiersklave]

Ohne Hintergrundtask? Da gibt's nur perverse Lösungen. Oder billige. Wenn das Programm "laufend" stehenbleiben soll, kannst Du es in eine Endlosschleife schicken:

var bool lampeanaus;
lampeanaus:=false;
...
!Fehler tritt auf
while (fehlerbedingung) do
  lampeanaus:=not(lampeanaus);
if lampeanaus then
   setdo lampe,1;
else
  setdo lampe,0;
endif
waittime 0.5;
!(Blinkzeit)
endwhile
setdo lampe,0;
...
!Fehler ist vorbei.

Oder so.
Wenn das Programm "richtig" stehenbleiben soll, wird's blöd. Man kann vielleicht mit Cross-Connections und Ansprechfiltern was reissen, aber das habe ich noch nie probiert.

Grüße,
Michael

[robiman]

==> zeitgesteuerter Interrupt ist möglich 
damit kannst du eine Lampe zum Blinken bringen

[sYn]

Naja das Programm würde bei dem Fehler stehen bleiben und auf eine Eingabe warten.
Sogesehen würde das ja vllt mit der Endlosschleife funktionieren

Aber ist dann wohl doch einfacher gleich eine Lampe mit Blinkerfunktion zu nutzen ^^


mfg

/edit: Kannst du mir kurz ein Crashkurs geben wie ich das mit dem Zeitgesteuerten Interrupt mache? Soweit bin ich noch nich ^^

[robiman]

funktioniert in Prinzip so

alle x sek wird der Interrupt ausgelöst

im Interruptroutine fragst ob der Ausgang 0 oder 1 ist,
und setzt ihn wieder oder reset
das wars schon

[sYn]

Ok ich werde mal beides probieren

danke schonmal