久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 10638|回復: 9
打印 上一主題 下一主題
收起左側

51單片機頻譜顯示 PCB圖+程序源代碼

  [復制鏈接]
跳轉到指定樓層
樓主




看到淘寶上有做的頻譜顯示的東西，感覺挺好看，就自己用覆銅板做了一個，然后分享一下資料!音頻線是自己用耳機線剪得，只取了一個聲道，PCB里的電阻用的是0R電阻當跳線，然后后來對圖做了些修改，把直插的改成貼片的，可能程序有些變化，只要把定時器里的掃描函數改了就行

源代碼：
  1. #include<stc12c5a.h>
  2. #include<intrins.h>
  3. #include"basic.h"
  4. typedef unsigned char uint8;
  5. typedef unsigned int uint16;
  6. #define ADC_FLAG    (1<<4)    /*ADC_中斷標志*/
  7. /*放大128倍后的sin整數表（128）*/
  8. code char SIN_TAB[128]={0,6,12,18,24,30,36,42,48,54,59,65,70,75,80,85,89,94,98,102,
  9.                         105,108,112,114,117,119,121,123,124,125,126,126,126,126,126,
  10. 125,124,123,121,119,117,114,112,108,105,102,98,94,89,85,80,75,
  11. 70,65,59,54,48,42,36,30,24,18,12,6,0,-6,-12,-18,-24,-30,-36,-42,
  12. -48,-54,-59,-65,-70,-75,-80,-85,-89,-94,-98,-102,-105,-108,-112,
  13. -114,-117,-119,-121,-123,-124,-125,-126,-126,-126,-126,-126,-125,
  14. -124,-123,-121,-119,-117,-114,-112,-108,-105,-102,-98,-94,-89,-85,
  15. -80,-75,-70,-65,-59,-54,-48,-42,-36,-30,-24,-18,-12,-6
  16.   };

  18. /*放大128倍后的cos整數表（128）*/
  19. code char COS_TAB[128]={127,126,126,125,124,123,121,119,117,114,112,108,105,102,98,94,
  20.                         89,85,80,75,70,65,59,54,48,42,36,30,24,18,12,6,0,-6,-12,-18,-24,
  21. -30,-36,-42,-48,-54,-59,-65,-70,-75,-80,-85,-89,-94,-98,-102,
  22. -105,-108,-112,-114,-117,-119,-121,-123,-124,-125,-126,-126,-126,
  23. -126,-126,-125,-124,-123,-121,-119,-117,-114,-112,-108,-105,-102,
  24. -98,-94,-89,-85,-80,-75,-70,-65,-59,-54,-48,-42,-36,-30,-24,-18,
  25. -12,-6,0,6,12,18,24,30,36,42,48,54,59,65,70,75,80,85,89,94,98,102,
  26. 105,108,112,114,117,119,121,123,124,125,126,126
  27.   };

  29. /*采樣存儲序列表*/
  30. code char LIST_TAB[128] = {0,64,32,96,16,80,48,112,8,72,40,104,24,88,56,120,4,68,36,100,20,84,52,116,
  31.                            12,76,44,108,28,92,60,124,2,66,34,98,18,82,50,114,10,74,42,106,26,90,58,
  32.   122,6,70,38,102,22,86,54,118,14,78,46,110,30,94,62,126,1,65,33,97,17,81,49,
  33.   113,9,73,41,105,25,89,57,121,5,69,37,101,21,85,53,117,13,77,45,109,29,93,61,
  34.   125,3,67,35,99,19,83,51,115,11,75,43,107,27,91,59,123,7,71,39,103,23,87,55,
  35.   119,15,79,47,111,31,95,63,127
  36. };

  38. /*分級量化表*/
  39. uint8 QTY_TAB[] = {0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff};
  40. uint8 ADC_Count=0;
  41. uint8 i,j,k,b,p,anum;
  42. uint16 xdata Fft_Real[128];
  43. uint16 xdata Fft_Image[128];               // fft的虛部
  44. uint8 xdata LED_TAB[16]; //記錄紅色柱狀

  46. /********************************************************************
  47. * 名稱 : FFT
  48. * 功能 : 碟型運算轉換
  49. * 輸入 : 無
  50. * 輸出 : 讀出的值
  51. ***********************************************************************/
  52. void FFT()//基2fft
  53. {                 
  54. uint16 Temp_Real,Temp_Imag,temp;                // 中間臨時變量
  55. uint16 TEMP1 = 0,max=0;
  56. for( i=1; i<=7; i++)                            /* for(1) */
  57. {
  58. b=1;
  59. b <<=(i-1);                                 //碟式運算，用于計算隔多少行計算例如 第一極 1和2行計算
  60. for( j=0; j<=b-1; j++)                      /* for (2) */
  61. {
  62. p=1;
  63. p <<= (7-i);            
  64. p = p*j;
  65. for( k=j; k<128; k=k+2*b)               /* for (3)  */
  66. {
  67. Temp_Real=Fft_Real[k];
  68. Temp_Imag=Fft_Image[k];
  69. temp=Fft_Real[k+b];
  70. Fft_Real[k]=Fft_Real[k]+((Fft_Real[k+b]*COS_TAB[p])>>7)+((Fft_Image[k+b]*SIN_TAB[p])>>7);
  71. Fft_Image[k]=Fft_Image[k]-((Fft_Real[k+b]*SIN_TAB[p])>>7)+((Fft_Image[k+b]*COS_TAB[p])>>7);
  72. Fft_Real[k+b]=Temp_Real-((Fft_Real[k+b]*COS_TAB[p])>>7)-((Fft_Image[k+b]*SIN_TAB[p])>>7);
  73. Fft_Image[k+b]=Temp_Imag+((temp*SIN_TAB[p])>>7)-((Fft_Image[k+b]*COS_TAB[p])>>7);          // 移位.防止溢出. 結果已經是本值的 1/64               
  74. Fft_Real[k] >>= 1;            
  75. Fft_Image[k] >>= 1;
  76. Fft_Real[k+b] >>= 1;                 
  77. Fft_Image[k+b] >>= 1;                                                      
  78. }     
  79. }
  80. }

  82. for(j=0;j<16;j++)//16分頻
  83. {
  84. TEMP1=((((Fft_Real[j+1]* Fft_Real[j+1]))+((Fft_Image[j+1]*Fft_Image[j+1])))>>1);//求各頻段幅值
  85. if(TEMP1<1)TEMP1=0;
  86. LED_TAB[j]=TEMP1;
  87. if(LED_TAB[j]>max)max=LED_TAB[j];
  88. }
  89. if(max > 16)//分級量化
  90. {
  91. max/=16;
  92. for(j=0;j<16;j++)LED_TAB[j]/=max;
  93. }      
  94. }

  96. /********************************************************************
  97. * 名稱 : GPIO_init
  98. * 功能 : GPIO初始化
  99. * 輸入 : 無
  100. * 輸出 : 讀出的值
  101. ***********************************************************************/
  102. void GPIO_init()
  103. {
  104. P0M0 = 1; P0M1 = 0; P0 = 0XFF;    /*列*/
  105. P2M0 = 1; P2M1 = 0; P2 = 0XFF;
  106. P3M0 = 1; P3M1 = 0; P3 = 0XFF;   /*行*/
  107. }
  108. /********************************************************************
  109. * 名稱 : timer_Init
  110. * 功能 : 內部寄存器初始化
  111. * 輸入 : 無
  112. * 輸出 : 無
  113. ***********************************************************************/
  114. void timer_Init()
  115. {
  116. TMOD = 0X12;
  117. TH0 = 0xb0;                                 
  118. TL0 = 0xb0;
  119. ET0 = 1;        //定時器0 打開
  120. TR0 = 0;        //關閉定時器
  121. TH1 = 0xfd;
  122. TL1 = 0Xa8;
  123. ET1  = 1;
  124. TR1  = 1;
  125. EA   = 1;
  126. }
  127. /********************************************************************
  128. * 名稱 : adc_Init
  129. * 功能 : 內部寄存器初始化
  130. * 輸入 : 無
  131. * 輸出 : 無
  132. ***********************************************************************/
  133. void adc_Init()
  134. {   
  135. ADC_CONTR = 0x80;             //ADC電源打開
  136. _nop_();_nop_();_nop_();_nop_();
  137. P1ASF = 0x01;                 //0000,0001, 將 P1.0 置成模擬口
  138. AUXR1 &=0xFB;                 //1111,1011, 令 ADRJ=0
  139. ADC_RES = 0x00;               //清零寄存器
  140. ADC_RESL = 0x00;
  141. EADC  = 1;   //AD中斷打開
  142. EA = 1;   //總中斷打開
  143. }

  145. /********************************************************************
  146. * 名稱 : main
  147. * 功能 : 主程序
  148. * 輸入 : 無
  149. * 輸出 : 無
  150. ***********************************************************************/
  151. void main()
  152. {
  153. uint8 i = 0;
  154. GPIO_init();
  155. timer_Init();
  156. adc_Init();
  157. while(1)
  158. {
  159. ADC_Count = 0;
  160. EADC = 1;
  161. TR0  = 1;
  162. while(ADC_Count < 128);       //滿足128點
  163. for(i=0; i<128; i++)   //清除虛部
  164. {
  165. Fft_Image[i] = 0;
  166. }
  167. FFT();                        //FFT運算并轉換為各頻段幅值

  169. }
  170. }
  171. /********************************************************************
  172. * 名稱 : ADC_Finish
  173. * 功能 : ADC轉換完成中斷服務
  174. * 輸入 : 無
  175. * 輸出 : 無
  176. ***********************************************************************/
  177. void ADC_Finish() interrupt 5
  178. {
  179. Fft_Real[LIST_TAB[ADC_Count]] = (int)(((ADC_RES)<<1)+(ADC_RESL>>1)*2)>>3;    /*按LIST_TAB表順序，進行存儲采樣值*/
  180. if(ADC_Count <= 127)
  181. {
  182. ADC_Count++;           /*自動增量控制*/
  183. ADC_CONTR &= !ADC_FLAG;
  184. }
  185. else
  186. {
  187. EADC = 0;
  188. TR0  = 0;
  189. }
  190. }
  191. /********************************************************************
  192. * 名稱 : interrupt_timer1
  193. * 功能 : 顯示屏幕刷新中斷服務
  194. * 輸入 : 無
  195. * 輸出 : 無
  196. ***********************************************************************/
  197. void interrupt_timer1() interrupt 3
  198. {
  199. static uint8 rec = 0;
  200. TH1 = 0xfd;
  201. TL1 = 0Xa8;

  203. switch(rec)      //往點陣屏填充一列的數據
  204. {
  205. case 0: P0 = QTY_TAB[LED_TAB[0]]; P2 = 0;break;
  206. case 1: P0 = QTY_TAB[LED_TAB[1]]; P2 = 1;break;
  207. case 2: P0 = QTY_TAB[LED_TAB[2]]; P2 = 2;break;
  208. case 3: P0 = QTY_TAB[LED_TAB[3]]; P2 = 3;break;
  209. case 4: P0 = QTY_TAB[LED_TAB[4]]; P2 = 4;break;
  210. case 5: P0 = QTY_TAB[LED_TAB[5]]; P2 = 5;break;
  211. case 6: P0 = QTY_TAB[LED_TAB[6]]; P2 = 6;break;
  212. case 7: P0 = QTY_TAB[LED_TAB[7]]; P2 = 7;break;
  213. case 8: P0 = QTY_TAB[LED_TAB[8]]; P2 = 8;break;
  214. case 9: P0 = QTY_TAB[LED_TAB[9]]; P2 = 9;break;
  215. case 10: P0 = QTY_TAB[LED_TAB[10]]; P2 = 10;break;
  216. case 11: P0 = QTY_TAB[LED_TAB[11]]; P2 = 11;break;
  217. case 12: P0 = QTY_TAB[LED_TAB[12]]; P2 = 12;break;
  218. case 13: P0 = QTY_TAB[LED_TAB[13]]; P2 = 13;break;
  219. case 14: P0 = QTY_TAB[LED_TAB[14]]; P2 = 14;break;
  220. case 15: P0 = QTY_TAB[LED_TAB[15]]; P2 = 15;break;
  221. default:break;
  222. }
  223. rec++;
  224. if(rec > 15)
  225. {
  226. rec = 0;
  227. }
  228. }
  229. /********************************************************************
  230. * 名稱 : Ad_Control
  231. * 功能 : 控制采樣率
  232. * 輸入 : 無
  233. * 輸出 : 無
  234. ***********************************************************************/
  235. void Ad_Control() interrupt 1
  236. {
  237. ADC_CONTR = 0xe8;       //開始AD采集
  238. _nop_();_nop_();_nop_();_nop_();
  239. }
