;==================================
;----不用中断,按一次LED亮,按两次SOS,按三次LED灭,按四次全灭
;==================================
;====淄博金峰电子科技==============
ORG 0000H
;====初始化========================
MOV R0, #00H
MOV P1, #0FFH
MOV P3, #0FFH
K1 EQU P3.0 ;定义P3.0为K1
LED EQU P1.0 ;定义P1.0为LED
SOS EQU P1.3 ;定义P1.3为SOS
;====主程序=========================
MAIN:
JNB K1, JIA
LCALL OUT
JMP MAIN
;====记录按键次数程序=============
JIA:
LCALL DELAY
JNB K1,$
LCALL DELAY
INC R0
LJMP MAIN
;====输出子程序===================
OUT:
MOV A,R0
OUT1:
CJNE A,#01,OUT2
CLR LED
RET
OUT2:
CJNE A,#02,OUT3
CLR SOS
RET
OUT3:
CJNE A,#03,OUT4
SETB LED
RET
OUT4:
CJNE A,#04,OUT5
OUT5:
SETB SOS
MOV R0,#00H
RET
;====延时子程序=====================
DELAY:
MOV R6,#255
L1: MOV R7,#248
DJNZ R7,$
DJNZ R6,L1
RET
END
按3次.rar
(3.81 KB, 下载次数: 1)
|