void Delay_50ms(){
 Delay_ms(50);
}

void Write_Nibble(unsigned short N){
 Enable_Pin = 0; // Disable 
 // ****** Write RS *********
 Serial_Clk_Pin = 0;
 Serial_Data_Pin = RS;  // For command RS =0 , for character RS=1 , as you see later 
 Serial_Clk_Pin = 1; // Shift RS
 Serial_Clk_Pin = 0;
 // ****** End RS Write

 // Shift in 4 bits
 Mask = 8; // 0b00001000
  for (t=0; t<4; t++){ // Get and shift lower 4-bit  , one bit each loop
   Flag = N & Mask; //get
   if(Flag==0) Serial_Data_Pin = 0;
   else Serial_Data_Pin = 1;
   Serial_Clk_Pin = 1;//shift
   Serial_Clk_Pin = 0;
   Mask = Mask >> 1;//0b000000100
  }
  // One more clock because SC and ST clks are tied  
  Serial_Clk_Pin = 1;
  Serial_Clk_Pin = 0;//Now , data at shift register outputs Q0 to Q4
  Serial_Data_Pin = 0; //
  Enable_Pin = 1; // Enable to send data to LCD module 
  Delay_us(500); //Some delay for enable pulse  
  Enable_Pin = 0;
}

void Serial_LCD_Cmd(unsigned char Command)
{
      RS = 0; // It is command, not data
      Low_Nibble = Command & 15; // AS : Low_Nibble = Command & 0x0F;  
High_Nibble = Command/16; // AS : High_Nibble = Command>>4;  Write_Nibble(High_Nibble);
      Write_Nibble(Low_Nibble);
      if((Command == 0x0C) || (Command == 0x01) || (Command == 0x0E) || (Command == 0x0F) || (Command == 0x10)
                   || (Command == 0x1E) || (Command == 0x18) || (Command == 0x08) || (Command == 0x14)
                   || (Command == 0x02))
      Delay_50ms();
}

void Serial_LCD_Chr(unsigned int row, unsigned int col, char LCDChar)
{
        switch(row){

                case 1:
                Serial_LCD_Cmd(0x80 + col-1);
                break;
                case 2:
                Serial_LCD_Cmd(0xC0 + col-1);
                break;
                case 3:
                Serial_LCD_Cmd(0x94 + col-1);
                break;
                case 4:
                Serial_LCD_Cmd(0xD4 + col-1);
                break;
        }

 RS = 1; // It is Data, not command
Low_Nibble = LCDChar & 15;//Low_Nibble = LCDChar & 0x0F; //
High_Nibble = LCDChar/16;//High_Nibble = LCDChar>>4;
Write_Nibble(High_Nibble);
 Write_Nibble(Low_Nibble);

}

void Serial_LCD_Init(){
        Delay_50ms();
        Serial_LCD_Cmd(0x03); // Wake-Up Sequence
        Delay_50ms();
        Serial_LCD_Cmd(0x03);
        Delay_50ms();
        Serial_LCD_Cmd(0x03);
        Delay_50ms();
        Serial_LCD_Cmd(0x02);
        Delay_50ms();
        Serial_LCD_Cmd(0x28); // 4-bits, 2 lines, 5x7 font
        Delay_50ms();
        Serial_LCD_Cmd(0x06); // Entry mode- Auto-increment, No Display shifting
        Delay_50ms();
}

void Serial_LCD_Out(unsigned int row, unsigned int col, unsigned char str[20])
{       q = strlen(str);
        for (p = 0; p<q; p++){
            Serial_LCD_Chr(row,col++,str[p]);   // print first character on LCD
        }
        row = 1;
        col = 1;
}