Hi!
Ich habe jetzt nochmal ein Programm geschrieben das die GPYA71R auswerten sollte, doch irgendwie funzt das nicht.
Mache ich irgendetwas falsch?
MfG
Rasmus

Code:
$crystal = 16000000
$baud = 9600
Config Pind.4 = Input
Config Pind.5 = Input
Dim Rechts As Long , Links As Long
Config Int0 = Falling
Config Int1 = Falling
On Int0 Enc1
On Int1 Enc2
Enable Interrupts
Enable Int0
Enable Int1
Do
Waitms 1000
Print Rechts
Print Links
Loop


Enc1:
If Pind.4 = 1 Then
Links = Links + 1
Else
Links = Links - 1
End If
Return
Enc2:
If Pind.5 = 1 Then
Rechts = Rechts + 1
Else
Rechts = Rechts - 1
End If
Return
End