#include <reg52.h>
#define uchar unsigned char //無符號字符型 宏定義 變量范圍0~255
#define uint unsigned int //無符號整型 宏定義 變量范圍0~65535
#include <intrins.h>
#include "eepom52.h"
sbit SCL = P1 ^ 4; //SCL定義,連接ADC0832SCL腳
sbit DO = P1 ^ 3; //DO定義,連接ADC0832DO腳
sbit CS = P1 ^ 5; //CS定義,連接ADC0832CS腳
sbit beep = P3 ^ 3;
sbit kjia = P3 ^ 0;
sbit kjian = P3 ^ 1;
sbit yyxp_busy = P2 ^ 2;
sbit yyxp_data = P2 ^ 1;
sbit yyxp_rest = P2 ^ 0;
//這三個引腳參考資料
sbit rs = P1 ^ 0; //1602數據/命令選擇引腳 H:數據 L:命令
sbit rw = P1 ^ 1; //1602讀寫引腳 H:數據寄存器 L:指令寄存器
sbit e = P1 ^ 2; //1602使能引腳 下降沿觸發
sbit c_send = P1 ^ 6; //超聲波發射
sbit c_recive = P1 ^ 7; //超聲波接收
uchar flag_hc_value; //超聲波中間變量
long distance; //距離
uint set_d; //距離
bit flag_csb_juli; //超聲波超出量程
uint flag_time0; //用來保存定時器0的時候的
bit flag_300ms = 1;
uchar guangxian; //光線的顯示變量
uchar set_gx; //設置光線的強弱的變量
uchar value;
uchar flag_alarm; //報警變量
static int miao = 0, fen = 45; //學習時間
static int szfen = 45;
uchar xuexi_start; //開始學習標志位
uchar menu_1; //狀態機
uchar count;
void yydalay(uint x) //簡單延時
{
uint t;
while (x--)
{
for (t = 0; t < 13; t++)
;
}
}
void speak(uint z)
{
yyxp_rest = 1; // reset
yydalay(2);
yyxp_rest = 0;
yydalay(2);
while (z > 0) // 播放某一段 發出z個脈沖
{
yyxp_data = 1;
yydalay(1);
yyxp_data = 0;
yydalay(1);
z--;
}
}
/******************把設置溫度數據保存到單片機內部eepom中******************/
void write_eepom_12()
{
SectorErase(0x2000);
byte_write(0x2000, set_d % 256);
byte_write(0x2001, set_d / 256);
byte_write(0x2002, set_gx);
byte_write(0x2057, value);
}
/******************把數據從單片機內部eepom中讀出來*****************/
void read_eepom12()
{
set_d = byte_read(0x2001);
set_d = set_d * 256 + byte_read(0x2000);
set_gx = byte_read(0x2002);
value = byte_read(0x2057);
}
/**************開機自檢eepom初始化*****************/
void init_eepom()
{
read_eepom12(); //先讀
if (value != 2) //新的單片機初始單片機內問EEPOM
{
set_d = 15;
value = 2;
set_gx = 4;
write_eepom_12();
}
}
/********************************************************************
* 名稱 : delay()
* 功能 : 延時,延時時間大概為5US。
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void delay_uint(uint q)
{
while (q--)
;
}
/********************************************************************
* 名稱 : bit Busy(void)
* 功能 : 這個是一個讀狀態函數,讀出函數是否處在忙狀態
* 輸入 : 輸入的命令值
* 輸出 : 無
***********************************************************************/
bit busy(void)
{
bit busy_flag = 0;
rs = 0;
rw = 1;
e = 1;
delay_uint(3);
busy_flag = (bit)(P0 & 0x80);
e = 0;
return busy_flag;
}
/********************************************************************
* 名稱 : write_com(uchar com)
* 功能 : 1602命令函數
* 輸入 : 輸入的命令值
* 輸出 : 無
***********************************************************************/
void write_com(uchar com)
{
while (busy())
;
e = 0;
rs = 0;
rw = 0;
P0 = com;
delay_uint(3);
e = 1;
delay_uint(25);
e = 0;
}
/********************************************************************
* 名稱 : write_data(uchar dat)
* 功能 : 1602寫數據函數
* 輸入 : 需要寫入1602的數據
* 輸出 : 無
***********************************************************************/
void write_data(uchar dat)
{
while (busy())
;
e = 0;
rs = 1;
rw = 0;
P0 = dat;
delay_uint(3);
e = 1;
delay_uint(25);
e = 0;
}
/***********************lcd1602上顯示兩位十進制數************************/
void write_sfm2(uchar hang, uchar add, uchar date)
{
if (hang == 1)
write_com(0x80 + add);
else
write_com(0x80 + 0x40 + add);
write_data(0x30 + date / 10 % 10);
write_data(0x30 + date % 10);
}
/***********************lcd1602上顯示超聲波距離************************/
void write_sfm_csb(uchar hang, uchar add, uint date)
{
if (hang == 1)
write_com(0x80 + add);
else
write_com(0x80 + 0x40 + add);
write_data(0x30 + date / 100 % 10);
write_data('.');
write_data(0x30 + date / 10 % 10);
write_data(0x30 + date % 10);
}
/********************************************************************
* 名稱 : init_1602()
* 功能 : 1602初始化,請參考1602的資料
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void init_1602()
{
write_com(0x38); //設置16*2顯示,5*7點陣,8位數據接口
write_com(0x0c); //開顯示,不顯示光標
write_com(0x06); //地址加1,當寫入數據的時候光標右移
}
/********************************************************************
* 名稱 : write_string(uchar hang,uchar lie,uchar *p)
* 功能 : 改變液晶中某位的值,如果要讓第一行,第五個字符開始顯示"ab cd ef" ,調用該函數如下
write_string(1,5,"ab cd ef;")
* 輸入 : 行,列,需要輸入1602的數據
* 輸出 : 無
***********************************************************************/
void write_string(uchar hang, uchar add, uchar *p)
{
if (hang == 1)
write_com(0x80 + add);
else
write_com(0x80 + 0x40 + add);
while (1)
{
if (*p == '\0')
break;
write_data(*p);
p++;
}
}
uchar key_can;
/********************獨立按鍵程序*****************/
void key()
{
static uchar key_new;
key_can = 20;
if ((P3 & 0xf0) != 0xf0) // 判斷四個鍵
{
delay_uint(50);
if (((P3 & 0xf0) != 0xf0) && (key_new == 1))
{
key_new = 0;
switch (P3 & 0xf0)
{
case 0xe0:
key_can = 1;
break; //左邊第1個
case 0xd0:
key_can = 2;
break; //左邊第2個
case 0xb0:
key_can = 3;
break; //左邊第3個
case 0x70:
key_can = 4;
break; //左邊第4個
}
// write_sfm2(2,0,key_can);
}
}
else
key_new = 1;
}
/***********讀數模轉換數據********************************************************/
//請先了解ADC0832模數轉換的串行協議,再來讀本函數,主要是對應時序圖來理解,本函數是模擬0832的串行協議進行的
// 1 0 0 通道
// 1 1 1 通道
unsigned char ad0832read(bit SGL, bit ODD)
{
unsigned char i = 0, value = 0, value1 = 0;
SCL = 0;
DO = 1;
CS = 0; //開始
SCL = 1; //第一個上升沿
SCL = 0;
DO = SGL;
SCL = 1; //第二個上升沿
SCL = 0;
DO = ODD;
SCL = 1; //第三個上升沿
SCL = 0; //第三個下降沿
DO = 1;
for (i = 0; i < 8; i++)
{
SCL = 1;
SCL = 0; //開始從第四個下降沿接收數據
value <<= 1;
if (DO)
value++;
}
for (i = 0; i < 8; i++)
{ //接收校驗數據
value1 >>= 1;
if (DO)
value1 += 0x80;
SCL = 1;
SCL = 0;
}
CS = 1;
SCL = 1;
if (value == value1) //與校驗數據比較,正確就返回數據,否則返回0
return value;
return 0;
}
/*********************小延時函數*****************************/
void delay()
{
_nop_(); //執行一條_nop_()指令就是1us
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
}
/*********************超聲波測距程序*****************************/
void send_wave()
{
c_send = 1; //10us的高電平觸發
delay();
c_send = 0;
TH0 = 0; //給定時器0清零
TL0 = 0;
TR0 = 0; //關定時器0定時
flag_hc_value = 0;
while (!c_recive)
; //當c_recive為零時等待
TR0 = 1; //打開計時
while (c_recive) //當c_recive為1計數并等待
{
flag_time0 = TH0 * 256 + TL0;
if ((flag_hc_value > 1) || (flag_time0 > 65000)) //當超聲波超過測量范圍時,顯示3個888
{
TR0 = 0;
flag_csb_juli = 2;
distance = 888;
flag_hc_value = 0;
return;
}
else
{
flag_csb_juli = 1;
}
}
if (flag_csb_juli == 1)
{
TR0 = 0; //關定時器0定時
distance = TH0;
distance = distance * 256 + TL0; //讀出定時器0的時間
distance += (flag_hc_value * 65536); //算出超聲波測距的時間 得到單位是ms
distance *= 0.017; // 0.017 = 340M / 2 = 170M = 0.017M 算出來是米
if (distance > 350) //距離 = 速度 * 時間
{
distance = 888; //如果大于3.5m就超出超聲波的量程
}
}
}
/*********************定時器0、定時器1初始化******************/
void time_init()
{
EA = 1; //開總中斷
TMOD = 0X11; //定時器0、定時器1工作方式1
ET0 = 1; //開定時器0中斷
TR0 = 1; //允許定時器0定時
ET1 = 1; //開定時器1中斷
TR1 = 1; //允許定時器1定時
}
/*******************按鍵執行函數******************/
void key_with()
{
if (menu_1 == 0) // 正常狀態 顯示時間 超聲波 光線
{
if (key_can == 1)
{
xuexi_start = 1; //開始學習
fen = szfen;
miao = 0;
}
if (key_can == 2)
{
xuexi_start = 0; //暫停學習
beep = 1;
}
if (key_can == 3)
{
xuexi_start = 1; //繼續學習
}
}
if (key_can == 4) // 進入設置模式
{
menu_1++; // 設置狀態
if (menu_1 == 1) // 顯示菜單 設置超聲波
{
write_string(1, 0, "1.xsb: m ");
write_string(2, 0, "2.gm: % ");
write_sfm_csb(1, 6, set_d);
write_sfm2(2, 5, set_gx); //設置光線的參數
write_com(0x80 + 0); //將光標移動到秒個位
write_com(0x0f); //顯示光標并且閃爍
}
if (menu_1 == 2) // 光照設置
{
write_com(0x80 + 0x40 + 0); //將光標移動到秒個位
write_com(0x0f); //顯示光標并且閃爍
}
if (menu_1 >= 3)
{
menu_1 = 0;
write_string(1, 0, "csb: m gm: %");
write_string(2, 0, " Time : ");
write_com(0x0c); //關閉顯示
}
}
if (menu_1 == 1) //設置超聲波參數
{
if (key_can == 3) // 加距離
{
set_d++; //加超聲波距離報警數據
write_sfm_csb(1, 6, set_d);
if (set_d >= 100)
set_d = 100;
write_com(0x80); //將光標移動到秒個位
write_com(0x0f); //顯示光標并且閃爍
}
if (key_can == 2) // 減距離
{
set_d--; //減超聲波距離報警數據
if (set_d <= 10)
set_d = 10;
write_sfm_csb(1, 6, set_d);
write_com(0x80); //將光標移動到秒個位
write_com(0x0f); //顯示光標并且閃爍
}
write_eepom_12(); //保存數據
}
if (menu_1 == 2)
{
if (key_can == 3) // 設置光線 加
{
set_gx++; //加超聲波距離報警數據
write_sfm2(2, 5, set_gx);
if (set_gx >= 100)
set_gx = 100;
write_com(0x80 + 0x40); //將光標移動到秒個位
write_com(0x0f); //顯示光標并且閃爍
}
if (key_can == 2) //設置光線 減
{
set_gx--; //減超聲波距離報警數據
if (set_gx <= 1)
set_gx = 1;
write_sfm2(2, 5, set_gx);
write_com(0x80 + 0x40); //將光標移動到秒個位
write_com(0x0f); //顯示光標并且閃爍
}
write_eepom_12(); //保存數據
}
key_can = 20;
}
/*********************報警函數***************************/
void clock_beep()
{
static uchar value1, value2, value3;
// static uint time_value;
if (xuexi_start == 1) //在學習狀態
{
if (set_gx >= guangxian) //距離光線報警
{
value2++;
if (value2 >= 2) //循環2次都是報警 增強抗干擾
{
flag_alarm = 2;
if (count == 2)
{
speak(28);
while (yyxp_busy)
;
speak(27);
while (yyxp_busy)
;
}
}
}
else
value2 = 0;
if (distance <= set_d) //距離報警
{
value1++;
if (value1 >= 2) //循環2次都是報警 增強抗干擾
{
flag_alarm = 1;
if (count == 2)
{
speak(29);
while (yyxp_busy)
;
speak(27);
while (yyxp_busy)
;
}
}
}
else
value1 = 0;
if ((miao == 0) && (fen == 0)) //時間報警
{
xuexi_start = 0; //休息時間到了,停止學習
flag_alarm = 3;
}
}
if (flag_alarm != 0)
{
value3++;
beep = ~beep; //報警
if (value3 > 6)
{
value3 = 0;
beep = 1; //取消報警
flag_alarm = 0;
}
}
}
/********************************************************************
* 名稱 : Main()
* 功能 : 主函數
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void Main()
{
init_1602(); //液晶初始化
time_init(); //定時器初始化
init_eepom(); //EEPROM初始化
// beep = 0;
write_string(1, 0, "csb: m gm: %");
write_string(2, 0, " Time : ");
while (1)
{
count++;
if (count > 5)
count = 0;
if (kjia == 0) // 時間按鍵 +
{
delay_uint(20);
if (kjia == 0) // 消抖
{
if (xuexi_start == 0)
szfen++;
if (szfen >= 99)
szfen = 99;
fen++;
if (fen >= 99)
fen = 99;
while (!kjia) //等待釋放
;
}
}
if (kjian == 0) // 時間按鍵 -
{
delay_uint(20);
if (kjian == 0)
{
if (xuexi_start == 0)
szfen--;
if (szfen <= 1)
szfen = 1;
fen--;
if (fen <= 1)
fen = 1;
while (!kjian)
;
}
}
key(); //按鍵識別函數
if (key_can < 10)
key_with(); //按鍵處理函數
if (flag_300ms == 1)
{
flag_300ms = 0;
clock_beep(); //報警函數
if (menu_1 == 0) // 正常顯示狀態
{
send_wave(); //超聲波測距離
write_sfm_csb(1, 4, distance);
guangxian = ad0832read(1, 0); //采集光線
guangxian = guangxian * 100 / 255;
write_sfm2(1, 13, guangxian); //值越大光線就越強
// write_sfm2(2,3,shi); //顯示時鐘
write_sfm2(2, 8, fen); //顯示分鐘
write_sfm2(2, 11, miao); //值越秒鐘
}
}
}
}
/*********************定時器0中斷服務程序 用做超聲波測距的************************/
void time0_int() interrupt 1
{
flag_hc_value++; // TH0 TL0 到65536后溢出中斷
}
/*********************定時器1中斷服務程序************************/
void time1_int() interrupt 3
{
static uint value; //定時50ms中斷一次
TH1 = 0x3c;
TL1 = 0xb0; //50ms
value++;
if (value % 6 == 0)
{
flag_300ms = 1;
}
if (value >= 20)
{
value = 0;
if (xuexi_start == 1)
{
miao--; //加1秒鐘
if (miao <= -1) // 秒 0
{
miao = 59;
fen--; //加1分鐘
if (fen < -1)
{
fen = 0;
}
}
}
}
}
|