ORG      0000H
	AJMP     MAIN
	ORG      0003H
	AJMP    INTLED
	ORG      0013H
	AJMP     INTBUZ
	ORG       0030H
MAIN:  MOV IE, #85H
	   MOV  TCON, #05H
       MOV IP, #04H
       MOV SP, #60H
START:  MOV   A, #00H
		MOV   R5, #00H
		MOV   R6, #00H
		MOV   P1,R5
    	MOV   P2,R6

ROTATE: MOV  P0, A
	
        ACALL DELAY
        AJMP  ROTATE
DELAY:  MOV   R3, #0FFH
DEL:    MOV    R4, #0FFH
        DJNZ     R4,  $
        DJNZ     R3, DEL
        RET
INTLED:  
		
     PUSH  PSW
     PUSH  ACC
	 INC R5
     MOV  P1, R5
     SETB   RS0
     CLR    RS1
     MOV  R0 ,#05H
LOOP:  CLR  P0.0
	ACALL   DELAY
	SETB     P0.0
    ACALL    DELAY
    DJNZ    R0, LOOP
	
    POP      ACC
    POP      PSW
    RETI
INTBUZ:  
    PUSH   PSW
    PUSH   ACC 
	INC R6 
    MOV  P2, R6
    MOV    R1, #05H
LOOP1:   SETB    P0.7
    ACALL   DELAY
    CLR    P0.7
    ACALL  DELAY
    DJNZ   R1,  LOOP1
    POP   ACC
    POP   PSW
    RETI
    END