8279时钟显示汇编程序(51单片机)

;-------------------------------------------------------
Z8279 EQU 0FF82H ;8279 状态/命令口地址
D8279 EQU 0FF80H ;8279 数据口地址
LEDMOD EQU 00H ;左边输入 八位字符显示
;外部译码键扫描方式,双键互锁
LEDFEQ EQU 2FH ;扫描速率
LEDCLS EQU 0C1H ;清除显示 RAM
LEDWR0 EQU 80H ;设定的将要写入的显示RAM地址
;-------------------------------------------------------

INIT8279: ;8279初始化子程序
PUSH DPH ;保存现场
PUSH DPL
PUSH ACC
LCALL DELAY ;延时
MOV DPTR ,#Z8279
MOV A,#LEDMOD ;置8279工作方式
MOVX @DPTR,A
MOV A,#LEDFEQ ;置键盘扫描速率
MOVX @DPTR,A
MOV A,#LEDCLS ;清除 LED 显示
MOVX @DPTR,A
LCALL DELAY ;延时
POP ACC ;恢复现场
POP DPL
POP DPH
RET
;显示字符子程序
;输入: R4,位置 R5,值
DISLED:
PUSH DPH ;保存现场
PUSH DPL
PUSH ACC
MOV A,#LEDWR0 ;置显示起始地址
ADD A,R4 ;加位置偏移量
MOV DPTR,#Z8279
MOVX @DPTR,A ;设定显示位置
MOV DPTR,#LEDSEG ;置显示常数表起始位置
MOV A,R5
MOVC A,@A+DPTR ;查表
MOV DPTR,#D8279
MOVX @DPTR,A ;显示数据
POP ACC ;恢复现场
POP DPL
POP DPH
RET
DELAY: ;延时子程序
PUSH 0 ;保存现场
PUSH 1
MOV 0,#0H
DELAY1:
MOV 1,#0H
DJNZ 1,$
DJNZ 0,DELAY1
POP 1 ;恢复现场
POP 0
RET


DISPLAY:
MOV A,R3
ANL A,#0FH
MOV R5,A
MOV R4,#6
LCALL DISLED ;显示小时低位
MOV A,R3
SWAP A
ANL A,#0FH
MOV R5,A
MOV R4,#7
LCALL DISLED ;显示小时高位
MOV A,R2
ANL A,#0FH
MOV R5,A
MOV R4,#3
LCALL DISLED ;显示分钟低位
MOV A,R2
SWAP A
ANL A,#0FH
MOV R5,A
MOV R4,#4
LCALL DISLED ;显示分钟高位
MOV A,R1
ANL A,#0FH
MOV R5,A
MOV R4,#0
LCALL DISLED ;显示秒低位
MOV A,R1
SWAP A
ANL A,#0FH
MOV R5,A
MOV R4,#1
LCALL DISLED ;显示秒高位
RET

END