;=================================
	ESTADO	EQU	0X03
	PORT_B	EQU	0X06
		ORG	0X00
		BSF	ESTADO,5
		BCF	PORT_B,0
		BCF	ESTADO,5
;===================================
ARRIBA:	BSF	PORT_B,0
	NOP
	NOP
	NOP
	BCF	PORT_B,0
	NOP
	GOTO	ARRIBA

END