;**********************************************************
;
;    PIC 12F629 f_counter UNIT 1s wait Ic Program No.1
;
;        2006.12.17   VER1.0   T.H.
;
;        \PIC12F629\WAIT_1S.ASM   WAIT_1S.HEX
;
;
;		GPIO,3	START SIGNAL INPUT
;		GPIO,0	1sec ワンパルスのみ出力
;
;
;**********************************************************

	LIST P=12F629

	; Include file, change directory if needed
	INCLUDE "P12F629.inc"

	__CONFIG       0x3FCA
;                    32109876543210    3FCA
;           

OUTF	EQU	0x20
OUTDATA	EQU	0x21
WK1		EQU	0x22
WK2		EQU	0x23
WK3		EQU	0x24
TIM_NUM	EQU	0x25
WK4		EQU	0x26
ADDATA	EQU	0x27


; Start at the reset vector
	org	0x000
	
	CLRF	GPIO
	MOVLW	0X07
	MOVWF	CMCON				; コンパレータ機能オフ
	BSF	STATUS,RP0
;		CALL	3FFH
;		MOVWF	OSCCAL			;４ＭＨｚクロック周波数の補正
		MOVLW	0xFE
		MOVWF	TRISIO			;GP2 ONLY OUTPUT 
;		MOVLW	B'00010001'
;		MOVWF	ANSEL			;AN0　のみアクティブ
;		BCF		OPTION_REG,7
	BCF	STATUS,RP0

;--------STEP1--------------------



;LP1		BSF	GPIO,0
;		CALL	TIMER
;		BCF	GPIO,0
;		CALL	TIMER
;		GOTO	LP1

LP2		CLRWDT
		BTFSS	GPIO,3
		GOTO	LP2

		BSF		GPIO,0
		CALL	TIMER
		BCF		GPIO,0
		GOTO	LP2	

;------------------------------
TIMER	MOVLW	0x14
		MOVWF	WK3
TIM3	MOVLW	0xF7
		MOVWF	WK2
TIM2	MOVLW	0xFC
		MOVWF	WK1
TIM1	CLRWDT
		DECFSZ	WK1,F
		GOTO	TIM1
		DECFSZ	WK2,F
		GOTO	TIM2
		DECFSZ	WK3,F
		GOTO	TIM3

		MOVLW	0x9E
		MOVWF	WK1
TIM4	CLRWDT
		DECFSZ	WK1,F
		GOTO	TIM4
;		NOP
		RETURN

;-------------

        END