51单片机定时做可调普通时钟源程序

Demyar

51单片机定时做可调普通时钟源程序
$ h. w3 k' |- B

/ o2 ^% ]- q$ }" E! Q1 N6 N51单片机定时做普通时钟 而且可调 功能很强大 下面是源码：
4 G# U, t( m; P5 r, L0 _* W/*-----------------------------------------------
: K3 }0 Y, `1 j$ d& m3 p( z' |  名称：定时器时钟数码管显示      
3 I2 i& y4 i# \------------------------------------------------*/


* v% V+ H' A; @#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义

- s1 u9 V2 r% {' [5 F6 c. T
#define KeyPort P3 //定义按键端口
8 {: G. P) w& P
3 j. J3 l5 _; g5 \, D: W, [2 Z
#define DataPort P0 //定义数据端口 程序中遇到DataPort 则用P0 替换
- z" ]2 F/ r4 B& L

- E7 @+ Y7 |0 V2 ~sbit LATCH1=P2^2;//定义锁存使能端口 段锁存
' L! v# J2 W; Q) M8 ]. }sbit LATCH2=P2^3;//                 位锁存
% l; x& o, @: u
! q) V1 A/ J& G  T1 x
. o  g# v- V2 P; J4 S# E6 G  C; hsbit SPK=P1^0;    //定义喇叭端口
9 N; H8 }0 X' ]! E- g- h
& L: s- g5 m' [8 E
+ y* C; L' P- |0 H; g" dunsigned char hour,minute,second;//定义时分秒
3 e! O" O% g& j! E
4 X5 l# r3 E9 e$ K7 b' M
0 E2 `+ H9 R/ O+ l% g2 l* Lbit UpdateTimeFlag;//定义读时间标志
! @$ r- g9 v# u! e: H4 `; ]- M
% j. F" j, [0 Z: i
) w* c2 s+ L; cunsigned char code dofly_DuanMa[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};// 显示段码值0~9
+ |% j$ k5 M- F  u, Cunsigned char code dofly_WeiMa[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//分别对应相应的数码管点亮,即位码
unsigned char TempData[8]; //存储显示值的全局变量
2 C0 ~- x$ R, w: H& r! f9 I

1 m( w9 J% c% I* t& O) O6 _3 a$ ~void DelayUs2x(unsigned char t);//us级延时函数声明
7 k+ d3 e! P4 h& V* V: |void DelayMs(unsigned char t); //ms级延时
void Display(unsigned char FirstBit,unsigned char Num);//数码管显示函数
+ a% W3 V) v& Gunsigned char KeyScan(void);//键盘扫描
void Init_Timer0(void);//定时器初始化
" ]7 r1 E4 J5 Y! n/*------------------------------------------------
                    主函数
