/***********************************************************************/
/* */
/* FILE :ssb_2_10bits.c */
/* DATE :Mon, Jun 13, 2005 */
/* DESCRIPTION :Main Program */
/* CPU TYPE :Other */
/* */
/* This file is generated by Renesas Project Generator (Ver.4.0). */
/* */
/***********************************************************************/


#include <asmmacro.h> 
#include "start.h" 

unsigned char i; 
int data[120]={0};
//int data[122]={0};
long total;
int data_ad;

void set_timerC(void);
void set_AD8(void);

int fir[60]={


/*; ----------------------------------------------------------
; Band(1) Low:0.00000 High:0.07660 R= -45.53802
; Band(2) Low:0.10370 High:0.22290 R= 0.6627217
; Band(3) Low:0.25000 High:0.50000 R= -45.53802
;Q14 60taps 500-2800Hz --------------------------------------*/
-47,58,160,114,
-82,-193,-104,-23,
-102,-103,202,491,
285,-212,-328,-21,
-2,-460,-568,146,
801,513,3,410,
959,-217,-2646,-3079,
140,3946,3946,140,
-3079,-2646,-217,959,
410,3,513,801,
146,-568,-460,-2,
-21,-328,-212,285,
491,202,-103,-102,
-23,-104,-193,-82,
114,160,58,-47

};


void main(void)
{
i=0;

set_CLK20();

set_LED();

set_timerC();

set_AD10();

asm("FSET I"); //割り込み許可

tcc00 = 1; //タイマCカウント制御開始ビットのセット
adst=1; //AD変換開始
while(1); 

}

void set_timerC(void)
{

pd3_5=1; //P3_5をﾀｲﾏCの出力に設定
p3_5=1; //初期値=1


tcc00=0;

tcc01=0; //ﾀｲﾏCｶｳﾝﾄｿｰｽ　f1
tcc02=0;

tcc12=1; //ﾀｲﾏC　ｶｳﾝﾀﾘﾛｰﾄﾞ選択ﾋﾞｯﾄ　1

tcc13=1; //ｺﾝﾍﾟｱ0選択ビット　ｱｳﾄﾌﾟｯﾄ=1

tcc14=1; //ｺﾝﾍﾟｱ0一致で出力を　L　に設定
tcc15=0; 

tcc16=1; //ｺﾝﾍﾟｱ１一致で出力を　H　にする
tcc17=1;

tcout5=1; //ｺﾝﾍﾟｱ出力を　 CMP1_2に設定


tm0=0; //ｶｳﾝﾀ　初期値
tm1=1090; //大体、このあたりが、よさそう....

ilvl0_cmp1ic =1; // ｺﾝﾍﾟｱ1割り込み優先レベル(レベル1)
ir_cmp1ic = 0; // ｺﾝﾍﾟｱ1割り込み要求フラグクリア

}

void set_AD10(void)
{
pd1_1 =0; //p1_0 読み出しモード AN8
p1_1 =0; //初期値=0

ch2 =1; //AN9
ch1 =0;
ch0 =1;

md =0; //単発モード
adgsel0 =1; //Port1ｸﾞﾙｰﾌﾟ選択
adcap =0; //ADSTﾋﾞｯﾄで開始
cks0 =1; //f2を選択　cks1=0にする

bits =1; //10bits
cks1 =0;
vcut =1; //Vref接続

smp =1; //ｻﾝﾌﾟﾙﾎｰﾙﾄﾞあり
}

#pragma interrupt comp1_int (vect=16)


void comp1_int(void)
{
while(adst==1);     // Fs/4=4.615KHzになる

data_ad =(ad & 0x03ff) - 0x202;

if( (i/2)%2 ) data_ad =-data_ad; 

data[119-i] = data[59-i] = data_ad;

total=rmpa_w(0, 60, fir, data+59-i);

total=total>>14;

tm0=(int)(total+ 0x202); //13 cycles

if (++i==60)i=0;

adst=1; 

}