单片机制作的电子秒表源程序.doc

;============================================================== ; 文件名称: KeyScan.Asm ; 功能描述: 8255扩展IO, 完成键盘及数码管显示实验. ; 按下按键, 数码管显示相应键值. ;============================================================== A_8255 EQU 7F00H ;8255端口定义 B_8255 EQU 7F01H C_8255 EQU 7F02H CON_8255 EQU 7F03H COUNT DATA 20H ORG 0000H LJMP MAIN ORG 000BH LJMP TIME0 MAIN: MOV A, #81H MOV DPTR, #CON_8255 ;8255控制端口 MOVX @DPTR, A ;写入控制字 ;CLOSE ALL SEG MOV A,#0FFH ;关闭显示 MOV DPTR,#A_8255 MOVX @DPTR,A ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;定时器初始化 MOV TMOD,#01H MOV TH0,#0B0H MOV TL0,#3CH SETB ET0 SETB EA SETB TR0 MOV COUNT,#14H MOV 30H,#00H ;30H~32H SAVE SECOND,MINUTE,HOUR MOV 31H,#00H ;30H~32H SAVE SECOND,MINUTE,HOUR MOV 32H,#00H ;30H~32H SAVE SECOND,MINUTE,HOUR BEGIN: LCALL DIS ;调用显示子程序 ;判是否有键按下 LJMP BEGIN DIS: PUSH ACC ;显示子程序 PUSH 00H PUSH 03H ;MOV R0,#00H ;MOV R3,#0DFH ;显示扫描值 AGAIN: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;FIRST SEG DISPLAY MOV A,30H ;a存放表内偏移地址 MOV B,#10 DIV AB ;MOV A,B MOV DPTR,#DSEGS ;数码管段表地址，dptr存放表的首地址 MOVC A,@A+DPTR ;查表 MOV DPTR,#B_8255 ;送段显示 MOVX @DPTR,A MOV A,#0EFH ;SELECT FIRST SEG MOV DPTR,#A_8255 MOVX @DPTR,A ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;SECOND SEG DISPLAY ACALL DL3MS MOV A,B MOV DPTR,#DSEGS ;数码管段表地址，dptr存放表的首地址 MOVC A,@A+DPTR ;查表 MOV DPTR,#B_8255 ;送段显示 MOVX @DPTR,A MOV A,#0DFH ;SELECT FIRST SEG MOV DPTR,#A_8255 MOVX @DPTR,A ACALL DL3MS OUT: POP 03H POP 00H POP ACC RET ;数码管段显示值 DSEGS: DB 03FH, 06H,05BH,04FH,066H,06DH,07DH, 07H DB 07FH,06FH,077H,07CH,039H,05EH,079H,071H DL1MS: MOV R7,#01H DL0: MOV R6,#080H DL1: DJNZ R6,DL1 DJNZ R7,DL0 RET DL3MS: MOV R7,#03H DL03: MOV R6,#080H DL13: DJNZ R6,DL13 DJNZ R7,DL03 RET ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; TIME0: PUSH ACC MOV TH0,#0B0H MOV TL0,#3CH DJNZ C