【導(dǎo)讀】而且國家建設(shè)部規(guī)定，目前住宅小區(qū)應(yīng)實現(xiàn)六項智能化要求，其?，F(xiàn)智能化勢在必行。本系統(tǒng)主要針對傳統(tǒng)煤氣，液化氣的泄漏進行檢測，報警。采用增強型51單片。為智能家居安全防護系統(tǒng)中的一部分。

　　

【正文】 0 時， LCD_DATA 為指令， N=1 時， LCD_DATA 為數(shù)據(jù) ** 輸 出 ： 無 ** 說 明 ： ************************************************/ void WriteCOMDATA(uchar LCD_DATA,uchar N) { DelayMs(1)。 E=1。 RW=0。 RS=N。 LCD_PINDATA=LCD_DATA。 E=0。 } /************************************************ ** 函數(shù)名稱 ： void LCD_init(void) ** 函數(shù)功能 ： LCD1602 初始化操作 ** 輸 入 ： 無 ** 輸 出 ： 無 ** 說 明 ： ************************************************/ void LCD_Init(void) { WriteCOMDATA(0x01,0)。 DelayMs(10)。 附 錄 27 WriteCOMDATA(0x38,0)。 DelayMs(2)。 WriteCOMDATA(0x06,0)。 DelayMs(2)。 WriteCOMDATA(0x0c,0)。 DelayMs(2)。 } /************************************************ ** 函數(shù)名稱 ： void WriteChar(uchar Row,uchar Col,uchar Num,uchar *pBuffer) ** 函數(shù)功能 ：在任意位置寫指定個字符 ** 輸 入 ： Row : 要寫的字符所在的行，只能為 1 或 2； Col : 要寫的字符所在的列，只能為 015 Num : 要寫字符的個數(shù) pbuffer : 要寫字符的首地址 ** 輸 出 ：無 ** 說 明 ： ************************************************/ void WriteChar(uchar Row,uchar Col,uchar Num,uchar *pBuffer) { uchar i。 if(Row==1)Row=0x80+Col。 else Row=0xC0+Col。 WriteCOMDATA(Row,0)。 for(i=Num。i!=0。i) { WriteCOMDATA(*pBuffer,1)。 pBuffer++。 } } endif //功能：檢測環(huán)境可害氣體，進行報警，顯示到液晶上，按鍵可設(shè)置報警值 include //添加 LCD1602 頭文件 include include//添加 ADC0832 頭文件 include sbit BUZZER = P1^3。 //蜂鳴器驅(qū)動端口 sbit Reduc = P1^7。 //按鍵減輸入端口 sbit Add = P3^2。 //按鍵加輸入端口 idata char MessageStr[22]。 /************************************************ ** 函數(shù)名稱 ： void main(void) ** 函數(shù)功能 ： 主函數(shù) 附 錄 28 ** 輸 入 ： 無 ** 輸 出 ： 無 ** 說 明 ： ************************************************/ void main(void) { bit GMS_flag=0。 uchar count,flag=0。//報警計數(shù)、報警標志位 uint adc_val=0。 //有害氣體的變量 uchar baojing_val=30。//有害氣體報警變量 uchar disp[16]={Gas: GasH: }。//顯示數(shù)組 LCD_Init()。//lcd1602 初始化 InitGSM()。 WriteChar(1,0,16,Smoke Gas System)。 //在第一行顯示 ‘內(nèi)容 ’ baojing_val=byte_read(0x2020)。//開機讀取上次設(shè)置過報警值 while(1) { WriteChar(2,0,16,disp)。 //在第二行顯示 ‘內(nèi)容 ’ WriteChar(1,0,16,Smoke Gas System)。 adc_val=adc0832(1)*100/255。 if(adc_val99)adc_val=99。 disp[4]=adc_val/10+0x30。//十位 disp[5]=adc_val%10+0x30。 //個位 disp[14]=baojing_val/10+0x30。 //十位 disp[15]=baojing_val%10+0x30。 //個位 //判斷按鍵減是否按下 if(Reduc==0) { DelayMs(80)。//延時 防抖 //while(Reduc==0)。 baojing_val。 SectorErase(0x2020)。 byte_write(0x2020,baojing_val)。//保存到單片機內(nèi)部 if(baojing_val=0)baojing_val=0。 } //判斷按鍵加是否按下 if(Add==0) { DelayMs(80)。 //延時 防抖 //while(Add==0)。 baojing_val++。 SectorErase(0x2020)。 byte_write(0x2020,baojing_val)。//保存到單片機內(nèi)部 附 錄 29 if(baojing_val=99)baojing_val=99。 } //判斷是否進行報警 if(adc_valbaojing_val) { flag=1。 //降報警標志位置 1 } if(flag amp。amp。 !GMS_flag) { GMS_flag=1。 sprintf(MessageStr,Dangerous!!!)。 GsmSendMessage(MessageStr)。 //短信發(fā)送的內(nèi)容 MessageStr count=10。 LCD_Init()。 WriteChar(2,0,16, Dangerous!!! )。 while(count) { BUZZER=0。DelayMs(100)。 BUZZER=1。DelayMs(100)。 BUZZER=0。DelayMs(250)。 BUZZER=1。DelayMs(100)。 } } //報警函數(shù) if(flag) { //RELAY=0。 count++。if(count140)count=49+1。 if(count%7==0) { BUZZER=~BUZZER。//蜂鳴器去取反進行報 警 } //判斷是否取消報警 if(count40 amp。amp。 adc_valbaojing_val) { flag=0。 count=0。 //RELAY=1。 BUZZER=1。//取消報警 } } } } C51 COMPILER MAIN 附 錄 30 04/23/2020 12:08:06 PAGE 1 C51 COMPILER , COMPILATION OF MODULE MAIN OBJECT MODULE PLACED IN COMPILER INVOKED BY: D:\Program Files\Keil\C51\BIN\ BROWSE DEBUG OBJECTEXTEND line level source 1 //功能：檢測環(huán)境可害氣體，進行報警，顯示到液晶上，按鍵可設(shè)置報警值 2 include //添加 LCD1602 頭文件 3 include 4 include//添加 ADC0832 頭文件 5 include 6 7 8 sbit BUZZER = P1^3。 //蜂鳴器驅(qū)動端口 9 sbit Reduc = P1^7。 //按鍵減輸入端口 10 sbit Add = P3^2。 //按鍵加輸入端口 11 idata char MessageStr[22]。 12 /************************************************ 13 ** 函數(shù)名稱 ： void main(void) 14 ** 函數(shù)功能 ： 主函數(shù) 15 ** 輸 入 ： 無 16 ** 輸 出 ： 無 17 ** 說 明 ： 18 ************************************************/ 19 void main(void) 20 { 21 1 bit GMS_flag=0。 22 1 uchar count,flag=0。//報警計數(shù)、報警標志位 23 1 uint adc_val=0。 //有害氣體的變量 24 1 uchar baojing_val=30。//有害氣體報警變量 25 1 uchar disp[16]={Gas: GasH: }。//顯示數(shù)組 26 1 LCD_Init()。//lcd1602 初始化 27 1 InitGSM()。 28 1 29 1 WriteChar(1,0,16,Smoke Gas System)。 //在第一行顯示 ‘內(nèi)容 ’ 30 1 baojing_val=byte_read(0x2020)。//開機讀取上次設(shè)置過報警值 31 1 while(1) 32 1 { 33 2 WriteChar(2,0,16,disp)。 //在第二行顯示 ‘內(nèi)容 ’ 34 2 WriteChar(1,0,16,Smoke Gas System)。 附 錄 31 35 2 adc_val=adc0832(1)*100/255。 36 2 if(adc_val99)adc_val=99。 37 2 disp[4]=adc_val/10+0x30。//十位 38 2 disp[5]=adc_val%10+0x30。 //個位 39 2 disp[14]=baojing_val/10+0x30。 //十位 40 2 disp[1