备份.asm

PROTEUS 仿真 4人抢答器 汇编语言编程 学校课程设计

      ORG  0000H
      SJMP  MAIN
      ORG  0030H

MAIN:  MOV  P1,#0FH     ;清零
       ;SETB  P1.7       ;灯亮
LP:    MOV  P0,#71H
       CALL  DELAY
       JNB  P1.0,QD1    ;扫描
       JNB  P1.1,QD2
       JNB  P1.2,QD3
       SJMP  LP
QD1:   SETB  P1.4
       CLR  P1.7
       MOV  P0,#06H
       CALL  DELAY
       JNB  P1.3,MAI
       SJMP  QD1
QD2:   SETB  P1.5
       CLR  P1.7
       MOV  P0,#5BH
       CALL DELAY
       JNB  P1.3,MAI
       SJMP  QD2
QD3:   SETB  P1.6
       CLR  P1.7
       MOV  P0,#4FH
       CALL  DELAY
       JNB  P1.3,MAI
       SJMP  QD3
MAI:   MOV  P1,#0FH
       SETB P1.7
       SJMP LP 

DELAY:  MOV  R6,#20       ;20*50*2=2MS
D1:     MOV  R7,#50
        DJNZ  R7,$
        DJNZ  R6,D1
        RET
END