有没有什么模块可以实现收集外部声音信息并将频率信息转化成数字信号输入单片机？

void FFT(void)
{
uint8 i,j,k,b,p;
int16 Temp_Real,Temp_Imag,temp; // 中间临时变量
uint16 TEMP1;
for( i=1; i<=7; i++) /* for(1) */
{
b=1;
b <<=(i-1); //碟式运算，用于计算 隔多少行计算 例如 第一极 1和2行计算，，第二级
for( j=0; j<=b-1; j++) /* for (2) */
{
p=1;
p <<= (7-i);
p = p*j;
for( k=j; k<128; k=k+2*b) /* for (3) 基二fft */
{
Temp_Real = Fft_Real[k]; Temp_Imag = Fft_Image[k]; temp = Fft_Real[k+b];
Fft_Real[k] = Fft_Real[k] + ((Fft_Real[k+b]*COS_TAB[p])>>7) + ((Fft_Image[k+b]*SIN_TAB[p])>>7);
Fft_Image[k] = Fft_Image[k] - ((Fft_Real[k+b]*SIN_TAB[p])>>7) + ((Fft_Image[k+b]*COS_TAB[p])>>7);
Fft_Real[k+b] = Temp_Real - ((Fft_Real[k+b]*COS_TAB[p])>>7) - ((Fft_Image[k+b]*SIN_TAB[p])>>7);
Fft_Image[k+b] = Temp_Imag + ((temp*SIN_TAB[p])>>7) - ((Fft_Image[k+b]*COS_TAB[p])>>7);
// 移位.防止溢出. 结果已经是本值的 1/64
Fft_Real[k] >>= 1;
Fft_Image[k] >>= 1;
Fft_Real[k+b] >>= 1;
Fft_Image[k+b] >>= 1;
}
}
}
//Fft_Real[0] = Fft_Image[0] = 0; //去掉直流分量
for(j=0;j<64;j++)
{
TEMP1 = ((((Fft_Real[j] * Fft_Real[j])) + ((Fft_Image[j] * Fft_Image[j]))));//求功率
if(TEMP1<4)TEMP1=0;
else if(TEMP1<9)TEMP1=1;
else if(TEMP1<16)TEMP1=2;
else if(TEMP1<25)TEMP1=3;
else if(TEMP1<36)TEMP1=4;
else if(TEMP1<49)TEMP1=5;
else if(TEMP1<64)TEMP1=6;
else if(TEMP1<81)TEMP1=7;
else if(TEMP1<100)TEMP1=8;
else if(TEMP1<121)TEMP1=9;
else if(TEMP1<144)TEMP1=10;
else if(TEMP1<169)TEMP1=11;
else if(TEMP1<196)TEMP1=12;
else if(TEMP1<225)TEMP1=13;
else if(TEMP1<256)TEMP1=14;
else if(TEMP1<289)TEMP1=15;
else if(TEMP1<324)TEMP1=16;
else if(TEMP1<361)TEMP1=17;
else if(TEMP1<400)TEMP1=18;
else if(TEMP1<441)TEMP1=19;
else if(TEMP1<484)TEMP1=20;
else if(TEMP1<529)TEMP1=21;
else if(TEMP1<576)TEMP1=22;
else if(TEMP1<625)TEMP1=23 ;
else if(TEMP1<676)TEMP1=24;
else if(TEMP1<729)TEMP1=25;
else if(TEMP1<784)TEMP1=26;
else if(TEMP1<841)TEMP1=27;
else if(TEMP1<900)TEMP1=28;
else if(TEMP1<961)TEMP1=29;
else if(TEMP1<1024)TEMP1=30;
else TEMP1=31;
TEMP1 = (TEMP1 + 1) / 4;
if(TEMP1 > (LED_TAB[j]))
LED_TAB[j]=TEMP1;
}
}

既然你有单片机，这本来就是单片机干的事，还找什么模块，单片机干就好了？