ADC 0808 will immer noch nicht

Hi,

nachdem ich meinen ADC 0808 an den Parallelport angeschlossen habe, habe ich nun folgendes programmiert:

Code:

---

            lpt = &H378
            Eingang = 0
            Out lpt, Eingang 'Eingang wählen
           
            Out lpt, Eingang + 8 'Address Latch Enable (ALE)
           
            'Auf End of Conversation (EOC) warten
            While Inp(lpt + 2) = 0 Or Inp(lpt + 2) Mod 2 = 0
                DoEvents
            Wend
           
            Out lpt, 0
            Out lpt, 16 'Output Enable
           
            lblWert.Caption = Inp(lpt + 1) & " " & Inp(lpt + 2)
            Out lpt, 32 'Clock
            Out lpt, 0

---

Ich bekomme auch irgendwelche Zahlen ausgegeben, die aber nicht sinnvoll sind und sich nicht verändern. Könnt ihr mir helfen?