久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: STC89c51與GSM-TC35i連接發(fā)送短信（已驗證成功） [打印本頁]

作者: ycy54321 時間: 2017-4-19 18:06
標題: STC89c51與GSM-TC35i連接發(fā)送短信（已驗證成功）
/************************************************************
程序說明：
本程序運行后如果gprs模塊找到服務(wù)商信號，就撥打指定電話。
1.將自己的51單片機的串口1連接到GSM 232上
2.找到程序中前面的#define處，根據(jù)說明修改好自己的單片機配置，編譯程序
2.下載程序
3.等待發(fā)送成功

*************************************************************/
#include <REG51.H>

#define uchar unsigned char
#define uint unsigned int
//以下是板子上LED的配置，把Px_x改成自己對應(yīng)的腳。
//以下是你的51單片機的晶振大小
#define FOSC_110592M
//#define FOSC_12M

//以下是開機后發(fā)送到手機的內(nèi)容，發(fā)送的號碼在程序中修改。
uchar sms_text[] = "abc123";

//注意，無論接收到信號還是發(fā)送完信號，都會進中斷服務(wù)程序的
/*初始化程序（必須使用，否則無法收發(fā)），次程序?qū)褂枚〞r器1*/
void SerialInti()//初始化程序（必須使用，否則無法收發(fā)）
{
TMOD=0x20;//定時器1操作模式2:8位自動重載定時器

#ifdef FOSC_12M       //在這里根據(jù)晶振大小設(shè)置不同的數(shù)值初始化串口
TH1=0xf3;//裝入初值，波特率2400
TL1=0xf3;
#else
TH1=0xfd;//裝入初值，波特率9600
TL1=0xfd;
#endif //end of SOC_12M

TR1=1;//打開定時器
SM0=0;//設(shè)置串行通訊工作模式，（10為一部發(fā)送，波特率可變，由定時器1的溢出率控制）
SM1=1;//(同上)在此模式下，定時器溢出一次就發(fā)送一個位的數(shù)據(jù)
REN=1;//串行接收允許位（要先設(shè)置sm0sm1再開串行允許）
EA=1;//開總中斷
ES=1;//開串行口中斷
}

/*串行通訊中斷，收發(fā)完成將進入該中斷*/
void Serial_interrupt() interrupt 4
{
//  a=SBUF;
P2=SBUF;
RI=0;//接收中斷信號清零，表示將繼續(xù)接收
//  flag=1;//進入中斷的標志符號
}

void Uart1Send(uchar c)
{
SBUF=c;
while(!TI);//等待發(fā)送完成信號（TI=1）出現(xiàn)
TI=0;
}

//串行口連續(xù)發(fā)送char型數(shù)組，遇到終止號/0將停止
void Uart1Sends(uchar *str)
{
while(*str!='\0')
{
      SBUF=*str;
      while(!TI);//等待發(fā)送完成信號（TI=1）出現(xiàn)
      TI=0;
      str++;
}
}

//延時函數(shù)大概是1s鐘，不過延時大的話不準...
void DelaySec(int sec)
{
uint i , j= 0;

for(i=0; i<sec; i++)
{
      for(j=0; j<65535; j++)
      {
      }
}
}

void main()
{
uchar i = 0;
SerialInti();
while(1)
{

      Uart1Sends("AT+CSCS=\"GSM\"\r\n");
      DelaySec(3);//延時3秒
      Uart1Sends("AT+CMGF=1\r\n");
      DelaySec(3);//延時3秒
      Uart1Sends("AT+CMGS=\"13878963728\"\r\n");//此處修改為對方的電話號
      DelaySec(5);//延時3秒
      Uart1Sends(sms_text);//修改短信內(nèi)容
      Uart1Send(0x1a);
      DelaySec(15);//延時20秒
}

}

作者: zqy181818 時間: 2017-4-20 15:23
資料不錯！樓主能分享原理圖嗎

作者: Demoxia 時間: 2020-4-2 11:28
這個程序下載好就自動發(fā)送短信嗎？沒有觸發(fā)條件？

歡迎光臨 (http://m.zg4o1577.cn/bbs/)