#include <reg51.h>
#define uchar unsigned char
#define uint unsinged int
sbit speaker = P1^7;
uchar t0h,t0l,time;
//--------------------------------------
//單片機(jī)晶振采用11.0592MHz
// 頻率-半周期數(shù)據(jù)表 高八位 本軟件共保存了四個(gè)八度的28個(gè)頻率數(shù)據(jù)
uchar code FREQH[] = {0x01, //0的時(shí)候沒有音符
0xF2, 0xF3, 0xF5, 0xF5, 0xF6, 0xF7, 0xF8, //低音1234567
0xF9, 0xF9, 0xFA, 0xFA, 0xFB, 0xFB, 0xFC, 0xFC,//1,2,3,4,5,6,7,i
0xFC, 0xFD, 0xFD, 0xFD, 0xFD, 0xFE, //高音 234567
0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFF}; //超高音 1234567
//-----------------------------------------
// 頻率-半周期數(shù)據(jù)表 低八位
uchar code FREQL[] = {0x01, //0的時(shí)候沒有音符
0x42, 0xC1, 0x17, 0xB6, 0xD0, 0xD1, 0xB6, //低音1234567
0x21, 0xE1, 0x8C, 0xD8, 0x68, 0xE9, 0x5B, 0x8F, //1,2,3,4,5,6,7,i
0xEE, 0x44, 0x6B, 0xB4, 0xF4, 0x2D, //高音 234567
0x47, 0x77, 0xA2, 0xB6, 0xDA, 0xFA, 0x16}; //超高音 1234567
//--------------------------------------
//一個(gè)音符有三個(gè)數(shù)字。前為第幾個(gè)音、中為第幾個(gè)八度、后為時(shí)長（以1/4拍為單位）。
//6, 2, 6 分別代表：６, 中音, 6個(gè)1/4拍;
//5, 2, 2 分別代表：５, 中音, 2個(gè)1/4拍;
//3, 2, 4 分別代表：３, 中音, 4個(gè)1/4拍;
//5, 2, 4 分別代表：５, 中音, 4個(gè)1/4拍;
//1, 3, 4 分別代表：１, 高音, 4個(gè)1/4拍;
//低音為1，中音為2，高音為3，超高音為4；
//////////////////////////////////////////////////////////
/********************世上只有媽媽好*********************/
uchar code sszymmh[] = {
6,2,6, 5,2,2, 3,2,4, 5,2,4,
1,3,4, 6,2,2, 5,2,2, 6,2,8,
3,2,4, 5,2,2, 6,2,2, 5,2,4,
3,2,4, 1,2,2, 6,1,2, 5,2,2,
3,2,2, 2,2,8, 2,2,6, 3,2,2,
5,2,4, 5,2,2, 6,2,2, 3,2,4,
2,2,4, 1,2,8, 5,2,6, 3,2,2,
2,2,2, 1,2,2, 6,1,2, 1,2,2,
5,1,16, 0,0,0};
/**********************兩只耗子**********************/
uchar code TwoMouse[]={
3,2,2, 6,2,2, 7,2,2, 5,2,2,
3,2,2, 6,2,2, 7,2,2, 5,2,2,
7,2,2, 1,3,2, 2,3,4,
7,2,2, 1,3,2, 2,3,4,
2,3,1, 3,3,1, 2,3,1, 1,3,1, 7,2,2, 5,2,2,
2,3,1, 3,3,1, 2,3,1, 1,3,1, 7,2,2, 5,2,2,
6,2,2, 2,2,2, 5,2,4, 6,2,2, 2,2,2, 5,2,4,
0,0,0};
/***********************兩只蝴蝶**********************/
uchar code TwoButterfly[]={
3,2,2, 2,2,2, 3,2,6, 3,2,2, 3,2,2, 2,2,2,
1,2,6, 6,1,2, 1,2,2, 2,2,4, 2,2,2, 3,2,2,
2,2,2, 1,2,2, 6,1,2, 1,2,2, 5,1,12,3,2,2,
2,2,2, 3,2,8, 3,2,2, 2,2,2, 3,2,2, 3,2,2,
1,2,12,6,1,2, 1,2,2, 2,2,4, 2,2,2, 3,2,2,
2,2,2, 1,2,2, 6,1,2, 1,2,2, 2,2,12,3,2,2,
2,2,2, 3,2,8, 3,2,2, 2,2,2, 3,2,2, 2,2,2,
1,2,12,6,1,2, 1,2,2, 2,2,4, 2,2,2, 3,2,2,
2,2,2, 1,2,2, 6,1,2, 1,2,2, 5,2,12,3,2,2,
5,2,2, 5,2,8, 5,2,2, 5,2,2, 6,2,2, 5,2,2,
3,2,12,2,2,2, 3,2,2, 2,2,4, 2,2,2, 3,2,2,
2,2,2, 1,2,2, 6,1,2, 6,1,1, 1,2,1, 1,2,1,
1,2,1, 1,2,12,0,0,4, 5,2,2, 5,2,2, 6,2,2,
1,3,2, 7,2,2, 7,2,2, 6,2,2, 3,2,2, 2,2,2,
2,2,2, 3,2,2, 3,2,8, 3,2,2, 3,2,2,
5,2,2, 6,2,4, 6,2,6, 6,1,2, 3,2,2, 2,2,2,
2,2,12,3,2,2, 5,2,2, 5,2,2, 3,2,2, 5,2,4,
1,3,4, 7,2,2, 6,2,2, 7,2,2, 3,2,4,
6,2,2, 6,2,2, 7,2,2, 6,2,2, 5,2,2,
3,2,2, 2,2,4, 3,2,2, 2,2,2, 3,2,2, 5,2,6,
5,2,2, 5,2,2, 6,2,2, 6,2,2, 5,2,2,
3,2,2, 2,2,4, 5,1,2, 5,1,2, 6,1,2, 1,2,12,
0,0,0};
/*****************happy birthday***********************/
uchar code Birthday[]={
5,1,2, 5,1,2, 6,1,4, 5,1,4, 1,2,4, 7,1,8,
5,1,2, 5,1,2, 6,1,4, 5,1,4, 2,2,4, 1,2,8,
5,1,2, 5,1,2, 5,2,4, 3,2,4, 1,2,4, 7,1,4,
6,1,4, 4,2,2, 4,2,2, 3,2,4, 1,2,4, 2,2,4,
1,2,4, 0,0,0};
////////////////////////////////////////////////////////
//-----------------------------------------------------
void t0int() interrupt 1 //T0中斷程序，控制發(fā)音的音調(diào)
{
TR0 = 0; //先關(guān)閉T0
speaker = ~speaker; //輸出方波, 發(fā)音
TH0 = t0h; //下次的中斷時(shí)間, 這個(gè)時(shí)間, 控制音調(diào)高低
TL0 = t0l;
TR0 = 1; //啟動T0
}
//--------------------------------------
void delay(uchar t) //延時(shí)程序，控制發(fā)音的時(shí)間長度120ms(1/4拍)
{
uchar a,b,c;
while(t--) //四重循環(huán), 共延時(shí)t個(gè)1/4拍
{
for(c=193;c>0;c--)
for(b=114;b>0;b--)
for(a=1;a>0;a--);
}
//延時(shí)期間, 可進(jìn)入T0中斷去發(fā)音
TR0 = 0; //關(guān)閉T0, 停止發(fā)音
}
//--------------------------------------
void singachar() //演奏一個(gè)音符
{
TR0=0;
TH0 = t0h; //控制音調(diào)
TL0 = t0l;
TR0 = 1; //啟動T0, 由T0輸出方波去發(fā)音
delay(time); //控制時(shí)間長度即 節(jié)拍
}
//--------------------------------------
//**************演奏一首歌***********************************//
void song(uchar *str)
{
uchar k,i;
i = 0;
time = 1;
while(time)
{
k = str[i] + 7 * (str[i + 1]);//第i個(gè)是音符, 第i+1個(gè)是第幾個(gè)八度
t0h = FREQH[k]; //從數(shù)據(jù)表中讀出頻率數(shù)值
t0l = FREQL[k]; //實(shí)際上, 是定時(shí)的時(shí)間長度
time = str[i + 2]; //讀出時(shí)間長度數(shù)值 節(jié)拍時(shí)間
i += 3;
singachar();
}
}
void main(void)
{
TMOD = 0x01; //置T0定時(shí)工作方式1
ET0 = 1; //開T0中斷
EA = 1; //開CPU中斷
while(1)
{
song(TwoMouse);
delay(20);
song(sszymmh);
delay(20);
// song(TwoButterfly);
song(Birthday);
delay(20);
}
//發(fā)出一個(gè)音符
}
/****************樂譜節(jié)拍高低音***********************************
節(jié)拍：下面有兩橫表示四分之一拍；下面有一橫表示半拍;后面加一點(diǎn)表示增加該音符一半拍數(shù)；
2 表示一拍 ，2- 表示兩拍；2---表示四拍
音調(diào)：上面有一點(diǎn)表示高音，下面有一點(diǎn)表示低音，通常表示中音；
設(shè)置節(jié)拍速度125拍/分，則2.08/拍, 二拍960ms,一拍0.48s,1/4拍為120ms
*************************************************************/