基于单片机的生日快乐歌

简介: #include  #define uchar unsigned char  #define uint unsigned int  sbit BEEP=P3^7;  //生日快乐歌的音符频率表,不同频率由不同的延时来决定 uchar code SON...
#include<reg51.h> 
#define uchar unsigned char 
#define uint unsigned int 
sbit BEEP=P3^7; 
//生日快乐歌的音符频率表,不同频率由不同的延时来决定
uchar code SONG_TONE[]=
{212,212,190,212,159,169,212,212,190,212,142,159,212,212,106,126,159,169,190,119,119,126,159,142,159,0}; 
//生日快乐歌节拍表,节拍决定每个音符的演奏长短
uchar code SONG_LONG[]=
{9,3,12,12,12,24,9,3,12,12,12,24, 9,3,12,12,12,12,12,9,3,12,12,12,24,0}; 
//延时
void DelayMS(uint x) 

uchar t; 
while(x--) for(t=0;t<120;t++); 

//播放函数
void PlayMusic() 
{   uint i=0,j,k; 
while(SONG_LONG[i]!=0||SONG_TONE[i]!=0) 
{ //播放各个音符,SONG_LONG为拍子长度 
for(j=0;j<SONG_LONG[i]*20;j++) 

BEEP=~BEEP; 
//SONG_TONE延时表决定了每个音符的频率 
for(k=0;k<SONG_TONE[i]/3;k++); 

DelayMS(10); 
i++; 


void main() 

BEEP=0; 
while(1) 

PlayMusic(); //播放生日快乐 
DelayMS(500); //播放完后暂停一段时间 

}
相关文章
|
小程序 开发工具
樱花飘落模拟器-情人节祝你表白成功
看着樱花缓缓的飘落,然后不觉间竟下起了绵绵的细雨。因为今天我所在的城市正下着小雨,所以就在这个小应用中增加了阵阵的细雨功能。 下面我们就学习一下如何实现一个这样温暖的小程序。 首先准备一下素材。一个粉色的背景,两个樱花花瓣,一个模拟雨滴的长方形,以及两句要显示的话。
119 0
|
消息中间件
【中秋特辑】嫦娥妹妹,你别着急~
今天为大家带来一个小故事,是关于嫦娥和吴刚的爱情故事,想知道吴刚是怎样将情愫传递给嫦娥的吗?让我们一起一探究竟吧~
218 0
【中秋特辑】嫦娥妹妹,你别着急~
|
传感器 前端开发 芯片
画一个 “月饼” 陪我过中秋,使用 ESP32-C3 制作炫彩月饼
今年的中秋节又要到了,各平台活动也搞起来了,我有点坐不住了,作为一个嵌入式工程师,我可以做一个实实在在的月饼,拿在手上陪我们过中秋!
458 1
画一个 “月饼” 陪我过中秋,使用 ESP32-C3 制作炫彩月饼
|
消息中间件
【中秋特辑】嫦娥妹妹,你别着急~
今天为大家带来一个小故事,是关于嫦娥和吴刚的爱情故事,想知道吴刚是怎样将情愫传递给嫦娥的吗?让我们一起一探究竟吧~
【中秋特辑】嫦娥妹妹,你别着急~
|
Ubuntu 测试技术 开发工具
画一个 “月饼” 陪我过中秋,玩转炫彩 “月饼” 之 基本测试
自己的画的炫彩“月饼”到了,本文就开始带大家来玩玩我们自己的月饼 ......by 矜辰所致
526 0
画一个 “月饼” 陪我过中秋,玩转炫彩 “月饼” 之 基本测试
|
存储 C语言 芯片
【51单片机】室友用一把王者时间,学会了去使用数码管。
数码管相比较之前的按键和LED灯的内容稍微复杂一些,操作更加难一点♦ 数码管位置:在单片机的最↖角的地方、八个型号的显示器件♦还有138译码器和右边的74C595存储器都是属于数码管操作这些的东西♦
294 1
【51单片机】室友用一把王者时间,学会了去使用数码管。
|
人工智能 自然语言处理 物联网
慵懒午后的音乐时光 DingDong智能音箱点亮新生活
慵懒午后的音乐时光 DingDong智能音箱点亮新生活
慵懒午后的音乐时光 DingDong智能音箱点亮新生活
|
程序员 iOS开发
LED 闪字小风扇,告白神器? | 酷玩精选
这是一个便携小风扇,产自深圳。 它的特点是可以在扇页上显示文字,可以显示多个中文汉字。
182 0
LED 闪字小风扇,告白神器? | 酷玩精选
|
弹性计算 双11 异构计算
百晓生拍了拍你说:快来领AirPods和kindle
双11燃情继续,阿里云弹性计算追加福利
百晓生拍了拍你说:快来领AirPods和kindle
|
传感器 人机交互 智能硬件
沙发变身遥控器,涂鸦里藏PCB,MIT技术宅的智能家居竟然是这样
云栖号资讯:【点击查看更多行业资讯】在这里您可以找到不同行业的第一手的上云资讯,还在等什么,快来! 城乡结合部土味开关,不知道你有没有印象: 强行欧式,强行蕾丝,强行少女心,处处透露着改革开放早期人们对色彩的渴求。
沙发变身遥控器,涂鸦里藏PCB,MIT技术宅的智能家居竟然是这样