It's this correct ?
In header of code I add :
Code:
ADCON0 = %10001101 ' ADC input on GPIO.4/AN3/pin3 (page 41)
' MSB 1 = Right Justify "1"
' 0 = Vdd as voltage reference "0"
' 0 = n/a "00"
' 0 = n/a
' 1 = select channel 03 (bit 2 of 2) "11"
' 1 = select channel 03 (bit 1 of 2)
' 0 = conversion status (see routine) "0"
' LSB 1 = A/D converter module is on "1"
And I modify the "check" subroutine like that :
Code:
check:
vt =0
vs =0
grup=0
cnt =0
pause 50
for cnt = 1 to 10
ADCON0.1 = 1
NOT_DONE:
if ADCON0.1 = 1 THEN NOT_DONE
Pause 10
adval.highbyte = ADRESH
adval.lowbyte = ADRESL
PAUSE 10
vt=adval * 5000
vt=div32 1023
grup=vt+grup
PAUSE 10
next cnt
vs=grup / 10
if (vs > checkin) or (T1Count > 50) then
gpio.0=0
gpio.5=0
endif
The hardware it's in picture.
Thanks !
Bookmarks