Einfach:
Wert = Getadc(Kanal)

Das ganze in einer Schleife mit Verzögerung.

Gruß Dirk