|
ORG 0000H
LJMP MAIN
ORG 0030H
MAIN:
MOV P1,#00H
MOV P3,#0FFH
LOOP:
MOV P1,#00H
JNB P3.0,KEY1
JNB P3.1,KEY2
LJMP LOOP
KEY1:
ACALL DELAY10
JNB P3.0,ZUOYI
RET
KEY2:
ACALL DELAY10
JNB P3.1,YOUYI
RET
ZUOYI:
MOV P1,#7FH
MOV A,P1
LOOP1:
RR A
MOV P1,A
ACALL DELAY500
CJNE A,#0FEH,LOOP1
RET
YOUYI:
MOV P1,#0FEH
MOV A,P1
LOOP2:
RL A
MOV P1,A
ACALL DELAY500
CJNE A,#7FH,LOOP2
RET
DELAY500:
MOV R7,#0CDH
DL1:
MOV R6,#74H
DL0:
MOV R5,#09H
DJNZ R5,$
DJNZ R6,DL0
DJNZ R7,DL1
RET
DELAY10:
MOV R4,#05H
DL3:
MOV R3,#04H
DL2:
MOV R2,#0F8H
DJNZ R2,$
DJNZ R3,DL2
DJNZ R4,DL3
RET
END |
|