单片机做时钟程序

(1)定时器一秒定时(2)小时、分钟、秒显示(3)按键设置时间,使用四个按键如下:
KEY_SET、KEY_UP、KEY_DN、KEY_ENTER第一按KEY_SET,设置小时;第二次按KEY_SET设置分钟;第三次按KEY_SET设置秒。在设置过程中,按UP循环加1、按DN循环减1、按KEY_ENTER退出设置(4)按键设置时间闪烁,设置小时时,小时位在闪烁,设置分钟时,分钟位在闪烁,设置秒时,秒位在闪烁,退出设置后不闪烁
要用C语言,基于STC89c52芯片

第1个回答  2012-05-25
基于DS1302的日历时钟
#include<reg51.h> //包含单片机寄存器的头文件
#include<intrins.h> //包含_nop_()函数定义的头文件
/***********************************************************************
以下是DS1302芯片的操作程序
************************************************************************/
unsigned char code digit[10]={"0123456789"}; //定义字符数组显示数字
sbit DATA=P1^1; //位定义1302芯片的接口,数据输出端定义在P1.1引脚
sbit RST=P1^2; //位定义1302芯片的接口,复位端口定义在P1.1引脚
sbit SCLK=P1^0; //位定义1302芯片的接口,时钟输出端口定义在P1.1引脚
/*****************************************************
函数功能:延时若干微秒
入口参数:n
***************************************************/
void delaynus(unsigned char n)
{
unsigned char i;
for(i=0;i<n;i++)
;
}
/*****************************************************
函数功能:向1302写一个字节数据
入口参数:x
***************************************************/
void Write1302(unsigned char dat)
{
unsigned char i;
SCLK=0; //拉低SCLK,为脉冲上升沿写入数据做好准备
delaynus(2); //稍微等待,使硬件做好准备
for(i=0;i<8;i++) //连续写8个二进制位数据
{
DATA=dat&0x01; //取出dat的第0位数据写入1302
delaynus(2); //稍微等待,使硬件做好准备
SCLK=1; //上升沿写入数据
delaynus(2); //稍微等待,使硬件做好准备
SCLK=0; //重新拉低SCLK,形成脉冲
dat>>=1; //将dat的各数据位右移1位,准备写入下一个数据位
}

}
/*****************************************************
函数功能:根据命令字,向1302写一个字节数据
入口参数:Cmd,储存命令字;dat,储存待写的数据
***************************************************/
void WriteSet1302(unsigned char Cmd,unsigned char dat)
{
RST=0; //禁止数据传递
SCLK=0; //确保写数居前SCLK被拉低
RST=1; //启动数据传输
delaynus(2); //稍微等待,使硬件做好准备
Write1302(Cmd); //写入命令字
Write1302(dat); //写数据
SCLK=1; //将时钟电平置于已知状态
RST=0; //禁止数据传递
}
/*****************************************************
函数功能:从1302读一个字节数据
入口参数:x
***************************************************/
unsigned char Read1302(void)
{
unsigned char i,dat;
delaynus(2); //稍微等待,使硬件做好准备
for(i=0;i<8;i++) //连续读8个二进制位数据
{
dat>>=1; //将dat的各数据位右移1位,因为先读出的是字节的最低位
if(DATA==1) //如果读出的数据是1
dat|=0x80; //将1取出,写在dat的最高位
SCLK=1; //将SCLK置于高电平,为下降沿读出
delaynus(2); //稍微等待
SCLK=0; //拉低SCLK,形成脉冲下降沿
delaynus(2); //稍微等待
}
return dat; //将读出的数据返回
}
/*****************************************************
函数功能:根据命令字,从1302读取一个字节数据
入口参数:Cmd
***************************************************/
unsigned char ReadSet1302(unsigned char Cmd)
{
unsigned char dat;
RST=0; //拉低RST
SCLK=0; //确保写数居前SCLK被拉低
RST=1; //启动数据传输
Write1302(Cmd); //写入命令字
dat=Read1302(); //读出数据
SCLK=1; //将时钟电平置于已知状态
RST=0; //禁止数据传递
return dat; //将读出的数据返回
}
/*****************************************************
函数功能: 1302进行初始化设置
***************************************************/
void Init_DS1302(void)
{
WriteSet1302(0x8E,0x00); //根据写状态寄存器命令字,写入不保护指令
WriteSet1302(0x80,((0/10)<<4|(0%10))); //根据写秒寄存器命令字,写入秒的初始值
WriteSet1302(0x82,((0/10)<<4|(0%10))); //根据写分寄存器命令字,写入分的初始值
WriteSet1302(0x84,((12/10)<<4|(12%10))); //根据写小时寄存器命令字,写入小时的初始值
WriteSet1302(0x86,((16/10)<<4|(16%10))); //根据写日寄存器命令字,写入日的初始值
WriteSet1302(0x88,((11/10)<<4|(11%10))); //根据写月寄存器命令字,写入月的初始值
WriteSet1302(0x8c,((8/10)<<4|(8%10))); //根据写小时寄存器命令字,写入小时的初始值
}
/*******************************************************************************
以下是对液晶模块的操作程序
*******************************************************************************/
sbit RS=P2^0; //寄存器选择位,将RS位定义为P2.0引脚
sbit RW=P2^1; //读写选择位,将RW位定义为P2.1引脚
sbit E=P2^2; //使能信号位,将E位定义为P2.2引脚
sbit BF=P0^7; //忙碌标志位,,将BF位定义为P0.7引脚
/*****************************************************
函数功能:延时1ms
(3j+2)*i=(3×33+2)×10=1010(微秒),可以认为是1毫秒
***************************************************/
void delay1ms()
{
unsigned char i,j;
for(i=0;i<10;i++)
for(j=0;j<33;j++)
;
}
/*****************************************************
函数功能:延时若干毫秒
入口参数:n
***************************************************/
void delaynms(unsigned char n)
{
unsigned char i;
for(i=0;i<n;i++)
delay1ms();
}
/*****************************************************
函数功能:判断液晶模块的忙碌状态
返回值:result。result=1,忙碌;result=0,不忙
***************************************************/
bit BusyTest(void)
{
bit result;
RS=0; //根据规定,RS为低电平,RW为高电平时,可以读状态
RW=1;
E=1; //E=1,才允许读写
_nop_(); //空操作
_nop_();
_nop_();
_nop_(); //空操作四个机器周期,给硬件反应时间
result=BF; //将忙碌标志电平赋给result
E=0; //将E恢复低电平
return result;
}
/*****************************************************
函数功能:将模式设置指令或显示地址写入液晶模块
入口参数:dictate
***************************************************/
void WriteInstruction (unsigned char dictate)
{
while(BusyTest()==1); //如果忙就等待
RS=0; //根据规定,RS和R/W同时为低电平时,可以写入指令
RW=0;
E=0; //E置低电平(根据表8-6,写指令时,E为高脉冲,
// 就是让E从0到1发生正跳变,所以应先置"0"
_nop_();
_nop_(); //空操作两个机器周期,给硬件反应时间
P0=dictate; //将数据送入P0口,即写入指令或地址
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四个机器周期,给硬件反应时间
E=1; //E置高电平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四个机器周期,给硬件反应时间
E=0; //当E由高电平跳变成低电平时,液晶模块开始执行命令
}
/*****************************************************
函数功能:指定字符显示的实际地址
入口参数:x
***************************************************/
void WriteAddress(unsigned char x)
{
WriteInstruction(x|0x80); //显示位置的确定方法规定为"80H+地址码x"
}
/*****************************************************
函数功能:将数据(字符的标准ASCII码)写入液晶模块
入口参数:y(为字符常量)
***************************************************/
void WriteData(unsigned char y)
{
while(BusyTest()==1);
RS=1; //RS为高电平,RW为低电平时,可以写入数据
RW=0;
E=0; //E置低电平(根据表8-6,写指令时,E为高脉冲,
// 就是让E从0到1发生正跳变,所以应先置"0"
P0=y; //将数据送入P0口,即将数据写入液晶模块
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四个机器周期,给硬件反应时间
E=1; //E置高电平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四个机器周期,给硬件反应时间
E=0; //当E由高电平跳变成低电平时,液晶模块开始执行命令
}
/*****************************************************
函数功能:对LCD的显示模式进行初始化设置
***************************************************/
void LcdInitiate(void)
{
delaynms(15); //延时15ms,首次写指令时应给LCD一段较长的反应时间
WriteInstruction(0x38); //显示模式设置:16×2显示,5×7点阵,8位数据接口
delaynms(5); //延时5ms ,给硬件一点反应时间
WriteInstruction(0x38);
delaynms(5); //延时5ms ,给硬件一点反应时间
WriteInstruction(0x38); //连续三次,确保初始化成功
delaynms(5); //延时5ms ,给硬件一点反应时间
WriteInstruction(0x0c); //显示模式设置:显示开,无光标,光标不闪烁
delaynms(5); //延时5ms ,给硬件一点反应时间
WriteInstruction(0x06); //显示模式设置:光标右移,字符不移
delaynms(5); //延时5ms ,给硬件一点反应时间
WriteInstruction(0x01); //清屏幕指令,将以前的显示内容清除
delaynms(5); //延时5ms ,给硬件一点反应时间

}
/**************************************************************
以下是1302数据的显示程序
**************************************************************/
/*****************************************************
函数功能:显示秒
入口参数:x
***************************************************/
void DisplaySecond(unsigned char x)
{
unsigned char i,j; //j,k,l分别储存温度的百位、十位和个位
i=x/10;//取十位
j=x%10;//取个位
WriteAddress(0x49); //写显示地址,将在第2行第7列开始显示
WriteData(digit[i]); //将百位数字的字符常量写入LCD
WriteData(digit[j]); //将十位数字的字符常量写入LCD
delaynms(50); //延时1ms给硬件一点反应时间
}

