[建议]建议增加傅里叶变换函数 - 金字塔软件问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

用Borland公司的”tasm32” macro assembly compiler 编译afft.asm 成afft.obj
To compile,use the following command "tasm32 /ml afft.asm"

#include <string.h>
#include <stdio.h>
#include <io.h>
#include <math.h>
#include <iostream.h>

#define GSCALERR(A,B) ( *((unsigned long int *)(A)+1) = 0x7fffffff,*((unsigned long int *)(A)) = (B) )

#define abs(x) ((x) >= 0 ? (x) : -(x))
#define min(a,b) ((a) <= (b) ? (a) : (b))
#define max(a,b) ((a) >= (b) ? (a) : (b))
#define dmax(a,b) (double)max(a,b)

/**************************************************************************
**
** Function Definitions
**
** A function definition is required for each set of three functions
*/

extern double afft(double,double , double , double , double *,double *);
int _afftdll(double * ,double *, double *, double *, double *,double *);
/**************************************************************************/

/*
** DIGAMMA
*/

int _afftdll(double *mode,double *npsd, double *npow2, double *t, double *w,double *xseg)
{
      double len;
/*    ----- call asm func "afft"------------------------------------------------------------ */
      len=afft(*mode, *npsd, *npow2, *t, w,xseg);
/*    ----- call asm func "afft"------------------------------------------------------------ */

return 0;
}

主题：[建议]建议增加傅里叶变换函数