char keypadPort at portc;
#define  open_door   porta.f3=1
#define close_door   porta.f5=1
#define greenLedon   portb.f6=0
#define greenLedoff  portb.f6=1
#define redLedon     portb.f7=0
#define redLedoff    portb.f7=1
#define alarmOn      porta.f2=1
 // LCD module connections
sbit LCD_RS at RB0_bit;
sbit LCD_EN at RB1_bit;
sbit LCD_D4 at RB2_bit;
sbit LCD_D5 at RB3_bit;
sbit LCD_D6 at RB4_bit;
sbit LCD_D7 at RB5_bit;

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

char readKepad(){
char kp;
kp = Keypad_Key_Press();
   switch (kp) {
      case  1: kp = 49; break; // 1
      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;  // '#'
      
      default: kp = 0;
    }
   return kp;
}

char READ_PASS(){
char i ,key  ;
                 for(i=7;i<=12;i=i+1){      // store entered passwodr in eeprom 7-->12
                                        key=readKepad();
                                        while( !key){ key=readKepad();}
                                        EEprom_write(i,key-48);
                                        lcd_chr(2,i-6,'*');
                                        delay_ms(500);
                                          }
                 //// comparing   

               if(EEPROM_Read(1)==EEPROM_Read(7) && EEPROM_Read(2)==EEPROM_Read(8)&& EEPROM_Read(3)==EEPROM_Read(9)&& EEPROM_Read(4)==EEPROM_Read(10)&& EEPROM_Read(5)==EEPROM_Read(11)&& EEPROM_Read(6)==EEPROM_Read(12))
                 {   lcd_cmd(_lcd_clear);
                     return 1;
                 } else  return 0;
     }

void main() {
char key , i ,Comp ,errorCount = 0;
CMCON=7;
trisa=0x00;
trisb=0x00;
greenLedoff ;
porta.f0=0;
redLedoff ;
Keypad_Init();
Lcd_Init();
Lcd_Cmd(_LCD_CURSOR_OFF);

 if(EEPROM_READ(0)>0){ for(i=1;i<=6;i=i+1) { EEprom_write(i,0);} }   // for default password for first time only .000000
  while(1){
         lcd_cmd(_LCD_CLEAR);
         Lcd_Out(1,1,"HELLOW"); delay_ms(1000);
          Lcd_Out(1,1,"Open the Door");
          Lcd_Out(2,1,"Press * ");
      
       key=readKepad();
      while( !key){ key=readKepad();}
      delay_ms(400);
      if(key=='*'){
                    lcd_cmd(_LCD_CLEAR);
                    Lcd_out(1,1,"Enter Password");  delay_ms(1000);
                     Comp=READ_PASS();
                    if(Comp==1){ lcd_out(1,1,"Password OK");
                                 Lcd_Out(2,1,"YOU ARE WELCOME");
                                  errorCount = 0 ; 
                                  greenLedon ;
                                  open_door;
                                  delay_ms(10000);  // DELAY FOR WAITING TO CLOSE DOOR AGAIN
                                  close_door ;      // close door again
                                  greenLedoff ;
                    }else { errorCount++;
                            if(errorCount> 3){redLedon; alarmOn; }
                            lcd_cmd(_lcd_clear);
                             lcd_out(1,1,"wrong password");
                              delay_ms(1000);
                          }
                 }

          }
  }