基于51單片機的音樂盒設計與制作

ID:377234 · 發(fā)表于 2019-6-19 21:40

//程序如下:
#include <reg51.h>
#define uchar unsigned char
#define uint unsigned int
sbit key1=P3^2;//按key1可切換花樣
sbit key2=P3^3;//按key2可切換歌曲
sbit fm=P3^7;//蜂鳴器連續(xù)的IO口
uchar code huayang1[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe,
0xfd,0xfb,0xf7,0xef,0xdf,0xbf};//花樣1
uchar code huayang2[]={0x7f,0xfe,0xbf,0xfd,0xdf,0xfb,0xef,0xf7,
0xef,0xfb,0xdf,0xfd,0xbf,0xfe};//花樣2
uchar code huayang3[]={0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x0,
0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff};//花樣3
char code huayang4[]={0x55,0xaa,0xcc,0x33,0x99,0x66,0x0f,0xf0};
uchar count1;//花樣標志
uchar count2;//歌曲標志
uchar timeh,timel,i;
//---------------------------簡譜---------------------------------------
//編程規(guī)則:字節(jié)高位是簡譜,低位是持續(xù)時間,
//代表多少個十六分音符
//1-7代表中央C調(diào),8-E代表高八度,0代表停頓
//最后的0是結束標志
uchar code qnzl[]={ //千年之戀
0x12,0x22,0x34,0x84,0x74,0x54,0x38,0x42,0x32,0x22,0x42,0x34,0x84,0x72,0x82,0x94,0xA8,0x08,
//前奏
0x32,0x31,0x21,0x32,0x52,0x32,0x31,0x21,0x32,0x62,
//竹林的燈火到過的沙漠
0x32,0x31,0x21,0x32,0x82,0x71,0x81,0x71,0x51,0x32,0x22,
//七色的國度不斷飄逸風中
0x32,0x31,0x21,0x32,0x52,0x32,0x31,0x21,0x32,0x62,
//有一種神秘灰色的旋渦
0x32,0x31,0x21,0x32,0x83,0x82,0x71,0x72,0x02,
//將我卷入了迷霧中
0x63,0xA1,0xA2,0x62,0x92,0x82,0x52,
//看不清的雙手
0x31,0x51,0x63,0x51,0x63,0x51,0x63,0x51,0x62,0x82,0x7C,0x02,
//一朵花傳來誰經(jīng)過的溫柔
0x61,0x71,0x82,0x71,0x62,0xA2,0x71,0x76,
//穿越千年的傷痛
0x61,0x71,0x82,0x71,0x62,0x52,0x31,0x36,
//只為求一個結果
0x61,0x71,0x82,0x71,0x62,0xA3,0x73,0x62,0x53,
//你留下的輪廓指引我
0x42,0x63,0x83,0x83,0x91,0x91,
//黑夜中不寂寞
0x61,0x71,0x82,0x71,0x62,0x0A2,0x71,0x76,
//穿越千年的哀愁
0x61,0x71,0x82,0x71,0x62,0x52,0x31,0x36,
//是你在盡頭等我
0x61,0x71,0x82,0x71,0x62,0xA3,0x73,0x62,0x53,
//最美麗的感動會值得
0x42,0x82,0x88,0x02,0x74,0x93,0x89,0xff//結束標志
//用一生守候
};
uchar code jmszl[]={ //寂寞沙洲冷
0x12,0x12,0x22,0x32,0x31,0x22,0x21,0x22,
//自你走后心憔悴
0x21,0x31,0x51,0x52,0x31,0x52,0x61,0x15,0x14,
//白色油桐風中紛飛
0x51,0x52,0x31,0x52,0x62,0x13,0x11,0x13,0x32,0x28,0x08,0x28,
//落花似人有情這個季節(jié)
0x31,0x32,0x31,0x32,0x11,0x21,0x51,0x52,0x51,0x52,
//河畔的風放肆拼命地吹
0x51,0x51,0x31,0x32,0x31,0x32,0x81,0x72,0x63,
//不斷撥弄離人的眼淚
0x62,0x71,0x81,0x72,0x61,0x61,0x52,0x31,0x21,0x32,0x51,0x54,
//那樣濃烈的愛再也無法給
0x22,0x12,0x11,0x12,0x11,0x12,0x12,0x14,0x26,0x32,0x26,
//傷感一夜一夜
0x32,0x61,0x51,0x51,0x31,0x31,0x21,0x31,0x51,0x61,0x51,0x31,0x51,
//當記憶的線纏繞過往支離破碎
0x02,0x32,0x81,0x81,0x81,0x81,0x62,0x52,0x34,
//是慌亂占據(jù)了心扉
0x31,0x81,0x81,0x81,0x61,0x91,0x82,
//有花兒伴著蝴蝶
0x51,0x51,0x51,0x51,0x31,0x61,0x53,
//孤雁可以雙飛
0x21,0x11,0x21,0x11,0x22,0x11,0x21,0x26,
//夜深人靜獨徘徊
0x32,0x61,0x51,0x51,0x31,0x31,0x21,0x31,0x51,0x61,0x51,0x31,0x51,0x52,
//當幸福戀人寄來紅色分享喜悅
0x31,0x31,0x81,0x81,0x81,0x61,0x91,0x81,0x61,0x31,0x56,
//閉上雙眼難過頭也不敢回
0x32,0x32,0x81,0x81,0x81,0x81,0x91,0x81,0x61,0x81,0x61,0x51,0x31,0x51,0x34,
//仍然撿盡寒枝不肯安歇微帶著后悔
0x21,0x31,0x51,0x31,0x21,0x11,0x61,0x21,0x16,
//寂寞沙洲我該思念誰
0xff};
//----------------------------簡譜音調(diào)對應的定時器初值---------------------------
//適合11.0592M的晶振
uchar code cuzhi[]={
0xff,0xff,//占位
0xFC,0x8E,//中央C調(diào)1-7
0xFC,0xED,
0xFD,0x43,
0xFD,0x6A,
0xFD,0xB3,
0xFD,0xF3,
0xFE,0x2D,
0xFE,0x47, //高八度1-7
0xFE,0x76,
0xFE,0xA1,
0xFE,0xC7,
0xFE,0xD9,
0xFE,0xF9,
0xFF,0x16
};
uchar yinyue[]={0xff,0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f,0x0,0x0};
//將音調(diào)轉(zhuǎn)化為對應的LED樣式
void delay1(uint z); //延時1MS
void delay(uint z); //延時165MS,即十六分音符
void song();
void beep();//蜂鳴器叫一聲
main()
{ uchar x;
count1=0;//流水燈無花樣
count2=1;//唱第一首歌
EA=1;//開總中斷
EX0=1;//開外部中斷0
IT0=1;//外部中斷0下降沿觸發(fā)方式
EX1=1;//開外部中斷1
IT1=1;//外部中斷1下降沿觸發(fā)方式
TMOD=0x01;//定時器0工作在方式1
TH0=0;
TL0=0;
ET0=1;
while(1)
{
if(count1!=0)
{
switch(count1)
{
case 1:
for(x=0;x<14;x++)
{
P1=huayang1[x];
beep();
delay1(300);
if(count1!=1)
break;
}
break;
case 2:
for(x=0;x<14;x++)
{
P1=huayang2[x];
beep();
delay1(300);
if(count1!=2)
break;
}
break;
case 3:
for(x=0;x<16;x++)
{
P1=huayang3[x];
beep();
delay1(300);
if(count1!=3)
break;
}
break;
case 4:
for(x=0;x<8;x++)
{
P1=huayang4[x];
beep();
delay1(300);
if(count1!=4)
break;
}
break;
}
}
else
{
song();
delay1(1000);
}
}
}
void int0() interrupt 0
{
EA=0;//關總中斷
delay1(1);//去抖
if(key1==0)
{
count2=0;//不讓蜂鳴器唱歌
TR0=0;
count1++;
if(count1==5)
count1=1;
}
EA=1;//開總中斷
}
void int1() interrupt 2
{
EA=0;//關總中斷
delay1(1);//去抖
if(key2==0)
{
count1=0;//流水燈無花樣
TR0=1;
i=0;//從頭開始唱
count2++;
if(count2==3)
count2=1;
}
EA=1;//開總中斷
}
void timer0() interrupt 1 //用于產(chǎn)生各種音調(diào)
{
TH0=timeh;
TL0=timel;
fm=~fm;
}
void song()
{
uint temp,duan;
uchar jp;//jp是簡譜
i=0;
while(1)
{ if(count2==0)
{
break;
}
if(count2==1) //選曲
temp=qnzl[i];
if(count2==2)
temp=jmszl[i];
if(temp==0xff)
break;
jp=temp/16; //取數(shù)的高4位
duan=1;
P1=yinyue[jp];
duan=0;
if(jp!=0)
{
timeh=cuzhi[jp*2];
timel=cuzhi[jp*2+1];
}
else
{
TR0=0;
fm=1;//關蜂鳴器
}
delay(temp%16); //取數(shù)的低4位
TR0=0; //唱完一個音停10MS
fm=1;
delay1(10);
TR0=1;
i++;
}
TR0=0;
fm=1;
}
void delay(uint z) //延時165MS,即十六分音符
{ uint x,y;
for(x=z;x>0;x--)
for(y=19000;y>0;y--);
}
void delay1(uint z) //延時1MS
{ uint x,y;
for(x=z;x>0;x--)
for(y=112;y>0;y--);
}
void beep() //蜂鳴器叫一聲
{ uchar i;
for(i=0;i<50;i++)
{ fm=~fm;
delay1(1);
}
fm=1;
}

復制代碼

ID:510728 · 發(fā)表于 2019-6-30 17:53

內(nèi)容不錯值得借鑒

帳號		自動登錄	找回密碼
密碼			立即注冊

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

基于51單片機的音樂盒設計與制作