標(biāo)題:
51單片機(jī)蜂鳴器演奏小星星
[打印本頁]
作者:
guaienna
時(shí)間:
2019-11-19 18:35
標(biāo)題:
51單片機(jī)蜂鳴器演奏小星星
自己用蜂鳴器做的小星星,有用的小伙伴拿去看看吧
#include <reg52.h>
#define uchar unsigned char
sbit beep=P2^0;
uchar m,n; //定義4個(gè)八度每八度12分音律共48個(gè)音律
uchar code T[49][2]={{0,0},{0xF8,0x8B}, //定義音律為49個(gè)二維數(shù)組
{0xF8,0xF2},{0xF9,0x5B},
{0xF9,0xB7},{0xFA,0x14},
{0xFA,0x66},{0xFA,0xB9},
{0xFB,0x03},{0xFB,0x4A},
{0xFB,0x8F},{0xFB,0xCF},
{0xFC,0x0B},{0xFC,0x43},
{0xFC,0x78},{0xFC,0xAB},
{0xFC,0xDB},{0xFD,0x08},
{0xFD,0x33},{0xFD,0x5B},
{0xFD,0x81},{0xFD,0xA5},
{0xFD,0xC7},{0xFD,0xE7},
{0xFE,0x05},{0xFE,0x21},
{0xFE,0x3C},{0xFE,0x55},
{0xFE,0x6D},{0xFE,0x84},
{0xFE,0x99},{0xFE,0xAD},
{0xFE,0xC0},{0xFE,0x02},
{0xFE,0xE3},{0xFE,0xF3},
{0xFF,0x02},{0xFF,0x10},
{0xFF,0x1D},{0xFF,0x2A},
{0xFF,0x36},{0xFF,0x42},
{0xFF,0x4C},{0xFF,0x56},
{0xFF,0x60},{0xFF,0x69},
{0xFF,0x71},{0xFF,0x79},
{0xFF,0x81}};
uchar code music[][2]={{0,4},{13,8}, //定義曲譜數(shù)組,前數(shù)為音律,后數(shù)為音符節(jié)拍
{13,8},{20,8},
{20,8},{22,8},
{20,8},{20,16},
{18,8},{18,8},
{17,8},{17,8},
{15,8},{15,8},
{13,16},{20,8},
{20,8},{18,8},
{18,8},{17,8},
{17,8},{15,16},
{20,8},{20,8},
{18,8},{18,8},
{17,8},{17,8},
{15,16},{13,8},
{13,8},{20,8},
{20,8},{22,8},
{20,8},{20,16},
{18,8},{18,8},
{17,8},{17,8},
{15,8},{15,8},
{13,16},{0xFF,0xFF}};
void delay(uchar p)
{
uchar i,j;
for(;p>0;p--)
for(i=181;i>0;i--)
for(j=181;j>0;j--); //181*181個(gè)機(jī)器周期約25ms,即1/16個(gè)節(jié)拍
}
void pause()
{
uchar i,j;
for(i=200;i>0;i--)
for(j=200;j>0;j--);
}
void T0_int() interrupt 1
{
beep=!beep;
TH0=T[m][0];
TL0=T[m][1]; //音律延時(shí)周期次數(shù)碼表賦給定時(shí)寄存器作為計(jì)數(shù)初始值,每TH0TL0個(gè)機(jī)器周期觸發(fā)蜂鳴器端口翻轉(zhuǎn),演奏出不同音符
}
void main()
{
uchar i=0;
TMOD=0x01; //定時(shí)器T0
EA=1;
ET0=1;
while(1)
{
m=music[i][0];
n=music[i][1]; //將音律號(hào)賦值給m, 將節(jié)拍號(hào)賦值給n
if(m==0x00) //如果音律號(hào)為0
{
TR0=0;
delay(n);
i++; //關(guān)閉定時(shí)器,延遲n拍,將循環(huán)數(shù)I加1 ,準(zhǔn)備讀下一個(gè)音符
}
else if(m==0xFF) //如果音律號(hào)為1
{
TR0=0;
delay(30);
i=0; //開啟節(jié)拍延時(shí)30個(gè)1/16節(jié)拍,歌曲停頓2秒,將循環(huán)數(shù)I置0
}
else if(m==music[i+1][0]) // 否則如果把下一個(gè)音律號(hào)數(shù)給變量m
{
TR0=1;
delay(n);
TR0=0;
pause();
i++; //定時(shí)器0打開延遲n拍,關(guān)閉定時(shí)器T0,讀下一個(gè)音符,循環(huán)數(shù)加1讀下一個(gè)音律
}
else //音符若不為零
{
TR0=1;
delay(n);
i++; //打開定時(shí)器,延時(shí)n個(gè)1/16拍,循環(huán)數(shù)I加1 ,準(zhǔn)備演奏下一個(gè)音符
}
}
}
作者:
123450730
時(shí)間:
2021-4-25 13:57
你好,請(qǐng)問以下49個(gè)二維數(shù)組是怎么得出的
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1