Hello,

I have this program , it does compile but the output
value is always the same (around 500). It should read
the input portC.0 from analog and display its decimal
value to the lcd. The analog input is between 2 to 5
volt. I am using a Pic16F876a.

DEFINE LCD_DREG PORTB	
DEFINE LCD_DBIT 4	
DEFINE LCD_RSREG PORTB	
DEFINE LCD_RSBIT 1	
DEFINE LCD_EREG PORTB	
DEFINE LCD_EBIT 0	
DEFINE LCD_BITS 4	
DEFINE LCD_LINES 2	

Define  ADC_BITS        10     	
Define  ADC_CLOCK       3     	
Define  ADC_SAMPLEUS    50    	

adval  var word				

TRISC = %11111111		
ADCON1 = %10000010		
Low PORTB.2			        
Pause 500       
		
loop: 	ADCIN 4, adval			
Lcdout $fe, 1   		     Lcdout "Value: ", DEC adval	
Pause 100       		
Goto loop       		
 End

end 

__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 
-- 
http://www.piclist.com PIC/SX FAQ & list archive
View/change your membership options at
http://mailman.mit.edu/mailman/listinfo/piclist