单片机加矩阵按键控制蜂鸣器唱歌,按一下一个键是前一首,另一个是后一首,还有一个按键是用来控制的
迪丽瓦拉
2025-07-08 19:42:54
0
单片机加矩阵按键控制蜂鸣器唱歌,按一下一个键是前一首,另一个是后一首,还有一个按键是用来控制的

#include 

#include 

#define uchar unsigned char

#define uint unsigned int

uchar Song_Index = 0,Tone_Index = 0;

sbit SPK = P3^7;

sbit K1 = P1^0;

uchar code DSY_CODE[]=

{

  0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90

};

uchar code HI_LIST[]=

{

  0,266,229,232,233,236,238,240,241,242,244,245,246,247,248

};

uchar code LO_LIST[]=

{

  0,4,13,10,20,3,8,6,2,23,5,26,1,4,3

};

uchar code Song[][50]=

{

  {1,2,3,1,1,2,3,1,3,4,5,3,4,5,3,4,5,5,6,1,2,3,6,2,6,6,2,3,4,5,2,5,2,3,-1},

{3,3,3,5,6,2,3,4,6,2,6,4,2,1,2,3,6,2,5,6,3,4,5,6,2,3,1,2,3,5,1,2,3,-1},

{3,2,1,3,2,1,1,2,3,1,3,5,1,5,4,6,2,6,3,4,2,3,6,2,3,4,2,1,1,1,2,2,2,3,3,2,6,3,5,3,5,1,2,6,4,5,-1}

};

uchar code 运宴Len[][50]=

{

  {1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,2,2,2,2,2,2,2,2,2,2,2,1,1,-1},

{1,1,1,1,1,1,1,1,1,1,1,2,2,1,1,1,2,2,2,2,1,1,1,1,1,1,1,1,-1},

{1,1,2,1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,2,1,1,1,1,1,1,1,2,1,2,1,2,1,2,1,1,1,1,1,2,2,-1}

};

void EX0_INT() interrupt 0

{

  TR0 = 0;

Song_Index = (Song_Index+1)%3;

Tone_Index = 0;

P2 = DSY_CODE[Song_Index];

}

void T0_INT() interrupt 1

{

  SPK = !SPK;

TH0 = HI_LIST[Song[Song_Index][Tone_Index]];

TL0 = LO_LIST[Song[Song_Index][Tone_Index]];

}

void delay(uint ms)

{

  uchar i;

while(ms--)

{

for(i=0;i<120;i++);

}

}

void main()

{

  P2 = 0xc0;

IE = 0x83;

TMOD = 0x00;

IT0 = 1;

IP = 0x02;

while(1)

{

  while(K1==1);

while(K1==0);

TR0 = 1;

Tone_Index 滚悄春= 0;

while(Song[Song_Index][Tone_Index]!=-1&&K1==1&&TR0==1)

{

  delay(300*Len[Song_Index][Tone_Index]);

Tone_Index++;

}

TR0 = 大耐0;

while(K1==0);

}

}


已经一具有一

相关内容

热门资讯

惊艳!喀什主题花车亮相上海旅游... 9月12日晚,第37届上海旅游节盛大启幕,满载沪喀同心情谊的喀什主题花车惊艳亮相开幕大巡游,以流动的...
中国之巅奏响《共同的节日》,千... 千吨阻尼器,“迎世赛、游上海旅游节”。9月13日,由上海市文化和旅游局指导推出上海旅游·会客│巅峰之...
造假景区,“早就没人了” 造假... 9月7日,安徽省文化和旅游厅一次性取消6家4A级旅游景区质量等级,同时将1家景区由4A降为3A。这是...
浦江之夜赴美好相逢,第37届上... 9月12日晚,黄浦江畔灯火璀璨,第37届上海旅游节大巡游在外滩中山东一路上演。不少观众早早便来到外滩...
惠州景区一“潮汐厕所”可手动更... 近日,有网友发布视频称广东惠州西湖景区一处“潮汐厕所”门口的男女标识可手动拨动更改,引发“会不会走混...
上海浦东这座低调了400年的四... 你知道在上海浦东川沙有着一座被护城河围起来的明代四方城池吗?没错,这就是浦东川沙古镇。它位于浦东新区...
“浙川同行·寻美乡村”十佳农文... 封面新闻记者 罗轩9月10日,浙川东西部协作平台企业助力农文旅专项活动推介对接会举行。现场发布“浙川...
文旅新探 | 在溶洞深处,解锁...   新华社南宁9月12日电 题:在溶洞深处,解锁多样“地心之旅”  新华社记者吴思思、刘樱涵、覃广华...
双节旅游预订热度走高 济南跻身... 距离中秋、国庆双节日益临近,国内旅游市场提前迎来预订高峰。旅游平台去哪儿旅行的数据显示,本周中秋国庆...
文旅新探 | 在溶洞深处,解锁...   地下暗河奔流去往何处?滴水为何能“生”石?地心深处,又暗藏着怎样的生命密码?  亿万年的地质变迁...