|
#include <reg52.h> //調(diào)用單片機(jī)頭文件
#define uchar unsigned char //無符號字符型 宏定義 變量范圍0~255
#define uint unsigned int //無符號整型 宏定義 變量范圍0~65535
#include "eeprom52.h"
sbit clk = P1^3; //ds1302時(shí)鐘線定義
sbit io = P1^4; //數(shù)據(jù)線
sbit rst = P1^5; //復(fù)位線
//秒 分 時(shí) 日 月 年 星期
uchar code write_add[]={0x80,0x82,0x84,0x86,0x88,0x8c,0x8a}; //寫地址
uchar code read_add[] ={0x81,0x83,0x85,0x87,0x89,0x8d,0x8b}; //讀地址
uchar code init_ds[] ={0x55,0x17,0x15,0x01,0x01,0x13,0x13};
uchar miao,fen,shi,ri,yue,week,nian;
uchar i;
uchar t1_num,t2_num; //計(jì)時(shí)間中斷的次數(shù)
unsigned long speed1,juli,time2;
float f_hz ,speed_km,speed_m;
uchar TH11,TL11;
uchar flag_en; //開始計(jì)算速度使能
uint juli_s; //每秒走的距離
uint juli_z; //總路程
float zhijing = 0.55; //直徑 0.55M
uint s_zhijing = 55;
bit flag_1s = 1; //1s
uchar menu_1; //菜單設(shè)置變量
uchar menu_2; //菜單設(shè)置變量
long zong_lc; //總量程
uchar flag_200ms;
uint shudu; //定義速度的變量
uint bj_shudu = 35; //報(bào)警速度
uchar f_pwm_l = 20; // //f_pwm_l
sbit pwm = P2^0;
//這三個(gè)引腳參考資料
sbit rs=P1^0; //寄存器選擇信號 H:數(shù)據(jù)寄存器 L:指令寄存器
sbit rw=P1^1; //寄存器選擇信號 H:數(shù)據(jù)寄存器 L:指令寄存器
sbit e =P1^2; //片選信號 下降沿觸發(fā)
uchar code table_num[]="0123456789abcdefg";
uchar i;
sbit beep = P3^7; //蜂鳴器IO口定義
/******************1ms 延時(shí)函數(shù)*******************/
void delay_1ms(uint q)
{
uint i,j;
for(i=0;i<q;i++)
for(j=0;j<120;j++);
}
/******************把數(shù)據(jù)保存到單片機(jī)內(nèi)部eepom中******************/
void write_eeprom()
{
SectorErase(0x2000);
byte_write(0x2000, bj_shudu % 256);
byte_write(0x2001, bj_shudu / 256);
byte_write(0x2002, zong_lc % 256);
byte_write(0x2003, zong_lc / 256 % 256);
byte_write(0x2004, zong_lc / 256 / 256 % 256);
byte_write(0x2055, a_a);
}
/******************把數(shù)據(jù)從單片機(jī)內(nèi)部eepom中讀出來*****************/
void read_eeprom()
{
uint value;
bj_shudu = byte_read(0x2001);
bj_shudu <<= 8;
bj_shudu |= byte_read(0x2000);
zong_lc = byte_read(0x2004);
zong_lc <<= 16;
value = byte_read(0x2003);
zong_lc |= (value << 8);
zong_lc |= byte_read(0x2002);
a_a = byte_read(0x2055);
}
/**************開機(jī)初始化保存的數(shù)據(jù)*****************/
void init_eeprom() //開機(jī)初始化保存的數(shù)據(jù)*
{
read_eeprom(); //先讀
if(a_a != 12) //新的單片機(jī)初始單片機(jī)內(nèi)問eeprom
{
bj_shudu = 50;
a_a = 12;
write_eeprom(); //保存數(shù)據(jù)
}
}
/********************************************************************
* 名稱 : delay_uint()
* 功能 : 小延時(shí)。
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void delay_uint(uint q)
{
while(q--);
}
/********************************************************************
* 名稱 : write_com(uchar com)
* 功能 : 1602命令函數(shù)
* 輸入 : 輸入的命令值
* 輸出 : 無
***********************************************************************/
void write_com(uchar com)
{
i =0;
e=0;
rs=0;
rw=0;
P0=com;
delay_uint(25);
e=1;
delay_uint(50);
e=0;
}
/********************************************************************
* 名稱 : write_data(uchar dat)
* 功能 : 1602寫數(shù)據(jù)函數(shù)
* 輸入 : 需要寫入1602的數(shù)據(jù)
* 輸出 : 無
***********************************************************************/
void write_data(uchar dat)
{
i =0;
e=0;
rs=1;
rw=0;
P0=dat;
delay_uint(25);
e=1;
delay_uint(50);
e=0;
}
/*****************第一頁速度值顯示********************/
void write_sfm2(uchar hang,uchar add,uint 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);
}
/*****************第一頁距離值顯示****************/
void write_sfm4(uchar hang,uchar add,uint date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
write_data(0x30+date/10000%10);
write_data(0x30+date/1000%10);
write_data('.');
write_data(0x30+date/100%10);
write_data(0x30+date/10%10);
write_data(0x30+date%10);
write_data('k');
write_data('m');
}
/*****************第三頁距離值顯示***************/
void write_sfm7(uchar hang,uchar add,uint date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
write_data(0x30+date/100000%10);
write_data(0x30+date/100000%10);
write_data(0x30+date/10000%10);
write_data(0x30+date/1000%10);
write_data('.');
write_data(0x30+date/100%10);
write_data(0x30+date/10%10);
write_data('k');
write_data('m');
}
/*****************lcd1602上固定顯示兩位十進(jìn)制數(shù)************************/
void write_sfm1(uchar hang,uchar add,uchar date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
write_data(0x30+date % 10);
}
/********************************************************************
* 名稱 : write_string(uchar hang,uchar add,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++;
}
}
/***********************lcd1602上顯示兩位十進(jìn)制數(shù)************************/
void write_sfm2_ds1302(uchar hang,uchar add,uchar date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
write_data(table_num[date / 16]);
write_data(table_num[date % 16]);
}
/*****************控制光標(biāo)函數(shù)********************/
void write_guanbiao(uchar hang,uchar add,uchar date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
if(date == 1)
write_com(0x0f); //顯示光標(biāo)并且閃爍
else
write_com(0x0c); //關(guān)閉光標(biāo)
}
/********************************************************************
* 名稱 : init_1602()
* 功能 : 初始化1602液晶
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void init_1602() //1602初始化
{
write_com(0x38);
write_com(0x0c);
write_com(0x06);
delay_uint(1000);
write_string(1,0,"sd:00km/h 00:00");
write_string(2,0,"lc:00.00km 2");
}
// E309R
/*************寫一個(gè)數(shù)據(jù)到對應(yīng)的地址里***************/
void write_ds1302(uchar add,uchar dat)
{
rst = 1; //把復(fù)位線拿高
for(i=0;i<8;i++)
{ //低位在前
clk = 0; //時(shí)鐘線拿低開始寫數(shù)據(jù)
io = add & 0x01;
add >>= 1; //把地址右移一位
clk = 1; //時(shí)鐘線拿高
}
for(i=0;i<8;i++)
{
clk = 0; //時(shí)鐘線拿低開始寫數(shù)據(jù)
io = dat & 0x01;
dat >>= 1; //把數(shù)據(jù)右移一位
clk = 1; //時(shí)鐘線拿高
}
rst = 0; //復(fù)位線合低
clk = 0;
io = 0;
}
/*************從對應(yīng)的地址讀一個(gè)數(shù)據(jù)出來***************/
uchar read_ds1302(uchar add)
{
uchar value,i;
rst = 1; //把復(fù)位線拿高
for(i=0;i<8;i++)
{ //低位在前
clk = 0; //時(shí)鐘線拿低開始寫數(shù)據(jù)
io = add & 0x01;
add >>= 1; //把地址右移一位
clk = 1; //時(shí)鐘線拿高
}
for(i=0;i<8;i++)
{
clk = 0; //時(shí)鐘線拿低開始讀數(shù)據(jù)
value >>= 1;
if(io == 1)
value |= 0x80;
clk = 1; //時(shí)鐘線拿高
}
rst = 0; //復(fù)位線合低
clk = 0;
io = 0;
return value; //返回讀出來的數(shù)據(jù)
}
/*************把要的時(shí)間 年月日 都讀出來***************/
void read_time()
{
miao = read_ds1302(read_add[0]); //讀秒
fen = read_ds1302(read_add[1]); //讀分
shi = read_ds1302(read_add[2]); //讀時(shí)
ri = read_ds1302(read_add[3]); //讀日
yue = read_ds1302(read_add[4]); //讀月
nian = read_ds1302(read_add[5]); //讀年
week = read_ds1302(read_add[6]); //讀星期
}
/*************把要寫的時(shí)間 年月日 都寫入ds1302里***************/
void write_time()
{
write_ds1302(0x8e,0x00); //打開寫保護(hù)
write_ds1302(write_add[0],miao); //寫秒
write_ds1302(write_add[1],fen); //寫分
write_ds1302(write_add[2],shi); //寫時(shí)
write_ds1302(write_add[3],ri); //寫日
write_ds1302(write_add[4],yue); //寫月
write_ds1302(write_add[5],nian); //寫星期
write_ds1302(write_add[6],week); //寫年
write_ds1302(0x8e,0x80); //關(guān)閉寫保護(hù)
}
/*************把數(shù)據(jù)保存到ds1302 RAM中**0-31*************/
void write_ds1302ram(uchar add,uchar dat)
{
add <<= 1; //地址是從第二位開始的
add &= 0xfe; //把最低位清零 是寫的命令
add |= 0xc0; //地址最高兩位為 1
write_ds1302(0x8e,0x00);
write_ds1302(add,dat);
write_ds1302(0x8e,0x80);
}
/*************把數(shù)據(jù)從ds1302 RAM讀出來**0-31*************/
uchar read_ds1302ram(uchar add)
{
add <<= 1; //地址是從第二位開始的
add |= 0x01; //把最高位置1 是讀命令
add |= 0xc0; //地址最高兩位為 1
return(read_ds1302(add));
}
/*************初始化ds1302時(shí)間***************/
void init_ds1302()
{
uchar i;
rst = 0; //第一次讀寫數(shù)據(jù)時(shí)要把IO品拿低
clk = 0;
io = 0;
i = read_ds1302ram(30);
if(i != 3)
{
i = 3;
write_ds1302ram(30,i);
write_ds1302(0x8e,0x00); //打開寫保護(hù)
for(i=0;i<7;i++)
write_ds1302(write_add[i],init_ds[i]); //把最高位值0 允許ds1302工作
write_ds1302(0x8e,0x80); //關(guān)寫保護(hù)
}
write_sfm2(1,0,i);
}
void init_ds1302_io()
{
rst = 0; //第一次讀寫數(shù)據(jù)時(shí)要把IO品拿低
clk = 0;
io = 0;
}
/*************定時(shí)器0初始化程序***************/
void init_1602_ds1302()
{
if((miao <= 0x60) || (shi <= 0x24))
{
write_sfm2_ds1302(1,11,shi);
write_sfm2_ds1302(1,14,fen);
}
}
/***********外部中斷0初始化程序****************/
void init_int0()
{
EX0=1; //允許外部中斷0中斷
EA=1; //開總中斷
IT0 = 1; //外部中斷0負(fù)跳變中斷
}
/*************定時(shí)器0初始化程序***************/
void time_init() //定時(shí)器0初始化程序
{
EA = 1; //開總中斷
TMOD = 0X11; //定時(shí)器0、工作方式1
ET0 = 1; //開定時(shí)器0中斷
TR0 = 1; //允許定時(shí)器0定時(shí)
ET1 = 1; //開定時(shí)器1中斷
TR1 = 1; //允許定時(shí)器1定時(shí)
}
/***********計(jì)算速度函數(shù)**************/
void menu_dis() //計(jì)算速度函數(shù)
{
static uchar value,value1;
if(menu_1 == 0)
{
if(flag_1s == 1)
{
flag_1s = 0;
if(flag_en == 0)
{
value ++;
if(value >= 3) //2秒
{
speed_km = 0; //速度為0
shudu = (uint)speed_km;
value = 0;
}
}
if((flag_en == 1))
{
value = 0;
flag_en = 0;
//1s = 1 / 1000000us; // 1m/s=0.001km除以1/3600h=3.6km/h
f_hz = 1000000 / (t2_num * 65536.0 + TH11 * 256 + TL11); //算出來就是秒
t2_num = 0; //把變量清零
TH11 = 0;
TL11 = 0;
speed_m = f_hz * zhijing * 3.14 ; //算出來的是m/s
juli_z = (juli_z + (uint)speed_m) ; //總路程m
speed_km = speed_m * 3.6 ; //(帶個(gè)小數(shù)點(diǎn)) km/s
shudu = (uint)speed_km;
if(shudu >= 99)
shudu = 99;
zong_lc += speed_m;
value1++;
if(value1 >= 20)
{
value1 = 0;
write_eeprom();
}
}
write_sfm2(1,3,shudu);
write_sfm4(2,3,juli_z);
}
}
}
/********************獨(dú)立按鍵程序*****************/
uchar key_can; //按鍵值
void key() //獨(dú)立按鍵程序
{
static uchar key_new;
key_can = 20; //按鍵值還原
P3 |= 0x78; //對應(yīng)的按鍵IO口輸出為1
if((P3 & 0x78) != 0x78) //按鍵按下
{
delay_1ms(1); //按鍵消抖動
if(((P3 & 0x78) != 0x78) && (key_new == 1))
{ //確認(rèn)是按鍵按下
key_new = 0;
switch(P3 & 0x78)
{
case 0x70: key_can = 4; break; //得到按鍵值
case 0x68: key_can = 3; break; //得到按鍵值
case 0x58: key_can = 2; break; //得到按鍵值
case 0x38: key_can = 1; break; //得到按鍵值
}
// write_sfm2(1,0,key_can); //顯示按鍵值
}
}
else
key_new = 1;
}
/**********************設(shè)置函數(shù)************************/
void key_with()
{
if(menu_1 == 0)
{
if(key_can == 4) //鍵
{
if(f_pwm_l == 0)
{
f_pwm_l = 60;
}
f_pwm_l -= 10;
write_sfm1(2,15,f_pwm_l/10); //顯示
}
if(key_can == 3) //鍵
{
f_pwm_l += 10;
if(f_pwm_l >= 60)
{
f_pwm_l = 0;
}
write_sfm1(2,15,f_pwm_l/10); //顯示
}
}
if(key_can == 1) //設(shè)置鍵
{
menu_1++;
if(menu_1 == 1) //設(shè)置時(shí)間
{
menu_2 = 1;
write_string(1,0," : : W: ");
write_string(2,0," 20 - - ");
}
if(menu_1 == 2) //設(shè)置報(bào)警速度
{
menu_2 = 1;
write_string(1,0,"set-sd:00km/h ");
write_string(2,0,"zlc: ");
}
menu_2 = 1;
if(menu_1 == 3) //設(shè)置直徑
{
menu_2 = 1;
write_string(1,0," Set Zhijing ");
write_string(2,0," ");
}
menu_2 = 1;
if(menu_1 > 3) //回到正常顯示
{
menu_1 = 0;
write_guanbiao(1,2,0); //關(guān)閉光標(biāo)
init_1602(); //1602初始化 //初始化液晶顯示
}
}
if(key_can == 2) //選擇鍵
{
if(menu_1 == 1) //設(shè)置時(shí)間
{
menu_2 ++;
if(menu_2 > 7)
menu_2 = 1;
}
if(menu_1 == 2) //設(shè)置
{
menu_2 ++;
if(menu_2 > 2)
menu_2 = 1;
}
}
if(menu_1 == 1)
{
if(menu_2 == 1) //設(shè)置時(shí)
{
if(key_can == 3) //加
{
shi+=0x01;
if((shi & 0x0f) >= 0x0a)
shi = (shi & 0xf0) + 0x10;
if(shi >= 0x24)
shi = 0;
}
if(key_can == 4) //減
{
if(shi == 0x00)
shi = 0x24;
if((shi & 0x0f) == 0x00)
shi = (shi | 0x0a) - 0x10;
shi -- ;
}
}
if(menu_2 == 2) //設(shè)置分
{
if(key_can == 3) //加
{
fen+=0x01;
if((fen & 0x0f) >= 0x0a)
fen = (fen & 0xf0) + 0x10;
if(fen >= 0x60)
fen = 0;
}
if(key_can == 4) //減
{
if(fen == 0x00)
fen = 0x5a;
if((fen & 0x0f) == 0x00)
fen = (fen | 0x0a) - 0x10;
fen -- ;
}
}
if(menu_2 == 3) //設(shè)置秒
{
if(key_can == 3) //加
{
miao+=0x01;
if((miao & 0x0f) >= 0x0a)
miao = (miao & 0xf0) + 0x10;
if(miao >= 0x60)
miao = 0;
}
if(key_can == 4) //減
{
if(miao == 0x00)
miao = 0x5a;
if((miao & 0x0f) == 0x00)
miao = (miao | 0x0a) - 0x10;
miao -- ;
}
}
if(menu_2 == 4) //設(shè)置星期
{
if(key_can == 3) //加
{
week+=0x01;
if((week & 0x0f) >= 0x0a)
week = (week & 0xf0) + 0x10;
if(week >= 0x08)
week = 1;
}
if(key_can == 4) //減
{
if(week == 0x01)
week = 0x08;
if((week & 0x0f) == 0x00)
week = (week | 0x0a) - 0x10;
week -- ;
}
}
if(menu_2 == 5) //設(shè)置年
{
if(key_can == 3) //加
{
nian+=0x01;
if((nian & 0x0f) >= 0x0a)
nian = (nian & 0xf0) + 0x10;
if(nian >= 0x9a)
nian = 1;
}
if(key_can == 4) //減
{
if(nian == 0x01)
nian = 0x9a;
if((nian & 0x0f) == 0x00)
nian = (nian | 0x0a) - 0x10;
nian -- ;
}
}
if(menu_2 == 6) //設(shè)置月
{
if(key_can == 3) //加
{
yue+=0x01;
if((yue & 0x0f) >= 0x0a)
yue = (yue & 0xf0) + 0x10;
if(yue >= 0x13)
yue = 1;
}
if(key_can == 4) //減
{
if(yue == 0x01)
yue = 0x13;
if((yue & 0x0f) == 0x00)
yue = (yue | 0x0a) - 0x10;
yue -- ;
}
}
if(menu_2 == 7) //設(shè)置日
{
if(key_can == 3) //加
{
ri+=0x01;
if((ri & 0x0f) >= 0x0a)
ri = (ri & 0xf0) + 0x10;
if(ri >= 0x32)
ri = 0;
}
if(key_can == 4) //減
{
if(ri == 0x01)
ri = 0x32;
if((ri & 0x0f) == 0x00)
ri = (ri | 0x0a) - 0x10;
ri -- ;
}
}
write_sfm2_ds1302(1,2,shi); //顯示時(shí)
write_sfm2_ds1302(1,5,fen); //顯示分
write_sfm2_ds1302(1,8,miao); //顯示秒
write_sfm1(1,14,week); //顯示星期
write_sfm2_ds1302(2,3,nian); //顯示年
write_sfm2_ds1302(2,6,yue); //顯示月
write_sfm2_ds1302(2,9,ri); //顯示日
switch(menu_2) // 光標(biāo)顯示
{
case 1: write_guanbiao(1,2,1); break;
case 2: write_guanbiao(1,5,1); break;
case 3: write_guanbiao(1,8,1); break;
case 4: write_guanbiao(1,14,1); break;
case 5: write_guanbiao(2,3,1); break;
case 6: write_guanbiao(2,6,1); break;
case 7: write_guanbiao(2,9,1); break;
}
write_time(); //把時(shí)間寫進(jìn)去
}
if(menu_1 == 2)
{
if(menu_2 == 1) //設(shè)置速度
{
if(key_can == 3) //加
{
bj_shudu++;
if(bj_shudu >= 99)
bj_shudu = 99;
}
if(key_can == 4) //減
{
if(bj_shudu != 0)
bj_shudu -- ;
}
}
if(menu_2 == 2) //把總量程清零
{
if(key_can == 3)
{
zong_lc= 0;
}
if(key_can == 4)
{
zong_lc= 0;
}
}
write_sfm2(1,7,bj_shudu); //顯示報(bào)警速度
write_sfm7(2,4,zong_lc); //顯示
switch(menu_2) // 光標(biāo)顯示
{
case 1: write_guanbiao(1,6,1); break;
case 2: write_guanbiao(2,3,1); break;
}
write_eeprom();
}
if(menu_1 == 3)
{
if(key_can == 3) //加
{
s_zhijing++;
if(s_zhijing >= 999)
s_zhijing = 999;
}
if(key_can == 4) //減
{
if(s_zhijing != 0)
s_zhijing -- ;
}
zhijing = s_zhijing ;
write_sfm2(2,5,s_zhijing); //顯示
}
}
/****************報(bào)警函數(shù)***************/
void clock_h_l()
{
static uchar value;
if((shudu >= bj_shudu))
{
value ++; //消除實(shí)際距離在設(shè)定距離左右變化時(shí)的干擾
if(value > 5)
{
beep = ~beep; //蜂鳴器報(bào)警
}
}
else
{
beep = 1;
}
}
/******************主程序**********************/
void main()
{
beep = 0;
delay_1ms(200) ;
P0 = P1 = P2 = P3 = 0xff; //IO口初始為電平
init_ds1302_io();
init_ds1302();
init_1602(); //1602初始化
init_int0();
time_init(); //定時(shí)器0初始化程序
init_eeprom(); //開機(jī)初始化保存的數(shù)據(jù)*
while(1)
{
key(); //按鍵程序
if(key_can < 10)
{
key_with();
}
if(flag_200ms == 1)
{
flag_200ms = 0;
read_time(); //讀時(shí)間
if(menu_1 == 0)
init_1602_ds1302(); //顯示時(shí)鐘
menu_dis(); //計(jì)算速度函數(shù)
clock_h_l(); //報(bào)警函數(shù)
}
}
}
/*********************外部中斷0中斷服務(wù)程序************************/
void int0() interrupt 0
{
static uchar value;
switch(value)
{
case 0:
t1_num = 0; //第一次就把變量清零
TH1 = 0;
TL1 = 0;
break;
case 1:
t2_num = t1_num; //保存
TH11 = TH1;
TL11 = TL1;
flag_en = 1;
break;
}
value ++;
if(value >= 2)
value =0;
}
/*************定時(shí)器0中斷服務(wù)程序***************/
void time0_int() interrupt 1
{
uchar value=1;
uchar value_l ;
TH0 = 0x3c;
TL0 = 0xb0; // 50ms
value++;
if(value % 4 == 0)
flag_200ms = 1;
if(value >= 20) //1秒 才是一秒鐘的速度
{
value = 0;
flag_1s = 1;
}
if(pwm==1) //輸出PWM高電平時(shí)間
{
value_l += 1;
if(value_l > 100 - f_pwm_l) //f_pwm_l越小就越快速度
{
value_l=0;
if(f_pwm_l != 0)
{
pwm = 0;
//輸出PWM低電平時(shí)間
}
}
}
else //輸出PWM低電平時(shí)間
{
value_l += 1;
if(value_l> f_pwm_l) //f_pwm_l越大就越慢速度
{
value_l=0; //當(dāng)value_l > f_pwm_l時(shí)
pwm=1; //輸出PWM高電平時(shí)間
}
}
}
/*************定時(shí)器1中斷服務(wù)程序***************/
void time1_int() interrupt 3
{
t1_num++;
}
|
|