ORG 00H
AJMP MAIN
ORG 03H
AJMP NT0
ORG 30H
MAIN: MOV P1,#00H
SETB P3.5
CLR P3.6
CLR P3.0
CLR P3.1
CLR 00H
CLR 01H
MOV 34H,#09H
MOV 35H,#09H
MOV R1,#04H
MOV R2,#05H
MOV R3,#0F8H
MOV DPTR,#TABLE
MOV TMOD,#01H
MOV IE,#81H
LOOP: JNB 01H,LOOP
MOV A,R4
MOV B,#10
DIV AB
MOV R0,A
MOV R1,B
ACALL DISP
DJNZ R3,LOOP
MOV R3,#0F8H
DEC R4
CJNE R4,#00,LOOP
SETB P3.6
ACALL DELAY1S
CLR P3.6
MOV R4,24H
AJMP LOOP
DISP: MOV A,R1
MOVC A,@A+DPTR
MOV P1,A
SETB P3.0
ACALL DELAY
CLR P3.0
MOV A,R0
MOVC A,@A+DPTR
MOV P1,A
SETB P3.1
ACALL DELAY
CLR P3.1
RET
NT0: CLR EX0
CLR ET0
CLR 01H
PUSH ACC
PUSH PSW
ACALL DIS1
KEY: JB P3.2,RETURN
KEY0: ACALL DIS1
JNB P3.2,KEY0
KEY2: JB P3.3,KEY3
ACALL DIS1
INC 34H
MOV A,34H
CJNE A,#0AH,KEY22
MOV 34H,#00H
KEY22: ACALL DIS1
JNB P3.3,KEY22
AJMP KEY2
KEY3: ACALL DIS1
JB P3.4,KEY1
INC 35H
MOV A,35H
CJNE A,#0AH,KEY33
MOV 35H,#00H
KEY33: ACALL DIS1
JNB P3.4,KEY33
AJMP KEY3
KEY1: ACALL DIS1
JB P3.2,KEY2
KEY10: ACALL DIS1
JNB P3.2,KEY10
ACALL BCDBIN
SETB 01H
RETURN: SETB EX0
SETB ET0
MOV R3,#0F8H
POP PSW
POP ACC
RETI
BCDBIN: MOV B,#10
MOV A,34H
MUL AB
ADD A,35H
MOV 24H,A
MOV R4,24H
RET
DIS1: MOV R0,#34H
MOV DPTR,#TABLE
MOV A,@R0
MOVC A,@A+DPTR
MOV P1,A
SETB P3.1
CLR P3.0
ACALL DELAY
CLR P3.1
INC R0
MOV A,@R0
MOVC A,@A+DPTR
MOV P1,A
SETB P3.0
ACALL DELAY
CLR P3.0
RET
DELAY: MOV R7,#19
D1: MOV R6,#25
D2: DJNZ R6,D2
DJNZ R7,D1
RET
DELAY1S:MOV R7,#20
DEL1: MOV R6,#100
DEL2: MOV R5,#248
DJNZ R5,$
DJNZ R6,DEL2
DJNZ R7,DEL1
RET
TABLE: DB 0C0H,0F9H,0A4H,0B0H,99H,92H, 82H ,0F8H,80H,90H
END
System_simulation.zip_倒计时仿真_共阳极 仿真
版权申诉
119 浏览量
2022-09-24
05:34:08
上传
评论 1
收藏 18KB ZIP 举报
四散
- 粉丝: 52
- 资源: 1万+
最新资源
- 实验二:IP协议分析.zip
- 驱动代码驱动代码驱动代码驱动代码
- SVID_20240523_141155_1.mp4
- Code for the complete guide to tkinter tutorial
- 关于百货中心供应链管理系统.zip
- SimpleFolderIcon-master 修改Unity的Project下的文件夹图标
- A python Tkinter widget to display tile based maps
- A pure Python library for adding tables to a Tkinter application
- Vector资源文件.zip
- MobaXterm-Installer
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