zxc.asm

用单片机实现火灾检测的汇编源程序

         ORG   0000H
         LJMP  START
        
         ORG   30H   
START:   SETB  P1.1
         CLR   P1.0
         
         MOV   R0,#51H
         MOV   R5,#02H
         MOV   A,#00H
         MOV   DPTR,#7FF8H
LH1:     MOVX  @DPTR,A
         ;SETB  P3.3
TEST1:     JB  P3.3,TEST1       
           MOVX  A,@DPTR
           MOV   R4,#08H
           MOV   R1,#60H
           MOV   R6,A
JH:       ANL   A,#01H
           MOV   @R1,A
           INC   R1
           MOV   A,R6
           RR   A
           MOV   R6,A
           DJNZ  R4,JH
           CLR  C
           MOV  R7,60H
           CJNE  R7,#00H,ZL1 
           CLR   C
           MOV   ACC.7,C 
           SJMP  ZL2
ZL1 :       SETB   C
           MOV   ACC.7,C
          
ZL2:      CLR  C
           MOV  R7,61H
           CJNE  R7,#00H,ZL3
           CLR   C
           MOV   ACC.6,C 
           SJMP  ZL4
ZL3:       SETB   C
           MOV   ACC.6,C 
ZL4:      CLR  C
          MOV  R7,62H
           CJNE  R7,#00H,ZL5
           CLR   C
           MOV  ACC.5,C 
           SJMP  ZL6
ZL5:       SETB   C
           MOV  ACC.5,C 
ZL6:      CLR  C
           MOV  R7,63H
           CJNE  R7,#00H,ZL7
           CLR   C
           MOV   ACC.4,C 
           SJMP  ZL8
ZL7:       SETB   C
           MOV  ACC.4,C 
ZL8:      CLR  C
           MOV  R7,64H
           CJNE  R7,#00H,ZL9
           CLR   C
           MOV  ACC.3,C 
           SJMP  ZL10
ZL9:       SETB   C
           MOV  ACC.3,C 
ZL10:     CLR  C
           MOV  R7,65H
           CJNE  R7,#00H,ZL11 
           CLR   C
           MOV   ACC.2,C 
           SJMP  ZL12
ZL11:       SETB   C
           MOV   ACC.2,C 
ZL12:CLR  C
           MOV  R7,66H
           CJNE  R7,#00H,ZL13
           CLR   C
           MOV  ACC.1,C 
           SJMP  ZL14
ZL13:       SETB   C
           MOV  ACC.1,C 
ZL14:     CLR  C
          MOV  R7,67H
          CJNE  R7,#00H,ZL15
           CLR   C
           MOV  ACC.0,C 
           SJMP  ZL16
ZL15:     SETB   C
           MOV  ACC.0,C  
ZL16:      
           MOV   @R0,A
           DJNZ  R5,LOOP
           LJMP  BIJIAO1
LOOP:   INC  DPTR
  	  
           INC   R0
           LJMP  LH1
           
           



BIJIAO1: CLR   C

         MOV   A,#00H
         MOV   R0,51H
         MOV   R1,52H

         CJNE  @R0,#0FH,L1     ;#0BA为100度的数字量
L1:      MOV   ACC.1,C          ;31
         CLR   C
         CJNE  @R1,#0F4H,L2     ;#00H为烟雾浓度标准的数字量，？？？？？？
L2:      MOV   ACC.2,C
         JB    ACC.1,L3
         JB    ACC.2,L10
         MOV   53H,#01H
         AJMP  BIJIAO2
L3:      JB   ACC.2,L4
         MOV   53H,#00H
         AJMP  BIJIAO2
L4:      MOV   53H,#01H
         AJMP  BIJIAO2
L10:     MOV   53H,#02H                  

BIJIAO2: MOV   A,53H
           CJNE  A,#00H,BLOOP                                    
           
           SJMP  FUWEI

          
BLOOP:   CJNE  A,#01H,BAOJING
           AJMP  YICHANG
BAOJING: SETB  P1.0             ;闪光报警
          ; CLR  P1.1             ;蜂鸣报警
           MOV   R2,#1EH          ;延时30ms
DL:      MOV   R3,#0F9H;
DL1:     DJNZ  R3,DL1
           DJNZ  R2,DL
           AJMP  FUWEI
YICHANG: SETB  P1.0             ;异常闪光报警
           MOV   R2,#1EH          ;延时30ms
CL:      MOV   R3,#0F9H;
CL1:     DJNZ  R3,CL1
           DJNZ  R2,CL
           CLR   P1.0             ;停止闪光 
           AJMP  FUWEI
FUWEI:   JNB    P1.2,TIAOHUI
           MOV   R2,#03H          ;延时30ms
AL:      MOV   R3,#10H;
AL1:     DJNZ  R3,AL1
           DJNZ  R2,AL
TIAOHUI: AJMP  START
END