八路声光指示抢答器部分源程序
;****八路声光指示抢答器程序****
;------------------------------
ORG 0000H
N: MOV P1,#40H
MOV P2,#0FEH
MOV P3,#0FFH
Q: JB P3.7,Q1
N1:LCALL YSCX
MOV P1,#80H
CLR P2.0
LCALL YSCX
MOV P1,#0FFH
SETB P2.0
JNB P2.2 , N
LJMP N1
Q1: JB P3.6,Q2
N2:LCALL YSCX
MOV P1,#0F8H
CLR P2.0
LCALL YSCX
MOV P1,#0FFH
SETB P2.0
JNB P2.2 , N
LJMP N2
Q2: JB P3.5,Q3
……
……
……
;****延时子程序*******
YSCX:MOV R3,#0C3H
L: MOV R2,#00H
L1: NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
DJNZ R2,L1
NOP
NOP
DJNZ R3,L
RET
END
本文含有来自论坛的附件或图片点击查看原帖附件。
本文来自论坛,点击查看完整帖子内容。