Hallo. Ich halte es kurz:
Schaltung:

Code:
            ___
RA3 -----|___|----- RA0
                     |
                     |
                    ---
                    ---
                     |
                     | 
                     | 
                   Masse
Code in Basic

Code:
Wert:
    ADCWert = 0                 ;Wert auf 0 setzen  
    PORTA.3 = 1			;Aufladen
    Pause 20			;Warten bis aufgeladen
        
    PORTA.3 = 0			;Kurzschließen
    CMCON = %01000010		;Komp. an, NI-Eingang = Vref, I-Eingang = RA0.DB Seite 62, CM2:CM0 = 010
    WHILE CMCON.6 = 1		;Solange Schwelle nicht erreicht
        ADCWert = ADCWert + 1
    WEND      
    
    Pause 20			;Entladen
    CMCON = %00000111		;RA3 kann hohen Pegel ausgeben, Komp. aus
    RETURN
Ergebnis ist immer Null bei sich änderndem R. Woran liegt es ?