欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 分享一個51可用的蜂鳴器演奏八月桂花音樂 [打印本頁]
作者: yyysss    時間: 2018-6-27 16:27
標題: 分享一個51可用的蜂鳴器演奏八月桂花音樂
蜂鳴器音樂之八月桂花

單片機源程序如下:
  1. /************************************************************************  
  2. [文件名]  C51音樂程序(八月桂花)  
  3. [功能]    通過單片機演奏音樂  
  4.   
  5. /**********************************************************************/   
  6. #include <REG52.H>   
  7. #include <INTRINS.H>   
  8. //本例采用89C52, 晶振為12MHZ   
  9. //關于如何編制音樂代碼, 其實十分簡單,各位可以看以下代碼.   
  10. //頻率常數(shù)即音樂術語中的音調(diào),而節(jié)拍常數(shù)即音樂術語中的多少拍;   
  11. //所以拿出譜子, 試探編吧!   

  13. sbit Beep =  P1^5;
  14.    
  15. unsigned char n=0;  //n為節(jié)拍常數(shù)變量   
  16. unsigned char code music_tab[] ={   
  17. 0x64,0x82,0x92,0x96,0x82,0x82,0x92,0xa2,0x82,0x94,0x04,0x64,0x82,0x92,

  19. 0x96,0x92,0xd2,0xd2,0xa2,0xa2,0x82,0x82,0x62,0x92,0x92,0x02,0x82,

  21. 0x94,0x04,0x64,0x82,0x92,0x96,0x82,0x82,0x92,0xa2,0x82,0x94,0x04,0x64,

  23. 0x82,0x92,0x96,0x92,0x82,0x92,0x92,0x52,0x64,0x04,0x22,0x42,0x52,0x56,0x42,0x42,0x52,

  25. 0x62,0x42,0x56,0x42,0x62,0x82,0x82,0x82,0x82,0x82,0x82,0x62,0x84,0x82,0x92,

  27. 0x94,0x04, //格式為: 頻率常數(shù), 節(jié)拍常數(shù), 頻率常數(shù), 節(jié)拍常數(shù),   
  28.   
  29. };   
  30.    
  31. void int0()  interrupt 1   //采用中斷0 控制節(jié)拍   
  32. {  TH0=0xd8;   
  33.    TL0=0xef;   
  34.    n--;   
  35. }   
  36.    
  37. void delay (unsigned char m)   //控制頻率延時   
  38. {   
  39. unsigned i=3*m;   
  40. while(--i);   
  41. }   
  42.    
  43. void delayms(unsigned char a)  //豪秒延時子程序   
  44. {   
  45.   while(--a);                  //采用while(--a) 不要采用while(a--); 各位可編譯一下看看匯編結(jié)果就知道了!   
  46. }   
  47.    
  48. void main()   
  49. { unsigned char p,m;   //m為頻率常數(shù)變量   
  50.   unsigned char i=0;   
  51.   TMOD&=0x0f;   
  52.   TMOD|=0x01;   
  53.   TH0=0xd8;TL0=0xef;   
  54.   IE=0x82;   
  55. play:   
  56.    while(1)   
  57.     {   
  58.     a: p=music_tab[i];   
  59.        if(p==0x00)       { i=0, delayms(1000); goto play;}     //如果碰到結(jié)束符,延時1秒,回到開始再來一遍   
  60.        else if(p==0xff)  { i=i+1;delayms(100),TR0=0; goto a;}  //若碰到休止符,延時100ms,繼續(xù)取下一音符   
  61.             else         {m=music_tab[i++], n=music_tab[i++];}  //取頻率常數(shù) 和 節(jié)拍常數(shù)   
  62.              TR0=1;                                             //開定時器1   
  63.            while(n!=0) Beep=~Beep,delay(m);                         //等待節(jié)拍完成, 通過P1口輸出音頻(可多聲道哦!)   
  64.        TR0=0;                                             //關定時器1   
  65.     }   
  66. }  
復制代碼

所有資料51hei提供下載:
beep.rar (1.07 KB, 下載次數(shù): 6)


作者: sanzang    時間: 2018-10-18 22:30
程序源碼提示有錯誤呀



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