标题: 单片机矩阵按键电子琴程序 [打印本页]
作者: lmyzz    时间: 2020-12-20 15:55
标题: 单片机矩阵按键电子琴程序
  1. #include <reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int

  5. sbit BEEP = P2^7;
  6. uchar code SONG_TONE[]=
  7. {
  8.          212,212,190,212,159,169,212,212,190,212,142,159,212,212,106,126,129,169,190,119,119,126,159,142,159,0
  9. };
  10. uchar code SONG_LONG[]=
  11. {
  12.          9,3,12,12,12,24,9,3,12,12,12,24,9,3,12,12,12,12,12,9,3,12,12,12,24,0
  13. };

  15. void DelayMS(uint ms)
  16. {
  17.          uchar t;
  18.         while(ms--)
  19.         {
  20.                  for(t=0;t<120;t++);
  21.         }
  22. }

  24. void PlayMusic()
  25. {
  26.          uint i =0,j,k;
  27.         while(SONG_LONG[i]!=0||SONG_TONE[i]!=0)
  28.         {
  29.                  for(j=0;j<SONG_LONG[i]*20;j++)
  30.                 {
  31.                          BEEP = ~BEEP;
  32.                         for(k=0;k<SONG_TONE[i]/3;k++);
  33.                 }
  34.                 DelayMS(10);
  35.                 i++;
  36.         }
  37. }

  39. void main()
  40. {
  41.          while(1)
  42.         {
  43.                  PlayMusic();
  44.                 DelayMS(500);
  45.         }
  46. }
复制代码

矩阵按键电子琴.zip

68.03 KB, 下载次数: 21, 下载积分: 黑币 -5

作者: QDMLIT    时间: 2021-1-15 10:01
谢谢您的辛苦付出



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1