also verwende ich keine Variable mehr, die "inkremiert" wird?
...exakt!

Ein Programm sagt mehr als 1000 Worte Bild :

Code:
Dim Zeit as Long
Dim Flag as Bit

Config Timer1=timer, prescale=1024
Stop Timer1
Timer1=0

Config INT0=falling
On INT0 ISR_lichtschranke1
Enable INT0

Config INT1=falling
On INT1 ISR_lichtschranke2
Enable INT1

Enable Interrupts


Do

(werkel - werkel...)

 If Flag=1 then
  Zeit = Zeit * 64
  Zeit = Zeit / 1000      'Zeit ist jetzt die Zeit in ms. Umrechnung in km/h 
                             hängt vom Abstand der Lichtschranken ab!!
  Flag = 0 
 End if

Loop


ISR_lichtschranke1:      '1. Lichtschranke wurde passiert
Start Timer1
Return

ISR_lichtschranke2:      '2. Lichtschranke wurde passiert
Stop Timer1
Zeit=Timer1
Timer1=0
Flag=1
Return

Isses jetzt etwas klarer?

LG,

Daniel