;	Manuel blinker
;	RB7 = 0 -> RA2 = off og omvendt

;	gpasm -a inhx32 blink1.asm


;	BEMAERK: banksel er et compilerdirectiv, der selv finder banken
;	Se: https://microchipdeveloper.com/mcu1102:direct-addressing

	processor       16f1509
	include         p16f1509.inc


	; 16 serien har to (2) config registre
	; CONFIG1
	__CONFIG _CONFIG1, _FOSC_INTOSC & _WDTE_ON
	; CONFIG2
	__CONFIG _CONFIG2, _LVP_ON

	ORG	0
	goto	init

	org	05		; Int disabled by default
init:	BANKSEL TRISA		; Its a must!
	CLRF	TRISA

start:	banksel	PORTB
	BTFSS	PORTB, RB7	; Switch på RB7
	goto off
	goto on

on:	banksel	PORTA
	bsf	PORTA, RA2
	goto	start

off:    banksel	PORTA
	bcf	PORTA, RA2
	goto 	start

	end