GSM SMS 8051 controlling relays

//ICC-AVR application builder : 6/22/2009 9:22:22 AM
// Target : M32
// Crystal: 7.3728Mhz

#include <iom32v.h>
#include <macros.h>

unsigned char SMSFlag=0,SMSReadFlag=0,ButtonPressed=0;
unsigned int timer0_counter=0;
unsigned int i=0,j=0,k=0;

unsigned char cmd_cmgf[]="AT+CMGF=1\r";
unsigned char cmd_cmgl[]="AT+CMGL=\"ALL\"";
unsigned char cReturn[]="\r";
unsigned char cmd_cmgs[]="AT+CMGS=\"+913451234567\"";
unsigned char cmd_AT[]="AT\r";
unsigned char cmd_cgmm[]="AT+CGMM\r";

unsigned char testMessage[]="Hello! this is Test Message!!!";

unsigned char ctrlZ=0x1A;
 /***********************************************************************************************/
void delay_1uSec(unsigned int);
 
 void delay_1uSec(unsigned int m) // approximately m*1uSec Delay
 {
      for(j=0;j<m;j++)
	  {
	   	  for(k=0;k<8;k++)
	      asm("nop");
      }
}
//**********************************************************************************************//

void port_init(void)
{
 	 PORTA = 0x00;
 	 DDRA  = 0x00;
 	 PORTB = 0x01;
 	 DDRB  = 0x00;
 	 PORTC = 0x00; 
 	 DDRC  = 0x0F;
 	 PORTD = 0x00;
 	 DDRD  = 0x00;
}

//TIMER0 initialize - prescale:8
// desired value: 8KHz
// actual value:  8.014KHz (0.2%)
void timer0_init(void)
{
 	 TCCR0 = 0x00; //stop
 	 TCNT0 = 0x8D; //set count
 	 OCR0  = 0x73;  //set compare
 	 TCCR0 = 0x02; //start timer
}

#pragma interrupt_handler timer0_ovf_isr:12
void timer0_ovf_isr(void)
{
 	 TCNT0 = 0x8D; //reload counter value
	 timer0_counter++;
	 
	 if(ButtonPressed==1)
	 PORTC = 0x0F|PORTC;
	 
	 
}

//UART0 initialize
// desired baud rate: 57600
/* ************************************************************************ */

void uart0_init(void)
{
 	 UCSRB = 0x00; //disable while setting baud rate
 	 UCSRA = 0x00;
 	 UCSRC = BIT(URSEL) | 0x06;
 	 UBRRL = 0x07; //set baud rate lo
 	 UBRRH = 0x00; //set baud rate hi
 	 UCSRB = 0x18;
}

///////////////////////// UART data receive routine //////////////////////////
unsigned char ReceiveByte(void)
{
	  while(!(UCSRA & BIT(RXC)));
	  return UDR;
}
///////////////////////// UART data transmit routine //////////////////////////
void SEND_CHAR_UART(char ch)
{
      while(!(UCSRA & BIT(UDRE))) ;
      UDR = ch;
}
//*----------------------------------------------------------------------------*//
void SendStr(char *ch)
{
      while(*ch != 0x00) 
	  SEND_CHAR_UART(*ch++);
}
/*------------------------------------*/


//call this routine to initialize all peripherals
void init_devices(void)
{
 	 //stop errant interrupts until set up
 	 CLI(); //disable all interrupts
 	 port_init();
 	 timer0_init();
 	 uart0_init();

 	 MCUCR = 0x00;
 	 GICR  = 0x00;
 	 TIMSK = 0x01; //timer interrupt sources
 	 SEI(); //re-enable interrupts
 	 //all peripherals are now initialized
}
//
void main(void)
{
 	  init_devices();
 	  //insert your functional code here...
	 
	  //*************************************
	  // Set Text Mode
	  //*************************************
	  for(i=0;i<sizeof(cmd_cmgf);i++)	
	  SEND_CHAR_UART(cmd_cmgf[i]);	
	  //*************************************	
	  for(i=0;i<sizeof(cmd_AT);i++)	
	  SEND_CHAR_UART(cmd_AT[i]);	
	  //*************************************
	  for(i=0;i<sizeof(cmd_cgmm);i++)	
	  SEND_CHAR_UART(cmd_cgmm[i]);
	  //*************************************
	  delay_1uSec(90000);
	  
	  // AT+CMGL="ALL"
	  	 
	  SEND_CHAR_UART('A');
	  SEND_CHAR_UART('T');
	  SEND_CHAR_UART('+');
	  SEND_CHAR_UART('C');
	  SEND_CHAR_UART('M');
	  SEND_CHAR_UART('G');
	  SEND_CHAR_UART('L');
	  SEND_CHAR_UART('=');
	  SEND_CHAR_UART('"');
	  SEND_CHAR_UART('A');
	  SEND_CHAR_UART('L');
	  SEND_CHAR_UART('L');
	  SEND_CHAR_UART('"');
	 
	  for(i=0;i<sizeof(cReturn);i++)	
	  SEND_CHAR_UART(cReturn[i]);
	 
	 //***************************************
	  delay_1uSec(90000);
	  delay_1uSec(90000);
	  // AT+CMGS="+913451234567" 	 
	  SEND_CHAR_UART('A');
	  SEND_CHAR_UART('T');
	  SEND_CHAR_UART('+');
	  SEND_CHAR_UART('C');
	  SEND_CHAR_UART('M');
	  SEND_CHAR_UART('G');
	  SEND_CHAR_UART('S');
	  SEND_CHAR_UART('=');
	  SEND_CHAR_UART('"');
	  SEND_CHAR_UART('+');
	  SEND_CHAR_UART('9');
	  SEND_CHAR_UART('1');
	  SEND_CHAR_UART('3');
	  SEND_CHAR_UART('4');
	  SEND_CHAR_UART('5');
	  SEND_CHAR_UART('1');
	  SEND_CHAR_UART('2');
	  SEND_CHAR_UART('3');
	  SEND_CHAR_UART('4');
	  SEND_CHAR_UART('5');
	  SEND_CHAR_UART('6');
	  SEND_CHAR_UART('7');
	  SEND_CHAR_UART('"');
	 	 
	  SEND_CHAR_UART(13); //Carriage Return
	 
	  delay_1uSec(90000);
	 
	  for(i=0;i<sizeof(testMessage);i++)	
	  SEND_CHAR_UART(testMessage[i]);
	 
	  SEND_CHAR_UART(26); //CTRL-Z
	 
	 
	 //***************************************
	 while(1)
	 {
	  	 
	 }
	 
}