
sbit speaker=P1^2
unsigned char timer0h,timer0l,time
//生日歌
code unsigned char sszymmh[]={5,1,1, 5,1,1, 6,1,2, 5,1,2, 1,2,2, 7,1,4,
5,1,1, 5,1,1, 6,1,2, 5,1,2, 2,2,2, 1,2,4,
5,1,1, 5,1,1, 5,2,2, 3,2,2, 1,2,2, 7,1,2, 6,1,2,
4,2,1, 4,2,1, 3,2,2, 1,2,2, 2,2,2, 1,2,4}
// 音阶频率表 高八位
code unsigned char FREQH[]={
0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
}
// 音阶频率表 低八位
code unsigned char FREQL[]={
0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
}
void delay(unsigned char t)
{
unsigned char t1
unsigned long t2
for(t1=0t1<tt1++)
{
for(t2=0t2<8000t2++)
{
}
}
TR0=0
}
void t0int() interrupt 1
{
TR0=0
speaker=!speaker
TH0=timer0h
TL0=timer0l
TR0=1
}
void song()
{
TH0=timer0h
TL0=timer0l
TR0=1
delay(time)
}
void main(void)
{
unsigned char k,i
TMOD=1//置CT0定时工作方式1
EA=1
ET0=1//IE=0x82 //CPU开中断,CT0开中断伍差
while(1)
{
i=0
while(i<75){ /山哗/音乐数组长度 ,唱完从头再来
k=sszymmh[i]+7*sszymmh[i+1]-1
timer0h=FREQH[k]
timer0l=FREQL[k]
time=sszymmh[i+2]
i=i+3
song()
}
}
}
/***************************************************程序名称:音乐演奏器
简要说明:P1.0口输出各音调的频率方波
编写: MMC
更新时间:09\05
***************************************************/蠢兆
#include
#define SPK P0_0 //定义方波输出口
#define LED P1_1
#define shumaguan P0 //定义数码管段码输出
unsigned int tone1,tone2
/*****标准音符表*****/
//用于使定时器初值棚没变化以产生相应频率的定时
unsigned char code yinfu[]={
0xfb,0xe9, //Do
0xfc,0x5c, //Re
0xfc,0xc1, //Mi
0xfc,0xef, //Fa
0xfd,0x45, //So
0xfd,0x92, //La
0xfd,0xd0, //Si
0xfd,0xee, //Do#
0xfa,0x14, //So低
0xfa,0xb9, //带和租La低
0xfb,0x4d, //Si低
0x00,0x00 //音符之间的间隔,只要间隔时间小于65ms时,
//喇叭不会发出声音,用作拍子之间的短暂停顿
}
/*****军港之夜音调表*****/
unsigned char code shengri_tone[]={9,3,3,1,2,3,2,3,3,10,9,1,2,1,3,5,5,3,6,5,3,
3,3,2,1,2,3,2,3,11,9,10,11,10,1,11,3,3,11,10,11,10,11,3,3,11,
11,10,11,10,2,10,1,11,10,9,10,9,3,5,5,3,6,5,6,5,3,5,3,1,3,3,3,5,
3,5,5,3,3,2,3,2,11,10,11,10,9,3,3,5,5,3,6,5,6,5,3,5,3,1,3,
3,5,3,5,5,3,3,3,2,3,2,11,10,11,10,9,1 //0代表不发声,即停顿;数字即为音调
}
/*****军港之夜节拍表*****/
unsigned char code shengri_beat[]={24,24,24,24,12,12,48,24,48,24,24,12,12,86,24,24,24,24,24,48,24,
48,12,12,24,12,12,86,48,24,24,12,12,48,24,24,24,24,24,12,12,72,24,24,24,24,
24,12,12,48,24,12,12,24,24,12,12,86,24,24,24,24,24,12,12,48,12,24,12,24,12,12,12,48,
24,24,24,24,24,12,12,48,24,12,12,24,24,86,24,24,24,24,24,12,12,48,12,24,12,24,24,
24,72,24,24,24,12,12,24,12,12,48,24,12,12,24,24,86 //节拍,即tone表各音调的延时
}
/*****自动演示音调表*****/
unsigned char code yanshi_tone[]={1,0,2,0,3,0,4,0,5,0,6,0,7,0,8,0,
8,0,7,0,6,0,5,0,4,0,3,0,2,0,1,0
}
/*****自动演示节拍表*****/
unsigned char code yanshi_beat[]={ 48,1,48,1,48,1,48,1,48,1,48,1,48,1,48,2,
48,1,48,1,48,1,48,1,48,1,48,1,48,1,48,2
}
/*****15ms延时子程序,用于节拍*****/
void delay(void)
{
unsigned char n=15
while(n--)
{
unsigned char i
for(i=0i<125i++)
}
}
/*****定时器0初始化*****/
void initTimer(void)
{
TMOD=0x01//定时器0,工作方式1定时器1,工作方式1
TH0=tone1
TL0=tone2
}
/*****定时器0中断服务程序*****/
void timer0(void) interrupt 1
{
TH0=tone1
TL0=tone2
SPK=~SPK//取反,以产生方波
}
/*****演奏子程序1*****/
void play1(void)
{
unsigned char m=0
unsigned char s
unsigned char a=1
while(1)
{
EA=0
LED=0
a=shengri_tone[m] //取音符
s=shengri_beat[m] //取节拍
tone1=yinfu[2*a-2]
tone2=yinfu[2*a-1]
EA=1
while(s--)
{
delay()
}
LED=1
m++
if(m>=119) return//数值是shengri相关表中的元素数量
}
}
/*****演奏子程序2*****/
void play2(void)
{
unsigned char m=0
unsigned char s
unsigned char a=1
while(1)
{
EA=0
LED=0
a=yanshi_tone[m]
s=yanshi_beat[m]
tone1=yinfu[2*a-2]
tone2=yinfu[2*a-1]
EA=1
while(s--)
{
delay()
}
LED=1
m++
if(m>=32) return
}
}
/*****按键检测*****/
void check_key(void)
{
P2=0xff
P3=0xff //设置为输入状态
switch(P2) //检测按键,输出数码管、载入定时器初值、允许中断
{
case 0xfe:shumaguan=0xF9tone1=0xfbtone2=0x90EA=1break
case 0xfd:shumaguan=0xA4tone1=0xfctone2=0xcEA=1break
case 0xfb:shumaguan=0xB0tone1=0xfctone2=0x7bEA=1break
case 0xf7:shumaguan=0x99tone1=0xfctone2=0xadEA=1break
case 0xef:shumaguan=0x92tone1=0xfdtone2=0xaEA=1break
case 0xdf:shumaguan=0x82tone1=0xfdtone2=0x5dEA=1break
case 0xbf:shumaguan=0xF8tone1=0xfdtone2=0xa7EA=1break
case 0x7f:play1()break
default: EA=0SPK=0shumaguan=0xff//如果没有键按下则关闭中断和数码管
}
switch(P3)
{
case 0xfe:shumaguan=0x79tone1=0xfdtone2=0xc8EA=1break
case 0xfd:shumaguan=0x24tone1=0xfetone2=0x6EA=1break
case 0xfb:shumaguan=0x30tone1=0xfetone2=0x3eEA=1break
case 0xf7:shumaguan=0x19tone1=0xfetone2=0x57EA=1break
case 0xef:shumaguan=0x12tone1=0xfetone2=0x85EA=1break
case 0xdf:shumaguan=0x02tone1=0xfetone2=0xafEA=1break
case 0xbf:shumaguan=0x78tone1=0xfetone2=0xd4EA=1break
case 0x7f:play2()break
default: EA=0SPK=0shumaguan=0xff//如果没有键按下则关闭中断和数码管
}
}
/*****主程序*****/
void main(void)
{
initTimer()
// shumaguan=0xff
TR0=1
ET0=1
SPK=0
while(1)
{
check_key()
}
}
/*****END*****/
这个不仅有你说的功能,还集有了一首《军港之夜》的歌在里面
注:我也是在网上找的,自己修改了一下
#include <REG52.H>#include <INTRINS.H>
//本例采用89C52, 晶振为11.0592MHZ
//关于如何编制音乐代码, 其实十分简单,各位可以看以下代码.
//频率常数即音乐术语中的音调,而节拍常数档团即音乐术语中的多少拍
//所以拿出谱子, 试探编吧!
sbit Beep = P1^5
unsigned char n=0 //n为节拍常数变量
unsigned char code music_tab[] ={
0x18, 0x30, 0x1C , 0x10, //格式为: 频率常数, 节拍常数, 频率常数, 节拍常数,
0x20, 0x40, 0x1C , 0x10,
0x18, 0x10, 0x20 , 0x10,
0x1C, 0x10, 0x18 , 0x40,
0x1C, 0x20, 0x20 , 0x20,
0x1C, 0x20, 0x18 , 0x20,
0x20, 0x80, 0xFF , 0x20,
0x30, 0x1C, 0x10 , 0x18,
0x20, 0x15, 0x20 , 0x1C,
0x20, 0x20, 0x20 , 0x26,
0x40, 0x20, 0x20 , 0x2B,
0x20, 0x26, 0x20 , 0x20,
0x20, 0x30, 0x80 , 0xFF,
0x20, 0x20, 0x1C , 0x10,
0x18, 0x10, 0x20 , 0x20,
0x26, 0x20, 0x2B , 0x20,
0x30, 0x20, 0x2B , 0x40,
0x20, 0x20, 0x1C , 0x10,
0x18, 0x10, 0x20 , 0x20,
0x26, 0x20, 0x2B , 0x20,
0x30, 0x20, 0x2B , 0x40,
0x20, 0x30, 0x1C , 0x10,
0x18, 0x20, 0x15 , 0x20,
0x1C, 0x20, 0x20 , 0x20,
0x26, 0x40, 0x20 , 0x20,
0x2B, 0x20, 0x26 , 0x20,
0x20, 0x20, 0x30 , 0x80,
0x20, 0x30, 0x1C , 0x10,
0x20, 0x10, 0x1C , 0x10,
0x20, 0x20, 0x26 , 0x20,
0x2B, 0x20, 0x30 , 0x20,
0x2B, 0x40, 0x20 , 0x15,
0x1F, 0x05, 0x20 , 0x10,
0x1C, 0x10, 0x20 , 0x20,
0x26, 0x20, 0x2B , 0x20,
0x30, 0x20, 0x2B , 0x40,
0x20, 0x30, 0x1C , 0x10,
0x18, 0x20, 0x15 , 0x20,
0x1C, 0x20, 0x20 , 0x20,
0x26, 0x40, 0x20 , 0x20,
0x2B, 0x20, 0x26 , 0x20,
0x20, 0x20, 0x30 , 0x30,
0x20, 0x30, 0x1C , 0x10,
0x18, 0x40, 0x1C , 0x20,
0x20, 0x20, 0x26 , 0x40,
0x13, 0x60, 0x18 , 0x20,
0x15, 0x40, 0x13 , 0x40,
0x18, 0x80, 0x00
}
void int0() interrupt 1 //采用中断0 控制节拍
{ TH0=0xd8
TL0=0xef
n--
}
void delay (unsigned char m) //控制频率延时兆蠢衫族腔
{
unsigned i=3*m
while(--i)
}
void delayms(unsigned char a) //豪秒延时子程序
{
while(--a) //采用while(--a) 不要采用while(a--)各位可编译一下看看汇编结果就知道了!
}
void main()
{ unsigned char p,m //m为频率常数变量
unsigned char i=0
TMOD&=0x0f
TMOD|=0x01
TH0=0xd8TL0=0xef
IE=0x82
play:
while(1)
{
a: p=music_tab[i]
if(p==0x00) { i=0, delayms(1000)goto play} //如果碰到结束符,延时1秒,回到开始再来一遍
else if(p==0xff) { i=i+1delayms(100),TR0=0goto a} //若碰到休止符,延时100ms,继续取下一音符
else {m=music_tab[i++], n=music_tab[i++]} //取频率常数 和 节拍常数
TR0=1//开定时器1
while(n!=0) Beep=~Beep,delay(m)//等待节拍完成, 通过P1口输出音频(可多声道哦!)
TR0=0//关定时器1
}
}
你参考这个吧
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)