qiangdaqi.asm

该程序是采用80C51 单片机作为控制核心而做成的八路抢答器的源程序（c语言版）

ORG 0000H
LJMP START
ORG 03H  ;外部中断0入口地址
LJMP KS
ORG 0013H  ;外部中断1入口地址
LJMP KS1
ORG 0030H
START: MOV IE,#85H  
       MOV IP,#04H
       CLR IT1
       CLR IT0
       MOV P1,#00H
       MOV P0,#0FFH
       CLR P3.0
       CLR P3.1
LOOP3: SJMP LOOP3         
KS1:      LCALL SHINE 
          LCALL RING             
SETB EX0   ;外部中断0允许
          MOV P1,#0   ;LED灯灭
          RETI
SHINE:   SETB P3.0      ;红灯D亮
         LCALL DLAY1
         CLR P3.0
         RET
RING:   MOV R3,#0FFH   ;LS1响铃
RING1:  CPL P3.1
        LCALL  DLAY
        DJNZ  R3,RING1
        CLR P3.1
        RET
KS:                      
 SHOW1:   JB P0.0 , SHOW2  
          MOV  P1 , #06H  ;显示选手1
          LCALL SHOW
          RETI
 SHOW2:   JB P0.1 , SHOW3
          MOV  P1 , #5BH  ;显示选手2
          LCALL SHOW
          RETI
 SHOW3:   JB P0.2,  SHOW4
          MOV  P1,  #4FH   ;显示选手3
          LCALL SHOW
          RETI
 SHOW4:   JB P0.3,  SHOW5
          MOV  P1,  #66H   ;显示选手4
          LCALL SHOW
          RETI
 SHOW5:   JB P0.4 , SHOW6
          MOV   P1 , #6DH  ;显示选手5
          LCALL SHOW
          RETI
 SHOW6:   JB  P0.5, SHOW7
          MOV   P1 ,  #7DH ;显示选手6
          LCALL SHOW
          RETI
 SHOW7:   JB  P0.6 , SHOW8
          MOV   P1 ,  #07H  ;显示选手7
          LCALL SHOW
          RETI
 SHOW8:   JB  P0.7,  SHOW1 ;显示选手8
          MOV  P1,   #7FH
          LCALL SHOW
          RETI
DLAY :   MOV R6,#30    
  DI:     MOV R7,#25
          DJNZ R7,$
          DJNZ R6,DI
          RET
DLAY1:    MOV R0,#255
  DI1:    MOV R1,#255
          DJNZ R1,$
          DJNZ R0,DI1
          RET
SHOW:     MOV IE,#84H   ;只允许响应主持人按键（中断1），禁止响应其他选手按键（中断0）
          MOV IP,#04H   ;设置主持人按键中断1为高优先级
          LCALL SHINE   ;选手选中亮灯并响铃提示
          LCALL RING
          RET