Dachte ich hätte es schon richtig gemacht ?

Wie würde deine Lösung dann aussehen ?

Sorry aber bin neu auf dem Gebiet und freue mich immer über jede Lösung die ich finde.

So ganz perfekt ists noch ned. Ich will eigentlich die Drehzahl immer nur in Hunderter Werten haben.

Die Lösung hab ich aber noch ned gefunden. Weißt du das vielleicht abhilfe ?

Gruß Tommy

EDIT:

So oder ?

Code:
Steigende_flanke:                                           'ISR für Capture Ereignis

'Disable Icp1
'Disable Ovf1

   Timer1 = 0

 W = Capture1


                                                            'Timer löschen

Incr Impulse

   If Impulse = 6 Then                                      'Damit die Anzeige ruhiger wird nur jeden 6.Impuls messen


         D = 3750000 / W                                    ' bei Prescaler 256 und 16Mhz
                                                            ' 60000000 µs / 16µs = 3750000
                                                            ' geteilt durch die Counts gibt Drehzahl

         Select Case D:                                     'Schaltblitz ab 10500 U/min
            Case 0 To 10499 : Led = 0
            Case 10500 To 12000 : Led = 1
         End Select

      Locate 2 , 1

      Lcd D

      Lcd " UpM     "

       W = 0
       D = 0
          Impulse = 0

        Else

        End If

       'Enable Icp1
      'Enable Ovf1
      W = 0

     Return