📄 sound.c
字号:
#include "..\h\globle.h"
#include "..\h\io_pin.h"
#include <intrins.h>
#define MUSIC_END 0x00
#define FREQ 16000000
extern void Delay100uS(word);
void sound(void)
{
SOUND_PIN=0;
Delay100uS(2000); //delay 200ms
SOUND_PIN=1;
}
void error_sound(void)
{
sound();
Delay100uS(2000); //delay 200ms
sound();
}
//--------------------------------------------------------------------------//
//标 题: 单片机IO口播放乐曲 #define FREQ 11059200 //
//版 本: V1.00 //
//创建人: 徐文军 E-mail:xuwenjun@21cn.com //
//日 期: 02-11-5 //
//描 述: 单片机利用T1中断在IO口P1.0输出乐曲 //
//--------------------------------------------------------------------------//
//说 明: //
// 单片机用T1中断在IO口P1.0输出乐曲(在P1.0口与VCC间接一喇叭即可听到) //
// 1.由于输出的是方波，比较难听:-)你也可以将波形细分用DA输出正弦波 //
// 2.由于T1频繁中断，任何其他中断发生都会是乐曲打顿，只适合试验 //
// 3.优化音符编码：一个字节中包含节拍、音符、升降调，可区分数据和命令//
// 同时人工将音符译为机器码非常容易。(格式看下面实例)//
//--------------------------------------------------------------------------//
//音符码格式:| D7 |D6 D5 D4| D3 |D2 D1 D0|
// |变调| 节拍|升降| 音符 |
//功能码格式:| D7 D6 D5 D4 | D3 D2 D1 D0|
// |高4位=0时是功能码|根据低4位散转 |
//最后字节为功能码必须==0x00退出
/*********************************************/
byte code music_tab1[]={ //梁祝
0xcb, //示例:0xcb=1100 1011B,即升调,4/16拍,3Mi低音
0x35,0x16,0xb9,0x12,0x96,0x99,0xa5,
0xbd,0x99,0x96,0x15,0x13,0x15,0x62,
0x32,0x13,0xa7,0x26,0x25,0x16,0xa9,0x22,
0xa3,0xa9,0x96,0x15,0x16,0x99,0xe5,
0xbb,0x15,0xa7,0xaa,0x96,0x99,0xd5,
0x13,0x15,0x23,0x15,0x16,0x17,0x9a,0xd6,0x15,0x16,
0xb9,0x12,0x25,0x23,0x23,0x22,0x13,0x12,0x21,0x96,0x15,
0x43,0xc9,0x96,0x99,0x96,0x15,0x13,0x15,0x16,0x99,
0xd5,
MUSIC_END, //最后字节为功能码必须==0x00退出
};
byte code music_tab2[]={ //康定情歌
0x23,0x25,0x26,0x16,0x15, 0x36,0x13,0x42,
0x23,0x25,0x26,0x16,0x15, 0x26,0x53,
0x23,0x25,0x26,0x16,0x15, 0x26,0x23,0x42,
0x25,0x23,0x12,0x13,0x12,0x11, 0x22,0xd6,
0x26,0xda, 0x25,0x53, 0x12,0x11,0xd6,
0xad,0x23,0x12,0x13,0x12,0x11, 0x22,0xd6,
MUSIC_END,
};
byte code music_tab3[]={ //美酒加咖啡
0x55,0x23,0x25,0x26,0xa9,0x22, 0x73,
0x45,0x25,0x26,0x23,0x22,0x21,0x23, 0x72,
0x52,0x23,0x45,0x43, 0x22,0x21,0xa6,0x25,0x66,
0xc9,0xa6,0x25,0x23,0x25,0x26,0xa9, 0xf5,
0x45,0x23,0x25,0x46,0xc9, 0x22,0x13,0x12,0x21,0x22,0x63,
0x22,0x23,0x25,0x26,0x25,0x23,0x22,0x21, 0x72,
0x52,0x23,0x45,0x43, 0x22,0x21,0xa6,0x25,0x66,
0xb9,0x12,0x23,0x25,0x22,0xa5,0xab,0x22, 0x71,
MUSIC_END,
};
byte code music_tab4[]={ //北国之春
0x15,0x16,0x75, 0x15,0x16,0x55,0x13,0x15,0x16,0x15,0x16,0x99,0x12,0x13,
0x65,0x45,0x13,0x12,0x11,0x12, 0x73,
0x62,0x42,0x12,0x11,0x96,0x15, 0x76,
0x55,0x23,0x45,0xa9,0x22, 0x53,0x12,0x13,0x65,
0x52,0x22,0x42,0x21,0xa6, 0xe9,0x91,0x12,0x13,0x12,0x13,0x15,0x99,0x12, //以上为过门
0x20,0x23,0x23,0x23,0x63, 0x22,0x23,0x23,0x22,0x41,0xa6,0x25,
0x53,0x22,0x21,0xa9,0x21,0xa6, 0x75,
0x26,0xa9,0x21,0xa6,0xc9,0x12,0x11,0x96,0x15,
0x23,0x25,0x25,0x26,0x45,0x21,0x22,
0x13,0x35,0x25,0xa9,0xa6,0x25,0x23,0x22, 0x71,
0x52,0x25,0x45,0x13,0x15,0x13,0x12, 0x21,0x41,0x22,0x43,0x45,
0x23,0x25,0x26,0xa9,0x42,0x12,0x33, 0x72,
0x51,0x22,0x43,0x22,0x21, 0xc6,0xc9,0x29,0xc6,0x45,0x23,0x23,
0x53,0x25,0x26,0x25,0x13,0x12,0x21, 0x62,0x42,0x23,0x25,
0x55,0x26,0x25,0x23,0x45, 0x26,0xa9,0x21,0x22,0x63,
0x52,0x22,0x22,0x13,0x12,0x21,0xa6,0xf9,
MUSIC_END,
};
/***************************************************************/
void PlayMusic(byte index)
{
extern void music_play(byte *);
byte *p;
switch(index)
{
case 1:p=music_tab1;break;
case 2:p=music_tab2;break;
case 3:p=music_tab3;break;
case 4:p=music_tab4;break;
default:break;
}
music_play(p);
}
byte code music_l_tab[8]={0,1,2,3,4,6,8,16};//节拍延时单位
byte code music_freq_tab[64]={ //音符定时器值表
0xff,0xea, //0 休止符
255-FREQ/24/131/256, //256-FREQ/24/x/256 //1 do 高字节
256-FREQ/24/131%256, //256-FREQ/24/x%256 //1 do 低字节
255-FREQ/24/147/256,256-FREQ/24/147%256, //2 re
255-FREQ/24/165/256,256-FREQ/24/165%256, //3 mi
255-FREQ/24/175/256,256-FREQ/24/175%256, //4 fa
255-FREQ/24/196/256,256-FREQ/24/196%256, //5 suo
255-FREQ/24/221/256,256-FREQ/24/221%256, //6 la
255-FREQ/24/248/256,256-FREQ/24/248%256, //7 xi
0xff,0xea, //0 休止符
255-FREQ/24/262/256,256-FREQ/24/262%256, //1 do
255-FREQ/24/294/256,256-FREQ/24/294%256, //2 re
255-FREQ/24/330/256,256-FREQ/24/330%256, //3 mi
255-FREQ/24/350/256,256-FREQ/24/350%256, //4 fa
255-FREQ/24/393/256,256-FREQ/24/393%256, //5 suo
255-FREQ/24/441/256,256-FREQ/24/441%256, //6 la
255-FREQ/24/495/256,256-FREQ/24/495%256, //7 xi
0xff,0xea, //0 休止符
255-FREQ/24/525/256,256-FREQ/24/525%256, //1 do
255-FREQ/24/589/256,256-FREQ/24/589%256, //2 re
255-FREQ/24/661/256,256-FREQ/24/661%256, //3 mi
255-FREQ/24/700/256,256-FREQ/24/700%256, //4 fa
255-FREQ/24/786/256,256-FREQ/24/786%256, //5 suo
255-FREQ/24/882/256,256-FREQ/24/882%256, //6 la
255-FREQ/24/990/256,256-FREQ/24/990%256, //7 xi
0xff,0xea, //0 休止符
255-FREQ/24/1049/256,256-FREQ/24/1049%256, //1 do
255-FREQ/24/1178/256,256-FREQ/24/1178%256, //2 re
255-FREQ/24/1322/256,256-FREQ/24/1322%256, //3 mi
255-FREQ/24/1400/256,256-FREQ/24/1400%256, //4 fa
255-FREQ/24/1572/256,256-FREQ/24/1572%256, //5 suo
255-FREQ/24/1665/256,256-FREQ/24/1665%256, //6 la
255-FREQ/24/1869/256,256-FREQ/24/1869%256, //7 xi
};
byte code music_frequp_tab[64]={ //升半音
0xff,0xea, //0 休止符
255-FREQ/24/139/256, //1 do 高字节 //255-FREQ/24/x/256
256-FREQ/24/139%256, //1 do 低字节 //256-FREQ/24/x%256
255-FREQ/24/156/256,256-FREQ/24/156%256, //2 re
255-FREQ/24/175/256,256-FREQ/24/175%256, //3 mi
255-FREQ/24/185/256,256-FREQ/24/185%256, //4 fa
255-FREQ/24/208/256,256-FREQ/24/208%256, //5 suo
255-FREQ/24/234/256,256-FREQ/24/234%256, //6 la
255-FREQ/24/262/256,256-FREQ/24/262%256, //7 xi
0xff,0xea, //0 休止符
255-FREQ/24/278/256,256-FREQ/24/278%256, //1 do
255-FREQ/24/312/256,256-FREQ/24/312%256, //2 re
255-FREQ/24/350/256,256-FREQ/24/350%256, //3 mi
255-FREQ/24/371/256,256-FREQ/24/371%256, //4 fa
255-FREQ/24/416/256,256-FREQ/24/416%256, //5 suo
255-FREQ/24/467/256,256-FREQ/24/467%256, //6 la
255-FREQ/24/525/256,256-FREQ/24/525%256, //7 xi
0xff,0xea, //0 休止符
255-FREQ/24/556/256,256-FREQ/24/556%256, //1 do
255-FREQ/24/624/256,256-FREQ/24/624%256, //2 re
255-FREQ/24/700/256,256-FREQ/24/700%256, //3 mi
255-FREQ/24/742/256,256-FREQ/24/742%256, //4 fa
255-FREQ/24/833/256,256-FREQ/24/833%256, //5 suo
255-FREQ/24/935/256,256-FREQ/24/935%256, //6 la
255-FREQ/24/1049/256,256-FREQ/24/1049%256, //7 xi
0xff,0xea, //0 休止符
255-FREQ/24/1112/256,256-FREQ/24/1112%256, //1 do
255-FREQ/24/1248/256,256-FREQ/24/1248%256, //2 re
255-FREQ/24/1400/256,256-FREQ/24/1400%256, //3 mi
255-FREQ/24/1484/256,256-FREQ/24/1484%256, //4 fa
255-FREQ/24/1618/256,256-FREQ/24/1618%256, //5 suo
255-FREQ/24/1764/256,256-FREQ/24/1764%256, //6 la
255-FREQ/24/1968/256,256-FREQ/24/1968%256, //7 xi
};
byte temp_TH1;
byte temp_TL1;
void music_int_t1 (void) interrupt 3
{
SOUND_PIN=~SOUND_PIN;
TH1=temp_TH1;
TL1=temp_TL1;
}
void music_delay(byte n) //延时 125*n 毫秒
{
Delay100uS(1250*n);
}
void music_play(byte *msc)
{
byte music_freq=32; //音高
byte music_long; //节拍
byte music_data=0; //音符数据
bit music_up=0; //升半音
bit music_break=0; //断奏
temp_TH1=0xff;
temp_TL1=0xea; //关输出(输出超声波)
TMOD= 0x12; //time1 work on mode 1,16bit counter.T0 on mode 2,8bit reload counter
TR1 = 1;
ET1 = 1;
EA = 1;
while (*msc != MUSIC_END)
{
music_data=*msc & 0x07;
music_long=*msc>>4;
if (music_long != 0) //是音符
{
if (*msc >=128) //需升降调
{
if (((*msc) & 0x08) == 0)
{if (music_freq >= 16) music_freq -= 16;} //音高下降
else
{if (music_freq < 48) music_freq += 16;} //音高上升
}
if (music_up==1) //升半音
{
temp_TH1=music_frequp_tab[music_freq + (music_data <<1)];
temp_TL1=music_frequp_tab[music_freq + (music_data <<1)+1];
}
else //不升半音
{
temp_TH1=music_freq_tab[music_freq + (music_data <<1)];
temp_TL1=music_freq_tab[music_freq + (music_data <<1)+ 1];
}
if (music_break) //断奏
{
music_delay(music_l_tab[music_long&0x07]-1);
temp_TH1=0xff;
temp_TL1=0xea;
music_delay(1);
}
else //连奏
music_delay(music_l_tab[music_long&0x07]);
}// if (music_long != 0)
else //是功能码
{
switch(music_data)
{
case 0x04: music_up=0;break; //不升半音
case 0x05: music_up=1;break; //升半音
case 0x06: music_break=0;break; //断奏
case 0x07: music_break=1;break; //连奏
default: break;
}
}
msc++;
}
TR1=0;
ET1=0; //播放结束,关T1中断
SOUND_PIN=1; //关输出
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -