久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 1909|回復: 0
收起左側

簡易電子琴程序

[復制鏈接]
ID:679411 發表于 2020-2-21 18:53 | 顯示全部樓層 |閱讀模式
#include<reg52.h>
#define uint unsigned int
#define uchar unsigned char
#define led P2
sbit speaker=P1^4;//喇叭
sbit key1=P1^0;  //放內置音樂
sbit key2=P1^1;  //放彈奏音樂
sbit key3=P1^2;  //儲存清零   
sbit Do=P3^0;
sbit Re=P3^1;
sbit Mi=P3^2;
sbit Fa=P3^3;
sbit So=P3^4;
sbit La=P3^5;
sbit Si=P3^6;
sbit Do_=P3^7;   //八個音符按鍵
uchar a,b,num_yf,num_jp,jiepai;
uchar code yinfu[]={0xfb,0xe9,      //Do
                   0xfc,0x5c,       //Re
                   0xfc,0xc1,       //Mi
                   0xfc,0xe5,       //Fa
                   0xfd,0x45,       //So
                   0xfd,0x92,       //La
                   0xfd,0xd1,       //Si
                   0xfd,0xee,       //Do#
       0x00,0x00,};     //間隔
uchar code led_on[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe,0xff};
uchar code shengri_tone[]={   1,9,1,2,1,4,3,9,   //生日快樂音調
                              1,9,1,2,1,5,4,9,
                              1,9,1,8,6,4,3,2,9,
                              7,9,7,6,4,5,4,9   };    //9代表不發聲,即停頓;數字即為音調

uchar code shengri_beat[]={   24,1,24,48,48,48,72,5, //節拍
                              24,1,24,48,48,48,72,5,
                              24,1,24,48,48,48,48,72,5,
                              24,1,24,48,48,48,72,5  };  //節拍,即tone表各音調的延時
