h_2_2.asm

单片机硬件实验代码

   CS_273     EQU      0FFFFH
   
              ORG      0000H
              AJMP     START
              ORG      0030H
    START:    MOV      DPTR,#CS_273
              MOV      A,#11001111B   ;初始状态,两路口红灯亮
              MOVX     @DPTR,A          
              MOV      B,#0AH  
              MOV      R3,#00H
    LOOP:     MOV      A,R3
              DIV      AB             ;求模运算
              MOV      A,B
              MOV      DPTR,#TABLE
              MOVC     A,@A+DPTR
              MOV      DPTR,#CS_273
              MOVX     @DPTR,A
              INC      R3
              MOV      B,#0AH
              ACALL    DELAY
              SJMP     LOOP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;    0***1***       延时5s                         ;;;
;;    1***0***       延时5s                         ;;;
;;    1***1***       延时2s                         ;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    DELAY:    ANL      A,#10001000B
              CJNE     A,#10001000B,DELAY2
              MOV      R7,#5
              SJMP     _A
    DELAY2:   MOV      R7,#50       
        _A:   MOV      R6,#200
        _B:   MOV      R5,#250
              DJNZ     R5,$
              DJNZ     R6,_B
              DJNZ     R7,_A
              RET
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;         L1   L2   L3   L4   L5   L6   L7  L8              ;; 
 ;;         ----东西----    ---南北------                      ;;
 ;;         绿   黄   红   红    绿   黄   *   *               ;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
     TABLE:   DB       01101111B            ;东西绿灯亮,南北红灯亮
              DB       10101111B            ;东西黄灯闪烁四次
              DB       11101111B
              DB       10101111B
              DB       11101111B
              DB       11010111B            ;东西红灯亮,南北绿灯亮
              DB       11011111B            ;南北黄灯闪烁四次
              DB       11011011B                                  
              DB       11011111B
              DB       11011011B 
              
              END