復制代碼


全部資料（壓縮包）下載：


DIY音樂頻譜顯示源代碼.rar

125.06 KB, 下載次數: 129, 下載積分: 黑幣 -5

pinaf.rar

2.93 KB, 下載次數: 90, 下載積分: 黑幣 -5

頻譜.rar

2.5 KB, 下載次數: 96, 下載積分: 黑幣 -5

board.rar

1004.33 KB, 下載次數: 91, 下載積分: 黑幣 -5

評分

參與人數 1黑幣 +5 收起 理由
bgswqy + 5 絕世好帖！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏4 分享淘帖 頂頂1 踩踩
回復

使用道具 舉報

沙發
ID:90996 發表于 2017-6-26 20:04 | 只看該作者
下載下來看看，最近在研究這個
回復

使用道具 舉報

板凳
ID:162136 發表于 2017-11-8 15:08 | 只看該作者
學習學習，感謝。
回復

使用道具 舉報

地板
ID:338306 發表于 2018-5-25 20:40 | 只看該作者
下載看看
回復

使用道具 舉報

5#
ID:338198 發表于 2018-5-25 22:15 來自觸屏版 | 只看該作者
看起來很好看，值得學習，有空做一個
回復

使用道具 舉報

6#
ID:399717 發表于 2018-9-19 11:55 | 只看該作者
在嗎？能加個扣詳細聊一下不，硬件電路咋連啊？
回復

