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