Adc For 16f88

[Jerson]

to show simultaneous conversion of two ADC channels, AN0 and AN1 on LCD.
My code

    DEFINE  ADC_BITS        10   
    DEFINE  ADC_CLOCK       3     
    DEFINE  ADC_SAMPLEUS    50    	

    adval   VAR WORD			
    adval1  VAR WORD			
	
    ANSEL = %00000011
    CMCON = 7                      
    TRISA = %00000011		         
    ADCON0 = %11001001            
    ADCON1 = %10000000                    	          	     
    
    INCLUDE "LCDbar_INC.bas"       
 
loop: 	
    ADCIN 0, adval				
    adval = (adval */ 500)>>2		    
    ADCIN 1, adval1				
    adval1 = (adval1 */ 500)>>2		   
    LCDOut $fe,1,"L:" 
    @ BARgraph  _adval,  1,   2,    16,   100, lines    
    LCDOut $fe,$C0,"R:" 
    @ BARgraph  _adval1,  2,   2,    16,   100, lines        
    PAUSE 300
    GoTo loop

Try above code. You may need to pause between the 2 adcin statements.

[mister_e]

Not sure that would help, i would suggest to check the analog source impedance first. Must meet the datasheet requirement. You could still increase the ADC_SAMPLEUS and or check what you maths will do.

As your maximum value range is 100... why not using a 8 Bit conversion instead?