LIST	P=16F690	;MICROCONTROLLER TIPUS MEGADÁSA
		#INCLUDE "P16F690.INC"
		 __CONFIG _CP_OFF&_WDT_OFF&_LVP_OFF&_MCLR_OFF
		CBLOCK 	0X20
			T1
			T2
		ENDC
		ORG		0
		BCF		STATUS,RP0
		BSF		STATUS,RP1	;BANK2-BE ÁTLÉPÜNK
		CLRF	ANSEL		
		CLRF	ANSELH		;MINDEN DIGITÁLIS
		BSF		STATUS,RP0
		BCF		STATUS,RP1	;BANK1-BE ÁTLÉPÜNK
		CLRF	TRISA
		CLRF	TRISC		
		CLRF	TRISB		;MINDEN KIMENET
		BCF		STATUS,RP0
		BCF		STATUS,RP1	;BANK0-BA ÁTLÉPÜNK
		
TORZS	MOVLW	0XFE
		MOVWF	PORTA		;RA0-RA KÖTÖTT LED VILÁGÍT
		CALL	VAR			;VÁR
		BSF		STATUS, C
		RLF		PORTA,F		;RA1-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTA,F		;RA2-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		MOVLW	0XFF
		MOVWF	PORTA		;RA2-RE KÖTÖTT LED KIALSZIK
		MOVLW	0XFE
		MOVWF	PORTC		;RC0-RA KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTC,F		;RC1-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		RLF		PORTC,F		;RC2-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		MOVLW	0XFF
		MOVWF	PORTC		;RC2-RE KÖTÖTT LED KIALSZIK
		MOVLW	0XEF
		MOVWF	PORTB		;RB4-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTB,F		;RB5-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTB,F		;RB6-RA KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTB,F		;RB7-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		MOVLW	0XFF
		MOVWF	PORTB		;RB7-RE KÖTÖTT LED KIALSZIK
		MOVLW	0X7F
		MOVWF	PORTC		;RC7-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RRF		PORTC,F		;RC6-RA KÖTÖTT LED VILÁGÍT
		CALL	VAR
		MOVLW	0XF7
		MOVWF	PORTC		;RC3-RA KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTC,F		;RC4-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		RLF		PORTC,F		;RC5-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		MOVLW	0XFF
		MOVWF	PORTC		;RC5-RE KÖTÖTT LED KIALSZIK
		MOVLW	0XF7
		MOVWF	PORTA		;RA3-RA KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTA,F		;RA4-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		BSF		STATUS, C
		RLF		PORTA,F		;RA5-RE KÖTÖTT LED VILÁGÍT
		CALL	VAR
		MOVLW	0XFF
		MOVWF	PORTC		;RA5-RE KÖTÖTT LED KIALSZIK
		CALL	VAR
		GOTO	TORZS
VAR		MOVLW	0X0E
		MOVWF	T1			;T1=14
CIKLUS1	MOVLW	0XFF
		MOVWF	T2			;T2=255
CIKLUS2	NOP
		DECFSZ	T2,F
		GOTO	CIKLUS2
		DECFSZ	T1,F
		GOTO	CIKLUS1
		RETURN				;VÉGREHAJT 255*14 NOP-OT
		END