211 static integer tau[60] = { 20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,
212 35,36,37,38,39,40,42,44,46,48,50,52,54,56,58,60,62,64,66,68,70,72,
213 74,76,78,80,84,88,92,96,100,104,108,112,116,120,124,128,132,136,
214 140,144,148,152,156 };
215 static integer buflim[4] = { 181,720,25,720 };
216 static real precoef = .9375f;
260 real phi[100] , psi[10];
472 pebuf = &(st->
pebuf[0]);
473 lpbuf = &(st->
lpbuf[0]);
474 ivbuf = &(st->
ivbuf[0]);
476 osbuf = &(st->
osbuf[0]);
477 osptr = &(st->
osptr);
478 obound = &(st->
obound[0]);
479 vwin = &(st->
vwin[0]);
480 awin = &(st->
awin[0]);
481 voibuf = &(st->
voibuf[0]);
482 rmsbuf = &(st->
rmsbuf[0]);
483 rcbuf = &(st->
rcbuf[0]);
487 for (i__ = 181; i__ <= i__1; ++i__) {
489 pebuf[i__ - 181] = pebuf[
contrl_1.lframe + i__ - 181];
492 for (i__ = 229; i__ <= i__1; ++i__) {
493 ivbuf[i__ - 229] = ivbuf[
contrl_1.lframe + i__ - 229];
496 for (i__ = 25; i__ <= i__1; ++i__) {
497 lpbuf[i__ - 25] = lpbuf[
contrl_1.lframe + i__ - 25];
501 for (i__ = 1; i__ <= i__1; ++i__) {
502 if (osbuf[i__ - 1] >
contrl_1.lframe) {
503 osbuf[j - 1] = osbuf[i__ - 1] -
contrl_1.lframe;
508 voibuf[0] = voibuf[2];
509 voibuf[1] = voibuf[3];
510 for (i__ = 1; i__ <= 2; ++i__) {
511 vwin[(i__ << 1) - 2] = vwin[((i__ + 1) << 1) - 2] -
contrl_1.lframe;
512 vwin[(i__ << 1) - 1] = vwin[((i__ + 1) << 1) - 1] -
contrl_1.lframe;
513 awin[(i__ << 1) - 2] = awin[((i__ + 1) << 1) - 2] -
contrl_1.lframe;
514 awin[(i__ << 1) - 1] = awin[((i__ + 1) << 1) - 1] -
contrl_1.lframe;
525 obound[i__ - 1] = obound[i__];
526 voibuf[i__ * 2] = voibuf[(i__ + 1) * 2];
527 voibuf[(i__ << 1) + 1] = voibuf[((i__ + 1) << 1) + 1];
528 rmsbuf[i__ - 1] = rmsbuf[i__];
530 for (j = 1; j <= i__1; ++j) {
531 rcbuf[j + i__ * 10 - 11] = rcbuf[j + (i__ + 1) * 10 - 11];
545 for (i__ = 1; i__ <= i__1; ++i__) {
546 inbuf[720 -
contrl_1.lframe + i__ - 181] = speech[i__] * 4096.f -
613 for (half = 1; half <= 2; ++half) {
614 voicin_(&vwin[4],
inbuf, lpbuf, buflim, &half, &amdf[minptr - 1], &
615 amdf[maxptr - 1], &mintau, ivrc, obound, voibuf, &
c__3, st);
619 dyptrk_(amdf, &
c__60, &minptr, &voibuf[7], pitch, &midx, st);
620 ipitch = tau[midx - 1];
622 placea_(&ipitch, voibuf, &obound[2], &
c__3, vwin, awin, ewin, &
626 lanal = awin[5] + 1 - awin[4];
627 dcbias_(&lanal, &pebuf[awin[4] - 181], abuf);
634 i__1 = ewin[5] - ewin[4] + 1;
635 energy_(&i__1, &abuf[ewin[4] - awin[4]], &rmsbuf[2]);
641 voice[1] = voibuf[2];
642 voice[2] = voibuf[3];
645 for (i__ = 1; i__ <= i__1; ++i__) {
646 rc[i__] = rcbuf[i__ - 1];
int voicin_(integer *vwin, real *inbuf, real *lpbuf, integer *buflim, integer *half, real *minamd, real *maxamd, integer *mintau, real *ivrc, integer *obound, integer *voibuf, integer *af, struct lpc10_encoder_state *st)
int placev_(integer *osbuf, integer *osptr, integer *oslen, integer *obound, integer *vwin, integer *af, integer *lframe, integer *minwin, integer *maxwin, integer *dvwinl, integer *dvwinh)