void  reception_message()
{
      UART1_INIT(9600);    // initialisation du protocol UART avec une vitesse d'echange des données de 9600
      Delay_ms(100);
      UART1_write_text("AT");    // Envoi de la commande AT
      UART1_write(13);    // Code ASCII equivalent pour ENTRE
      UART1_write(10);    // Code ASCII equivalent pour (CTRL+H)
      delay_ms(1000);
      UART1_write_text("AT+CMGF=1"); // choisir le mode texte en positionnant en 1
      UART1_write(13);
      UART1_write(10);
      delay_ms(1000);
      UART1_write_text("AT+CPMS='ME'");// la mémoire choisie est la mémoire de la télephone
      UART1_write(13);
      UART1_write(10);
      delay_ms(1000);
      UART1_write_text("AT+CNMI=2,1,0,0,0");// extraire touts les message  reçus
      UART1_write(13);
      UART1_write(10);
      delay_ms(1000);
}

void lecture_message ()
{
      UART1_write_text("AT+CMGR=1"); // la lecture du message de l'enplacement 1
      UART1_write(13);
      UART1_write(10);
      delay_ms(1000);
      UART1_write_text("AT+CMGD=1"); // supprimer le message dans l'emplacement 
      UART1_write(13);
      UART1_write(10);
      delay_ms(1000);
}
void main() 
{char R;
 TRISD=0;
 PORTD=0;
 UART1_init(9600);
 delay_ms(100);
              reception_message();
while(1)
{
              lecture_message ();

if(UART1_Data_Ready()){
                       R=UART1_Read();
                       if(R=='a'){PORTD.f1=1; }
                       if(R=='b'){PORTD.f1=0;}
                       }
}

}