js04.asm

51单片机开发入门与典型实例

;程序:JS04.ASM
    START: MOV   R0, #8        
           MOV   A,  #01111111B
    LOOP:  MOV   P1, A         
           ACALL DELAY         
           RR    A           
           DJNZ  R0, LOOP      
           JMP   START       
   DELAY:  MOV  R5,#50         
   DLY1:   MOV  R6,#100         
   DLY2:   MOV  R7,#100         
           DJNZ R7,$              
           DJNZ R6,DLY2        
           DJNZ R5,DLY1        
           RET                 
	   END