#include	<xc.h>
#include	<stdlib.h>

__CONFIG( FOSC_INTOSC & WDTE_OFF & PWRTE_OFF & MCLRE_OFF & CP_OFF & CPD_OFF & BOREN_ON & CLKOUTEN_OFF & IESO_OFF & FCMEN_OFF );			
__CONFIG( WRT_OFF & VCAPEN_OFF & PLLEN_OFF & STVREN_OFF & BORV_HI & LVP_OFF );

#define	_XTAL_FREQ	8000000 /* 蜍穂ｽ懷捉豕｢謨ｰ : 8MHz */ 

void	initializePort( void );
void	initializePWM( void );
void	initializeAD( void );

void	main( void )
{
	int	ad_value, duty;	/* AD螟画鋤蛟､�轡uty豈� */

	/* 蛻晄悄險ｭ螳� */
	OSCCON	= 0b01110010;	/* 蜀�Κ繧ｪ繧ｷ繝ｬ繝ｼ繧ｿ 8MHz PLL OFF */
	initializePort();		/* 繝昴�繝亥�譛溯ｨｭ螳� */
	initializePWM();		/* PWM蛻晄悄險ｭ螳� */
	initializeAD();			/* ADC蛻晄悄險ｭ螳� */

	while( 1 ){
		GO_nDONE	= 1;		/* AD螟画鋤髢句ｧ�*/ 
		while( GO_nDONE );		/* AD螟画鋤螳御ｺ�ｾ�■ */ 
		ad_value	= ADRESH;	/* ad_value縺ｫAD螟画鋤縺ｮ邨先棡繧剃ｿ晏ｭ�  */

		if( (ad_value > 123) && (ad_value < 133) ){ /* 2.4[V] < Vref < 2.6[V] ? */ 
			CCPR1L	= 0;	CCPR2L	= 0;	/* 荳｡繝ｬ繝�げ繧偵Ο繝ｼ繧ｵ繧､繝�100%縺ｫ */ 
		}else{
			duty	= abs( (ad_value - 128) * 100 / 128 ); /* Duty豈納%]繧定ｨ育ｮ� */ 

			/////// 霑ｽ蜉� //////
			if( duty > 95 ){ duty	= 95; } /* Duty豈斐ｒ95%縺ｫ蛻ｶ髯� */
			/////// 霑ｽ蜉�邨ゅｏ繧� //////

			if( ad_value < 128 ){ /* 2.5[V} < Vref ? */ 
				CCPR1L	= 0;	/* 蟾ｦ繝ｬ繝�げ繧偵Ο繝ｼ繧ｵ繧､繝�100%縺ｫ */ 
				CCPR2L	= PR4 * duty / 100; /* 蜿ｳ繝ｬ繝�げ繧定ｨ育ｮ励＠縺櫂uty豈斐〒繝峨Λ繧､繝� */ 
			}else{
				CCPR1L	= PR2 * duty / 100; /*蟾ｦ繝ｬ繝�げ繧定ｨ育ｮ励＠縺櫂uty豈斐〒繝峨Λ繧､繝� */ 
				CCPR2L	= 0;	/* 蜿ｳ繝ｬ繝�げ繧偵Ο繝ｼ繧ｵ繧､繝�100%縺ｫ */ 
			}
		}
	}
}

void	initializePort( void )
{
	PORTA = 0x00; LATA = 0x00; ANSELA = 0x00; TRISA = 0x00;
	PORTB = 0x00; LATB = 0x00; ANSELB = 0x00; TRISB = 0x00;
	PORTC = 0x00; LATC = 0x00; TRISC = 0x00;
	PORTE = 0x00; LATE = 0x00; TRISE = 0x00;
}


void	initializePWM( void )
{
	CCPTMRS0	= 0b00000100; /* 繧ｿ繧､繝槭�蜑ｲ繧雁ｽ薙※繧定ｨｭ螳� PWM繝｢繧ｸ繝･繝ｼ繝ｫ1:繧ｿ繧､繝�2 PWM繝｢繧ｸ繝･繝ｼ繝ｫ2:繧ｿ繧､繝�4 */ 

	/* 蟾ｦ繝ｬ繝�げ險ｭ螳� */
	TRISC2	= 1;	TRISB2	= 1;	/* PWM蜃ｺ蜉帙�繝ｼ繝医ｒ荳€譌ｦOFF */
	PR2		= 125;					/* PWM蜻ｨ豕｢謨ｰ : 1kHz */
	CCPR1L	= 0;					/* Duty繧�0%縺ｫ */
	CCP1CON	= 0b10011100;			/* PWM繝｢繧ｸ繝･繝ｼ繝ｫ1繧丹N */
	T2CON	= 0b00000110;			/* 繧ｿ繧､繝�2繧丹N 繝励Μ繧ｹ繧ｱ繝ｼ繝ｩ:16 */
	PWM1CON	= 0b00000100;			/* 繝�ャ繝峨ち繧､繝�繧定ｨｭ螳� 2[us]*/ 
	TRISC2	= 0;	TRISB2	= 0;	/* PWM蜃ｺ蜉帙�繝ｼ繝医ｒON */
	
	/* 蜿ｳ繝ｬ繝�げ險ｭ螳� */
	CCP2SEL	= 0;	P2BSEL	= 0;	/* P2A繧坦C1縺ｫ�訓2B繧坦C0縺ｫ蜑ｲ繧雁ｽ薙※ */
	TRISC1	= 1;	TRISC0	= 1;	/* PWM蜃ｺ蜉帙�繝ｼ繝医ｒ荳€譌ｦOFF */
	PR4		= 125;					/* PWM蜻ｨ豕｢謨ｰ : 1[kHz] */
	CCPR2L	= 0;					/* Duty繧�0%縺ｫ */
	CCP2CON	= 0b10011100;			/* PWM繝｢繧ｸ繝･繝ｼ繝ｫ2繧丹N */
	T4CON	= 0b00000110;			/* 繧ｿ繧､繝�4繧丹N 繝励Μ繧ｹ繧ｱ繝ｼ繝ｩ:16 */
	PWM2CON	= 0b00000100;			/* 繝�ャ繝峨ち繧､繝�繧定ｨｭ螳� 2[us] */ 
	TRISC1	= 0;	TRISC0	= 0;	/* PWM蜃ｺ蜉帙�繝ｼ繝医ｒON */
}

void	initializeAD( void )
{
	TRISB5 = 1; ANSB5 = 1;	/* RA0繧但D蜈･蜉帙ヴ繝ｳ縺ｫ險ｭ螳� */
	ADCON1	= 0b01010000;	/* ADC繧ｯ繝ｭ繝�け繧�2[us]縺ｫ險ｭ螳� */
	ADCON0	= 0b00110101;	/* ADC繝｢繧ｸ繝･繝ｼ繝ｫ繧丹N */
	__delay_us( 100 );		/* 險ｭ螳壼ｮ御ｺ�凾髢灘ｾ�■ */ 
}