ORG 0000H SJMP MAIN ORG 000BH LJMP DVT0 ;定时器T0中断 ORG 0030H MAIN: MOV SP ,#50H ;设置堆栈区 MOV 31H,#0 MOV 30H,#0 ;计数单元清零 MOV 7AH,#10 MOV 7BH,#10 MOV 7CH,#10 MOV 7DH,#10 ;复位状态字型码送缓冲区 MOV 01H,#14H MOV TMOD,#51H ;设置T0、T1工作方式字 MOV TH0,#3CH MOV TL0,#0B0H MOV TH1,#0 MOV TL1,#0 ;T0、T1置初值 LOOP1: LCALL DISPLAY ;重复显示、查键 LCALL KEY CLR C CJNE A,#0FH,LOOP2 LOOP2: JNC LOOP1 CJNE A,#00H,LOOP3 ;启动键没被按下 SETB ET0 SETB TR0 SETB EA SETB TR1 LJMP LOOP1 LOOP3: CJNE A,#01H,LOOP4 ;停止键没被按下 CLR TR1 CLR TR0 CLR ET0 CLR EA LJMP LOOP1 LOOP4: CJNE A,#02H,LOOP1 ;复位键没被按下 . LJMP MAIN DVT0: PUSH PSW ;T0中断程序 PUSH ACC ;相关内容入栈保护 MOV TH0,#3CH MOV TL0,#0B0H ;T0重装初值 DJNZ 01H,RTN ;1s定时未到 MOV 01H,#14H CLR ET0 CLR TR1 CLR EA CLR TR0 MOV 31H,TH1 MOV 30H,TL1 MOV TH1,#0 MOV TL1,#0 ;计数器T1清零,准备下一轮计数 LCALL HEX_BCD LCALL DISPLAY SETB ET0 SETB TR1 SETB EA SETB TR0 RTN: POP ACC POP PSW RETI
HEX_BCD: ;数码转化子程序 PUSH PSW SETB RS0 SETB RS1 MOV A,30H MOV B,#60 MUL AB MOV 31H,B MOV 30H,A LCALL EXCH ;二进制到BCD码的转化 MOV A,33H ;以下是将转化后的BCD码存入相应缓冲区 ANL A,#0FH MOV 7BH,A MOV A,33H SWAP A ANL A,#0FH MOV 7AH,A MOV A,32H ANL A,#0FH MOV 7DH,A MOV A,32H SWAP A ANL A,#0FH MOV 7CH,A CLR RS0 CLR RS1 POP PSW RET EXCH: MOV 40H,#0 MOV 41H,#0 MOV R7,#10H LP1: MOV R0,#30H MOV R6,#2 CLR C LP2: MOV A,@R0 RLC A MOV @R0,A INC R0 DJNZ R6,LP2 MOV R1,#41H MOV R5,#02H LP3: MOV A,@R1 ADDC A,@R1 DA A MOV @R1,A DEC R1 DJNZ R5,LP3 DJNZ R7,LP1 MOV 33H,40H MOV 32H,41H RET KEY: PUSH PSW ; 按键扫描子程序 JB P3.0,X1 LCALL DISPLAY ;延时去抖 JB P3.0,X1 MOV A,#0 SJMP X4 X1: JB P3.1,X2 LCALL DISPLAY JB P3.1,X2 MOV A,#1 SJMP X4 X2: JB P3.2,X3 LCALL DISPLAY JB P3.2,X3 MOV A,#2 SJMP X4 X3: MOV A,#0FH X4: POP PSW RET DISPLAY: PUSH ACC ;显示子程序 PUSH PSW ;A,PSW入栈 SETB RS1 SETB RS0 MOV DPTR,#TAB MOV R0,#7AH MOV R6,#0FEH ;扫描显示初始化 NEXT: MOV A,@R0 ;四位轮流扫描显示 MOVC A,@A+DPTR MOV P0,A MOV A,R6 MOV P2,A LCALL DELAY MOV P2,#0FFH ;显示中的消隐处理 INC R0 RL A MOV R6,A CJNE R6,#0EFH,NEXT POP PSW POP ACC RET DELAY: MOV R4,#4 ;软件延时1ms DLY: MOV R7,#123 DJNZ R7,$ DJNZ R4,DLY RET TAB: DB 0C0H ;0 ;字形编码表 DB 0F9H ;1 DB 0A4H ;2 DB 0B0H ;3 DB 99H ;4 DB 92H ;5 DB 82H ;6 DB 0F8H ;7 DB 80H ;8 DB 90H ;9 DB 0BFH ;- END
这是不是你自己写的程序?
把里面的全角标点逗号(,)、分号(;)都换过来,变成半角符号。可以使用“查找、替换”方法,免得有遗漏。
CLR RS0 CLR RS1 POP PSW PSW入栈保护,RS0、RS1没有必要再恢复。PSW出栈就已经恢复了。
|