1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97
| #include <stdio.h>
#include <stdlib.h>
#include <math.h>
#define SWAP(a,b) tempr=(a);(a)=(b);(b)=tempr
void FFT(float data[],unsigned long nn,int isign);
float tableau[2050];
int main(void)
{
FILE *fichier=NULL;
long i, c;
double amplitude;
long data1;
fichier=fopen("1Khz.data", "rb");
for (i=1; i<2049; i++)
{ c = fgetc(fichier);
data1 |= ((c & 0xFF) << (8 * 0));
c = fgetc(fichier);
data1 |= ((c & 0xFF) << (8 * 1));
tableau[i] = data1;
}
FFT(tableau,1024,1);
i=1;
while (i<1024)
{ amplitude=sqrt((tableau[i]*tableau[i])+(tableau[i+1]*tableau[i+1]));
printf("l'amplitude de la fréquence %ld est: %ld\n", i, amplitude);
i=i+2;
}
fclose(fichier);
system("PAUSE");
}
void FFT(float data[],unsigned long nn,int isign)
{
unsigned long n,mmax,m,j,istep,i;
double wtemp,wr,wpr,wpi,wi,theta;
float tempr,tempi;
n=nn<<1;
j=1;
for (i=1;i<n;i+=2){
if(j>i){
SWAP(data[j],data[i]);
SWAP(data[j+1],data[i+1]);
}
m=nn;
while (m>=2 && j>m){
j-=m;
m>>=1;
}
j+=m;
}
mmax=2;
while(n>mmax){
istep=mmax<<1;
theta=isign*(6.28318530717959/mmax);
wtemp=sin(0.5*theta);
wpr=-2*wtemp*wtemp;
wpi=sin(theta);
wr=1.0;
wi=0.0;
for(m=1;m<mmax;m+=2){
for(i=m;i<=n;i+=istep){
j=i+mmax;
tempr=wr*data[j]-wi*data[j+1];
tempi=wr*data[j+1]+wi*data[j];
data[j]=data[i]-tempr;
data[j+1]=data[i+1]-tempi;
data[i]+=tempr;
data[i+1]+=tempi;
}
wr=(wtemp=wr)*wpr-wi*wpi+wr;
wi=wi*wpr+wtemp*wpi+wi;
}
mmax=istep;
}
} |
Partager