erstmal danke für die schnelle antwort
Also an pin 1 habe ich 1,3V mit 14,5 ampeere halt von 5V über 330OHM
An pin 2 klar gnd
an pin 3 ebenfals klar gnd
an pin 4 habe ich nichts da ich keine drehrichtung bestimmen möchte
an pin 5 habe ich klar 2,3 V
und an pin 6 habe ich VCC vom mc 4,78V
Die LED war blau
das einzige was nach entfernen der led noch auf der leitung liegt ist ein 10k Ohm wiederstand der als pull down wiederstand fungiert damit ich ein klares signal erhalte könnte es vielleicht daran liegen.

hier noch unser genauer code :
Code:
$regfile = "m328pdef.dat"

$framesize = 32
$swstack = 32
$hwstack = 32

$crystal = 16000000                                         'Quarzfrequenz
$baud = 9600

Config Portd.2 = Input

Dim Ist As Word
Dim Soll As Word
'Interrupt Messung
Const Timervorgabe = 3036
Const Markierungenproscheibe = 60
Dim Zaehlerirq0 As Long
Dim Impulseprosekunde As Long
Dim Impulseprominute As Long
Dim Umdrehungenprominute As Integer
Dim Umdrehungenprosekunde As Integer

'LCD
Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portb.1 , Rs = Portb.0
Config Lcd = 16 * 2

'Interrupt Messung
Config Int0 = Falling
Config Timer1 = Timer , Prescale = 256

Zaehlerirq0 = 0
On Int0 Irq0
Enable Int0

On Timer1 Timer_irq
Enable Timer1


Enable Interrupts

Cls
Do

   'Umrechnen der Messgrößen
   Impulseprominute = Impulseprosekunde * 60
   Umdrehungenprominute = Impulseprominute / Markierungenproscheibe
   Umdrehungenprosekunde = Impulseprosekunde / Markierungenproscheibe


Locate 1 , 1
Lcd "Min" ; Umdrehungenprominute
Locate 2 , 1
Lcd "Impuls" ; Impulseprominute


Loop

End                                                         'end program

Irq0:
 Incr Zaehlerirq0                                           'Pro Impuls (Markierung auf Scheibe) ein Aufruf
Return


Timer_irq:                                                  'Pro Sekunde ein Aufruf
  Timer1 = Timervorgabe
  Impulseprosekunde = Zaehlerirq0
  Zaehlerirq0 = 0
Return