usart.i

基于51单片机/GSM模块西门子tc35i的远程控制源程序

#pragma used+
//======================================= 函数声明 ===============================================
void USART_INIT(void);
char USART_GETCHAR(void);
void USART_SENDCHAR(unsigned char c);
void USART_SENGSTR(unsigned char *ptr);
void TC35_INIT(void);
void TC35_MESSAGEINIT(void);
void TC35_SENDMESSAGE(unsigned char *TC35_Message);
//================================================================================================
#pragma used-


// CodeVisionAVR C Compiler
// (C) 1998-2001 Pavel Haiduc, HP InfoTech S.R.L.

// I/O registers definitions for the ATmega16


#pragma used+
sfrb TWBR=0;
sfrb TWSR=1;
sfrb TWAR=2;
sfrb TWDR=3;
sfrb ADCL=4;
sfrb ADCH=5;
sfrw ADCW=4;      // 16 bit access
sfrb ADCSRA=6;
sfrb ADMUX=7;
sfrb ACSR=8;
sfrb UBRRL=9;
sfrb UCSRB=0xa;
sfrb UCSRA=0xb;
sfrb UDR=0xc;
sfrb SPCR=0xd;
sfrb SPSR=0xe;
sfrb SPDR=0xf;
sfrb PIND=0x10;
sfrb DDRD=0x11;
sfrb PORTD=0x12;
sfrb PINC=0x13;
sfrb DDRC=0x14;
sfrb PORTC=0x15;
sfrb PINB=0x16;
sfrb DDRB=0x17;
sfrb PORTB=0x18;
sfrb PINA=0x19;
sfrb DDRA=0x1a;
sfrb PORTA=0x1b;
sfrb EECR=0x1c;
sfrb EEDR=0x1d;
sfrb EEARL=0x1e;
sfrb EEARH=0x1f;
sfrw EEAR=0x1e;   // 16 bit access
sfrb UBRRH=0x20;
sfrb UCSRC=0X20;
sfrb WDTCR=0x21;
sfrb ASSR=0x22;
sfrb OCR2=0x23;
sfrb TCNT2=0x24;
sfrb TCCR2=0x25;
sfrb ICR1L=0x26;
sfrb ICR1H=0x27;
sfrb OCR1BL=0x28;
sfrb OCR1BH=0x29;
sfrw OCR1B=0x28;  // 16 bit access
sfrb OCR1AL=0x2a;
sfrb OCR1AH=0x2b;
sfrw OCR1A=0x2a;  // 16 bit access
sfrb TCNT1L=0x2c;
sfrb TCNT1H=0x2d;
sfrw TCNT1=0x2c;  // 16 bit access
sfrb TCCR1B=0x2e;
sfrb TCCR1A=0x2f;
sfrb SFIOR=0x30;
sfrb OSCCAL=0x31;
sfrb OCDR=0x31;
sfrb TCNT0=0x32;
sfrb TCCR0=0x33;
sfrb MCUCSR=0x34;
sfrb MCUCR=0x35;
sfrb TWCR=0x36;
sfrb SPMCR=0x37;
sfrb TIFR=0x38;
sfrb TIMSK=0x39;
sfrb GIFR=0x3a;
sfrb GICR=0x3b;
sfrb OCR0=0X3c;
sfrb SPL=0x3d;
sfrb SPH=0x3e;
sfrb SREG=0x3f;
#pragma used-

// Interrupt vectors definitions



// CodeVisionAVR C Compiler
// (C) 1998-2005 Pavel Haiduc, HP InfoTech S.R.L.

// Prototypes for string functions



#pragma used+

char *strcat(char *str1,char *str2);
char *strcatf(char *str1,char flash *str2);
char *strchr(char *str,char c);
signed char strcmp(char *str1,char *str2);
signed char strcmpf(char *str1,char flash *str2);
char *strcpy(char *dest,char *src);
char *strcpyf(char *dest,char flash *src);
unsigned char strcspn(char *str,char *set);
unsigned char strcspnf(char *str,char flash *set);
unsigned int strlenf(char flash *str);
char *strncat(char *str1,char *str2,unsigned char n);
char *strncatf(char *str1,char flash *str2,unsigned char n);
signed char strncmp(char *str1,char *str2,unsigned char n);
signed char strncmpf(char *str1,char flash *str2,unsigned char n);
char *strncpy(char *dest,char *src,unsigned char n);
char *strncpyf(char *dest,char flash *src,unsigned char n);
char *strpbrk(char *str,char *set);
char *strpbrkf(char *str,char flash *set);
signed char strpos(char *str,char c);
char *strrchr(char *str,char c);
char *strrpbrk(char *str,char *set);
char *strrpbrkf(char *str,char flash *set);
signed char strrpos(char *str,char c);
char *strstr(char *str1,char *str2);
char *strstrf(char *str1,char flash *str2);
unsigned char strspn(char *str,char *set);
unsigned char strspnf(char *str,char flash *set);
char *strtok(char *str1,char flash *str2);
 

unsigned int strlen(char *str);
void *memccpy(void *dest,void *src,char c,unsigned n);
void *memchr(void *buf,unsigned char c,unsigned n);
signed char memcmp(void *buf1,void *buf2,unsigned n);
signed char memcmpf(void *buf1,void flash *buf2,unsigned n);
void *memcpy(void *dest,void *src,unsigned n);
void *memcpyf(void *dest,void flash *src,unsigned n);
void *memmove(void *dest,void *src,unsigned n);
void *memset(void *buf,unsigned char c,unsigned n);

