部分单片机程序.docVIP

K1 BIT P3.2 K2 BIT P3.3 K3 BIT P3.4 K4 BIT P3.5 DISP_DIGIT EQU 30H ;位选通控制位, 传送到P2口，用于打开相应的数码管 ;如等于FEH时，P2.0为0，第1个数码管得电显示 DISP_SEL EQU 31H ;显示位数计数器，显示程序通过它知道正在显示哪一位数码管 HOUR EQU 32H ;小时缓冲区 MIN EQU 33H ;分钟缓冲区 SEC EQU 34H ;秒缓冲区 T1_COUNT EQU 35H ;定时器T1中断次数计数器,计满100次后,秒加1 DISP_BUF EQU 36H ;显示缓冲区首地址 ORG 0000H ;程序从0000H开始 AJMP MAIN ;跳转到主程序MAIN ORG 0000BH ;定时器T0中断服务程序入口地址 LJMP TIME0 ;跳转到定时器T0中断服务程序 ORG 0001BH ;定时器T1中断服务程序入口地址 LJMP TIME1 ;跳转到定时器T1中断服务程序 ORG 030H ;主程序从030H开始 ;以下是主程序 MAIN: MOV SP, #70H ;堆栈指针指向70H MOV P0,#0FFH ;P0口置1 MOV P2,#0FFH ;P2口置1 MOV HOUR,#12 ; 小时单元赋初值 MOV MIN,#0 ;分钟单元赋初值 MOV SEC,#0 ;秒单元赋初值 MOV T1_COUNT,#0 ;定时器中断T1计数器清0 MOV DISP_DIGIT,#0FEH ;位选通控制位赋初值FEH,即先选通第1只数码管 MOV DISP_SEL,#0 ;显示位数计数器清0 MOV DISP_BUF +2,#10 ;第3位数码管显示-（-显示码为0BFH，位于第10位） MOV DISP_BUF +5,#10 ; 第6位数码管显示- ACALL T0T1_INIT ;调定时器T0、T1初始化子程序 START: ACALL CONV ;调转换子程序 JB K1,K1_NEXT ;若K1未按下，跳转到K1_NEXT ACALL BEEP_ONE ;调蜂鸣器响一声子程序 ACALL KEY_PROC ;K1键按下时，调按键处理子程序 AJMP START K1_NEXT: JB K2,K2_NEXT ; 若K2未按下，跳转到K2_NEXT AJMP START ; 跳转到START K2_NEXT: JB K3,K3_NEXT ; 若K3未按下，跳转到K3_NEXT AJMP START ; 跳转到START K3_NEXT: JB K4,K4_NEXT ; 若K4未按下，跳转到K4_NEXT K4_NEXT: AJMP START ;跳转到START继续循环 ;以下是定时器T0、T1初始化子程序 T0T1_INIT: MOV TMOD,#11H ;定时器T0、T1均设定为工作方式1 MOV TH0,#0F8H ;定时器T0计数初值高位（定时时间为2ms） MOV TL0,#0CCH ;定时器T0计数初值低位（定时时间为2ms） MOV TH1,#0DCH ;定时器T1计数初值高位（定时时间为10ms） MOV TL1,#00H ;定时器T1计数初值低位（定时时间为10ms） SETB EA ;开总中断 SETB ET0 ;允许定时器T0中断 SETB ET1 ;允许定时器T1中断 SETB TR0 ;启动定时器T0 SETB TR1 ;启动定时器T1 RET ;以下是转换子程序 CONV: MOV A,HOUR ;小时缓冲区内容送A MOV B,#10 ;16进制转换为10进制 DIV AB ;A除以B，商存于A，余数存于B MOV DISP_BUF,A ;将小时十位数送DISP_BUF MOV A,B ;将小时个位数送A MOV DISP_BUF+1,A ;将小时个位数送DISP_BUF+1 MOV A,MIN ;分钟缓冲