; blink two LEDs alternately
list p=16f84a
	__CONFIG 0x3FF1
r_porta  equ 0x05
r_portb  equ 0x06
r_trisa  equ 0x05
r_trisb  equ 0x06
r_status equ 0x03

st_rp0   equ 5

	org	0x000
	goto	Boot
	
	org	0x004
Boot
	bsf	r_status, st_rp0
	movlw	0xF9
	movwf	r_porta
	movlw	0xFF
	movwf	r_portb
	
	bcf	r_status, st_rp0
	movlw	0x00			;; remember LEDs are INVERTED on
					;; this board so that the PIC sinks
					;; instead of sources!
	movwf	r_porta
Loop
	goto	Loop

	end