adc not working properly

#include <pic.h>
 
 unsigned int itime;
 void delay (unsigned char itime);
 
 void main (void)
 {
 TRISA=0b10000000;    //RA0 input for analog
 TRISC=0b11000000; //RC0, RC1 are set as outputs
 TRISD=0x11111111;    //D is set as output
 
 ADCON1=0b10000000;
 //bit7:ADFM:right justified
 //bit6-4:unused, read as 0
 //bit3-0:all ports configured as analog channels
 
 ADCON0=0b0000001;
 //bit7-6:Fosc/2
 //bit5-3:using analog channel RA0/AN0
 //bit2:ADON not on
 //bit1:unimplemented
 //bit0: ADON converter module is operating
 
 while(1)
 {
 delay(100);
 //GODONE=1;    //start converting ***ADGO=1
 //while(GO);
 PORTC=ADRESL;
 PORTD=ADRESH;
 delay(100);
 }
 }
 
 void delay (unsigned char itime)
 {
     unsigned int i,j;
 
     for(i=0;i<itime;i++)
         for(j=0;j<200;j++);
 }

/*Header******************************************************/

// LCD module connections
sbit LCD_RS at RB4_bit;
sbit LCD_EN at RB5_bit;
sbit LCD_D4 at RB0_bit;
sbit LCD_D5 at RB1_bit;
sbit LCD_D6 at RB2_bit;
sbit LCD_D7 at RB3_bit;
sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D4_Direction at TRISB0_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D7_Direction at TRISB3_bit;
// End LCD module connections

unsigned char ch;                    //
unsigned int adc_rd;                 // Declare variables
char *text;                          //
long tlong;                          //

void main() {
    INTCON = 0;                      // All interrupts disabled
    TRISA = 0x01;                    //RA0 as input
    
    Lcd_Init();                      // LCD display initialization
    Lcd_Cmd(_LCD_CURSOR_OFF);        // LCD command (cursor off)
    Lcd_Cmd(_LCD_CLEAR);             // LCD command (clear LCD)
    
    text = "mikroElektronika";       // Define the first message
    Lcd_Out(1,1,text);               // Write the first message in the first line
    text = "LCD example";            // Define the second message
    Lcd_Out(2,1,text);               // Define the first message
    
    ADCON1 = 0x82;                   // A/D voltage reference is VCC
     Delay_ms(2000);
    
    text = "voltage:";               // Define the third message
    
    while (1) {
        adc_rd = ADC_Read(0);        // A/D conversion. Pin RA2 is an input.
        Lcd_Out(2,1,text);           // Write result in the second line
        tlong = (long)adc_rd * 5000; // Convert the result in millivolts
        tlong = tlong / 1023;        // 0..1023 -> 0-5000mV
        ch = tlong / 1000;           // Extract volts (thousands of millivolts)
                                     // from result
        Lcd_Chr(2,9,48+ch);          // Write result in ASCII format
        Lcd_Chr_CP('.');
        ch = (tlong / 100) % 10;     // Extract hundreds of millivolts
        Lcd_Chr_CP(48+ch);           // Write result in ASCII format
        ch = (tlong / 10) % 10;      // Extract tens of millivolts
        Lcd_Chr_CP(48+ch);           // Write result in ASCII format
        ch = tlong % 10;             // Extract digits for millivolts
        Lcd_Chr_CP(48+ch);           // Write result in ASCII format
        Lcd_Chr_CP('V');
        Delay_ms(1);
    }
}