標(biāo)題: 單片機音樂噴泉原理圖-C語言程序與視頻 [打印本頁]
作者: jyb-jyb-2    時間: 2021-1-24 13:03
標(biāo)題: 單片機音樂噴泉原理圖-C語言程序與視頻
音樂噴泉51單片機為核心，對聲音信號的采集和轉(zhuǎn)換，來調(diào)節(jié)水泵電機轉(zhuǎn)速的變化，表現(xiàn)為隨音樂的大小來改變噴泉水柱的高度。有視頻演示。
制作出來的實物圖如下：


電路原理圖如下：


單片機源程序如下:
  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; //開始從第四個下降沿接收數(shù)據(jù)
  51.                         value<<=1;
  52.                         if(DO)
  53.                                 value=value|0x01;                                               
  54.                 }
  55.                 for(i=0;i<8;i++)
  56.                 {                        //接收校驗數(shù)據(jù)
  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調(diào)壓

  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. }
復(fù)制代碼
以上資料51hei下載地址：
音樂噴泉-原理圖-程序-視頻.rar (3.98 MB, 下載次數(shù): 72)

作者: 小阿草    時間: 2022-3-22 11:03
謝謝樓主，請問還有proteus仿真圖嗎
作者: lhqniubi    時間: 2022-5-10 22:33
調(diào)壓電路中的180-date是什么意思？為什么是180-呢？



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1