AD převodník: využití dalších pinů stejného portu pro output

Zkus trosku nacerpat ze zde:
[forum.mcontrollers.com/t/nacteni-a-vypocet-hodnot-napeti-s-adc-v-bascom/1178/5)
Z toho jsem vycetl, ze se nepouziva ADC(0) ale GETADC(0) a kdyz ten prikaz skonci, tak uz mas v promenne hodnotu z funkce
tedy neco takoveho

Dim An_Val As Integer
Config Adc = Single , Prescaler = Auto , Reference = Avcc 
Start Adc 

An_Val=GetAdc(0)  // V teto chvili je analogove cteni ukonceno

Osetrni dalsi hodnoty potenciometru+cekani+zobrazeni hodnoty


A furt dokola