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

Demyar · 发表于 2018-11-28 09:21

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

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

9 @: E. j1 `& k
51单片机定时做普通时钟而且可调功能很强大下面是源码：
/*-----------------------------------------------
  名称：定时器时钟数码管显示
------------------------------------------------*/

#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义

#define KeyPort P3 //定义按键端口

#define DataPort P0 //定义数据端口程序中遇到DataPort 则用P0 替换

sbit LATCH1=P2^2;//定义锁存使能端口段锁存
sbit LATCH2=P2^3;//                位锁存

sbit SPK=P1^0; //定义喇叭端口

unsigned char hour,minute,second;//定义时分秒

bit UpdateTimeFlag;//定义读时间标志

unsigned char code dofly_DuanMa[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};// 显示段码值0~9
unsigned char code dofly_WeiMa[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//分别对应相应的数码管点亮,即位码
unsigned char TempData[8]; //存储显示值的全局变量

void DelayUs2x(unsigned char t);//us级延时函数声明
void DelayMs(unsigned char t); //ms级延时
void Display(unsigned char FirstBit,unsigned char Num);//数码管显示函数
unsigned char KeyScan(void);//键盘扫描
void Init_Timer0(void);//定时器初始化
/*------------------------------------------------
                  主函数
------------------------------------------------*/
void main (void)
{
      unsigned char num;

      Init_Timer0();//定时器初始化

      while (1)//主循环
            {

            num=KeyScan();


            switch(num)
                     {
                              case 1:hour++;if(hour==24)hour=0;    //正常时间小时加1
                                                      break;
                              case 2:hour--;if(hour==255)hour=23; //正常时间小时减1
                                                      break;
                              case 3:minute++;if(minute==60)minute=0;    //分钟加1
                                                      break;
                              case 4:minute--;if(minute==255)minute=59; //分钟减1
                                                      break;
                              default:break;
                     }/* 结束switch语句 */


            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];//分
               TempData[4]=dofly_DuanMa[minute%10];
               TempData[5]=0x40;
               TempData[6]=dofly_DuanMa[second/10];//秒
               TempData[7]=dofly_DuanMa[second%10];

            }       /* 结束if语句 */



      }/* 结束while语句 */

}/* 结束main语句 */

/*------------------------------------------------
uS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编,大致延时
长度如下 T=tx2+5 uS
------------------------------------------------*/
void DelayUs2x(unsigned char t)
{
while(--t);
}

/*------------------------------------------------
mS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编
------------------------------------------------*/
void DelayMs(unsigned char t)
{

while(t--)
{
//大致延时1mS
DelayUs2x(245);
      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;    //段锁存
   LATCH1=0;

   DataPort=dofly_WeiMa[i+FirstBit]; //取位码
   LATCH2=1;    //位锁存
   LATCH2=0;

   DataPort=TempData; //取显示数据，段码
3 g1 n% D! }/ I+ ~    LATCH1=1;    //段锁存
( q! _& G: S2 s1 m6 U    LATCH1=0;& p6 n8 E2 U$ }
     m, M! \8 n* v- c
         i++;" U4 J: |  s4 [
   if(i==Num)/ @6 D" ^3 Y8 B; U
            i=0;
) @5 c/ e4 E# K" Q1 D: R0 F* W. m/ |9 p# |: b% f  ^+ u# K
9 ~9 N- S5 S, e/ d. Z" K

" U6 J" @: Q. a& ]2 F
9 v$ r3 G1 D" v# R" L; f5 q: a}
' z4 |) b+ C) x6 \4 v" w& Y6 _/ B3 Q
8 Q' o' H4 o4 F
# R4 p5 \  P- ^7 R. \% g; l
) E  J5 w. y3 d5 _
/*------------------------------------------------7 I* ?) e' z) Q& w3 Y9 Y7 |1 b  P, i" r
                  定时器初始化子程序3 l" j  B* ]/ a5 _+ F4 S% }+ j9 s2 I
------------------------------------------------*/
  C$ I! q! F* F$ Ivoid Init_Timer0(void)- |7 {. Y8 f% M) R- o
{
- [  ]( _; S- l+ f  R+ C TMOD |= 0x01;       //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响
2 s7 ?7 o( ~! a& a //TH0=0x00;             //给定初值
; u, B- w. r0 |) z. E( @# B. i& P# _ //TL0=0x00;. `1 M0 S1 _2 q: z' H, i* L4 y& y
EA=1;          //总中断打开$ k8 a8 V+ c2 V4 Q! `
ET0=1;          //定时器中断打开* A9 U1 ]7 i. O: V' K% v0 X/ t
TR0=1;          //定时器开关打开
& A3 N  n  x- n) U}4 C% V5 @0 W9 _! U6 m9 _1 w, q