使用道具 舉報

7#
ID:324611 發表于 2019-7-9 13:44 | 只看該作者
好東西，學習下。
回復

使用道具 舉報

8#
ID:13396 發表于 2019-9-3 18:53 | 只看該作者
學習學習，感謝。
回復

使用道具 舉報

9#
ID:128101 發表于 2020-1-2 15:19 | 只看該作者
學習學習 感謝分享
回復

使用道具 舉報

10#
ID:293907 發表于 2020-1-29 11:41 | 只看該作者
不錯，很有用
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 成年人黄色免费视频 | 国产高清免费视频 | 色伊人网 | 麻豆毛片 | 日韩精品一区二区三区视频播放 | 久久精品毛片 | 一本一道久久a久久精品蜜桃 | 久久久久久免费精品一区二区三区 | 久久这里只有精品首页 | 精品一二区 | 欧洲一级毛片 | 免费h视频| 日本精品一区二区三区四区 | 亚洲在线| 黄网在线观看 | 一级毛片成人免费看a | 欧美一区二区在线 | 性xxxxx | 韩国av电影网 | 日韩一二三区视频 | 在线观看你懂的网站 | 国产一区二区三区久久久久久久久 | 亚洲国产精品久久久久秋霞不卡 | 久久免费视频在线 | 国产成人精品一区二区三区在线 | 欧美激情一区 | www.精品国产 | a级片www| 国产91黄色| 狠狠色狠狠色综合日日92 | 一级黄色av电影 | av片在线观看 | 97伦理最新伦理 | 欧洲一级毛片 | 中文字幕人成人 | 中文成人在线 | 久久久蜜桃 | 精品国产乱码久久久久久丨区2区 | 日韩视频一区二区三区 | 亚洲福利片 | 成人影 |