ADC PIC18F2431 or PIC18F4431

[Acetronics2]

Hi, Mark

I do not think PBP can directly do what you are expecting ...

you should have a closer read of the ADC chapter of your datasheet and , after , drive the relevant registers ...
that are somewhat more numerous than those driven by a classical Adcin PBP command.

You'll also note there are fixed input groups, and Channel 0 + Channel 1 is not a valid group ...

PBP doesn't do everything for you, in short terms ...

Alain

[mark_s]

Hi, Mark

I do not think PBP can directly do what you are expecting ...

you should have a closer read of the ADC chapter of your datasheet and , after , drive the relevant registers ...
that are somewhat more numerous than those driven by a classical Adcin PBP command.

You'll also note there are fixed input groups, and Channel 0 + Channel 1 is not a valid group ...

PBP doesn't do everything for you, in short terms ...

Alain

Hi Alain,

Thanks for your reply. Yes I concluded last night that adcin would not work, but was
hoping otherwise!
Most likely will need a routine to set the group, channel, GO/DONE and store results on each read.

Regards
Mark

[Bruce]

Here's one example of A/D with this series. http://www.picbasic.co.uk/forum/showthread.php?t=6768

[mark_s]

Here's one example of A/D with this series. http://www.picbasic.co.uk/forum/showthread.php?t=6768

Thanks Bruce!

Perfect

I searched the forum for pic18f4431, not pic18f4331

Regards

[BigWumpus]

Today I trapped into the same hole...

ADCIN doesn't work on a PIC18Fxx31.

I have just written some code to read AN0..AN7 on devices who have this inputs.

Init-Part:

    ;ADC
    ADON=true:ADCON2=%11101101                      ;FOSC/16 AN0-AN4=analog right-justified, 40xTAD Sample
    ANSEL0=%00011111

Inside Main-Code:

        ;ADC-Zyklus
        ;messen, umrechnen und gewichtet mitteln
        ;CtADC contains the ADC-channel
        ADCHS=0:If CtADC.2 Then ADCHS=%01010101     ;Channel-Select
        ADCON0.3=CtADC.1:ADCON0.2=CtADC.0
        GO=true:Repeat:Until !GO                    ;ADC starten
        DummyW.Highbyte=ADRESH:DummyW.Lowbyte=ADRESL