设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 51单片机音乐频谱程序+电路设计
返回列表 发新帖
查看: 4540|回复: 4
收起左侧

51单片机音乐频谱程序+电路设计

  [复制链接]
ID:312016 发表于 2019-11-24 21:03 | 显示全部楼层 |阅读模式
0.jpg

单片机源程序如下:
  1. #include "src\STC12C5A.h"                 

  3. #include <intrins.h>      //51基本运算（包括_nop_空函数）
  4. #include <math.h>

  6. #include "src\Define.h"

  8. ///////全局变量///////
  9. uchar data DelayTime=9;                  
  10. uchar data gain=6,tt=0;

  12. uchar idata refreshflag[40];
  13. uchar  data LEDBuf[35];          //15列；从左到右；亮的位为真（1）；

  15. #include "src\ADC.c"
  16. #include "src\fft.h"

  18. uchar code ax[]={0,0,0,0,0,0,0,0,                                   //“爱心”图标数组
  19.                                  0,0,0,0,0,0,0,0,                        
  20. 0x00,0x00,0x00,0x70,0xF8,0xFC,0xFE,0x7F,0x7F,0x7F,0xFE,0xFC,0xF8,0x70,0x00,0x00,
  21.                                  0,0,0,0,0,0,0,0,
  22.                              0,0,0,0,0,0,0,0,
  23.                                 };

  25. void Delays(uint t)                  //延时函数
  26. {  
  27.         uint j;
  28.         while(--t)
  29.         {
  30.                 for(j=0;j<5;j++);
  31.         }   
  32. }

  34. void IOINIT()                //初始化IO口工作模式
  35. {
  36.         P0M1 = 0x00;            P0M0 = 0xff;       P0=0; //点阵列（Y）（L:OFF； H，H+:ON,ON+;）
  37.         P1M1 = B(01000011); P1M0 = B(00110000);P1=B(10111111); //(P17@（高阻，IN）&P16@（高阻，IN） ... P11@(高阻，IN)AD2;P10@(高阻，IN)AD1;      
  38.         P2M1 = B(00000000); P2M0 = B(11111111);P2=0; //点阵行（X0（Left））（L:OFF； H，H+:ON,ON+;）  
  39.         P3M1 = B(00000000);        P3M0 = B(11111111);P3=0; //点阵行（X1（Right））（L:OFF； H，H+:ON,ON+;）               
  40.         P1ASF =B(00000011);                          //将P10,P11的IO设置为模拟输入功能；     
  41. }

  43. void BufToLED_Refresh()                //把LEDBuf的数值数据传到P0,通过LED显示出来
  44. {        
  45.          uchar data i;                 //定义循环变量i               
  46.          uint temp=0x7fff;         //定义temp        

  48.          for(i=0;i<32;i+=2)        //循环16次操作
  49.          {
  50.                  P0=0x00;                  //P0输出低电平
  51.                 P2=temp/256;         //P2为前8位
  52.                 P3=temp%256;        //P3为后8位
  53.                 P0=~LEDBuf[i];        //调用LEDBuf数组取反        
  54.                 Delays(DelayTime);        //延时一下
  55.                 P2=0xff;                 //消隐        
  56.                 P3=0xff;                   //消隐
  57.                 temp>>=1;                //右移一位        
  58.                 temp|=0x8000;        //目的是为从左到右依次允许点亮LED(列)提供条件        
  59.          }
  60. }

  62. void LOVE()         //“爱心”图标显示
  63. {        
  64.          uchar data i;                   //定义循环变量i
  65.          uint temp=0x7fff;         //定义temp

  67.          for(i=0;i<16;i++)        //循环16次操作
  68.          {
  69.                  P0=0x00;                //P0输出低电平
  70.                 P2=temp/256;          //P2为前8位
  71.                 P3=temp%256;        //P3为后8位
  72.                 P0=ax[i+tt];          //调用“爱心”图标数据
  73.                 Delays(DelayTime);         //延时一下
  74.                 P2=0xff;                   //消隐
  75.                 P3=0xff;                //消隐
  76.                 temp>>=1;                   //右移一位
  77.                 temp|=0x8000;          //目的是为从左到右依次允许点亮LED(列)提供条件
  78.          }
  79. }

  81. void Timer_INT()        //定时器初始化
  82. {
  83.          TMOD = 0x10; //高4位控制T/C1
  84.         EA = 1;             //开总中断
  85.         TH1 = 0x00;  //16位计数寄存器T1高8位
  86.         TL1 = 0x00;  //16位计数寄存器T1低8位
  87.         ET1 = 1;     //T/C1中断开
  88.     TR1 = 1;     //T/C1启动
  89. }

  91. void ax_xs()                  //爱心显示
  92. {
  93.         uint pp=4000;        //定义pp=4000
  94.         while(pp--)                //如果PP减1后为真(即pp减1后不为0,直到pp=0才跳出while循环)
  95.         {
  96.                 if(pp%250==0)        //如果PP/250,余数为0(即pp能被250整除)
  97.                 {
  98.                         tt++;                //tt加1
  99.                 }
  100.                 LOVE();                         //“爱心”图标显示
  101.         }
  102.         pp=4000;                         //pp重新赋值0                                       
  103.         while(pp--)                //如果PP减1后为真(即pp减1后不为0,直到pp=0才跳出while循环)
  104.         {
  105.                 LOVE();                 //“爱心”图标显示
  106.         }
  107.         pp=4000;                   //pp重新赋值0
  108.         while(pp--)                //如果PP减1后为真(即pp减1后不为0,直到pp=0才跳出while循环)
  109.         {
  110.                 if(pp%250==0)        //如果PP/250,余数为0(即pp能被250整除)
  111.                 {
  112.                         tt++;                //tt加1
  113.                 }
  114.                 LOVE();                        //“爱心”图标显示
  115.         }
  116. }

  118. void Main()                        //主函数入口
  119. {  
  120.         uint data Count=700;                   //定义变量Count
  121.         uchar data i,Cgain,num=0;        //定义变量 i,Cgain,num        

  123.         IOINIT();                        //初始化IO口工作模式
  124.         ax_xs();                          //爱心显示
  125.         InitADC();                           //ADC初始化
  126.         Timer_INT();                 //定时器初始化

  128.         while(1)                //主循环
  129.         {
  130.                 for(i=0;i<65;i++)                 //for循环操作65次(读取64次ADC转换结果)
  131.                 {  
  132.                         dd[i].real=(GetADCResult(0)+GetADCResult(1))<<gain;         
  133.                         //读取 ad 结果并放大 2 的 gain（变量）次方，然后给 FFT 算法的缓存区赋值
  134.                 }
  135.                  processfft();                        //傅立叶变化及处理
  136.                 if(dd[2].real<32)                  //如果读取到的AD结果<32(即音频幅度太小)
  137.                 {
  138.                         if(++Count==300)        //电平值过小，则降低gain，减少噪音的电平显示
  139.                         {
  140.                                 Count=0;                //Count清0               
  141.                                 gain=6;                        //gain=6               
  142.                         }
  143.                 }
  144.                 else                                         //否则在AD结果在正常音频范围
  145.                 {
  146.                         Count=1;                        //Count赋值1(为下次的音频幅度太小做准备)
  147.                         if(++num==0xAF)                //播放时，Auto gain；
  148.                         {
  149.                                 num=0;                         //num清0               
  150. /*自动增益的作用: 当输入的音频信号的音量变大或变小时，采样的 AD 值幅度也会有相应趋势的变化，
  151. 于是根据这个值自动调节 AD 值放大的倍数，维持在一定的范围内，从而使显示的效果最好，
  152. 不会出现满屏或者空屏的现象*/
  153.                                 //自动增益；Automatic gain;
  154.                                 Cgain=dd[2].real/32;                                       
  155.                                 if(7<Cgain<=8)                 
  156.                                 {
  157.                                         gain=4;                        //4
  158.                                 }
  159.                                 else if(4<Cgain<=6)
  160.                                 {
  161.                                         gain=5;                        //5
  162.                                 }
  163.                                 else if(2<Cgain<=4)
  164.                                 {
  165.                                         gain=6;                        //6
  166.                                 }
  167.                                 else
  168.                                 {
  169.                                         gain=7;                          //7
  170.                                 }
  171.                         }
  172.                 }                 
  173.         }
  174. }

  176. void LEDRefresh_INT() interrupt 3    //定时器中断服务函数
  177. {
  178.     TH1 = 0x8A;     //定时15ms
  179.     TL1 = 0xD0;     //定时时间越小显示越清楚,但是频谱变化越缓慢
  180.                                         //反之......大....抖动大.....频谱变化越快
  181.         BufToLED_Refresh();        //把LEDBuf的数值数据传到P0,通过LED显示出来
  182.                                                 //刷新显示缓存区数据来点亮点阵屏               
  183. }
复制代码

所有资料51hei提供下载:
51单片机音乐频谱设计.7z (338.03 KB, 下载次数: 150)
回复

使用道具 举报

ID:48994 发表于 2021-9-20 14:13 | 显示全部楼层
支持一下楼主，这么好的程序！
回复

使用道具 举报

ID:849266 发表于 2021-11-3 19:22 | 显示全部楼层
为什么完全按照电路图连线，到最后却不亮啊
回复

使用道具 举报

ID:1042582 发表于 2022-10-16 21:48 | 显示全部楼层
一人浅笑尽长安 发表于 2021-11-3 19:22
为什么完全按照电路图连线，到最后却不亮啊

应该单片机用错了
回复

使用道具 举报

ID:71896 发表于 2023-3-8 15:40 | 显示全部楼层
不错，自动增益控制。。。。
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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