ROUTN:	JB F0,LOOP2
 LOOP1:	MOV A,#03H
	MOV P1,A
	LCALL DELAY 
	DJNZ R0,DONE
	MOV A,#06H
	MOV P1,A
	LCALL DELAY 
	DJNZ R0,DONE
	AJMP LOOP1
 LOOP2:	MOV A,#03H
	MOV P1,A
	LCALL DELAY
	DJNZ R0,DONE
	MOV A,#05H
	MOV P1,A
	LCALL DELAY
	DJNZ R0,DONE
	MOV A,#06H
	MOV P1,A
	LCALL DELAY
	DJNZ R0,DONE
	AJMP LOOP2
  DONE: 	RET