Figura 2.
Con este código y el circuito de la Figura 2, podemos leer cualquier sensor de tipo resistivo (C=0.1uf).
resultado var word ' Variable de tipo word
inicio:
high 7 ' Descarga el capacitor.
pause 1 ' pause 1 ms tiempo necesario para descargar.
RCTIME 7,1,resultado ' Mide el tiempo de carga del circuito RC.
debug HOME, dec5 ? resultado ' Muestra el valor en pantalla.
goto inicio ' vuelve a tomar la medición.