/*****************************************************
函数功能:显示分钟
入口参数:x
***************************************************/
void DisplayMinute(unsigned char x)
{
unsigned char i,j; //j,k,l分别储存温度的百位、十位和个位
i=x/10;//取十位
j=x%10;//取个位
WriteAddress(0x46); //写显示地址,将在第2行第7列开始显示
WriteData(digit[i]); //将百位数字的字符常量写入LCD
WriteData(digit[j]); //将十位数字的字符常量写入LCD
delaynms(50); //延时1ms给硬件一点反应时间
}
/*****************************************************
函数功能:显示小时
入口参数:x
***************************************************/
void DisplayHour(unsigned char x)
{
unsigned char i,j; //j,k,l分别储存温度的百位、十位和个位
i=x/10;//取十位
j=x%10;//取个位
WriteAddress(0x43); //写显示地址,将在第2行第7列开始显示
WriteData(digit[i]); //将百位数字的字符常量写入LCD
WriteData(digit[j]); //将十位数字的字符常量写入LCD
delaynms(50); //延时1ms给硬件一点反应时间
}
/*****************************************************
函数功能:显示日
入口参数:x
***************************************************/
void DisplayDay(unsigned char x)
{
unsigned char i,j; //j,k,l分别储存温度的百位、十位和个位
i=x/10;//取十位
j=x%10;//取个位
WriteAddress(0x0c); //写显示地址,将在第2行第7列开始显示
WriteData(digit[i]); //将百位数字的字符常量写入LCD
WriteData(digit[j]); //将十位数字的字符常量写入LCD
delaynms(50); //延时1ms给硬件一点反应时间
}
/*****************************************************
函数功能:显示月
入口参数:x
***************************************************/
void DisplayMonth(unsigned char x)
{
unsigned char i,j; //j,k,l分别储存温度的百位、十位和个位
i=x/10;//取十位
j=x%10;//取个位
WriteAddress(0x09); //写显示地址,将在第2行第7列开始显示
WriteData(digit[i]); //将百位数字的字符常量写入LCD
WriteData(digit[j]); //将十位数字的字符常量写入LCD
delaynms(50); //延时1ms给硬件一点反应时间
}
/*****************************************************
函数功能:显示年
入口参数:x
***************************************************/
void DisplayYear(unsigned char x)
{
unsigned char i,j; //j,k,l分别储存温度的百位、十位和个位
i=x/10;//取十位
j=x%10;//取个位
WriteAddress(0x06); //写显示地址,将在第2行第7列开始显示
WriteData(digit[i]); //将百位数字的字符常量写入LCD
WriteData(digit[j]); //将十位数字的字符常量写入LCD
delaynms(50); //延时1ms给硬件一点反应时间
}

