LIST P=16F628A
	#INCLUDE <P16F628A.INC>
	__CONFIG _CP_OFF&_XT_OSC&_WDT_OFF&_LVP_OFF&_MCLRE_ON&_PWRTE_ON
	CBLOCK	0x20

	GOTO	START

	ORG 4
	BCF		INTCON,INTE
	MOVFW    PORTB
    	XORLW    B'11111110'
   	MOVWF    PORTB 
	RETFIE
;-----------------------/MEGSZAKÍTÁS/----------------
START	BSF	STATUS,RP0	;BANK1
	MOVLW	B'11110000'
	MOVWF	TRISA
	MOVLW	B'00000001'
	MOVWF	TRISB
	MOVLW	B'10000000'
	MOVWF	OPTION_REG
	BCF	STATUS,RP0	;BANK0
	BSF	INTCON,GIE
	BSF	INTCON,INTE
	BCF		STATUS,RP0	;BANK0
	MOVLW	B'00001111'
	MOVWF	PORTA
	MOVLW	B'11111110'
	MOVWF	PORTB
	
VISZA
	GOTO	VISZA
	
	END