📄 stktest.asm
字号:
POWER EQU P3.0
PUS EQU P3.1
LED1 EQU P3.2
LED2 EQU P3.3
LED_OK EQU P3.4
LED_ER EQU P3.5
KEY EQU P3.0
P_R EQU P1.0
P_IO EQU P1.1
C1_IO EQU P1.2
C2_IO EQU P1.3
P_VDD EQU P1.4
A_CLK EQU P1.5
M_VCC EQU P1.6
C_R EQU P1.7
LER1 EQU 30H;
LER2 EQU 31H;
LER3 EQU 32H;
LER4 EQU 33H;
COUN1 EQU 34H;
COUN2 EQU 35H;
COUN3 EQU 36H;
DJJ1 EQU 37H;
DJJ2 EQU 38H
TT1 EQU 39H;
TT2 EQU 3AH
ORG 00H
LJMP MAIN
LJMP MAIN
ORG 30H;////////////////////////
DELAY: MOV DJJ1,A
MOV DJJ2,#0A7H
DELAY1:
NOP
NOP
NOP
NOP
DJNZ DJJ2,DELAY1
MOV DJJ2,#0A7H
DJNZ DJJ1,DELAY1
NOP
NOP
RET
MAIN:
NOP
MOV IE,#00H
MOV SP,#50H
MOV P1,#0FFH
MOV P3,#0FFH
MOV COUN1,#3H
MOV COUN2,#0H
START:
NOP
NOP
NOP
NOP
NOP
NOP
STTT1:; JB KEY1,$
MOV P3,#0FFH
MOV TT1,#00H
MOV TT2,#00H
MOV A,#0FFH
MOV P1,A
STTT2:
JB KEY,STTT1 ;按下按键继续
DJNZ TT1,STTT2
MOV TT1,#5H
DJNZ TT2,STTT2
CLR P3.7
SETB P3.1
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0FBH;
CJNE A,#0FBH,TEST_ER ;//都通
SETB P3.7
CLR P3.1
MOV P1,#7FH
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#7BH;FH
CJNE A,#7BH,TEST_ER
MOV P1,#0BFH
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0BBH;FH
CJNE A,#0BBH,TEST_ER
MOV P1,#0DFH
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0DBH;FH
CJNE A,#0DBH,TEST_ER
MOV P1,#0EFH
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0EBH;FH
CJNE A,#0EBH,TEST_ER
MOV P1,#0F7H
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0F3H;7H
CJNE A,#0F3H,TEST_ER
; MOV P1,#0FBH
; MOV A,#10
; CALL DELAY
; MOV A,P1
; ANL A,#0FBH
; CJNE A,#0FBH,TEST_ER
MOV P1,#0FDH
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0F9H;DH
CJNE A,#0F9H,TEST_ER
MOV P1,#0FEH
MOV A,#20
CALL DELAY
MOV A,P1
ANL A,#0FAH;EH
CJNE A,#0FAH,TEST_ER
JMP NORMAL
NORMAL:
;MOV A,#0DFH
;MOV P3,A
CLR P3.5
LJMP ST1
TEST_ER:
;MOV A,#0EFH
;MOV P3,A
CLR P3.4
LJMP ST1
ST1:; JB KEY1,$
MOV TT1,#00H
ST2:
JNB KEY,ST1 ;按下按键继续
DJNZ TT1,ST2
LJMP START
END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -