/*?Version?3.3????Last?modified:?December?26?1995?*/

/*---------------------------------------------------------------------------*
?*??Function??ACELP_CODEBOOK（）???????????????????????????????????????????????*
?*??~~~~~~~~~~~~~~~~~~~~~~~~~~???????????????????????????????????????????????*
?*???Find?Algebraic?codebook.????????????????????????????????????????????????*
?*--------------------------------------------------------------------------*/

#include?“typedef.h“
#include?“basic_op.h“
#include?“ld8k.h“
static?void?Cor_h（
?????Word16?*H?????????/*?（i）?Q12?:Impulse?response?of?filters?*/
?????Word16?*rr?????????/*?（o）?????:Correlations?of?H[]?????????*/
）;
static?void?Cor_h_X（
?????Word16?h[]????????/*?（i）?Q12?:Impulse?response?of?filters??????*/
?????Word16?X[]????????/*?（i）?Q12?:Target?vector????????????????????*/
?????Word16?D[]?????????/*?（o）?????:Correlations?between?h[]?and?D[]?*/
????????????????????????/*??????????Normalized?to?13?bits????????????*/
）;
static?Word16?D4i40_17（????????/*?（o）????:?Index?of?pulses?positions.???????????????*/
??Word16?Dn[]??????????/*?（i）????:?Correlations?between?h[]?and?Xn[].???????*/
??Word16?rr[]??????????/*?（i）????:?Correlations?of?impulse?response?h[].????*/
??Word16?h[]???????????/*?（i）?Q12:?Impulse?response?of?filters.?????????????*/
??Word16?cod[]?????????/*?（o）?Q13:?Selected?algebraic?codeword.?????????????*/
??Word16?y[]???????????/*?（o）?Q12:?Filtered?algebraic?codeword.?????????????*/
??Word16?*sign?????????/*?（o）????:?Signs?of?4?pulses.???????????????????????*/
??Word16?i_subfr????????/*?（i）????:?subframe?flag????????????????????????????*/
）;

Word16??ACELP_Codebook（??/*?（o）?????:index?of?pulses?positions????*/
??Word16?x[]????????????/*?（i）?????:Target?vector????????????????*/
??Word16?h[]????????????/*?（i）?Q12?:Impulse?response?of?filters??*/
??Word16?T0?????????????/*?（i）?????:Pitch?lag????????????????????*/
??Word16?pitch_sharp????/*?（i）?Q14?:Last?quantized?pitch?gain????*/
??Word16?i_subfr????????/*?（i）?????:Indicator?of?1st?subframe???*/
??Word16?code[]?????????/*?（o）?Q13?:Innovative?codebook??????????*/
??Word16?y[]????????????/*?（o）?Q12?:Filtered?innovative?codebook?*/
??Word16?*sign???????????/*?（o）?????:Signs?of?4?pulses????????????*/
）
{
??Word16?i?index?sharp;
??Word16?Dn[L_SUBFR];
??Word16?rr[DIM_RR];

?/*-----------------------------------------------------------------*
??*?Include?fixed-gain?pitch?contribution?into?impulse?resp.?h[]????*
??*?Find?correlations?of?h[]?needed?for?the?codebook?search.????????*
??*-----------------------------------------------------------------*/

??sharp?=?shl（pitch_sharp?1）;??????????/*?From?Q14?to?Q15?*/
??if?（sub（T0?L_SUBFR）<0）
?????for?（i?=?T0;?i????????h[i]?=?add（h[i]?mult（h[i-T0]?sharp））;
?????}

??Cor_h（h?rr）;

?/*-----------------------------------------------------------------*
??*?Compute?correlation?of?t

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????27741??1996-01-09?11:56??g729\acelp_co.c

?????文件?????103968??1996-01-09?11:56??g729\basic_op.c

?????文件???????3469??1996-01-09?11:56??g729\basic_op.h

?????文件???????4048??1996-01-09?11:56??g729\bits.c

?????文件???????4126??1996-01-09?11:56??g729\coder.c

?????文件???????2910??2008-10-21?12:09??g729\coder.mak

?????文件??????28162??1996-01-09?11:56??g729\cod_ld8k.c

?????文件???????5011??1996-01-09?11:56??g729\decoder.c

?????文件???????2772??2008-10-21?12:11??g729\decoder.mak

?????文件???????4703??1996-01-09?11:56??g729\dec_gain.c

?????文件???????2064??1996-01-09?11:56??g729\dec_lag3.c

?????文件???????9699??1996-01-09?11:56??g729\dec_ld8k.c

?????文件???????1725??1996-01-09?11:56??g729\de_acelp.c

?????文件???????7916??1996-01-09?11:56??g729\dspfunc.c

?????文件???????3655??1996-01-09?11:56??g729\filter.c

?????文件?????487706??1996-01-19?14:52??g729\g729.ps

?????文件???????7519??1996-01-09?11:56??g729\gainpred.c

?????文件??????31458??1996-01-09?11:56??g729\ld8k.h

?????文件??????23052??1996-01-09?11:56??g729\lpc.c

?????文件??????11716??1996-01-09?11:56??g729\lpcfunc.c

?????文件???????3059??1996-01-09?11:56??g729\lspdec.c

?????文件???????5641??1996-01-09?11:56??g729\lspgetq.c

?????文件??????12260??1996-01-09?11:56??g729\oper_32b.c

?????文件????????369??1996-01-09?11:56??g729\oper_32b.h

?????文件??????20839??1996-01-09?11:56??g729\pitch.c

?????文件???????2874??1996-01-09?11:56??g729\post_pro.c

?????文件???????1639??1996-01-09?11:56??g729\pred_lt3.c

?????文件???????2951??1996-01-09?11:56??g729\pre_proc.c

?????文件??????32916??1996-01-09?11:56??g729\pst.c

?????文件???????5818??1996-01-09?11:56??g729\pwf.c

............此處省略12個文件信息