51单片机简易电子琴仿真+源程序+电路原理图

ID:137190 · 发表于 2016-8-31 18:16

51单片机简易电子琴仿真电路原理图

下面是51单片机简易电子琴源程序：

#include<AT89X52.h>
#define KeyPort P1
unsigned char High,Low; //定时器预装值的高8位和低8位
sbit SPK=P3^7; //定义蜂鸣器接口
sbit playSongKey=P0^0; //功能键
sbit RS=P2^0;//液晶数据命令选择
sbit RW=P2^1;//液晶读写选择
sbit EN=P2^2;//液晶使能端
unsigned char code freq[][2]={
0xD8,0xF7,//00440HZ 1
0xBD,0xF8,//00494HZ 2
0x87,0xF9,//00554HZ 3
0xE4,0xF9,//00587HZ 4
0x90,0xFA,//00659HZ 5
0x29,0xFB,//00740HZ 6
0xB1,0xFB,//00831HZ 7
0xEF,0xFB,//00880HZ `1
};
unsigned char Time;
unsigned char code YINFU[9][1]={{' '},{'1'},{'2'},{'3'},{'4'},{'5'},{'6'},{'7'},{'8'}};
//世上只有妈妈好数据表
unsigned char code MUSIC[]={ 6,2,3, 5,2,1, 3,2,2, 5,2,2, 1,3,2, 6,2,1, 5,2,1,
6,2,4, 3,2,2, 5,2,1, 6,2,1, 5,2,2, 3,2,2, 1,2,1,
6,1,1, 5,2,1, 3,2,1, 2,2,4, 2,2,3, 3,2,1, 5,2,2,
5,2,1, 6,2,1, 3,2,2, 2,2,2, 1,2,4, 5,2,3, 3,2,1,
2,2,1, 1,2,1, 6,1,1, 1,2,1, 5,1,6, 0,0,0
};
// 音阶频率表高八位
unsigned char code 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,
} ;
// 音阶频率表低八位
unsigned char code 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 Init_Timer0(void);//定时器初始化
//延时函数大约约2*z+5us
void delay2xus(unsigned char z)
{
while(z--);
}
// 延时函数大约约1ms
void delayms(unsigned char x)
{
while(x--)
{
delay2xus(245);
delay2xus(245);
}
}
/*------------------------------------------------
节拍延时函数
各调1/4节拍时间：
调4/4 125ms
调2/4 250ms
调3/4 187ms
------------------------------------------------*/
void delayTips(unsigned char t)
{
unsigned char i;
for(i=0;i<t;i++)
{
delayms(250);
}
TR0=0;
}
//播放音乐的函数
void PlaySong()
{
TH0=High;//赋值定时器时间，决定频率
TL0=Low;
TR0=1; //打开定时器
delayTips(Time); //延时所需要的节拍
}
//定时器T0初始化子程序
void Init_Timer0(void)
{
TMOD |= 0x01; //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响
EA=1; //总中断打开
ET0=1; //定时器中断打开
}
//定时器T0中断子程序
void Timer0_isr(void) interrupt 1
{
TH0=High;
TL0=Low;
SPK=!SPK;
}
//主函数
void main (void)
{
unsigned char num,k,i;
Init_Timer0(); //初始化定时器0，主要用于数码管动态扫描
SPK=0; //在未按键时，喇叭低电平，防止长期高电平损坏喇叭
while (1)
{
switch(KeyPort) //对按键进行处理
{
case 0xfe:num= 1;break;
case 0xfd:num= 2;break;
case 0xfb:num= 3;break;
case 0xf7:num= 4;break;
case 0xef:num= 5;break;
case 0xdf:num= 6;break;
case 0xbf:num= 7;break;
case 0x7f:num= 8;break; //分别对应不用的音调
default:num= 0;break;
}
P2 = KeyPort;
if(num==0)
{
TR0=0;
SPK=0; //在未按键时，喇叭低电平，防止长期高电平损坏喇叭
}
else
{
High=freq[num-1][1];
Low =freq[num-1][0];
TR0=1;
}
if(playSongKey==0) //如果播放音乐按键被按下
{
delayms(10);
if(playSongKey==0)
{
i=0;
while(i<100)
{
k=MUSIC[i]+7*MUSIC[i+1]-1;//去音符振荡频率所需数据
High=FREQH[k];
Low=FREQL[k];
Time=MUSIC[i+2]; //节拍时长
i=i+3;
if(P1!=0xff)//长按任意8音键退出播放
{
delayms(10);
if(P1!=0xff)
i=101;
}
PlaySong();
}
TR0=0;
}
}
}
}

复制代码

51单片机简易电子琴所有资料下载：http://www.51hei.com/bbs/dpj-54940-1.html

ID:89286 · 发表于 2017-7-4 07:02

thanks for sharing

ID:262319 · 发表于 2017-12-16 20:18

我仿真的时候怎么没反应啊

ID:262319 · 发表于 2017-12-16 20:20

这是什么意思

ID:277447 · 发表于 2018-1-18 19:13

把程序导入仿真没反应，怎么办

ID:336941 · 发表于 2018-5-23 22:51

把程序导入51，但是没有反应是什么情况呢

ID:356714 · 发表于 2018-6-22 17:09

为什么我仿真时按键不起作用

ID:357821 · 发表于 2018-6-26 10:59

厉害了

ID:359038 · 发表于 2018-6-26 11:26

不错耶！

ID:362370 · 发表于 2018-6-30 17:51

还不错！

ID:372095 · 发表于 2018-7-15 19:28

老哥，程序运行之后按键没反应怎么回事？？？

ID:392265 · 发表于 2018-9-1 11:38

大神大神

ID:402000 · 发表于 2018-9-25 09:47

nice thank you

ID:416511 · 发表于 2018-10-27 23:24

你好，这里面的能满足以下的要求吗？
基于单片机的电子琴设计
基本要求：利用单片机AT89C51设计电子琴，用矩阵键盘代表键琴，至少能弹出8个音符。
创新：键按下时间长短表征节拍的长短；点阵实时动态显示音符的高低等。
任务区分：A——按照矩阵键盘上数字顺序音节逐渐升高。

ID:416511 · 发表于 2018-10-29 22:58

你好下载之后不会文件损坏或者仿真运行不了这种情况吧

ID:417858 · 发表于 2018-10-30 12:22

新手学习下!

ID:425357 · 发表于 2018-11-13 11:14

感谢分享支持

ID:453126 · 发表于 2018-12-29 10:33

急需一个电子琴程序><

ID:497927 · 发表于 2019-3-25 15:18

想问一下里面液晶的那一块定义有什么用

ID:501886 · 发表于 2019-4-1 20:55

雪中送炭

ID:560101 · 发表于 2019-6-11 16:44

做的可以继续加油

ID:744791 · 发表于 2020-5-6 16:41

很给力！

ID:752151 · 发表于 2020-5-14 22:16

请问如何来改变歌曲

帐号		自动登录	找回密码
密码			立即注册

51单片机简易电子琴仿真+源程序+电路原理图

评分

相关帖子