/*****************************************************
函数功能:主函数
***************************************************/
void main(void)
{
unsigned char second,minute,hour,day,month,year; //分别储存苗、分、小时,日,月,年
unsigned char ReadValue; //储存从1302读取的数据
LcdInitiate(); //将液晶初始化
WriteAddress(0x01); //写Date的显示地址,将在第1行第2列开始显示
WriteData('D'); //将字符常量写入LCD
WriteData('a'); //将字符常量写入LCD
WriteData('t'); //将字符常量写入LCD
WriteData('e'); //将字符常量写入LCD
WriteData(':'); //将字符常量写入LCD
WriteAddress(0x08); //写年月分隔符的显示地址, 显示在第1行第9列
WriteData('-'); //将字符常量写入LCD
WriteAddress(0x0b); //写月日分隔符的显示地址, 显示在第1行第12列
WriteData('-'); //将字符常量写入LCD
WriteAddress(0x45); //写小时与分钟分隔符的显示地址, 显示在第2行第6列
WriteData(':'); //将字符常量写入LCD
WriteAddress(0x48); //写分钟与秒分隔符的显示地址, 显示在第2行第9列
WriteData(':'); //将字符常量写入LCD
Init_DS1302(); //将1302初始化
while(1)
{
ReadValue = ReadSet1302(0x81); //从秒寄存器读数据
second=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);//将读出数据转化
DisplaySecond(second); //显示秒
ReadValue = ReadSet1302(0x83); //从分寄存器读
minute=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //将读出数据转化
DisplayMinute(minute); //显示分
ReadValue = ReadSet1302(0x85); //从分寄存器读
hour=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //将读出数据转化
DisplayHour(hour); //显示小时
ReadValue = ReadSet1302(0x87); //从分寄存器读
day=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //将读出数据转化
DisplayDay(day); //显示日
ReadValue = ReadSet1302(0x89); //从分寄存器读
month=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //将读出数据转化
DisplayMonth(month); //显示月
ReadValue = ReadSet1302(0x8d); //从分寄存器读
year=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //将读出数据转化
DisplayYear(year); //显示年
}
}

