|
|
ORG 0000H
AJMP START
ORG 0003H
LJMP EINT0
ORG 000BH
LJMP ITT0
ORG 0030H
START:MOV SP,#60H
MOV R0,#00H
MOV R1,#00H
CLR P1.5
CLR P1.6
CLR P1.7
MOV TMOD,#01H
MOV TL0,#0ffH
MOV TH0,#0ffH
SETB EA
SETB EX0
SETB ET0
CLR IT0
SETB TR0
MOV DPTR,#TAB
MOV 40h,#0
MOV 41h,#0
LED:SETB P1.1
CLR P1.2
MOV A,40H
MOVC A,@A+DPTR
MOV P0,A
LCALL TTS
CLR P1.1
SETB P1.2
MOV A,41H
MOVC A,@A+DPTR
MOV P0,A
LCALL TTS
CLR P1.2
LJMP LED
ORG 2000H
ITT0:CPL P1.5
JNB P1.5,Z1
MOV A,#0FFH
SUBB A,R0
MOV TH0,A
SETB TR0
RETI
Z1:MOV TH0,R0
SETB TR0
RETI
EINT0:CLR EX0
MOV A,#0FFH
MOV P2,A
MOV A,P2
JNB ACC.0,JIA
JNB ACC.1,JIAN
JNB ACC.2,ZZ
JNB ACC.3,FF
JNB ACC.4,TZ
AJMP QQ
AJMP QQ
JIA:CJNE R0,#0FFH, BB
BB:MOV A,R0
ADD A,#5
MOV R0,A
AJMP QQ
JIAN:CJNE R0,#00,MM
AJMP QQ
MM:MOV A,R0
SUBB A,#5
MOV R0,A
AJMP QQ
QQ:MOV A,R0
MOV B,#5
DIV AB
MOV B,#10
DIV AB
MOV 40H,A
MOV 41H,B
SETB EX0
LCALL TTS
LCALL TTS
LCALL TTS
LCALL TTS
RETI
ZZ:SETB P1.6
CLR P1.7
LCALL TTS
LCALL TTS
LCALL TTS
SETB EX0
RETI
FF:CLR P1.6
SETB P1.7
LCALL TTS
LCALL TTS
LCALL TTS
SETB EX0
RETI
TZ:CLR P1.6
CLR P1.7
LCALL TTS
LCALL TTS
LCALL TTS
SETB EX0
RETI
TTS:MOV R3,#0E0H
TT1S:MOV R4,#30H
TT0S:DJNZ R4,TT0S
DJNZ R3,TT1S
RET
TAB:DB 40H,79H,24H,30H,19H
DB 12H,02H,78H,00H,10H
END
|
-
-
電機(jī).zip
2019-12-28 18:36 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
28.75 KB, 下載次數(shù): 4, 下載積分: 黑幣 -5
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
