LIST P=18F4550, F=INHX32    
#include <P18F4550.INC>    

  
__CONFIG    _CONFIG1H,     b'00001000'       
__CONFIG	_CONFIG1L,	   b'00001000'
__CONFIG    _CONFIG2L,     b'00000001'        
__CONFIG    _CONFIG2H,     b'00000000'        
__CONFIG    _CONFIG3H,     b'10000000'        
__CONFIG    _CONFIG4L,     b'10000001'                                               
__CONFIG    _CONFIG5L,     b'00001111'
__CONFIG	_CONFIG5H,	   b'11000000'                 
__CONFIG    _CONFIG6L,     b'00001111'
__CONFIG	_CONFIG6H,	   b'11100000'                
__CONFIG    _CONFIG7L,     b'00001111'
__CONFIG	_CONFIG7H,	   b'01000000'
__CONFIG	_DEVID1,       b'00000000'
__CONFIG	_DEVID2,	   b'00010010'        
        
 

__IDLOCS _IDLOC0, 'T'
__IDLOCS _IDLOC1, 'a'
__IDLOCS _IDLOC2, 'b'
__IDLOCS _IDLOC3, ' '
__IDLOCS _IDLOC4, 'S'
__IDLOCS _IDLOC5, 'o'
__IDLOCS _IDLOC6, 'f'
__IDLOCS _IDLOC7, 't'

;-------[VÁLTOZÓK]-------------------------------------------
CNT		EQU	0X000
;-------[PROGRAMKÓD]-----------------------------------------
    	ORG	0000H	; RESET VEKTOR
	    GOTO	    INI

INI		CLRF	OSCTUNE
		MOVLW	b'01110110'
		MOVWF	OSCCON
		CLRF	INTCON
		MOVLW	b'10000000'
		MOVWF	INTCON2
		CLRF	INTCON3
		CLRF	PIR1
		CLRF	PIR2
		CLRF	PIE1
		CLRF	PIE2
		CLRF	IPR1
		CLRF	IPR2
		CLRF	RCON
		CLRF	ADCON0
		MOVLW	b'00001111'
		MOVWF	ADCON1
		CLRF	ADCON2
		

START	BTFSS	PORTA,0
		BNC		START
		SETF	LATB
IDE		BTFSC	PORTA,0
		BNC		IDE		
		CLRF	LATB
		GOTO	START

	end