------------------------------------------------*/
- K- ?4 v/ z7 G0 d0 B3 |! Z6 Rvoid main (void)
{
        unsigned char num;                  
3 ^- `5 J% Q: R' d$ N
, T# z; L4 {# L& i! i
        Init_Timer0();//定时器初始化


2 L: H" a% [* K& K1 r        while (1)//主循环
                {


# g) j5 Z: N+ L/ }- j6 O! M4 C                num=KeyScan();
                        
* L  {, _/ @: m+ S5 \' |5 ~( ~: z                        
# S4 ]. W5 ^) @+ z' e# f& }% j                switch(num)
                        {
8 c- ~3 K* D$ _* U  Z                                case 1:hour++;if(hour==24)hour=0;     //正常时间 小时 加1
                                                         break;
                                case 2:hour--;if(hour==255)hour=23;   //正常时间 小时减1
                                                         break;
* ]+ ~  E$ y4 p' H, C                                case 3:minute++;if(minute==60)minute=0;     //分钟加1
                                                         break;
                                case 4:minute--;if(minute==255)minute=59;   //分钟减1
- s. Q* {4 H, k                                                         break;
3 ?9 M' e# N" Y" Y                                default:break;
                        }/* 结束switch语句 */
                        
% G, E- k! A4 ~                        
# k2 n5 X% C) J  F/ H$ D- V                if(UpdateTimeFlag==1)
                 {
                        UpdateTimeFlag=0;


                 TempData[0]=dofly_DuanMa[hour/10]; //时                        //数据的转换，因我们采用数码管0~9的显示,将数据分开
                 TempData[1]=dofly_DuanMa[hour%10];
                 TempData[2]=0x40;                                                            //加入"-"
                 TempData[3]=dofly_DuanMa[minute/10];//分
9 `( t3 n/ {% |" {9 z8 C                 TempData[4]=dofly_DuanMa[minute%10];
5 P0 ]' w6 d- g8 e% p: F  |                 TempData[5]=0x40;
  w6 [" V& q2 B: f                 TempData[6]=dofly_DuanMa[second/10];//秒
                 TempData[7]=dofly_DuanMa[second%10];        
5 k2 S% z# j+ w% u* ]
! X% r; C! \' T6 i2 G
" n) z2 P. N! j4 p( K                }        /* 结束if语句 */
               
        
" p0 d2 k! i8 J' ?* D# u) v$ _, I               
9 n/ u0 v0 T! I: C; V& b$ E( c" ~& @         }/* 结束while语句 */
         
}/* 结束main语句 */




; X; g3 h' t* j: x9 M, {; o/*------------------------------------------------
uS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
. w1 T+ O$ Y3 ?4 h, I3 M! W 0~255 这里使用晶振12M，精确延时请使用汇编,大致延时
6 h) G' \) S, |  Z" \ 长度如下 T=tx2+5 uS
6 N/ F0 X- z/ }* B0 e9 C------------------------------------------------*/
4 g& ~6 f" R- `9 rvoid DelayUs2x(unsigned char t)
{   
5 C: j/ C) \1 p- G! `* s  J while(--t);
}

. \" p( Z) P- }. A$ @6 P4 l
6 ?' S/ b+ ?4 o
; ]8 D) c7 A# r# e
, k9 `; P, K( K5 ]: G/*------------------------------------------------
& w/ o7 e+ T3 Y6 d& @# _ mS延时函数，含有输入参数 unsigned char t，无返回值
+ G; s3 F* ]7 A: ~2 S  P, a unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编
  J# z3 P8 Q8 P' y. A3 s! t# |% W; t------------------------------------------------*/
' q+ R, [* x6 dvoid DelayMs(unsigned char t)
5 p& l+ n# w: P% z{
     
9 O$ e/ C' ~, u4 s4 S$ Y! V while(t--)
- G1 n* o/ ]% H8 u4 Q. _$ ~8 u {
   //大致延时1mS
# M0 M+ v" S4 E   DelayUs2x(245);
2 k2 r& o3 q% l0 V" H' W; [$ v         DelayUs2x(245);
}
}




/*------------------------------------------------
显示函数，用于动态扫描数码管
输入参数 FirstBit 表示需要显示的第一位，如赋值2表示从第三个数码管开始显示
如输入0表示从第一个显示。
Num表示需要显示的位数，如需要显示99两位数值则该值输入2
------------------------------------------------*/
void Display(unsigned char FirstBit,unsigned char Num)
{
      static unsigned char i=0;
         


           DataPort=0;   //清空数据，防止有交替重影
       LATCH1=1;     //段锁存
! b- B- Z/ W5 Z) b/ R       LATCH1=0;
2 {3 z: k/ j3 G) S- _* g' @
% |+ z$ b7 H9 K7 ~$ Q
       DataPort=dofly_WeiMa[i+FirstBit]; //取位码
1 O) n# Q% r+ |& _# h( i       LATCH2=1;     //位锁存
  `: n3 |4 E0 K, l# N       LATCH2=0;

/ y0 l( u3 U9 H# l* ~7 }
       DataPort=TempData; //取显示数据，段码
( u2 E3 x1 ]  r& O, r5 N, J       LATCH1=1;     //段锁存
) M. O* t  u4 S       LATCH1=0;
! F* W  ~2 d  C# U  N' w6 V/ @      
           i++;
# m! x/ N6 v6 V! H/ k4 o9 ^% |       if(i==Num)
              i=0;
& T8 f( r/ ]) \4 a+ Y, `$ |
; |6 }" A5 i5 O- {- l$ J9 c
* @: j3 f: n4 s
4 y9 M9 b) J  k
}

* r9 b# [) W3 `! N
) J. s* x7 O) _+ ]+ m: P/ e

