unsigned short i, j;
Usart_Init(2400);
i = 0;
while (1)
{
  if (Usart_Data_Ready())
  {
    j = Usart_Read();
    Eeprom_Write(i, j);
    Delay_ms(20);
    i++;
  }
  if (i > 29)
  {
    for (i = 0; i < 30; i++)
    {
      j = Eeprom_Read(i);
      Usart_Write(j);
    }
    i = 0;
  }
}

/*
 * Project name:
     ADC_on_LCD (Displaying ADC result on LCD)
 * Copyright:
     (c) MikroElektronika, 2005-2008.
 * Description:
     This code demonstrates how to use library function ADC_read, and library
     procedures and functions for LCD display (4 bit interface).
 * Test configuration:
     MCU:             PIC16F887
     Dev.Board:       EasyPIC5
     Oscillator:      HS, 08.0000 MHz
     Ext. Modules:    LCD
     SW:              mikroC v8.0
 * NOTES:
     None.
*/

unsigned char ch;
unsigned int adc_rd;
char *text;
long tlong;

void main() {
  INTCON = 0;                              // disable all interrupts
  ANSEL  = 0x04;                           // Configure AN2 pin as analog input
  TRISA  = 0x04;
  ANSELH = 0;                              // Configure other AN pins as digital I/O
  Lcd_Config(&PORTB, 4, 5, 6, 3, 2, 1, 0); // Lcd_Init_EP5, see Autocomplete
  LCD_Cmd(LCD_CURSOR_OFF);                 // send command to LCD (cursor off)
  LCD_Cmd(LCD_CLEAR);                      // send command  to LCD (clear LCD)

  text = "mikroElektronika";               // assign text to string
  LCD_Out(1,1,text);                       // print string a on LCD, 1st row, 1st column
  text = "LCD example";                    // assign text to string
  LCD_Out(2,1,text);                       // print string a on LCD, 2nd row, 1st column

  ADCON1     = 0x82;                       // configure VDD as Vref, and analog channels
  TRISA      = 0xFF;                       // designate PORTA as input
  Delay_ms(2000);
  text  = "voltage:";                      // assign text to string
  while (1) {
    adc_rd  = ADC_read(2);                 // get ADC value from 2nd channel
    LCD_Out(2,1,text);                     // print string a on LCD, 2nd row, 1st column

    tlong = (long)adc_rd * 5000;           // covert adc reading to milivolts
    tlong = tlong / 1023;                  // 0..1023 -> 0-5000mV

    ch     = tlong / 1000;                 // extract volts digit
    LCD_Chr(2,9,48+ch);                    // write ASCII digit at 2nd row, 9th column
    LCD_Chr_CP('.');

    ch    = (tlong / 100) % 10;            // extract 0.1 volts digit
    LCD_Chr_CP(48+ch);                     // write ASCII digit at cursor point

    ch    = (tlong / 10) % 10;             // extract 0.01 volts digit
    LCD_Chr_CP(48+ch);                     // write ASCII digit at cursor point

    ch    = tlong % 10;                    // extract 0.001 volts digit
    LCD_Chr_CP(48+ch);                     // write ASCII digit at cursor point
    LCD_Chr_CP('V');

    Delay_ms(1);
  }
}//~!

unsigned short i;
unsigned int buf[500];
void main() {
  Glcd_Init();            // ????????????? GLCD
  Glcd_Fill(0x00);                        // Clear GLCD

       for (;;){   //while(1) {
           buf[i] = ADC_Read(3);    //чтение с ацп и запись в буфер

           for(i=1;i<10;i++); // формирование графика
               Delay_100ms();//задержка
           for (i=1; i<buf[i]+1; i++)  //?????? ??????
              {
         Glcd_Line(i=1,buf[i],i+90,buf[i+1],1);  //?вывод графика на дисплей
                       };

       Glcd_Fill(0);   //сброс индикатора

          };
}

 for(i=1;i<10;i++); // формирование графика

  for (i=1; i<buf[i]+1; i++)
        Glcd_Line(i=1,buf[i],i+90,buf[i+1],1);