又是新的一天
已有 277 次閱讀2017-4-30 10:01
ORG 00H
JMP MAIN
ORG 0BH
JMP TIM_LOW
MAIN:
MOV IE,#82H ;
MOV TMOD,#01H ;
MOV TH0,#0B1H ;
MOV TL0,#0E0H
SET_HIGH:
SETB TR0
CLR P0.0
CALL key
JMP SET_HIGH
/////////////////////
key:
JB P1.4,key_END
CALL FILTER
JNB P1.4,$
MOV A,R2
ADD A,#60 ;
MOV R2,A
key_END:
RET
FILTER:
MOV R3,#60
F1: MOV R4,#248
DJNZ R4,$
DJNZ R3,F1
RET
TIM_LOW:
SETB P0.0
CALL DELAY
MOV TH0,#0B1H
MOV TL0,#0E0H
RETI
//////////////////////////////////////////////////////
DELAY:
MOV R1,#248
DJNZ R1,$
DJNZ R2,DELAY
RET
END