51单片机实现电子琴

ID:777984 · 发表于 2020-6-13 11:12

本帖最后由 slslhrtd 于 2020-6-13 11:22 编辑

1.使用键盘弹奏音乐，7个按键控制7中音符（高音）

2.单片机外接7只LED，按键放音的同时，按下一个音律按键，点亮1只LED，同时闪烁十次后熄灭，按下另一个音律按键，点亮2只LED，同时闪烁十次后熄灭，……，按下最后一个按键，点亮7只LED，同时闪烁十次后熄灭

3.单片机每次按动音律按键，除了点亮对应的灯亮状态之外，结合音律通过蜂鸣器放音，将音律发声出来

4.单片机外接第八只按键，一旦按下，连续播放一小段音乐。

#include <reg51.h>

sbit K1=P3^0;

sbit K2=P3^1;

sbit K3=P3^2;

sbit K4=P3^3;

sbit K5=P3^4;

sbit K6=P3^5;

sbit K7=P3^6;

sbit K8=P3^7;

sbit fengmingqi=P0^5;

unsigned char m,n,time;

unsigned char Timer0_H,Timer0_L;

code unsigned char MUSIC[]={

5,2,1, 3,2,1, 2,2,2, 2,2,4, 3,2,1, 1,2,1, 2,2,1, 3,2,4,

5,2,1, 3,2,1, 2,2,2, 2,2,2, 5,1,1, 3,2,1, 4,2,1, 3,2,4,

3,2,1, 3,2,1, 7,2,1, 3,2,1, 2,2,2, 1,2,1, 7,1,1, 1,2,1,

2,2,1, 3,2,1, 6,2,3, 6,1,1, 1,2,1, 3,2,1, 2,2,1, 6,1,1,

1,2,1, 7,1,1, 5,1,1, 6,1,6, 5,2,1, 3,2,1, 2,2,2, 2,2,1,

2,2,1, 3,2,1, 1,2,1, 2,2,1, 3,2,4, 5,2,1, 3,2,1, 2,2,2,

2,2,1, 2,2,1, 5,1,1, 3,2,1, 4,2,1, 3,2,4, 3,2,1, 3,2,1,

7,2,3, 3,2,1, 2,2,2, 1,2,1, 7,1,1, 1,2,1, 2,2,1, 3,2,1,

6,2,3, 6,1,1, 1,2,1, 3,2,1, 2,2,1, 6,1,1, 1,2,1, 7,1,2,

5,1,2, 6,1,6, 0,0,0 };

code unsigned char FREQH[]={0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8, 0xF9,

0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC,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, 0xEE,0x44,

0x6B,0xB4,0xF4,0x2D, 0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,};

void delay(unsigned char m)

{

unsigned char n;

for(m=0;m<250;m++)

for(n=0;n<250;n++);

}

void delaymss(unsigned char t)

{unsigned char t1;

unsigned long t2;

for(t1 = 0; t1 < t; t1++)

for(t2 = 0; t2 < 8000; t2++);

TR0 = 0;

}

void timer0init()

{

EA=1;

ET0=1;

TMOD=0X01;

TH0 = Timer0_H;

TL0 = Timer0_L;

}

void Song()

{

TH0=Timer0_H;

TL0=Timer0_L;

TR0=1;

delaymss(time);

}

void timer0() interrupt 1 //T0中断程序，控制发音的音调

{

TR0 = 0;

TH0 = Timer0_H; //下次的中断时间, 这个时间, 控制音调高低

TL0 = Timer0_L;

fengmingqi = !fengmingqi;

TR0 = 1;

}

void main()

{

unsigned char a;

P2=0xff;

P0=0x00;

while(1)

{

if(K1==0)

{

delay(246);

if(K1==0)

{

TMOD=0x01;

TR0=1;

for(m=0;m<10;m++)

for(n=0;n<10;n++)

{ TH0=0xfe;

TL0=0x21;

do{}

while(!TF0);

fengmingqi=!fengmingqi;

TF0=0;

}

for(a=0;a<10;a++)

{

P2=0x7f;

delay(0);

P2=0xff;

delay(0);

}

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

51单片机实现电子琴

评分