改改 就是你的了
第2个回答  2012-05-28
嗯,看起来复杂,其实很简单;
要给分哦,我马上写:
/***************************************
程序说明:KEY_SET ==P32(外部中断0)
KEY_ENTER ==P33(外部中断1)
led_h,led_m,led_s分别是小时位灯,分位灯和秒位灯
(不喜欢我定义的接口自己更换)

******************************************/
#include "reg52.h"
/*********************************
***************位定义***************
************************************/
sbit led_h=P0^0;
sbit led_m=P0^1;
sbit led_s=P0^2;
/****变量声明***************/
unsigned char i=0;
unsigned char h,m s;
/*******************************
以下是函数声明
*********************************/
void zd_int(void);
void set_h(void);
void set_m(void);
void set_s(void);
void delay_50ms(unsigned int t);
/***********************************/
void main (void)
{
zd_int();//中断初始化
while(1) //大循环
{
set_h( );
set_m( );
set_s( );
}
}
/**************************************
小时调节函数
***************************************/
void set_h(void)
{
if(i==1) //i=1为调节小时(60一个循环)
{
led_m=0; //先灭分led灯
led_s=0; //先灭秒led灯
if(key_up==1) //往上循环调小时
{
h++;
led_h~=led_h;
delay_50ms(3);
if(h>=60)
h=0;
}
if(key_dn==1) //往下循环调小时
{
h--;
led_h~=led_h;
delay_50ms(3);
if(h<=0)
h=60;
}
}
}
/**************************************
分调节函数
***************************************/
void set_m(void)
{
if(i==2) //i=2为调节分(60分一个循环)
{
led_h=0; //灭小时led灯
led_s=0; //灭秒led灯
if(key_up==1) //往上循环调分
{
m++;
led_m~=led_m;
delay_50ms(3);
if(m>=60)
m=0;
}
if(key_dn==1) //往下循环调分
{
m--;
led_m~=led_m;
delay_50ms(3);
if(m<=0)
m=60;
}
}
}
/**************************************
秒调节函数
***************************************/
void set_s(void)
{
if(i==3) //i=3为调节秒(60秒一个循环)
{
led_h=0; //灭小时led灯
led_m=0; //灭分led灯
if(key_up==1) //往上循环调秒
{
s++;
led_s~=led_s;
delay_50ms(3);
if(s>=60)
s=0;
}
if(key_dn==1) //往下循环调秒
{
s--;
led_s~=led_s;
delay_50ms(3);
if(s<=0)
s=60;
}
}
}
/****************************************
外部中断0函数
函数功能----判断要调节的是时分秒
******************************************/
void int0(void ) interrupt 0
{
i++;
delay_50ms(3);
if(i>=4)
i=0;
}
/****************************************
外部中断1函数
函数功能----退出设置(3个设置灯要灭掉)
******************************************/
void int1(void ) interrupt 2
{
led_h=0;
led_m=0;
led_s=0;
}
/***************************************
12T-51单片机的ms延时函数
****************************************/
void delay_50ms(unsigned int t) //12T-51单片机的ms延时
{
unsigned int j;
for(;t>0;t--)
for(j=6245;j>0;j--);
}
/***************************************
中断初始化函数
****************************************/
void zd_int(void)
{

EX0=1; //打开外部中断0的源允许
IT0=1;//选择外部中断0触发方式(1是下降沿触发)

EX1=1; //打开外部中断1的源允许
IT1=1;//选择外部中断1触发方式(1是下降沿触发)

EA=1; //打开总开关
}本回答被提问者采纳
第3个回答  2012-05-25
HOUR EQU 030H

