#include <p18F14K22.inc>

;	CONFIG FOSC = ECM       ; Kúlső oszcillátor
;	CONFIG FOSC = ECCLKOUTH       ; Kúlső oszcillátor
;	CONFIG PLLEN = ON		; 4x PLL oszcillátor
;	CONFIG FOSC = IRC
;	CONFIG FOSC = IRCCLKOUT
;	CONFIG LVP = OFF		; 
;	CONFIG MCLRE = ON		; RA3 beállításához kell, amíg a rádiós IC feléled REST-ben tartja a PIC-ket
;	CONFIG WDTEN = OFF		; Watchdog kikapcsolva
;	CONFIG PWRTEN = OFF

	__CONFIG	_CONFIG1H,	B'00001000'		;

;bit 7 IESO: Internal/External Oscillator Switchover bit
;1 = Oscillator Switchover mode enabled
;0 = Oscillator Switchover mode disabled

;bit 6 FCMEN: Fail-Safe Clock Monitor Enable bit
;1 = Fail-Safe Clock Monitor enabled
;0 = Fail-Safe Clock Monitor disabled

;bit 5 PCLKEN: Primary Clock Enable bit
;1 = Primary Clock enabled
;0 = Primary Clock is under software control

;bit 4 PLL_EN: 4 X PLL Enable bit
;1 = Oscillator multiplied by 4
;0 = PLL is under software control

;bit 3-0 FOSC<3:0>: Oscillator Selection bits
;1111 = External RC oscillator, CLKOUT function on OSC2
;1110 = External RC oscillator, CLKOUT function on OSC2
;1101 = EC (low)
;1100 = EC, CLKOUT function on OSC2 (low)
;1011 = EC (medium)
;1010 = EC, CLKOUT function on OSC2 (medium)
;1001 = Internal RC oscillator, CLKOUT function on OSC2
;1000 = Internal RC oscillator
;0111 = External RC oscillator
;0110 = External RC oscillator, CLKOUT function on OSC2
;0101 =EC (high)
;0100 = EC, CLKOUT function on OSC2 (high)
;0011 = External RC oscillator, CLKOUT function on OSC2
;0010 = HS oscillator
;0001 = XT oscillator
;0000 = LP oscillator

	__CONFIG	_CONFIG2L,	B'00000000'		;Brown-out Reset Tiltva, PWRT bekapcsolva 
 	__CONFIG	_CONFIG2H,	B'00000000'		;WDT TILTVA
 	__CONFIG	_CONFIG3H,	B'00000000'		;MCLR TILTVA, The system clock is held off until the HFINTOSC is stable.
 	__CONFIG	_CONFIG4L,	B'00000001'		;STVREN ENGEDÉLYEZVE,LVP TILTVA, 1KW boot block, Extended Instruction Set disable                                                                               
 	__CONFIG	_CONFIG5L,	B'00000011'		;CODE PROTECT TILTVA
 	__CONFIG	_CONFIG5H,	B'11000000'		;CPB TILTVA,CPD TILTVA
 	__CONFIG	_CONFIG6L,	B'00000011'		;WRITE PROTECT TILTVA
 	__CONFIG	_CONFIG6H,	B'11100000'		;EEPROM WRITE,BOOT WRITE,CONF REG WRITE PROTECT TILTVA
 	__CONFIG	_CONFIG7L,  B'00000011'		;TABLE READ PROTECTION TILTVA
 	__CONFIG	_CONFIG7H,	B'01000000'		;BOOT READ PROTECT TILTVA



;*******[ CBLOCK ]**************************************************
    cblock 0x20
Delay1				; delay loop
Delay2				; delay loop
Delay3				; delay loop
     endc
;*******[ PROGRAMKÓD KEZDETE ]**************************************************

	ORG	0X0000
	movlw	B'01110010'
	movwf	OSCCON

;bit 7 IDLEN: Idle Enable bit
;1 = Device enters Idle mode on SLEEP instruction
;0 = Device enters Sleep mode on SLEEP instruction
;bit 6-4 IRCF<2:0>: Internal Oscillator Frequency Select bits
;111 = 16 MHz
;110 = 8 MHz 
;101 = 4 MHz 
;100 = 2 MHz
;011 = 1 MHz(3)
;010 = 500 kHz
;001 = 250 kHz
;000 = 31 kHz(2)
;bit 3 OSTS: Oscillator Start-up Time-out Status bit (1)
;1 = Device is running from the clock defined by FOSC<2:0> of the CONFIG1 reg
;0 = Device is running from the internal oscillator (HFINTOSC or LFINTOSC)
;bit 2 HFIOFS: HFINTOSC Frequency Stable bit 
;1 = HFINTOSC frequency is stable
;0 = HFINTOSC frequency is not stable
;bit 1-0 SCS<1:0>: System Clock Select bits
;1x = Internal oscillator block
;01 = Secondary (Timer1) oscillator
;00 = Primary clock (determined by CONFIG1H[FOSC<3:0>]).


	movlw	B'10000000'
	movwf	OSCTUNE

;bit 7 INTSRC: Internal Oscillator Low-Frequency Source Select bit
;1 = 31.25 kHz device clock derived from 16 MHz HFINTOSC source (divide-by-512 enabled)
;0 = 31 kHz device clock derived directly from LFINTOSC internal oscillator

;bit 6 PLLEN: Frequency Multiplier PLL bit
;1 = PLL enabled (for HFINTOSC 8 MHz only)
;0 = PLL disabled

;bit 5-0 TUN<5:0>: Frequency Tuning bits
;011111 = Maximum frequency
;011110 = 
;  • • •
;000001 = 
;000000 = Oscillator module is running at the factory calibrated frequency.
;111111 = 
;  • • •
;100000 = Minimum frequency



	movlw	B'00000000'
	movwf	ANSEL		; digitális port
	movlw	B'00001000'
	movwf	ANSELH		; digitális port
	movlw	B'00111111' ;Kimenet 0, bemenet 1   RA1 be, RA3 be
	movwf	TRISA
	movlw	B'00000000' ;Kimenet 0, bemenet 1	RB4 be, RB5 ki, RB6 ki, RB7 ki, 
	movwf	TRISB
	movlw	B'11010111' ;Kimenet 0, bemenet 1	RC3 ki, RC4 be, RC5 ki, RC6 be, RC7 be
	movwf	TRISC
stop
	bsf		LATC,5
	call	Delayadas
	bcf		LATC,5
	call	Delayadas
	goto	stop
Delayadas:     
	movlw	   .0	
	movwf     Delay1         ;
	movlw	   .0	
	movwf     Delay2
	movlw	   .10	
	movwf     Delay3   
DelayLoopadas:
	decfsz    Delay1,f   
	goto      DelayLoopadas 
	decfsz    Delay2,f       
	goto      DelayLoopadas                     
	decfsz    Delay3,f       
	goto      DelayLoopadas
	movlw	   .10	
	movwf     Delay3
	return
   end