;==================================
;----不用中斷,按一次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)
2024-8-11 20:28 上傳
點擊文件名下載附件
|