list p=16F628A, r=dec, w=-302
include <P16F628A.INC>
__config _LVP_OFF & _BOREN_OFF & _PWRTE_ON & _WDT_OFF & _INTOSC_OSC_NOCLKOUT
cblock 0x70
W_TEMP
STATUS_TEMP
endc
org 0x000 ;reset vector
goto START
org 0x004 ;interrupt vector
movwf W_TEMP ;push W
swapf STATUS,W ;push STATUS
banksel 0x00 ;bank 0
movwf STATUS_TEMP
movlw 0x01 ;toggle RA0
xorwf PORTA,F
ISRExit swapf STATUS_TEMP,W ;pop STATUS
movwf STATUS
swapf W_TEMP,F ;pop W
swapf W_TEMP,W
retfie
START movlw 0x07 ;disable comparator
movwf CMCON
banksel TRISA ;bank 1
movlw b'00000000' ;port a all outputs
movwf TRISA
banksel 0x00 ;bank 0
bsf PORTA,6
<rest of code>
end