uchar xdata save[220];     //保存音符的數組
uchar idata save_beat[220];    //保存節拍的數組
void check_key();//改為P3組為按鍵
void delay(uint z);//延時函數聲明
void delay1(void);//聲明第二個延時函數
void play1(void);//播放生日快樂
void play2(void);//播放存儲存儲的音樂
void cunchu()
{
jiepai++;
if(save[num_yf]==9)
delay(20);
else
delay(15);
if(jiepai>=251)
jiepai=250;
}
void main()    //主函數
{  led=0x5a;
    speaker=1;
TMOD=0x01;
TH0=a;
TL0=b;     //定時器工作方式1
ET0=1;    //中斷允許
TR0=1;      //打開定時器
                //進入循環
while(1)  
{
  check_key();  //掃描按鍵
}
}
void time0() interrupt 1  //定時器0工作函數
{
TH0=a;
TL0=b;     //初值
speaker=~speaker;   //喇叭取反,喇叭高低電平變換才能發生
}            
void check_key()    //按鍵函數
{
uint i;
if(key1==0)     //播放內置音樂按鍵
{
  delay(10);    //延時去抖
  while(key1==0);   //再次判斷
  play1();    //播放內置音樂
}
if(key2==0)     //播放彈奏的音樂按鍵
{
  delay(10);    //延時去抖
  while(key2==0);  //再次判斷按鍵是否按下  
  play2();    //播放彈奏的音樂
}
if(key3==0)     //清除彈奏的按鍵
{
  delay(10);
  while(key3==0);
  for(i=0;i<220;i++)  //將保存數據的數組清零
  {
   save[i]=0;   //清零音符
   save_beat[i]=0;  //清零節拍
   num_yf=0;
   num_jp=0;   //計數變量清零
  }
}
  
if(P3!=0xff)    //彈奏按鍵按下
{
  if(Do==0)        //第一個按鍵按下
  {
   a=0xfb;b=0xe9;EA=1;save[num_yf]=1;led=0x7f; //ab賦值,保存音符到對應的位置
  }
  else if(Re==0)       //同上
  {
   a=0xfc;b=0x5c;EA=1;save[num_yf]=2;led=0xbf;
  }
  else if(Mi==0)
  {
   a=0xfc;b=0xc1;EA=1;save[num_yf]=3;led=0xdf;
  }
  else if(Fa==0)
  {
   a=0xfc;b=0xef;EA=1;save[num_yf]=4;led=0xef;
  }
  else if(So==0)
  {
   a=0xfd;b=0x45;EA=1;save[num_yf]=5;led=0xf7;
  }
  else if(La==0)
  {
   a=0xfd;b=0x92;EA=1;save[num_yf]=6;led=0xfb;
  }
  else if(Si==0)
  {
   a=0xfd;b=0xd0;EA=1;save[num_yf]=7;led=0xfd;
  }
  else if(Do_==0)
  {
   a=0xfd;b=0xee;EA=1;save[num_yf]=8;led=0xfe;
  }
  while(!Do||!Re||!Mi||!Fa||!So||!La||!Si||!Do_)//按鍵釋放,按鍵都松開跳出
  {cunchu();}          //如果按鍵一直按下,調用存儲函數,記錄按鍵按下的時長,也就是節拍
  save_beat[num_jp]=jiepai;  //按鍵松開后,將節拍數據保存到數組
  jiepai=0;      //變量清零,等待下次按鍵按下
  EA=0;       //關閉中斷
  speaker=1;
  led=0xff;      //關閉喇叭
  num_jp++;
  num_yf++;      //音符和節拍計數加
  if(num_jp>=220||num_yf>=220) //最大計數219個
  {
   num_jp=219;
   num_yf=219;
  }
  while(P3==0xff&&key1==1&&key2==1&&key3==1)//按鍵都不按下時
  {
   a=0x00;b=0x00;        //初值清零
   save[num_yf]=9;       //保存空音符到數組
   cunchu();         //調用存儲函數
  }
  save_beat[num_jp]=jiepai;      //保存節拍數據到數組
  jiepai=0;          //節拍清零
  EA=0;           //關閉中斷
  speaker=1;
  led=0xff;          //關閉喇叭
  num_jp++;
  num_yf++;          //變量加
  if(num_jp>=220||num_yf>=220)     //最大加到219
  {
   num_jp=219;
   num_yf=219;
  }
}
}
void delay(uint z)       //延時函數,大約延時1ms,不精確
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void delay1(void)//第二個延時函數
{
uchar n=15;
while(n--)
{
  uchar i;
  for(i=0;i<125;i++);
}
}
void play1(void)//播放內置音樂
{
uchar m=0;
uchar s;     
uchar c;
uchar d;
while(1)
{
  EA=0;
  d=shengri_tone[m];
  c=shengri_tone[m];                            //取音符
  s=shengri_beat[m];
  led=led_on[d-1];                     
  a=yinfu[2*c-2];                           
  b=yinfu[2*c-1];                           
  EA=1;
  while(s--)
  {
  delay1();
  }
  led=0xff;
  m++;
  if(m>=33)       //數值是shengri相關表中的元素數量  
  {
   a=0;
   b=0;
   EA=0;
   return;                     
  }                      //數值是shengri相關表中的元素數量  
}     
}
void play2(void)//播放被存儲的音樂
{
uchar m=0;
uchar s;     
uchar c;
uchar d;
while(1)
{
  EA=0;
  c=save[m];
  d=c;                            //取音符
  s=save_beat[m];                      //取節拍
  a=yinfu[2*c-2];                           
  b=yinfu[2*c-1];
  led=led_on[d-1];
  if(a!=0x00)                    
  {
  EA=1;
  }
  while(s--)
  {
  delay1();
  }
  led=0xff;
  m++;
  if(m>=num_yf)      
  {
   a=0;
   b=0;
   EA=0;
   led=0xff;
   return;                        
  }
}     
}
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 欧美日韩成人 | 红桃视频一区二区三区免费 | 99热热精品 | 99re热精品视频 | 91精品国产91久久久久久吃药 | 中文字幕一区二区三区在线视频 | 成人免费精品视频 | 国产一区不卡 | 国产精品国产成人国产三级 | 一区二区日韩 | 91麻豆精品国产91久久久更新资源速度超快 | 欧美老少妇一级特黄一片 | 亚洲高清av| 最新中文字幕久久 | 亚洲精品国产成人 | 免费在线成人网 | 国产精品成人久久久久a级 久久蜜桃av一区二区天堂 | 国产乱码久久久 | 综合精品 | 午夜99| 日韩精品免费 | 精品乱码一区二区三四区 | 免费在线精品视频 | 日韩免费在线 | 国产一级一级国产 | 国产亚洲精品美女久久久久久久久久 | 精品av| 操人视频在线观看 | 特级做a爱片免费69 精品国产鲁一鲁一区二区张丽 | 亚洲精品久久久久久下一站 | 成人在线播放网址 | wwwxxx国产 | 国产区在线看 | 日韩欧美大片在线观看 | 亚洲欧美成人在线 | 久久精品一区 | 日韩中文字幕在线观看 | 欧美一区二区三区久久精品 | 在线欧美视频 | 日韩一区二区不卡 | 久久国产精品免费一区二区三区 |