#pragma used-
#pragma library string.lib



char rx_buffer[100];
unsigned char rx_wr_index,rx_rd_index,rx_counter;

char tx_buffer[100];
unsigned char tx_wr_index;
//unsigned char tx_rd_index;
unsigned char tx_counter;


unsigned char OK[]="OK"; 
unsigned char *p;
unsigned char OK1='>';
unsigned char TC35_AT[]="AT";                       // 连机命令 
unsigned char TC35_CMGF[]="AT+CMGF=1";              // 选择短消息信息格式 (0:PDU，1:文本)
unsigned char TC35_CSMP[]="AT+CSMP=17,167,0,0";     // 设置短消息文本模式参数
unsigned char TC35_CSCS[]="AT+CSCS=GSM";            // 设置字符集
unsigned char TC35_CMGS[]="AT+CMGS=13915006560";    // 文本模式时设置对方电话号码，PDU模式时设置PDU长度  
unsigned char TC35_RESET[]="ATZ";                   // 软复位
//unsigned char TC35_CSQ[]="AT+CSQ";                // 检查信号质量
//unsigned char TC35_CONNECT[]="ATD*99***1#\r";     // 拨号
//unsigned char TC35_CONNECT1[]="AT+CGDCONT=1,"IP","CMNET"\r";

/********************************************************************
函 数 名：USART_Init
入口参数：无
出口参数：无
建立日期：2008年4月20日
修改日期：
函数作用：串口初始化
说    明：
********************************************************************/
void USART_INIT(void)
{    
    UCSRA=0x00;         
    UCSRB=0x98;         //接收器、发生器和接收中断使能
    UCSRC=0x86;         //设置帧格式:8 Data, 1 Stop, No Parity
    UBRRH=0x00;         //设置波特率
    UBRRL=0x33;
}


/********************************************************************
函 数 名：USART_GETCHAR
入口参数：无
出口参数：无
建立日期：2008年5月6日
修改日期：
函数作用：接收一位字符
说    明：
********************************************************************/ 
char USART_GETCHAR(void)
{
        char data;
        while (rx_counter==0);
        data=rx_buffer[rx_rd_index];
        if (++rx_rd_index == 100) rx_rd_index=0;
        #asm("cli")
        --rx_counter;
        #asm("sei")
        return data;
}

/********************************************************************
函 数 名：USART_SENDCHAR
入口参数：无
出口参数：无
建立日期：2008年5月6日
修改日期：
函数作用：发送一位字符
说    明：
********************************************************************/ 
void USART_SENDCHAR(unsigned char c)
{
    while(!(UCSRA&(1<<5)));
    UDR=c;
}

/********************************************************************
函 数 名：USART_SENGSTR
入口参数：*ptr
出口参数：无
建立日期：2008年4月20日
修改日期：
函数作用：发送字符串
说    明：
********************************************************************/ 
void USART_SENGSTR(unsigned char *ptr)
{
	while (*ptr)
	{
		USART_SENDCHAR(*ptr++);
	}
	USART_SENDCHAR(0x0D);
	USART_SENDCHAR(0x0A);  //结尾发送回车换行
}

/********************************************************************
函 数 名：TC35_INIT
入口参数：无
出口参数：无
建立日期：2008年5月6日
修改日期：
函数作用：TC35初始化
说    明：
********************************************************************/ 
void TC35_INIT(void)
{
    USART_SENGSTR(TC35_AT); 
    do
        p=strstr(rx_buffer,OK);
    while(p==0);
    memset(rx_buffer,'',sizeof(rx_buffer)); 
    rx_counter=0;
}


/********************************************************************
函 数 名：TC35_MESSAGEINIT
入口参数：无
出口参数：无
建立日期：2008年5月10日
修改日期：
函数作用：TC35短消息发送初始化
说    明：
********************************************************************/ 
void TC35_MESSAGEINIT(void)
{
    USART_SENGSTR(TC35_CMGF);
    do
        p=strstr(rx_buffer,OK);
    while(p==0); 
    memset(rx_buffer,'',sizeof(rx_buffer)); 
    rx_counter=0;
                
    USART_SENGSTR(TC35_CSMP);
    do
        p=strstr(rx_buffer,OK);
    while(p==0); 
    memset(rx_buffer,'',sizeof(rx_buffer)); 
    rx_counter=0;
                
    USART_SENGSTR(TC35_CSCS);
    do
        p=strstr(rx_buffer,OK);
    while(p==0); 
    memset(rx_buffer,'',sizeof(rx_buffer)); 
    rx_counter=0;
}

/********************************************************************
函 数 名：TC35_SENDMESSAGE
入口参数：*TC35_Message
出口参数：无
建立日期：2008年5月10日
修改日期：
函数作用：TC35短消息发送
说    明：
********************************************************************/ 
void TC35_SENDMESSAGE(unsigned char *TC35_Message)
{   
    TC35_MESSAGEINIT();
    USART_SENGSTR(TC35_CMGS);
    do
        p=strstr(rx_buffer,&OK1);
    while(p==0);      
    memset(rx_buffer,'',sizeof(rx_buffer)); 
    rx_counter=0;
        
          
    USART_SENGSTR(TC35_Message);
    USART_SENDCHAR(0x1A);
    do
        p=strstr(rx_buffer,OK);
    while(p==0); 
    memset(rx_buffer,'',sizeof(rx_buffer)); 
    rx_counter=0;
}