ORG 0H ;程序从程序存储器的0单元开始存放
AJMP MAIN ;跳转到主程序
ORG 20H ;主程序从程序存储器的30H单元开始存放
MAIN: MOV 30H,#0 ;给30H单元赋初始值0
LOOP: INC 30H ;30H单元内的数加1
MOV R1,30H ;将30H单元内的数赋值给R1,以便应用 CJNE Rn,#DATA,REL语言判断并跳转
CJNE R1,#10,NEXT ;若30H内的数不是10则跳转到调用显示
MOV 30H,#0 ;若30H内的数是10,则清零
NEXT: ACALL DISPLAY ;调用显示子程序
ACALL L2025
SJMP LOOP ;跳转到加1部分,循环
DISPLAY:MOV R2, #8
MOV R0,#30H ;将显示数据的存放首单元赋值给R0,以便调用循环将数值赋值给A
MOV DPTR,#TABLE ;将显示码的首地址赋值给DPTR
DISLOP: MOV A,@R0 ;将以R0内的数30H内的数值赋值给A
MOVC A,@A+DPTR ;查表语句,将显示码赋值给A
DP2: RLC A ;带进位标志的左移操作
MOV P1.0,C ;串行输出一位段码数据
CLR P1.1 ;
SETB P1.1 ;来个上升沿以产生移位时钟, 每次来这个脉冲,移位寄存器上的数往后面移动一位,原来A=1,
DJNZ R2,DP2
RET
;子程序返回
L2025: MOV R6,#28H ; 延时子程序
L2027: MOV R7,#0F9H
L2029: DJNZ R7,$
DJNZ R6,L2027
DJNZ R5,L2025
RET
TABLE:
DB 40H,79H,24H,30H,19H, 12H,02H,78H,00H,10H
END ;程序结束
|