转载：超简单电子钟程序 C语言+汇编+原理图+学习心得

全套资料在压缩包里

;********************************
;单片机电子钟汇编程序
;MCU:AT89C2051 晶振:12M
;编写:舒新生 日期:2007.11.08
;手机:13073399262  QQ:625608148
;********************************
MIAO BIT P1.2;秒点位
HOU_S BIT P3.0 ;时十位
HOU_G BIT P3.1 ;时个位
MIN_S BIT P3.2 ;分十位
MIN_G BIT P3.3 ;分个位
H_KEY BIT P3.4 ;时调整键
M_KEY BIT P3.5 ;分调整键
SHAN BIT 0 ;秒点闪烁
LEDBUS EQU P1 ;显示数据总线
SECOND  EQU 30H ;秒寄存器
MINUTE  EQU  31H ;分寄存器
HOUR  EQU  32H ;时寄存器
TIM_1 EQU 33H ;定时器0中断次数
TIM_2 EQU 34H ;定时器0中断次数
;********************************
ORG  0000H  ;程序开始
LJMP  INIT  
ORG  000BH  ;定时器0中断入口地址  
LJMP  TIMER0
ORG  0030H  ;程序从30H开始
;********************************
; 单片机初始化
INIT: MOV  SECOND, #0 ;秒置0
MOV  MINUTE, #0 ;分置0
MOV  HOUR,  #0 ;开机后显示0点
MOV  TIM_1,  #10 ;中断10次为0.5秒
MOV  TIM_2,  #2 ;0.5*2=1秒
MOV  SP,  #60H ;堆栈指针指向60H
MOV  TMOD,  #01H ;定时器0为模式1(16位)
MOV  TH0,  #03CH
MOV  TL0,  #0B0H ;50毫秒初值(晶振12M)
SETB ET0  ;定时器0中断允许
SETB  TR0  ;启动定时器0
SETB EA  ;开总中断
;********************************
; 主程序
MAIN: JNB  H_KEY,  HT ;时调整键按下转到HT
JNB  M_KEY,  MT ;分调整键按下转到MT
ACALL  DISP  ;调用显示子程序
AJMP  MAIN  ;转LOOP继续检测按键状态
;********************************
; 时间调整
;-----  分调整  -----------------
MT: ACALL  DISP  ;调用显示子程序
JNB  M_KEY,  MT ;判断按键是否松开
INC  MINUTE  ;分加一
MOV  A,  MINUTE
CJNE  A,#60,  MAIN ;判断分是否加到60
MOV  MINUTE, #0 ;分到60变为0
MOV SECOND, #0 ;秒置0
AJMP  MAIN
;-----  时调整  -----------------
HT: ACALL  DISP  ;调用显示子程序
JNB  H_KEY,  HT ;判断按键是否松开
INC  HOUR  ;时加1
MOV  A,  HOUR
CJNE  A,#24,  MAIN
MOV  HOUR,  #0 ;判断时是否到24,时到24变0
AJMP  MAIN
;********************************
; 显示子程序
DISP: MOV  DPTR,  #LEDTAB ;数码管段码表首地址送DPTR
MOV  A,  MINUTE  ;分放入ACC
MOV  B,  #10 ;B放入10
DIV  AB  ;A/B,商在A余数在B
MOVC A,  @A+DPTR ;查表取分十位段码
MOV  LEDBUS, A ;段码送LEDBUS口显示
MOV C, SHAN
MOV MIAO, C ;秒点闪烁
CLR  MIN_S  ;打开分十位显示
ACALL  D1MS  ;延时1毫秒
SETB  MIN_S  ;关闭分十位显示
MOV  A,  B
MOVC  A,  @A+DPTR ;查表取分个位段码
MOV  LEDBUS, A
MOV C, SHAN
MOV MIAO, C ;秒点闪烁
CLR  MIN_G  ;打开分个位显示
ACALL  D1MS  ;延时1毫秒
SETB  MIN_G  ;关闭分十位显示
MOV  A,  HOUR
MOV  B,  #10
DIV  AB  ;拆分小时的十位和个位
JZ DISP0  ;十位为0不显示十位
MOVC  A,  @A+DPTR
MOV  LEDBUS, A
CLR  HOU_S  ;打开时十位显示
DISP0: ACALL  D1MS  
SETB  HOU_S  ;关闭时十位显示
MOV  A,  B
MOVC  A,  @A+DPTR
MOV LEDBUS, A
CLR  HOU_G  ;打开时个位显示
ACALL  D1MS
SETB  HOU_G  ;关闭时个位显示
RET
;********************************
; 定时器0中断服务程序
TIMER0: MOV  A,  #0B1H ;定时器0中断服务子程序
ADD  A,  TL0 ;同步修正(参考本人的<如何是自制的单片机电子钟走时精准>)
MOV  TL0,  A
MOV  TH0,  #03CH ;重装定时器0初值
PUSH  ACC  ;入栈保护ACC和PSW  
PUSH  PSW  
DJNZ  TIM_1,  RETI_1
MOV  TIM_1,  #10 ;中断10次为0.5秒
CPL  SHAN  ;取反闪烁位
DJNZ  TIM_2,  RETI_1
MOV  TIM_2,  #2 ;1秒时间到

INC  SECOND  ;秒加1
MOV  A,  SECOND
CJNE  A,#60,  RETI_1
MOV  SECOND, #0 ;秒到60变0

INC  MINUTE  ;分加1
MOV  A,  MINUTE
CJNE  A,#60,  RETI_1
MOV  MINUTE, #0 ;分到60变0

INC  HOUR  ;时加1
MOV  A,  HOUR
CJNE  A,#24,  RETI_1
MOV  HOUR,  #0 ;时到24变0
RETI_1: POP  PSW  ;出栈
POP  ACC
RETI
;********************************
; 延时子程序     
D1MS: MOV  R7,  #2 ;延时1毫秒子程序
D_1: MOV  R6,  #250 ;延时时间估算250*2*2=1000微秒=1毫秒
DJNZ  R6,  $
DJNZ  R7,  D_1
RET
;********************************
; 数码管段码表
LEDTAB: DB  14H,0D7H,4CH,45H,87H
  ; 0   1    2  3   4
DB 25H,024H,57H,04H,05H
  ; 5   6    7  8   9
END

http://www.51hei.com/bbs/skins/default/filetype/rar.gif 点击浏览该文件:电子钟.part01.rar
http://www.51hei.com/bbs/skins/default/filetype/rar.gif 点击浏览该文件:电子钟.part02.rar
http://www.51hei.com/bbs/skins/default/filetype/rar.gif 点击浏览该文件:电子钟.part03.rar
http://www.51hei.com/bbs/skins/default/filetype/rar.gif 点击浏览该文件:电子钟.part04.rar
http://www.51hei.com/bbs/skins/default/filetype/rar.gif 点击浏览该文件:电子钟.part05.rar

学习下！！

又是51的，我想要松翰的。

苦地动手术

皇后一大白天的天皇 砶原

是51的，想要松翰的。

没有啊~楼主骗人

这太老套了！！！！

学习一下！！！！！

我们的资讯栏那里有关于松翰的资讯，教程，大家可以去上面下载的啊