数码管动态显示汇编程序例子.doc

;数码管动态显示汇编程序例子，显示12(时)38(分) H10 EQU 65H H1 EQU 66H M10 EQU 67H M1 EQU 68H SHOUR EQU 69H SMIN EQU 6AH DISH10 EQU 6FH DISH1 EQU 70H DISM10 EQU 71H DISM1 EQU 72H MEMA EQU 75H MEMB EQU 79HORG 0000H AJMP STARORG 0030H;数码管数据表格TAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H DB 90H,88H,83H,0C6H,0A1H,86H,8EH ;0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F ORG 0050HSTAR: MOV SHOUR,#12; 设为12时 MOV SMIN,#38; 设为38分 MOV MEMA,#0 MOV MEMB,#0 MOV SP,#30H MOV PSW,#00H ;#MAIN: MOV SP,#30H MOV PSW,#00H MOV MEMA,SHOUR MOV MEMB,SMIN ACALL TLED; 把要显示的数转换成数码管代码 ACALL DISPLAY; 显示小时,分钟 MOV P0,#0FFH MOV P1,#0FFH AJMP MAIN;# ; 显示小时,分钟 DISPLAY:MOV P0,DISH10 MOV P1,#11111110B ACALL D1MS MOV P0,DISH1 MOV P1,#11111101B ACALL D1MS MOV P0,DISM10 MOV P1,#11111011B ACALL D1MS MOV P0,DISM1 MOV P1,#11110111B ACALL D1MS RET;# ; 把要显示的数转换成数码管代码TLED: MOV P0,#0FFH MOV A,MEMA MOV B,#10 DIV AB MOV H10,A MOV H1,B MOV A,MEMB MOV B,#10 DIV AB MOV M10,A MOV M1,B MOV A,H10 MOV DPTR,#TAB MOVC A,A+DPTR MOV DISH10,A MOV A,H1 MOV DPTR,#TAB MOVC A,A+DPTR MOV DISH1,A MOV A,M10 MOV DPTR,#TAB MOVC A,A+DPTR MOV DISM10,A MOV A,M1 MOV DPTR,#TAB MOVC A,A+DPTR MOV DISM1,A RET;#;延时D1MS: MOV R7,#0AHLOOP1: MOV R6,#32HLOOP2: DJNZ R6,LOOP2 DJNZ R7,LOOP1 RET用AT89C51实验板的两位数码管显示0099依次循环的汇编语言程序a_bit equ 20h ;数码管个位数存放内存位置b_bit equ 21h ;数码管十位数存放内存位置temp equ 22h ;计数器数值存放内存位置 star: mov temp,#0 ;初始化计数器,从0开始stlop: acall display;调用显示子程序inc temp;对计数器加1mov a,tempcjne a,#100,next ;判断计数器是否满100?mov temp,#0;满100就清零重新开始next: ljmp stlop;不满就循环执行;显示子程序display: mov a,temp ;将temp中的十六进制数转换成10进制mov b,#10 ;10进制/10=10进制div abmov b_bit,a ;十位在amov a_bit,b ;个位在bmov dptr,#numtab ;指定查表启始地址mov r0,#4dpl1: mov r1,#250 ;dplop: mov a,a_bit ;取个位数MOVC A,A+DPTR ;查个位数的7段代码mov p0,a ;送出个位的7段代码clr p2.7 ;开个位显示acall d1ms ;显示162微秒setb p2.7;关闭个位显示,防止鬼影mov a,b_bit ;取十位数MOVC A,A+DPTR ;查十位数的7段代码mov p0,a ;送出十位的7段代码clr p2.6 ;开十位显示acall d1ms ;显示162微秒setb p2.6;关闭十位显示,防止鬼影djnz r1,dplop ;循环执行250次djnz r0,dpl1 ;循环执行250X4=1000次ret;2+2X80=162微秒,延时按12MHZ计算D1MS: MOV R7,#80DJNZ R7,$RET;实验板上的7段数码管09数字的共阴显示代码numtab: DB 0CFH,03H,5