91av视频/亚洲h视频/操亚洲美女/外国一级黄色毛片 - 国产三级三级三级三级

  • 大小: 37KB
    文件類型: .rar
    金幣: 2
    下載: 0 次
    發布日期: 2021-06-12
  • 語言: 其他
  • 標簽:

資源簡介

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個文件信息

評論

共有 條評論

相關資源