JMP·貝京
ORG？000BH
LJMP？T0INT
ORG？001BH
LJMP？T1INT
LEDD？EQU？30小時
LEDC？EQU 36H
SECC？EQU 37H
TCNT？EQU 3AH
ORG 0030H
；-
表:？；* * *陰極數碼管顯示碼表
DB 0FCH？；"0"?00H
DB 60H？；"1"?01H
DB 0DAH？；"2"?02H
DB 0F2H？；"3"?03H
DB 66H？；"4"?04H
DB 0B6H？；"5"?05H
DB 0BEH？；"6"?06H
DB 0E0H？；"7"?07H
DB 0FEH？；"8"?08H
DB 0F6H？；"9"?09H
DB 0EEH？；A。0AH
DB 3EH？；" B "0BH
DB 9CH？；" C "0CH
DB 7AH？；D。0DH
DB 9EH？；" E "0EH
DB 8EH？；F。0FH
DB 00H？；" "?10H
；？DB？3FH，06H，5BH，4FH，66H12345
；？DB？6DH，7DH，07H，7FH，；6789
；-
延遲:？
MOV·R6，第25位
DLY01:？
MOV R7，#100
DJNZ？R7，美元
DJNZ？R6，DLY01
浸水使柔軟
；-
開始:？
MOV SP，#5FH
MOV TMOD，#11H
MOV TH0，#3CH
MOV TL0，#0B0H
MOV TH1，#0F4H
MOV TL1，#48H
MOV·LEDC，第六名
MOV R0，#LEDD
CLR A
初始化:
MOV @R0，A
INC R0
DJNZ LEDC，初始化
SETB ET1
SETB TR1
MOV P2，#0
MOV TCNT，#0
MOV SECC，#0
SETB ET0
SETB電子藝界
MOV SECC，60號
LCALL DISSEC
SETB TR0
SETB TR1
循環:
SJMP元
；-
T1INT:
推送ACC
CLR TR1
MOV TH1，#0F4H
MOV TL1，#48H
SETB TR1
MOV·DPTR #表
MOV R0，#LEDD
LEDC MOV
T1INT0:
JNZ T1INT1
MOV P2，#01H
MOV A，@R0
MOVC A，@A+DPTR
CPL A
MOV P0，A
SJMP T1INTD
T1INT1:
MOV P2，#02H
INC R0
MOV A，@R0
MOVC A，@A+DPTR
CPL A
MOV P0，A
T1INTD:
LEDC公司
LEDC MOV
CJNE A，#2，T1INT6
T1INT6:
JC T1INTE
MOV LEDC，#0
T1INTE:
流行ACC
雷蒂
；-
HBCD:
MOV B，#10
分部AB
交換A
ORL A，B
浸水使柔軟
；-
T0INT:
推送ACC
CLR TR0
MOV TH0，#3CH
MOV TL0，#0B0H
SETB TR0
TCNT公司
TCNT MOV
CJNE A，#20，T0INT1
T0INT1:
JC T0INTE
MOV TCNT，#0
MOV A，SECC
十二月A
MOV·塞科
JNZ T0INT2
MOV SECC，60號
T0INT2:
LCALL DISSEC
T0INTE:
流行ACC
雷蒂
；-
剖析:
MOV A，SECC
我叫HBCD
推送ACC
ANL A，#0FH
MOV 30H，A
流行ACC
交換A
ANL A，#0FH
MOV 31H，A
浸水使柔軟
；-
結束？