ORG 0000H ;在000H單元存放轉移指令
AJMP MAIN ;轉移到主程序
ORG 0003H ;主程序從0030H開始
LJMP ZD
ORG 0030H ;主程序從0030H開始
MAIN:
SETB EA ;開總中斷
SETB EX0 ;開中斷0
SETB IT0 ;設置中斷0的觸發方式為下降沿觸發
MOV P1,#00H ;數碼管顯示初值
SETB P2.0 ;
SETB P2.1
MOV R0,#00H ;開始計時顯示
MOV R1,#00H
MOV R2,#140
MOV R3,#0AH
MOV R4,#0AH
MOV DPTR,#TAB ;置共陽字段碼表首址
L0: MOV A,R0
MOVC A,@A+DPTR ;查段碼表
MOV P2,#040H
MOV P1,A
ACALL DELAY
MOV A,R1
MOVC A,@A+DPTR ;查段碼表
MOV P2,#80H
MOV P1,A
ACALL DELAY ;調用延時程序
DJNZ R2,L0
INC R0
MOV R2,#140
DJNZ R3,L0
MOV R0,#00H
MOV R3,#0AH
INC R1
DJNZ R4,L0
AJMP MAIN ;返回主程序
DELAY: ;誤差 -0.868055555556us
MOV R6,#0FBH ;延時程序
DL0:
MOV R5,#04H
DJNZ R5,$
DJNZ R6,DL0
RET
ZD:
MOV R0,#30
MOV R1,#200
MOV R2,#200
H:
DJNZ R0,H
MOV R0,#30
CPL P3.2
DJNZ R1,H
MOV R1,#200
DJNZ R2,H
MOV R0,#00H
MOV R1,#00H
MOV R2,#140
MOV R3,#0AH
MOV R4,#0AH
RETI
TAB: DB 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H,080H,090H ;
END
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
