7219.asm

16个LED旋转时钟

					   ORG 0000H 
AJMP START 
ORG 0003H ;外部中断地直入口 
AJMP IN
ORG 0013H
AJMP IN1
ORG 30H 
START:MOV P1,#0FFH
      MOV P3,#0FFH
	  MOV SP,#50H
      SETB EA 
	  SETB EX0 
	  SETB EX1



MA:CLR P1.2
   LCALL YY59 
   SETB  P1.2
   LCALL YY1
   AJMP MA

IN:CLR P1.2
   MOV R1,#00H
   MOV R2,#00H
   MOV R3,#00H
   MOV R4,#00H
   MOV R5,#00H
   MOV R6,#00H
   MOV R7,#00H
   RETI 

IN1:SETB P1.2
    MOV R1,#00H
	MOV R2,#00H
	MOV R3,#00H
	MOV R4,#00H
	MOV R5,#00H
	MOV R6,#00H
	MOV R7,#00H
    RETI 


  YY1:MOV R3,#0FFH
  WB:MOV R1,#0FFH
  WT:MOV R2,#0FFH
     DJNZ R2,$
	 DJNZ R1,WT
	 DJNZ R3,WB
	 RET

YY59:MOV R4,#0A0H
  QW:MOV R5,#0FFH
  TF:MOV R6,#0FFH
  JL:MOV R7,#0FFH
     DJNZ R7,$
	 DJNZ R6,JL
	 DJNZ R5,TF 
	 DJNZ R4,QW
	 RET

END 

	 
   
  YY1:MOV R3,#0FFH
  WB:MOV R1,#0FFH
  WT:MOV R2,#0FFH
     DJNZ R2,$
	 DJNZ R1,WT
	 DJNZ R3,WB
	 RET

YY59:MOV R4,#0A0H
  QW:MOV R5,#0FFH
  TF:MOV R6,#0FFH
  JL:MOV R7,#0FFH
     DJNZ R7,$
	 DJNZ R6,JL
	 DJNZ R5,TF 
	 DJNZ R4,QW
	 RET

    YY1:MOV R3,#010H
  WB:MOV R1,#0FFH
  WT:MOV R2,#0FFH
     DJNZ R2,$
	 DJNZ R1,WT
	 DJNZ R3,WB
	 RET

YY59:MOV R5,#020H
  TF:MOV R6,#0FFH
  JL:MOV R7,#0FFH
     DJNZ R7,$
	 DJNZ R6,JL
	 DJNZ R5,TF 
	 RET