getplocn.c

来自「speech signal process tools」· C语言 代码 · 共 46 行

/*	

 This material contains proprietary software of Entropic Processing, Inc.
 Any reproduction, distribution, or publication without the the prior	   
 written permission of Entropic Processing, Inc. is strictly prohibited.
 Any public distribution of copies of this work authorized in writing by
 Entropic Processing, Inc. must bear the notice			
       
	Copyright 1986, Entropic Proccessing, Inc
	(C) 1985, Entropic Processing, Inc.
         */


#ifdef SCCS
static char *sccsid = "@(#)getplocn.c	1.3	5/29/86 EPI";
#endif

get_pulsepos (data, lnt)
float   data[];
int     lnt;
{
 /* 
  This routine just gets the locn of peak in low pass
  filtered data.
  */
    extern int order, frmlen, pulse_locn;
    int     i, index;
    float   *ptr1;
    double  tmp, max;

    ptr1 = &data[frmlen + pulse_locn];
    max =  *ptr1++;
    index = 0;
    for (i = 1; i < lnt; i++)
    {
        tmp =  *ptr1++;
	if (tmp * tmp > max * max)
	{
	    max = tmp;
	    index = i;
	}
    }
    return (index);
}