jiaotongdeng2.txt

单片机89C52控制点阵二极管

ORG 0000H
 AJMP MAIN
 ORG 0003H
 AJMP SEVER
 ORG 0030H
  MAIN:ADDR8279_1 EQU    0BFFFH
       ADDR8279_2 EQU    0BFFEH
  
       MOV      DPTR,#ADDR8279_1
       MOV      A,#0D1H
       MOVX     @DPTR,A
  WAIT:MOVX     A,@DPTR
       JB       ACC.7,WAIT
       MOV      A,#00H
       MOVX     @DPTR,A
       MOV      A,#2CH
       MOVX     @DPTR,A
       
       SETB EA
    SETB EX0
    CLR IT0
    CLR 00H
    CLR 01H
     
    MOV 60H,#05H      ;起始5秒
    MOV 61H,#05H    ; ;；5秒显示
    MOV 62H,#14H      ;20秒
    MOV 63H,#20H     ;；20秒显示
    MOV 64H,#03H     ;；3秒
    MOV 65H,#03H     ;；3秒显示 
    MOV 66H,#0AH     ; ；10秒
    MOV 67H,#10H     ; ；10秒显示
     
 MAIN1:LCALL  SEACH1 
       AJMP   START             ;; JBC  00H,START 
    AJMP MAIN1   
 START:MOV     34H,61H
       MOV R2,60H
       MOV     R0,#0FH
    LCALL PTFO1
    S1:MOV     34H,63H
    MOV R0,#96H
    MOV R2,62H
       LCALL   PTFO1
         
        MOV     R2,64H
        MOV     34H,65H
        MOV     35H,#9FH
        MOV     36H,#06H
        LCALL   PTFO2

        MOV     R2,62H
        MOV     34H,63H
        MOV     R0,#69H
        LCALL   PTFO1

        MOV     R2,64H
        MOV     34H,65H
        MOV     35H,#6FH
        MOV     36H,#09H
        LCALL   PTFO2
        AJMP    S1
  SEVER:CLR   EX0
        PUSH  34H
        PUSH  30H
        PUSH  31H
        PUSH  PSW
        PUSH  DPH
        PUSH  DPL
        MOV   40H,A
        MOV   41H,R7
        MOV   42H,R1 
        MOV   34H,67H
     MOV   P1,#0FH
        MOV   R6,66H
  LAST1:LCALL PTFO3
        LCALL LED  
        LCALL DELAY2
     DJNZ R6,LAST1
        MOV     P1,R0
        MOV A,40H
        MOV R7,41H
        MOV R1,42H
        POP  DPL
        POP  DPH
        POP  PSW
        POP  31H
        POP  30H
        POP  34H 
        SETB EX0
        RETI
  
  PTFO1:MOV     P1,R0
        LCALL   PTFO3
        LCALL   LED
        LCALL   DELAY2
        MOV      DPTR,#ADDR8279_1   
        MOVX     A,@DPTR
        ANL A,#07H
        JZ  NEXT1  
        LCALL  KEY
        JBC  01H,NEXT11 
 NEXT1: DJNZ    R2,PTFO1
        RET