7 X! W* T* c- n* q- C
1 T2 [. D. x% t0 M8 `5 t, x0 U, q; a* x) L6 k

0 P% {" D, s* Q. Q* i' [" ^/*------------------------------------------------
9 Z) L* U1 p& l2 Y) L2 e1 ?: a: B                定时器中断子程序) g( H7 f6 k" W3 m
------------------------------------------------*/
. r7 F. p* p, L& Wvoid Timer0_isr(void) interrupt 1
! u9 z9 E' n$ \9 C{6 N& n9 N( u- d
static unsigned int num,i;% e( N# s, ~3 F7 h4 v2 S" ~
TH0=(65536-2000)/256; // 给THO赋初值为（65536-2000),当其加1到65535溢出中断一次即2ms中断一次  2000为2000/1=2000(在晶振为12MHz的时候) 9 l6 P* }) h/ q2 a4 \
                           //重新赋值 1.8ms 即1.8ms中断一次  2000为2000/1.09=1834.86(在晶振为11.0592MHz的时候) 2 y' O5 b5 x, q+ Y7 ?
TL0=(65536-2000)%256;2 I, O& p- @1 ]7 ^9 p# \/ t

+ G. c  ^9 `# w8 P! ?% a Display(0,8);    // 调用数码管扫描
5 |( E2 Q8 X- ?9 J
1 S: p7 k6 c3 f0 _) e$ I       $ \' R9 j0 I. Y- B) N
i++;% f6 E% e& H" L2 C# y7 w/ p
if(i==10)       //20ms更新一次
8 ~+ g  V1 M- y! G8 J0 C4 b {
2 Q) R) `$ k2 D+ K5 p* `                      i=0;
" |7 ]$ a: J4 \* \; W                      UpdateTimeFlag=1; //更新时间志位置1
9 l* M/ G; [6 Q/ b! A             }
/ p( _( C/ Q- m
% W( B- y6 w! P9 E6 e; _       & D; G% m# f- l: L- d! a( y+ q/ D
            ( z" |  @) t6 _% e9 d- @" \* r. S
num++;$ U2 L; z4 \% k2 u* O3 C/ g
if(num==500)       //大致1s7 S7 \, I/ x% u9 C
{1 y3 p. U1 r# S. V
num=0;
4 J; b3 d8 b' u8 X       second++;
, t% L3 S1 D4 x: B( ?7 t
" m* s; t  P" m3 M! n2 l             if(minute == 59) //当分钟到59的时响蜂鸣器
8 J' e6 p! L2 P1 [                {9 B, S2 P8 S2 |7 j! R
                     if(second >= 51) //隔一秒响一下
, @/ {3 Z( T. w$ K0 ?8 S                      {
, Z# `! X: V9 A                               SPK=0; /* 开蜂鸣器 */
0 i% b' G: [7 u) p                               DelayMs(1000);, X+ r4 n/ W, @
                              SPK=1; /* 关蜂鸣器 */" C. X$ v1 v* u: Z1 X
                              second++;
7 d" S" C# ?7 V+ S/ [8 Y                      }
+ a- C% v/ x! \+ F4 _$ ?$ g# Y                }       1 J# c7 U1 Z0 ?

6 `7 [9 ^* D0 x' z: e# Z. _             if(second==60)  //秒到60，分钟加1" b7 u( i1 W9 O  ^/ j' }; M
               {& l+ P) Z8 S6 q5 T1 C
                     second=0;       $ c0 E8 ]" N0 o
                     minute++;       ( U3 u1 ?5 h/ ~5 j- X3 [& g
                                       1 t  M+ {$ L" p
                     if(minute==60)//分钟到60，小时加16 v  w; q6 B8 k, @4 d
                              {
' ^9 N2 X: ?) v7 W                               minute=0;
0 M: [/ w# C' s3 x+ [
5 d, c$ O% i3 O                               SPK=1; /* 关蜂鸣器 */
. o" s2 \$ }0 S% C+ q
8 N2 ?9 s# x% p, T( K                               hour++;
) p3 @: g3 ~6 g4 Z
2 ]1 B( V& b7 b1 C' ~* G                               if(hour==24)//小时到24，回零- s/ m6 F8 X' ]
                                    hour=0;
! @' Y$ c2 f! C2 S" T) S( }                         }
; Z8 L7 J, N- s! p; x                      - s9 \  q8 v2 G3 p
               }
, F4 r3 U; J8 l. g. z
( V7 u3 M) i- x$ }4 a             }5 \/ p5 V% F2 K+ ^  T, \  F3 g  P
}
0 _* K5 _/ P, }; `2 n, j7 _; }3 V/ T0 Q  Q
" ]0 R% `! k( i( r* |
! u0 I6 i% Z  O& E" N$ }
8 `( }$ V' f3 s4 A/ j7 U; f
/*------------------------------------------------, p: C7 M% C; K1 P: w
按键扫描函数，返回扫描键值
, q/ ^; S3 O  o7 B/ E& }------------------------------------------------*/3 j1 b0 |2 }/ l, K
unsigned char KeyScan(void): O; M9 t; x+ Y6 o) |
{8 U' F- o* I- D4 `4 h
unsigned char keyvalue;$ Q2 z! [! X$ K. R' }' M
if(KeyPort!=0xff)
+ p- c$ A, N  ^1 c, u9 B" u/ W- a! i {. Z% S/ l2 h  h
DelayMs(10);
7 h4 \6 J- K& t" P8 y if(KeyPort!=0xff)
& b3 u8 A$ z  f, L% _* x7 u% E# j          {
! N+ X3 _& E! {' V          keyvalue=KeyPort;( y0 I2 B1 }! }# x; S: L

. r3 a2 ~- u) P5 r" t' t9 s" \          while(KeyPort!=0xff);0 I4 U% G6 r5 z, o! O
                     : }( Y" ?+ u, @3 i' B; Q% e' [6 J
                     switch(keyvalue)0 V: U% _/ E* ~0 ]
                     {
" B% {. {6 u1 z- d7 Z7 A+ W                      case 0xfe:return 1;break;  //单个按键控制. i8 N: B) P. j9 O8 t: Q
                     case 0xfd:return 2;break;
8 \( c' c) c0 l  B3 K% u4 |                      case 0xfb:return 3;break;
. H" E$ e0 Y- q7 i                      case 0xf7:return
6 t; {9 X  O/ N2 h
4 S. q  G( c0 S  ]' S1 V
! U! B% A! X$ e5 ~! P
) i6 q' }  a3 E/ O% y) U
4 ], P) b. ]  y2 D$ U  G# […………限于本文篇幅余下代码请从论坛下载附件…………, o5 Q0 ^& s: ]. X; C

游客，如果您要查看本帖隐藏内容请回复
, t0 J2 a4 d1 @0 F( i3 B

  Q# p* D$ G" s* D7 T