/* UART - 2XADC Tutorial 2 */
unsigned char text0[4] ;
unsigned char text1[4];
int temp0 = 0;
int temp1 = 0;
//
void main()
{
Uart1_Init(9600);
do{
temp0 = Adc_Read(0);   //
temp1 = Adc_Read(1);   //
intToStr(temp0,text0);    //
UART1_Write_Text(text0);
Uart1_Write('\t'); // Tabe (Horizontal)
intToStr(temp1, text1); //
UART1_Write_Text(text1);
Uart1_Write('\r'); //  OR 13 :  Carriage Return
//Uart1_Write('\f');//OR 10 : Form feed
//Uart1_Write('\n');//OR 10 : New line (line feed)
//Uart1_Write('\v'); //Vretical Tabe
}
while(1);
}

/*LESSON 19 TUTORIAL8
LM35>>ADC>>LCD>>UART""PC Hyper Terminal
PIC16F877A
crystal: 4MHz

 
ENG.F.ABDELAZIZ
http://www.eeecb.com/vb/index.php
*/
// LCD module connections
sbit LCD_RS at RB2_bit;
sbit LCD_EN at RB3_bit;
sbit LCD_D4 at RB4_bit;
sbit LCD_D5 at RB5_bit;
sbit LCD_D6 at RB6_bit;
sbit LCD_D7 at RB7_bit;
 
sbit LCD_RS_Direction at TRISB2_bit;
sbit LCD_EN_Direction at TRISB3_bit;
sbit LCD_D4_Direction at TRISB4_bit;
sbit LCD_D5_Direction at TRISB5_bit;
sbit LCD_D6_Direction at TRISB6_bit;
sbit LCD_D7_Direction at TRISB7_bit;
// End LCD module connections
 
 
unsigned char text0[4] ;
unsigned char text1[4] ;
 
int temp0 = 0;
int temp1 = 0;
 
// Main program
void main ()
{
 
Lcd_Init();                        // Initialize LCD
 
 Lcd_Cmd(_LCD_CLEAR);               // Clear display
 Lcd_Cmd(_LCD_CURSOR_OFF);          // Cursor off
 Lcd_Out(1,1,"ROOM1 TEMP.=   C");                 // writes text on line 1, column 1 of the lcd
 Lcd_Out(2,1,"ROOM2 TEMP.=   C");                 // writes text on line 2, column 1 of the lcd
 
 Uart1_Init (9600);
 
do {
 
temp0 = Adc_Read(0);    // Read channel AN0 and save value in the variable  temp0
temp0 =temp0/2.05;// Convert from value to TEMPERATURE
temp1 = Adc_Read(1);    //  Read channel AN1 and save value in the variable  temp1
temp1 =temp1/2.05; // Convert from value to TEMPERATURE
 
ByteToStr(temp0, text0);// converts TEMP.to string
ByteToStr(temp1, text1); //  converts TEMP.to string
 
Lcd_Out(1,12,text0);                 // Write the value to LCD
delay_ms (10);
Lcd_Out(2,12,text1);                 // Write the value to LCD
delay_ms (10);
 
 
UART1_Write_Text("ROOM1 TEMP.=");
UART1_Write_Text(text0); // Sent to uart
UART1_Write_Text("C");
 
Uart1_Write('\t'); // Tabe (Horizontal)
 
UART1_Write_Text("ROOM2 TEMP.=");
UART1_Write_Text(text1);
UART1_Write_Text("C");
Uart1_Write('\r'); //  OR 13 :  Carriage Return
 
}
 
while (1);
}
 

char  keypadPort  at  PORTD ;

void Keypad_Init(void);

// Keypad module connections
char keypadPort at PORTD;
// End of keypad module connections
...
Keypad_Init();

char Keypad_Key_Press(void);

char kp;
...
kp = Keypad_Key_Press();

char Keypad_Key_Click(void);

char kp;
...
kp = Keypad_Key_Click();

// LESSON 20 Keypad-LCD-Tutotial 1
unsigned short kp, cnt, oldstate = 0;
char txt[6];

// Keypad module connections
char  keypadPort at PORTD;
// End Keypad module connections

// LCD module connections
sbit LCD_RS at RB2_bit;
sbit LCD_EN at RB3_bit;
sbit LCD_D4 at RB4_bit;
sbit LCD_D5 at RB5_bit;
sbit LCD_D6 at RB6_bit;
sbit LCD_D7 at RB7_bit;

sbit LCD_RS_Direction at TRISB2_bit;
sbit LCD_EN_Direction at TRISB3_bit;
sbit LCD_D4_Direction at TRISB4_bit;
sbit LCD_D5_Direction at TRISB5_bit;
sbit LCD_D6_Direction at TRISB6_bit;
sbit LCD_D7_Direction at TRISB7_bit;
// End LCD module connections

void main() {
  cnt = 0;                                 // Reset counter
  Keypad_Init();                           // Initialize Keypad


Lcd_Init();                              // Initialize LCD
  Lcd_Cmd(_LCD_CLEAR);                     // Clear display
  Lcd_Cmd(_LCD_CURSOR_OFF);                // Cursor off
  Lcd_Out(1, 1, "1");
  Lcd_Out(1, 1, "Key  :");                 // Write message text on LCD
  Lcd_Out(2, 1, "Times:");

  do {
    kp = 0;                                // Reset key code variable

    // Wait for key to be pressed and released
    do
      // kp = Keypad_Key_Press();          // Store key code in kp variable
      kp = Keypad_Key_Click();             // Store key code in kp variable
    while (!kp);
   // Prepare value for output, transform key to it's ASCII value
    switch (kp) {
      //case 10: kp = 42; break;  // '*'   // Uncomment this block for keypad4x3
      //case 11: kp = 48; break;  // '0'
      //case 12: kp = 35; break;  // '#'
      //default: kp += 48;

      case  1: kp = 49; break; // 1        // Uncomment this block for keypad4x4
      case  2: kp = 50; break; // 2
      case  3: kp = 51; break; // 3
      case  4: kp = 65; break; // A
      case  5: kp = 52; break; // 4
      case  6: kp = 53; break; // 5
      case  7: kp = 54; break; // 6
      case  8: kp = 66; break; // B
      case  9: kp = 55; break; // 7
      case 10: kp = 56; break; // 8
      case 11: kp = 57; break; // 9
      case 12: kp = 67; break; // C
      case 13: kp = 42; break; // *
      case 14: kp = 48; break; // 0
      case 15: kp = 35; break; // #
      case 16: kp = 68; break; // D

    }

    if (kp != oldstate) {                  // Pressed key differs from previous
      cnt = 1;
      oldstate = kp;
      }
    else {                                 // Pressed key is same as previous
      cnt++;
      }

    Lcd_Chr(1, 10, kp);                    // Print key ASCII value on LCD

    if (cnt == 255) {                      // If counter varialble overflow
      cnt = 0;
      Lcd_Out(2, 10, "   ");
      }

    WordToStr(cnt, txt);                   // Transform counter value to string
    Lcd_Out(2, 10, txt);                   // Display counter value on LCD
  } while (1);
}