Hallo,
ich versuche schon seit einiger Zeit erfolglos den TLC2543 AD-Wandler auszulesen. Im 8-Bit Modus funktioniert es einwandfrei. Aber im 12-Bit Modus bekomme ich nur eine 0, obwohl ich die volle Betriebspannung auf den Eingang lege.

Hier mein Quelltext:
Code:
$regfile = "m8def.dat"
$crystal = 1000000
$hwstack = 65
$swstack = 40
$framesize = 100
$baud = 4800


Config Portb.1 = Output
Config Portb.2 = Output
Config Pinb.3 = Input
Config Portb.4 = Output
Config Pinb.5 = Input
Portb.3 = 1



Cs Alias Portb.1
Clock Alias Portb.2
Ad_eingang Alias Pinb.3
Ad_ausgang Alias Portb.4
Eoc Alias Pinb.5

Dim Ausgang As Byte
Dim Eingang As Word


Cs = 1

Do

Ausgang = &B00011100
Eingang = 0

Cs = 0
Shiftout Ad_ausgang , Clock , Ausgang , 1 , 8 , 10
Cs = 1
Waitms 500
Cs = 0
Shiftin Ad_eingang , Clock , Eingang , 1 , 12 , 10
'Shift Eingang , Right , 3
Cs = 1
Print Str(eingang)
Wait 2
Loop

End
Habe beim googlen schon gelesen das mehrere Leute das Problem hatten, aber leider habe ich keine Lösung gefunden.