; BOLT ARCHIVO LEE-MICROSWITCHES.ASM
; PUERTOS LISTOS PARA FUNCIONAR CON LEDS,
; MICROSWITCHES Y RELEVADOR.
; LEE LOS 4 MICROSWITCHES Y ENCIENDE RB0...RB3
; DE ACUERDO A LOS VALORES SW1...SW4
; EL CRISTAL EXTERNO DEL 18F2550 ES DE 20 MHZ
; PERO SU FRECUENCIA EFECTIVA DE FUNCIONAMIENTO
; ES DE 48 MHZ DEBIDO AL PLL MULTIPLICADOR
; EL CICLO DE INSTRUCCION ES DE 83.3 NANOSEGUNDOS
; PARA HACER LA SIMULACION EN MPLAB, ORG=0
; PARA CORRER EL PROGRAMA EN BOLT, ORG=800

	processor 18F2550
	include	  <p18F2550.inc>
	include	 "KEYBOLT.inc"

CLAVE 	EQU H'80'

	 
		org 	800	;MODIFIQUE A ORG=0 PARA SIMULAR EN MPLAB
		PUERTOS
;FIN DE INICIALIZACION DE PUERTOS
malla:	clrf	CLAVE
		btfss	SW1
		goto	sigue1
		movlw	1
		addwf	CLAVE
sigue1:	btfss	SW2
		goto	sigue2
		movlw	2
		addwf	CLAVE
sigue2:	btfss	SW3
		goto	sigue3
		movlw	4
		addwf	CLAVE
sigue3:	btfss	SW4
		goto	sigue4
		movlw	8
		addwf	CLAVE
sigue4:	movf	CLAVE,w
		movwf	PORTB
		goto 	malla
		end