找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 9285|回复: 4
打印 上一主题 下一主题
收起左侧

51单片机ADC采样傅里叶变换频谱输出

[复制链接]
跳转到指定楼层
楼主
ID:140343 发表于 2016-9-25 10:56 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
  1. //完成显示数据的转换工作,包括定点下落速度控制以及定点更新定格
  2. // 对fft数据进行处理,得到各个频率短的电压增幅值
  3. //++++++++++++++++++++++++++++++++++++++//
  4. //复数乘法
  5. void ee(struct compx b1,uchar data b2)
  6. {
  7. temp.real=b1.real*iw[2*b2]-b1.imag*iw[2*b2+1];
  8. temp.imag=b1.real*iw[2*b2+1]+b1.imag*iw[2*b2];
  9. }
  10. //++++++++++++++++++++++++++++++++++++++//  
  11. //乘方函数
  12. uint mypow(uchar data nbottom,uchar data ntop)
  13. {
  14.     uint data result=1;
  15.     uchar data t;   
  16.     for(t=0;t<ntop;t++)result*=nbottom;
  17.     return result;
  18. }
  19. //++++++++++++++++++++++++++++++++++++++//
  20. //快速傅里叶变换
  21. void fft(struct compx *xin,uchar data N)
  22. {
  23. uchar data  fftnum,i,j,k,l,m,n,disbuff,dispos,dissec;
  24. data struct compx t;
  25. fftnum=N;                         //傅里叶变换点数
  26. for(m=1;(fftnum=fftnum/2)!=1;m++);//求得M的值
  27. for(k=0;k<=N-1;k++)               //码位倒置
  28. {
  29. n=k;
  30. j=0;
  31. for(i=m;i>0;i--)             //倒置
  32. {
  33. j=j+((n%2)<<(i-1));
  34. n=n/2;
  35. }
  36. if(k<j){t=xin[1+j];xin[1+j]=xin[1+k];xin[1+k]=t;}//交换数据
  37. }  
  38. for(l=1;l<=m;l++)                //FFT运算
  39. {
  40. disbuff=mypow(2,l);          //求碟间距离
  41. dispos=disbuff/2;            //求碟间两点之间距离
  42. for(j=1;j<=dispos;j++)
  43. for(i=j;i<N;i=i+disbuff) //遍历M级所有碟形
  44. {
  45. dissec=i+dispos;     //求第二点位置
  46. ee(xin[dissec],(uint)(j-1)*(uint)N/disbuff);//复数乘法
  47. t=temp;
  48. xin[dissec].real=xin[i].real-t.real;
  49. xin[dissec].imag=xin[i].imag-t.imag;
  50. xin[i].real=xin[i].real+t.real;
  51. xin[i].imag=xin[i].imag+t.imag;
  52. }
  53. }
  54. }














  55. void processfft(void)
  56. {
  57.     uchar data pt=0,tmp;

  58.     for(pt=1;pt<65;pt++)
  59.     {
  60.         dd[pt].imag=0;                //清零需部
  61.     }
  62.     fft(dd,64);                       //对当前数据进行傅里叶变换

  63.     for(pt=1;pt<65;pt++)
  64.     {                                      
  65.         dd[pt].real=sqrt(dd[pt].real*dd[pt].real+dd[pt].imag*dd[pt].imag);//取均方根
  66.     }

  67. if(Menu==1)
  68. {
  69. for(pt=2;pt<34;pt+=2)
  70.    {      
  71. for(tmp=(dd[pt].real/32)+1,LEDBuf[pt]=0xFF;tmp>=1;tmp--)//tmp>1;不保留最低位那一行长亮
  72. {
  73. LEDBuf[pt]<<=1;
  74. }
  75. LEDBuf[pt]=~(LEDBuf[pt]);

  76. }
  77. }
  78. else if(Menu==2)
  79. {

  80. //ÏÂÂä¸D
  81. for(pt=2;pt<34;pt+=2)
  82.    {      
  83. tmp=(dd[pt].real/32)+1;
  84. if(refreshflag[pt]<tmp)            //刷新数据取较大高度值 存储显示
  85. {
  86. for(LEDBuf[pt]=0xFF;tmp>1;tmp--)//tmp>1;不保留  最低位那一行长亮;{}一次也不执行
  87. {
  88. LEDBuf[pt]<<=1;
  89. }
  90. refreshflag[pt]=(dd[pt].real/32)+1;
  91. }
  92. else
  93. {
  94. if(refreshflag[pt]>1)refreshflag[pt]--;                //定点下落速度控制  改变值可以改变下落速度
  95. for(LEDBuf[pt]=0xFF,tmp=refreshflag[pt];tmp>1;tmp--)   //tmp>1;不保留  最低位 那一行长亮
  96. {
  97. LEDBuf[pt]<<=1;
  98. }
  99. }
  100. }
  101. }
  102. else if(Menu==0)
  103. {

  104. //ÏÂÂä¸DÆμÆ×
  105. for(pt=2;pt<34;pt+=2)
  106.    {      
  107. tmp=(dd[pt].real/32)+1;
  108. if(refreshflag[pt]<tmp)          //刷新数据取较大高度值 存储显示
  109. {
  110. for(LEDBuf[pt]=0xFF;tmp>=1;tmp--)//tmp>1;不保留  最低位那一行长亮;{}一次也不执行
  111. {
  112. LEDBuf[pt]<<=1;
  113. }
  114. refreshflag[pt]=(dd[pt].real/32)+1;
  115. }
  116. else
  117. {
  118. if(refreshflag[pt]>1)refreshflag[pt]--;                        
  119. for(LEDBuf[pt]=0xFF,tmp=refreshflag[pt];tmp>=1;tmp--)
  120. {
  121. LEDBuf[pt]<<=1;
  122. }
  123. }
  124. LEDBuf[pt]=~(LEDBuf[pt]);
  125. }
  126. }
  127. }  
复制代码
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏5 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:238767 发表于 2017-10-12 09:18 | 只看该作者
请问这里 “Menu” = 0,1,2 是什么意思?
回复

使用道具 举报

板凳
ID:254064 发表于 2018-3-12 15:50 | 只看该作者
yxf0915 发表于 2017-10-12 09:18
**** 作者被禁止或删除 内容自动屏蔽 ****

我也搞不懂这个,同问
回复

使用道具 举报

地板
ID:336427 发表于 2018-7-29 12:13 | 只看该作者
可用吗
回复

使用道具 举报

5#
ID:188748 发表于 2019-9-2 15:14 | 只看该作者
这代码乱写的,没啥用
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表