Pin-Zustand erkennen und schalten bei dauernd pin=1

[mat-sche]

Sooooo,
(und Hallo)
genug und schon wieder allzulang vielleicht über einer einfachen Sache gesessen und keine Lösung gefunden!

Mein Problem:
an einem Pin hängt eine Led, die zyklisch an und aus geht. Das einschalten der LED erkenne ich über den Port Change Interrupt. Wenn jetzt die LED aufhört zu blinken und dauernd an ist, soll eine Aktion ausgelöst werden.
Irgend wie habsch nen Brett vorm Kopf, finde irgend wie keinen Lösungsansatz...

Wer kann mir helfen?

Grüße MAT

[Rofo88]

Nimm einen entsprechenden Timer und setzt ihn in der PortChange Interrupt auf 0. Wenn der Timer dann überläuft wurde er wohl lange nicht zurückgesetzt und es blinkt nichts mehr

[mat-sche]

Hi Rofo,

Das ist eine gute Idee! Gibt es noch möglichkeiten ohne Timer?

[PicNick]

Na, du hast doch sicher irgendeine DO...LOOP Haupschleife. Wenn du da eine Zähler hochzählst, ist das genau genug. Ansonsten dir gleiche Logik a la @rofo88

[mat-sche]

An dem Hochzählen klemmt es eben halt. Habe diverse Möglichkeiten durchgespielt, komme aber jedoch nicht zum Erfolg, irgendwie hab ich nen Brett vorm Kopf. Hast Du ein Sample wie ich das mit dem Hochzählen lösen kann?

[Rofo88]

in deiner Hauptschleife



i=i+1
if i> 10000 then "mache was"


und in deinem Interrupt

i=0

[mat-sche]

ok, diese Form kann ich leider nicht nehmen. Ich weiß eben nicht wann die LED aufhört zu blinken (Akkuladeschaltung).
Aber ich probiere gerade was anderes aus, vielleicht geht das:


If Laden = 1 Then
Laden1 = Laden1 + 1
Reset Laden
Print "laden " ; Laden
Print "laden1 " ; Laden1

End If

If Laden1 > 1 And Pina.1 = 1 Then
Portd.5 = 0
Batladen = 0
Laden1 = 0
Print "Batladen " ; Batladen
Print "laden1 zurückgesetzt"
End If

'-----------------------
Akku_isr:
Set Laden
If Laden1 = 100 Then Laden1 = 0
Print "PCINT angesprungen"

Return

[mat-sche]

Moin,

Problem hat sich erledigt, ich habe einen bestehenden Timer verwendet. MAT