	#include <p12f675.inc>        
	errorlevel  -302              ; suppress message 302 from list file
	errorlevel  -305

	__CONFIG   _CP_OFF & _CPD_OFF & _BODEN_OFF & _MCLRE_ON & _WDT_OFF & _PWRTE_ON & _INTRC_OSC_NOCLKOUT 

; '__CONFIG' directive is used to embed configuration word within .asm file.

	cblock 0x20
counter1	
counter2
counter3  
	endc

delay	macro ticks
	local loop
	movlw ticks
	movwf counter3
loop
	call delay100ms
	decfsz counter3,F
	goto loop
	endm	        


;**********************************************************************
	ORG     0x000              
;----- Belso oszcillator kalibralasa
	call    0x3FF             
	banksel OSCCAL
	movwf   OSCCAL	; beirja a kalibracio erteket 

;-----  Analog bemenetek letiltasa
	banksel CMCON
	movlw 07h 		; Komparator kikapcsolasa
	movwf CMCON 
	banksel ANSEL
	clrf ANSEL 		; ADC letiltasa


;-----  GPIO inicializálása
        banksel TRISIO
        movlw 0x28		; GP0,GP1,GP2,GP4 kimenet legyen
        movwf TRISIO
	clrf WPU        ; belso felhuzas letiltasa
        banksel GPIO
        movlw 0x17		; kezdetben a kimenetek magas szinten legyenek
        movwf GPIO 
	goto main

;------------------------------------------------
; Késlelteto szubrutin, kb. 100 msec
;------------------------------------------------
delay100ms
	movlw .100
	movwf counter2
loop1  
	movlw .200
	movwf counter1
dly1mS
	nop
	decfsz counter1
	goto dly1mS
        decfsz counter2
        goto loop1
	retlw 0



;----   foprogram
main
	bcf STATUS,RP0 
	delay .50
        bcf GPIO,0
        delay 5
        bsf GPIO,0
	delay .250
        bcf GPIO,1
        delay 5
        bsf GPIO,1
	delay .50
        bcf GPIO,2
        delay 5
        bsf GPIO,2
	delay .50
        bcf GPIO,4
        delay 5
        bsf GPIO,4
        sleep       




	END                       ; directive 'end of program'

