蜂鸣器生日快乐歌由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“蜂鸣器生日歌vhdl”。
/*******************************************************************/ /* SC5204单片机实验板实验例程
*/ /*蜂鸣器生日快乐歌
*/ /* 2012年5月
*/ /* 作者：雷国强
*/ /* 邮箱：940762196@qq.com
*/ /*【声明】此程序仅用于学习与参考，引用请注明版权和作者信息！
*/ /*
*/ /*******************************************************************/
// 生日快乐歌
/*******************************************************************/ #include sbit
Buzzer=P3^7;
unsigned char timer0h,timer0l,time;
//生日歌
code unsigned char zymmh[]={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=0;t1
{
for(t2=0;t2
{
;
}
}
TR0=0;} void t0int()interrupt 1 { TR0=0;Buzzer=!Buzzer;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;//CPU开中断,CT0开中断
while(1)
{
i=0;
while(i
//音乐数组长度，唱完从头再来
k=zymmh[i]+7*zymmh[i+1]-1;
timer0h=FREQH[k];
timer0l=FREQL[k];
time=zymmh[i+2];
i=i+3;
song();
}
}
}
刀豆文库小编为你整合推荐4篇生日快乐歌散文，也许这些就是您需要的文章，但愿刀豆文库能带给您一些学习、工作上的帮助。......
生日快乐歌散文今天出寝室去扔垃圾，一到门口就听见对门的学妹在唱生日歌，把垃圾放下，然后驻足很久。一群女孩子，声音很甜，从声音里面可以看到一张张洋溢着祝福的青春而美好的脸，那......
축하=추가(当ㅎ+元音的时候，ㅎ脱离不发音)생일 축하 합니다祝你生日快乐생일 축하 합니다祝你生日快乐지구에서 우주에서在地球 在宇宙제일 사랑합니다 ~我最爱你꽃보다 더......
诗歌:一首生日快乐歌一让我为你唱首歌在今夜祝你生日快乐让我为你献上红色玫瑰就在今夜二红色玫瑰是匹通体雪白的马长尾飞扬奔驰如风蓝色鸢尾是潭月光照耀的水沉静神秘波澜......
刀豆文库小编为你整合推荐3篇生日快乐歌原文歌词，也许这些就是您需要的文章，但愿刀豆文库能带给您一些学习、工作上的帮助。......
