; ZONA DE DATOS **********************************************************************

	LIST		P=16F628A
	processor 16f628
	include	  <p16f628.inc>
	__config _XT_OSC & _WDT_OFF & _PWRTE_OFF & _MCLRE_ON & _BODEN_OFF & _LVP_OFF

#DEFINE  Marcha		PORTB,6		; Interruptor de marcha.
#DEFINE  Sentido	PORTB,7		; Interruptor sentido de giro.

; ZONA DE CÓDIGOS ********************************************************************

	ORG 	0
	movlw   0x7
	movwf   CMCON        	;EN BANCO 0				  
	BSF		STATUS,RP0		;ELIJE EL BANCO1
	movlw   0x0
	movwf   VRCON		
Inicio
	bsf		STATUS,RP0
	movlw	b'11000000'				; Configuramos el Puerto B.
	movwf 	PORTB					
	bcf		STATUS,RP0
Principal	
	clrw							; Con esta combinación se detiene el motor.
 	btfsc	Marcha					; Comprueba el estado del interruptor de funcionamiento.
	goto	Salida
	movlw	b'00010010'				; Gira en un sentido.
	btfsc	Sentido    	 			; Comprueba el sentido de giro deseado.
	movlw	b'00010001'				; Gira en el otro sentido.
Salida
	movwf	PORTB
	goto	Principal

	END