MINUTE EQU 031H

SECOND EQU 032H

COUNT1 equ 033H;总计数到4000:拆分成40*100

COUNT2 equ 034H

SPL EQU 020H;闪烁判断的依据

SET_BTN EQU 021H;

ORG 0000H

AJMP MAIN

ORG 001BH

AJMP IT_1

ORG 040H

MAIN:

MOV SPL,#00H

CLR SPL.0

CLR SPL.1

CLR SPL.2

MOV DPTR,#TABLE

MOV HOUR,#00H

MOV MINUTE,#00H

MOV SECOND,#00H

MOV COUNT1,#00H

MOV COUNT2,#00H

MOV TMOD,#20H

MOV TH1,#06H

MOV TL1,#06H

MOV IE,#10001000B;设置允许中断,并且打开两个定时器

SETB TR1

LOOP:

JNB P0.0,JUST_TIME

JB SET_BTN.0,JUST_TIME

JNB P0.1, SUBB_TIME

JB SET_BTN.1,SUBB_TIME

JNB P0.2, ADD_TIME

JB SET_BTN.2,ADD_TIME

TIME: ACALL HOUR_SHOW

ACALL MINUTE_SHOW

AJMP LOOP

SUBB_TIME:

JB SET_BTN.1,WAIT_BTN2_UP

ACALL DELAY2;

JB P0.1, TIME

SETB SET_BTN.1

JB SPL.1,SUBB_HOUR

JB SPL.2,SUBB_MIN

AJMP TIME

SUBB_MIN:

MOV R1,MINUTE

CJNE R1,#00H,SUBB_MIN_OPT

AJMP TIME

SUBB_MIN_OPT:

DEC MINUTE

AJMP TIME

SUBB_HOUR:

MOV R1,HOUR

CJNE R1,#00H,SUBB_HOUR_OPT

AJMP TIME

SUBB_HOUR_OPT:

DEC HOUR

AJMP TIME

WAIT_BTN2_UP:

JNB P0.1,TIME

CLR SET_BTN.1

AJMP TIME

ADD_TIME:

JB SET_BTN.2,WAIT_BTN3_UP

ACALL DELAY2;

JB P0.2, TIME

