R1 EQU 0x25
	R2 EQU 0x26
	COUNT_1 EQU d'10'
	COUNT_2 EQU d'70'
	MOVLW 0x55		
	MOVWF PORTB		
	MOVLW COUNT_1	
	MOVWF R1		
LOP_1	MOVLW COUNT_2	
	MOVWF R2		
LOP_2	COMPF PORTB, F	
	DECF R2, F		
	BNZ LOP_2		
	DECF R1, F		
	BNZ LOP_1