/************************************************************
	
	程序說明：
	功能：
	通過檢測模塊（紅外+火焰+煤氣），實現GSM發中文信息，蜂鳴器報警，并且處理突發狀況

時間：2018年8月日
作者：畫中仙
	不足：
1、火焰檢測模塊。在太陽光下，會錯誤識別，產生低電平：可以通過調節滑動變阻器調節靈敏度
2、繼電器高電平開啟，蜂鳴器低電平開啟
3、發信息過程，不能處理其他事件
注意：蓄電池用久了，可能沒電


*************************************************************/
#include?
#include?
#include?
#define?uchar?unsigned?char
#define?uint?unsigned?int

bit?fame1111=1;???//情況處理標志位
bit?thief111=1;
bit?gas111=1;


sbit?gas=P1^0;??????//煤氣：
sbit?fame=P1^1;??????//??火焰
sbit?thief=P0^2;??????//紅外檢測：防盜


sbit?buzzer=P1^4;???????//蜂鳴器：低電平開啟

sbit??fan=P2^0;?????????//風扇?：高電平開啟

sbit??water=P2^5;???????//水泵：高電平開啟



//以下是開機后發送到手機的內容，發送的號碼在程序中修改。	
unsigned?int??REC_data=0;????//標記Buffer_Uart0接收數組
unsigned?char?idata?BufferUART_Rec[25]={0};		?//Uart0中斷接收數組

/*--------------------------------
*硬件上晶振要是12M的，11.092M不行！！！真的坑！！
這個是預編譯決定的
*
*/
#define?FOSC_12M

/*初始化程序（，次程序將會使用定時器1*/
void?SerialInti（）//初始化程序（必須使用，否則無法收發）
{
	TMOD=0x20;//定時器1操作模式2:8位自動重載定時器

#ifdef?FOSC_12M		???//在這里根據晶振大小設置不同的數值初始化串口
	TH1=0xf3;//裝入初值，波特率2400
	TL1=0xf3;	
#else?	
	TH1=0xfd;//裝入初值，波特率9600
	TL1=0xfd;
#endif?//end?of?SOC_12M
	
	TR1=1;//打開定時器
	SM0=0;//設置串行通訊工作模式，（10為一部發送，波特率可變，由定時器1的溢出率控制）
	SM1=1;//（同上）在此模式下，定時器溢出一次就發送一個位的數據
	REN=1;//串行接收允許位（要先設置sm0sm1再開串行允許）
	EA=1;//開總中斷
	ES=1;//開串行口中斷	
}


/*

確認數據發送完畢函數打電話函數中可以不使用

*/
void?Uart1Send（uchar?c）
{
	SBUF=c;
	while（!TI）;//等待發送完成信號（TI=1）出現
	TI=0;	
}


/*
串行口連續發送char型數組，遇到終止號/0將停止
*/
void?Uart1Sends（uchar?*str）
{
	while（*str!=‘\0‘）
	{
		SBUF=*str;
		while（!TI）;//等待發送完成信號（TI=1）出現
		TI=0;
		str++;
	}
}

/*100MS延時*/
void?delay（void）???//100MS延時
{
????unsigned?char?abc;
????for（c=151;c>0;c--）
????????for（b=24;b>0;b--）
????????????for（a=164;a>0;a--）;
}


/*延時1S函數*/
void?DelaySec（int?sec）???//1S延時
{
	//12M?晶振，1S誤差?0.14%。10S誤差0.15%
????unsigned?char?abci;
	for（i=0;?i?????for（c=71;c>0;c--）
????????for（b=168;b>0;b--）
????????????for（a=250;a>0;a--）;
????
}
/*發信息驅動函數*/
void?sendtestqudong（）
{
???
????Uart1Sends（“AT+CSCS=\“UCS2\“\r\n“）;
????DelaySec（2）;//延時大約2秒
????Uart1Sends（“AT+CMGF=1\r\n“）;
????DelaySec（2）;//延時2秒
	??Uart1Sends（“AT+CSCA?\r\n“）;
????DelaySec（2）;//延時2秒
	??Uart1Sends（“AT+CSMP=17167025\r\n“）;
????DelaySec（2）;//延時2秒
	?
????Uart1Sends（“AT+CMGS=\“xxxxxxxxxxxxxx\“\r\n“）;//此處修改為對方的電話號，電話話的UNICON編碼，可使用我們配套的
																				//資料包中的?中文轉UNICON編碼工具來獲取。特別注意：那個軟件
																				//獲得的unicon?編碼待有空格，實際中要去掉，否則模塊會報錯
????DelaySec（3）;//延時3秒
		
}

/*
*火災檢測GSM報警函數
*/
	void	GSMfire（）
	{
	if（fame1111==0）
	{
		fame1111=1;
		sendtestqudong（）;
	if（fame==0）
	{
		Uart1Sends（“4EB2723176844E3B4EBAFF0C4F605BB67740706B5566FF01FF01FF01“）;????//著火
		Uart1Send（0x1a）;
		DelaySec（3）;//延時3秒
	}
??else
	{
		Uart1Sends（“4EB2723176844E3B4EBAFF0C4F605BB6521A521A68C06D4B5230660E706BFF0C4F465DF25E2E4F606251706DFF0C8BF7653E5F

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2018-08-24?07:22??GSM報警程序\
?????目錄???????????0??2018-08-24?07:21??GSM報警程序\Listings\
?????文件???????15150??2018-08-24?07:21??GSM報警程序\Listings\GSM報警.m51
?????文件???????14350??2018-08-24?07:21??GSM報警程序\Listings\main.lst
?????文件???????15222??2018-08-15?21:17??GSM報警程序\Listings\決賽啦.m51
?????目錄???????????0??2018-08-24?07:21??GSM報警程序\objects\
?????文件???????11726??2018-08-24?07:21??GSM報警程序\objects\GSM報警
?????文件?????????975??2018-08-24?07:21??GSM報警程序\objects\GSM報警.build_log.htm
?????文件????????3406??2018-08-24?07:21??GSM報警程序\objects\GSM報警.hex
?????文件??????????95??2018-08-24?07:21??GSM報警程序\objects\GSM報警.lnp
?????文件???????13170??2018-08-24?07:21??GSM報警程序\objects\main.obj
?????文件???????11883??2018-08-15?21:17??GSM報警程序\objects\決賽啦
?????文件?????????990??2018-08-15?21:17??GSM報警程序\objects\決賽啦.build_log.htm
?????文件??????????93??2018-08-15?21:17??GSM報警程序\objects\決賽啦.lnp
?????文件?????????857??2018-08-17?20:57??GSM報警程序\ReadMe.txt
?????文件????????6324??2018-08-24?07:21??GSM報警程序\main.c
?????文件???????71663??2018-08-24?07:22??GSM報警程序\決賽啦.uvgui.Administrator
?????文件????????5172??2018-08-17?15:31??GSM報警程序\決賽啦.uvopt
?????文件???????14104??2018-08-17?15:31??GSM報警程序\決賽啦.uvproj
?????目錄???????????0??2018-08-19?21:51??GSM報警程序\字庫軟件\
?????文件??????398848??2011-03-22?21:28??GSM報警程序\字庫軟件\Chiness_Unicode-中文轉UNICON編碼工具.exe