5 c  l( H- h  O' p  O/*------------------------------------------------
7 d6 z: |7 b2 |! o. D% N0 D+ P                    定时器初始化子程序
------------------------------------------------*/
) l( f2 v- e8 I9 V+ F  P1 a& ovoid Init_Timer0(void)
8 @6 k0 J9 h9 Q{
TMOD |= 0x01;          //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响                     
//TH0=0x00;              //给定初值
$ g- E1 {/ b3 n( H; L //TL0=0x00;
/ e. ^: w+ ?, G# a- ~7 D& d6 L EA=1;            //总中断打开
ET0=1;           //定时器中断打开
5 O1 v- B1 H) R; a TR0=1;           //定时器开关打开
2 K- C$ H8 F1 u! c8 b}



5 N7 }) J# u5 S3 [: r3 @6 j
/*------------------------------------------------
$ t/ @8 m  w5 f; ?                 定时器中断子程序
------------------------------------------------*/
void Timer0_isr(void) interrupt 1
{
  r6 k: \2 d6 L& B1 x- r& K' o) g static unsigned int num,i;
TH0=(65536-2000)/256; // 给THO赋初值为（65536-2000),当其加1到65535溢出中断一次   即2ms中断一次  2000为2000/1=2000(在晶振为12MHz的时候)
                             //重新赋值 1.8ms 即1.8ms中断一次  2000为2000/1.09=1834.86(在晶振为11.0592MHz的时候)
6 |- s1 v6 ~( ~5 t: B3 V+ | TL0=(65536-2000)%256;
, h( C* T( z5 Z. m
Display(0,8);       // 调用数码管扫描
+ ~8 u* Y/ {$ x3 ?; @) h6 X! |  M        
: _3 \* y9 [, w, B* ?        
i++;
if(i==10)          //20ms更新一次
0 K# ]) l4 n' T4 J8 i    {
9 Q, U7 \8 d1 z( m                        i=0;
3 J& P- F. O  ^! U, d4 t                        UpdateTimeFlag=1; //更新时间志位置1
                }
5 m$ `  R) ]( b; F  B        
        
) d6 I$ R$ ~- U5 L& f4 T7 J% q9 N               
num++;
, B; l, M: u3 x1 J1 C if(num==500)        //大致1s
' E9 b. t* d% d) j; p   {
    num=0;
          second++;
! n, O+ Z* H4 r- y" A$ K" r                 
                if(minute == 59) //当分钟到59的时响蜂鸣器
; U' I; v! }" a8 Y& s0 ?                 {
                         if(second >= 51) //隔一秒响一下
                         {                                 
: W% ^" W: r# I3 y                                 SPK=0; /* 开蜂鸣器 */
                                 DelayMs(1000);
                                 SPK=1; /* 关蜂鸣器 */
6 ^# \8 q% @0 T/ r' \) T! i                                 second++;                                 
; C* o% [! M8 p! T( s                         }
6 U& X* y+ e3 x, h$ V3 P. I# ~                 }        
                 
+ a5 O0 ]1 P; K: r, q                if(second==60)  //秒到60，分钟加1
  M! w2 D1 E$ O- ~$ i7 ]                 {
                        second=0;         
                        minute++;         
4 \5 c) }6 [8 c& v$ i0 m. f                                          
                        if(minute==60)//分钟到60，小时加1
& p7 L5 T* [9 N1 Q                                {
5 k; Z& m* X& c                                 minute=0;
: S  t* s$ `8 K; ~1 _1 p                                       
# q5 [" g% i/ D( P( f                                 SPK=1; /* 关蜂鸣器 */        
                                       
                                 hour++;
                                       
7 T$ H) X7 o* A" Y                                 if(hour==24)//小时到24，回零
                                        hour=0;
4 K) y1 m% x1 f0 B- y                          }
+ x2 J1 i, u$ [  c8 F                        
                 }
                 
                }
/ ~: a& w+ S: \# x$ }' z}




/*------------------------------------------------
, y( o. \$ V) t" T/ F按键扫描函数，返回扫描键值
( _' G4 ]3 ~/ _) w2 L1 d+ [* M------------------------------------------------*/
; q3 B- |" g, b; [5 K% `5 p$ Y, qunsigned char KeyScan(void)
{
unsigned char keyvalue;
, u/ {+ R, P8 d5 Q+ n. v if(KeyPort!=0xff)
2 m* u4 y* H  G' ]   {
4 H" ^3 S$ a; l/ O; g, Y7 R    DelayMs(10);
- |* Z! C1 I9 \9 b& g    if(KeyPort!=0xff)
           {
! T4 o: L* @3 v/ \            keyvalue=KeyPort;
! U* h+ ~* U* X- W/ R! ]                        
            while(KeyPort!=0xff);
" V( @$ g6 T! y$ r7 }* g( j                        
                        switch(keyvalue)
% c* O: g' s$ a; T, j1 L" v, c; D                        {
) \. i6 e# x0 O- W                         case 0xfe:return 1;break;  //单个按键控制
                         case 0xfd:return 2;break;
                         case 0xfb:return 3;break;
                         case 0xf7:return

3 o% {0 u" T- b: C& @, \' Q
+ t7 e7 X& z5 h! a: n
8 C! i0 e, }. c- d6 ~  b( P
8 W( {& h4 D; d. r, k+ V+ p…………限于本文篇幅 余下代码请从论坛下载附件…………

游客，如果您要查看本帖隐藏内容请回复

yxlk

回复查看！

小熊软糖

回复回复回复
5 G& F/ g/ O7 F7 ?& P

小熊软糖

重复重复重复

小熊软糖

重复重复重复

小熊软糖

咋个才能加威望