SETB SET_BTN.2

JB SPL.1,ADD_HOUR

JB SPL.2,ADD_MIN

AJMP TIME

ADD_MIN:

MOV R1,MINUTE

CJNE R1,#3BH,ADD_MIN_OPT

AJMP TIME

ADD_MIN_OPT:

INC MINUTE

AJMP TIME

ADD_HOUR:

MOV R1,HOUR

CJNE R1,#17H,ADD_HOUR_OPT

AJMP TIME

ADD_HOUR_OPT:

INC HOUR

AJMP TIME

WAIT_BTN3_UP:

JNB P0.2,TIME

CLR SET_BTN.2

AJMP TIME

JUST_TIME:

JB SET_BTN.0,WAIT_UP

ACALL DELAY2;防抖

JB P0.0, TIME

SETB SET_BTN.0

JB SPL.2, CLR_M

JNB SPL.1, SET_H

CLR SPL.1

SET_M: SETB SPL.2;分钟位置

AJMP TIME

SET_H: SETB SPL.1;小时位置

CLR_M: CLR SPL.2

AJMP TIME

LJUMP_TIME:LJMP TIME

WAIT_UP: JNB P0.0,LJUMP_TIME

CLR SET_BTN.0

AJMP TIME

WAIT2_DL1:

ACALL DELAY1

ACALL DELAY1

RET

HOUR_SHOW:

JNB SPL.1, HOUR_SHOW_HRER

JB SPL.0, HOUR_SHOW_HRER

ACALL WAIT2_DL1

RET

HOUR_SHOW_HRER:

SETB P2.0

SETB P2.1

CLR A

MOV A,HOUR

MOV B,#0AH

DIV AB

MOVC A,@A+DPTR

MOV P1,#00H

MOV P1,A

CLR P2.0

;延时

ACALL DELAY1

SETB P2.0

MOV P1,#00H

MOV A,B

MOVC A,@A+DPTR

MOV P1,A

CLR P2.1

;延时

ACALL DELAY1

SETB P2.1

MOV P1,#00H

RET

MINUTE_SHOW:

JNB SPL.2, MINUTE_SHOW_HERE

JB SPL.0, MINUTE_SHOW_HERE

ACALL WAIT2_DL1

RET

MINUTE_SHOW_HERE:

SETB P2.2

SETB P2.3

CLR A

MOV A,MINUTE

MOV B,#0AH

DIV AB

MOVC A,@A+DPTR

MOV P1,#00H

MOV P1,A

CLR P2.2

;延时

ACALL DELAY1

SETB P2.2

MOV P1,#00H

MOV A,B

MOVC A,@A+DPTR

MOV P1,A

CLR P2.3

;延时

ACALL DELAY1

SETB P2.3

MOV P1,#00H

RET

DELAY1: ;短延时

MOV R6,#03H

DL1: MOV R7,08H

DL2: DJNZ R7,DL2

DJNZ R6,DL1

RET

DELAY2: ;按键延时

MOV R6,#0AH

DL21: MOV R7,0AH

DL22: DJNZ R7,DL22

DJNZ R6,DL21

RET

IT_1:

PUSH ACC

PUSH B

PUSH PSW

INC COUNT1

MOV A,COUNT1

CJNE A,#28H,RETI_LABLE

INC COUNT2

MOV COUNT1,#00H

MOV A,COUNT2

MOV B,#32H

DIV AB

MOV A,B

JNZ C2_OPT

CPL P3.7;秒的闪烁

CPL SPL.0

;INC SPL;给闪烁设置值

C2_OPT: MOV A,COUNT2

CJNE A,#64H,RETI_LABLE

INC SECOND

MOV COUNT2,#00H

MOV A,SECOND

CJNE A,#3CH,RETI_LABLE;

INC MINUTE

MOV SECOND,#00H

MOV A,MINUTE

CJNE A,#3CH,RETI_LABLE;

INC HOUR

MOV MINUTE,#00H

MOV A,HOUR

CJNE A,#18H,RETI_LABLE

MOV HOUR,#00H

RETI_LABLE:

POP PSW

POP B

POP ACC

RETI

TABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,40H

END