八路智能抢答器设计
LCALL DE0 L14:INC R2
JB P1.7,L15 LCALL DE0
L15:LJMP L16 ;读行列式键盘 ESS1:MOV 70H,#30D ;外部中断1 MOV R7,#0CH CLR P3.0 S2:LCALL DELAY DJNZ 70H,S2
SETB P3.0 ;蜂鸣器提示开始抢答 MOV TMOD,#00010000B MOV R3,#0AH L20:MOV 55H,#14H L19:MOV TH0,#3CH
MOV TL0,#0B0H ;定时器1初始化 SETB TR1 ;启动定时器1 MOV A,R3 MOV B,#0AH DIV AB
MOV DPTR,#TAB MOVC A,@A+DPTR MOV 53H,A LCALL DELAY1 SETB P2.4 MOV A,B
MOVC A,@A+DPTR MOV 54H,A CLR P2.5
MOVC A,@A+DPTR MOV 54H,A CLR P2.5 MOV P0,54H LCALL DELAY1 SETB P2.5 L18:JNB TF1,L18
D6:CJNE R3,#0FFH,L21 LJMP L22
L21:LJMP L20 ;抢答倒计时 L22:MOV 73H,#02D S5:MOV 70H,#20D MOV 71H,#20H CLR P3.0 S4:LCALL DELAY
13
八路智能抢答器设计
DJNZ 70H,S4 SETB P3.0 S6:LCALL DELAY DJNZ 71H,S6
DJNZ 73H,S5 ;抢答倒计时时间到声音提示 D5:RETI
DE0:MOV DPTR,#TAB ;抢答违规报警并显示抢答违规组号 MOV A,R2 MOV B,#0A S10:MOV 72H,#20D MOV 73H,#10D CLR P3.0 S8:LCALL LCC DJNZ 72H,S8 SETB P3.0 S9:LCALL LCC DJNZ 73H,S9 DJNZ 71H,S10 L17:LCALL LCC LJMP L17 LCC:CLR P2.4 MOV P0,50H LCALL DELAY
DELAY1:MOV P1,#0FFH ;正常抢答读键 W0:INC R2
JB P1.5,W1 LCALL DE1 W1:INC R2
JB P1.6,W2 LCALL DE1 W2:INC R2
JB P1.7,W3 LCALL DE1 W3:SETB P1.0 CLR P1.1 INC R2
JB P1.4,W4 LCALL DE1 W4:INC R2
JB P1.5,W5 LCALL DE1 W5:INC R2
JB P1.6,W6 LCALL DE1
14
八路智能抢答器设计
W6:INC R2
JB P1.7,W7 LCALL DE1 W7:SETB P1.1 CLR P1.2 INC R2
JB P1.4,W8 LCALL DE1 W8:INC R2
JB P1.5,W9 LCALL DE1 W9:INC R2
JB P1.6,W10 LCALL DE1 W10:INC R2
JB P1.7,W11 LCALL DE1 W11:SETB P1.2 CLR P1.3 INC R2
JB P1.4,W12 LCALL DE1 W12:INC R2
JB P1.5,W13 LCALL DE1 W13:INC R2
JB P1.6,W14 LCALL DE1 W14:INC R2
JB P1.7,W15 LCALL DE1 W15:DJNZ R4,W16 LJMP W18 W16:LJMP W17 W18:RET
DE1:MOV P1,#0FFH ;抢答成功声音提示及回答问题时间20秒倒计时 MOV 70H,#20D CLR P3.0 S3:LCALL DELAY DJNZ 70H,S3 SETB P3.0 SETB P2.0 SETB P2.1
MOV DPTR,#TAB
15
八路智能抢答器设计
MOV A,R2 MOV A,B
MOVC A,@A+DPTR MOV 57H,A
MOV TMOD,#00000001B MOV R5,#16H L32:MOV R6,#14H L31:MOV TH0,#3CH MOV TL0,#0B0H SETB TR0 CLR P2.4 MOV P0,56H LCALL DELAY SETB P2.4 CLR P2.5 MOV P0,57H LCALL DELAY SETB P2.5
CJNE R5,#14H,L34 LJMP L35 L34: JC L35 LJMP L30 L35: MOV A,R5 MOV B,#0AH DIV AB
MOVC A,@A+DPTR MOV 58H,A MOV A,B
MOVC A,@A+DPTR MOV 59H,A CLR P2.6 MOV P0,58H LCALL DELAY SETB P2.6 CLR P2.7 MOV P0,59H LCALL DELAY SETB P2.7 L30:JNB TF0,L30 CLR TF0
DJNZ R6,L31 DEC R5
CJNE R5,#0FFH,L32 MOV P1,#0FFH
16