Ext. Interrupt löst nur unregelmässig aus

[Murus]

Ich habs auch schon runtergestrickt, bei der die ISR nur noch eine LED toggelte ==> dasselbe Resultat, die Software ist es nicht.
Bevor der nächste Int-IRQ kommt, ist der Timerinterrupt schon lange wieder ausgeschaltet.

[SprinterSB]

Ich meinte nicht die INT-IRQ, sondern andere aktive IRQs (UART, Timer, ADC, AC, etc)

[Murus]

Eben net... Nach dem Ext. Interrupt wird der Timer angeworfen, der lange voro dem nächsten Ext. Interrupt wieder ausgeschaltet wird. Das sind alle Interrupts.

[Hanni]

Allerdings kann man da ohne Code nicht allzuviel machen.

Ich zitiere mich hier mal frecherweise selber, da das was hier im Moment läuft irgendwie an Sackhüpfen im Minenfeld erinnert ....

[Hubert.G]

Ich habe auch schon angeboten das Programm mit meinem M16 zu testen. Aber man kann nur dem helfen der sich auch helfen lassen will.

Hubert

[Murus]

Hier der Code:

$regfile = "m16def.dat"
$crystal = 6000000


Dim I As Byte

ddra.3=1
Porta.3=0


Ddrd.3 = 0
Portd.3 = 1

On Int1 Lichtschranke

Mcucr.2 = 1
Mcucr.3 = 1
Enable Interrupts

Config Timer0 = Timer , Prescale = 8
Enable Timer0
On Timer0 Zeit
Stop Timer0
I = 0

Enable Int1

Do

If I = 10 Then
Stop Timer0
I=0
End If

Loop

Lichtschranke:
Start Timer0
Timer1 = 0
Return

Zeit:
Toggle porta.3
Incr I
Return

Es ist nun so, dass der Lichtschranken-Interrupt nicht immer ausgeführt wird, manchmal aber schon ==> auch wenn ich den Draht langsam durch die Lichtschranke bewege, wird er zum Teil ausgelöst (flache Flanke). Normalerweise läuft er schnell durch (innert 300 Mikrosekunden ist der LS-Spalt vollständig abgedeckt), aber auch dann wird nicht immer ausgelöst.

[Hanni]

1. finde ich den Code trotz seiner kürze sehr unübersichtlich.
2. wofür soll das gut sein: Timer1 = 0
3. wonach verifizierst du, das der Interupt ausgelöst wurde ?

[Murus]

Timer1=0 stellt ihn auf einen definierten Wert ein.
Ich seh ja, falls etwas blinkt ==> Interrupt, falls nicht ==> kein Interrupt.