資源簡介
51單片機到tc35模塊的發送接收程序,調試通過,該程序用于:單片機控制gsm模塊發短信

代碼片段和文件信息
#include
#include
#include
#define?uint?unsigned?int
#define?uchar?unsigned?char
#define?RST??????0X01
#define?CMGF?????0X02
#define?CMGD?????0X03
#define?CREG?????0X04
#define?CMGR?????0X05
#define?CMGS?????0X06
#define?CSCA?????0X07
#define?ATDAT????0X08
#define?TC35RET??0X00
uchar?i_tmpj_tmp;
/*--------------------------/
????????寄存器定義
---------------------------*/
uchar?TC35_CONch;
uchar?read_flag;
uchar?i_TC35_RECE;
uchar?i_receive
??????TC35_RE[80]
??TC35_MAX
??i_TC35;
void?delay(uint);
void?init_serialcom(?void?);
void?send_uart(?unsigned?char);
void?ATNAME(void);
void?AT_CMGS(void);
void?AT_CSCA(void);
void?AT_RST(void);
void?AT_CREG(void);
void?AT_CMGF(void);
void?AT_CMGR(void);
void?AT_CMGD(void);
/*--------------------------/ ??
????延時函數定義????????
/--------------------------*/?
void?main(void)
{P1=0XFF;
?P2=0XFF;
?P3=0Xff;
?P0=0X55;
//?init_devices();
????init_serialcom();?//初始化串口?
?delay(100);
?
?P0=0XFF;
?TC35_MAX=0;
?AT_RST();
while(1)
{delay(100);
if(TC35_MAX>0)
{
if(TC35_CON==RST){
if((TC35_RE[7]==‘O‘)&&(TC35_RE[8]==‘K‘))
{P0=(0XFF-0X01);TC35_CON=TC35RET;//?delay(100);
AT_CMGF();}
else{P1=(0XFF-0X02);}
}
else?if(TC35_CON==CMGF){
if((TC35_RE[12]==‘O‘)&&(TC35_RE[13]==‘K‘))
{P0=(0XFF-0X02);TC35_CON=TC35RET;?//?delay(100);
AT_CREG();}
else{P1=(0XFF-0X02);}
}
else?if(TC35_CON==CREG){
if(((TC35_RE[18]==‘0‘)&&(TC35_RE[20]==‘1‘))||((TC35_RE[18]==‘0‘)&&(TC35_RE[20]==‘5‘)))
{P0=(0XFF-0X04);
?P1=0XFF;
?TC35_CON=TC35RET;AT_CMGR();}
else{P1=(0XFF-0X02);AT_CREG();}
}
else?if(TC35_CON==CMGR){
if(TC35_MAX<=30){AT_CMGR();}
else?//if((TC35_MAX==77)||(TC35_MAX==79))
{delay(100);
P0=(0XFF-0X08);
P1=0XFF;
if(TC35_RE[69]==‘0‘)
{P2=(0XFF-0X01);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘1‘)
{P2=(0XFF-0X02);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘2‘)
{P2=(0XFF-0X04);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘3‘)
{P2=(0XFF-0X08);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘4‘)
{P2=(0XFF-0X10);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘5‘)
{P2=(0XFF-0X20);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘6‘)
{P2=(0XFF-0X40);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else?if(TC35_RE[69]==‘7‘)
{P2=(0XFF-0X80);P1=0XFF;TC35_CON=TC35RET;delay(100);AT_CMGD();}
else{TC35_CON=TC35RET;AT_CMGR();}
}
}
else?if(TC35_CON==CMGD){delay(100);
if((TC35_RE[12]==‘O‘)&&(TC35_RE[13]==‘K‘))
{P0=(0XFF-0X10);P1=0XFF;delay(100);AT_CSCA();}
else{P1=(0XFF-0X02);}
}
//填寫信息中心號
else?if(TC35_CON==CSCA){delay(100);
if((TC35_RE[25]==‘O‘)&&(TC35_RE[26]==‘K‘))
{P0=(0XFF-0X20);P1=0XFF;delay(100);AT_CMGS();}
else{P1=(0XFF-0X02);}
}
//填寫發送內容
else?if(TC35_CON==CMGS){delay(100);
if((TC35_RE[22]==0X3E)&&(TC35_RE[23]==0X20))
{P0=(0XFF-0X40);P1=0XFF;delay(100);ATNAME();}
else{P1=
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????213??2010-05-16?10:27??51-STC-TC35發送接收程序例程\HEAD_IO.H
?????文件???????2121??2010-05-16?10:06??51-STC-TC35發送接收程序例程\shuoming.txt
?????文件???????5115??2002-04-16?14:32??51-STC-TC35發送接收程序例程\STARTUP.A51
?????文件??????11673??2010-09-15?10:36??51-STC-TC35發送接收程序例程\STARTUP.LST
?????文件????????749??2010-09-15?10:36??51-STC-TC35發送接收程序例程\STARTUP.OBJ
?????文件????????653??2010-05-16?10:06??51-STC-TC35發送接收程序例程\TC35MOK.C
?????文件???????1598??2010-05-16?10:05??51-STC-TC35發送接收程序例程\TC35MOK.LST
?????文件???????2660??2010-05-16?10:05??51-STC-TC35發送接收程序例程\TC35MOK.OBJ
?????文件??????18936??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊
?????文件???????1757??2010-09-15?11:00??51-STC-TC35發送接收程序例程\TC35模塊-51-STC51.Opt
?????文件???????2089??2010-08-30?14:09??51-STC-TC35發送接收程序例程\TC35模塊-51-STC51.Uv2
?????文件???????1757??2010-09-15?10:44??51-STC-TC35發送接收程序例程\TC35模塊-51-STC51_Opt.Bak
?????文件???????2227??2010-08-08?00:13??51-STC-TC35發送接收程序例程\TC35模塊-51-STC51_Uv2.Bak
?????文件???????3379??2010-05-30?01:45??51-STC-TC35發送接收程序例程\TC35模塊.c
?????文件???????2738??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊.hex
?????文件?????????85??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊.lnp
?????文件???????6392??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊.LST
?????文件??????17517??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊.M51
?????文件???????9747??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊.OBJ
?????文件???????1794??2010-05-30?09:33??51-STC-TC35發送接收程序例程\TC35模塊.Opt
?????文件????????353??2010-09-15?11:00??51-STC-TC35發送接收程序例程\TC35模塊.plg
?????文件???????1794??2010-05-30?02:16??51-STC-TC35發送接收程序例程\TC35模塊_Opt.Bak
?????文件???????2091??2010-05-16?12:08??51-STC-TC35發送接收程序例程\TC35模塊_Uv2.Bak
?????文件???????3952??2010-05-30?09:44??51-STC-TC35發送接收程序例程\TC35模塊輔助.c
?????文件???????7552??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊輔助.LST
?????文件??????11294??2010-09-15?10:36??51-STC-TC35發送接收程序例程\TC35模塊輔助.OBJ
?????目錄??????????0??2011-03-11?20:36??51-STC-TC35發送接收程序例程\新建文件夾
?????目錄??????????0??2011-03-11?20:36??51-STC-TC35發送接收程序例程
-----------?---------??----------?-----??----
???????????????120236????????????????????28
............此處省略1個文件信息
- 上一篇:華為項目管理十大模板
- 下一篇:discuz微信登錄插件
評論
共有 條評論