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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机音乐喷泉原理图-C语言程序与视频
返回列表 发新帖
查看: 3765|回复: 2
打印 上一主题 下一主题
收起左侧

单片机音乐喷泉原理图-C语言程序与视频

[复制链接]
跳转到指定楼层
楼主
ID:880098 发表于 2021-1-24 13:03 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
音乐喷泉51单片机为核心，对声音信号的采集和转换，来调节水泵电机转速的变化，表现为随音乐的大小来改变喷泉水柱的高度。有视频演示。
制作出来的实物图如下：


电路原理图如下：


单片机源程序如下:
  1. #include<reg51.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. sbit out=P3^7;

  6. sbit led1=P0^0;
  7. sbit led2=P0^1;
  8. sbit led3=P0^2;
  9. sbit led4=P0^3;
  10. sbit led5=P0^4;
  11. sbit led6=P0^5;
  12. sbit led7=P0^6;
  13. sbit led8=P0^7;

  15. sbit SCL=P1^2;               
  16. sbit DO=P1^3;               
  17. sbit CS=P1^0;               

  19. uchar h1,date;
  20. unsigned char adval;
  21. void delay(uint z)
  22. {
  23.    uint y;
  24.    for(;z>0;z--)
  25.    for(y=5;y>0;y--);
  26. }

  28.        
  29. //ADC0832
  30.                                                
  31.                                                  
  32. unsigned char ad0832read(bit SGL,bit ODD)
  33. {
  34.         unsigned char i=0,value=0,value1=0;               
  35.                 SCL=0;
  36.                 DO=1;
  37.                 CS=0;                //开始
  38.                 SCL=1;                //第一个上升沿       
  39.                 SCL=0;
  40.                 DO=SGL;
  41.                 SCL=1;          //第二个上升沿
  42.                 SCL=0;
  43.                 DO=ODD;
  44.                 SCL=1;           //第三个上升沿
  45.                 SCL=0;           //第三个下降沿
  46.                 DO=1;
  47.                 for(i=0;i<8;i++)
  48.                 {
  49.                         SCL=1;
  50.                         SCL=0; //开始从第四个下降沿接收数据
  51.                         value<<=1;
  52.                         if(DO)
  53.                                 value=value|0x01;                                               
  54.                 }
  55.                 for(i=0;i<8;i++)
  56.                 {                        //接收校验数据
  57.                         value1=value1>>1;
  58.                         if(DO)
  59.                                 value1=value1|0x80;
  60.                         SCL=1;
  61.                         SCL=0;
  62.                 }
  63.                 CS=1;
  64.                 SCL=1;
  65.                 DO=1;       
  66.                 if(value==value1)                                       
  67.                         return value;
  68.                 return 0;
  69. }

  71. void penquan()          //PWM调压

  73. {

  75.         date=ad0832read(1,0);

  77.         out=1;
  78. //h1=(180-date);
  79.   delay(date);  //50
  80.         if(date>70) led1=0; else led1=1; //120
  81.         if(date>150) led2=0; else led2=1;
  82.         if(date>220) led3=0; else led3=1;
  83. //        if(h1>100) led4=0; else led4=1;
  84. //        if(h1>140) led5=0; else led5=1;
  85. //        if(h1>180) led6=0; else led6=1;
  86. //        if(h1>230) led7=0; else led7=1;
  87. //        if(h1>280) led8=0; else led8=1;
  88.         out=0;       

  90.         delay(250-date);   //240
  91. }
  92. void main()
  93. {

  95.    while(1)
  96.    {
  97.            penquan();                           
  98.    }
  99. }
复制代码
以上资料51hei下载地址：
音乐喷泉-原理图-程序-视频.rar (3.98 MB, 下载次数: 71)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏3 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:692689 发表于 2022-3-22 11:03 | 只看该作者
谢谢楼主，请问还有proteus仿真图吗
回复

使用道具 举报

板凳
ID:1025314 发表于 2022-5-10 22:33 | 只看该作者
调压电路中的180-date是什么意思？为什么是180-呢？
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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