基于51单片机的多种音乐盒播放器Proteus仿真系统
创始人
2024-04-07 15:18:44
0

资料编号:116   下面是相关功能视频演示:

116-基于51单片机的多种音乐盒播放器Proteus仿真系统(仿真+源码+全套资料)

功能说明:

采用51系列单片机,采用PWM控制蜂鸣器播放多种音乐,采用独立按键来进行切换音乐,数码管显示当前是第几首,程序有中文注释,非常容易看懂,全套仿真资料齐全。

下面是程序部分展示:

 

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++);
    }
}

 下面是该资料分享下载链接:

https://pan.baidu.com/s/1NyFFWPNMVNl2o-4W2ehZiA?pwd=lkhe

相关内容

热门资讯

监控摄像头接入GB28181平... 流程简介将监控摄像头的视频在网站和APP中直播,要解决的几个问题是:1&...
Windows10添加群晖磁盘... 在使用群晖NAS时,我们需要通过本地映射的方式把NAS映射成本地的一块磁盘使用。 通过...
protocol buffer... 目录 目录 什么是protocol buffer 1.protobuf 1.1安装  1.2使用...
在Word、WPS中插入AxM... 引言 我最近需要写一些文章,在排版时发现AxMath插入的公式竟然会导致行间距异常&#...
Fluent中创建监测点 1 概述某些仿真问题,需要创建监测点,用于获取空间定点的数据࿰...
educoder数据结构与算法...                                                   ...
MySQL下载和安装(Wind... 前言:刚换了一台电脑,里面所有东西都需要重新配置,习惯了所...
MFC文件操作  MFC提供了一个文件操作的基类CFile,这个类提供了一个没有缓存的二进制格式的磁盘...
有效的括号 一、题目 给定一个只包括 '(',')','{','}'...
【PdgCntEditor】解... 一、问题背景 大部分的图书对应的PDF,目录中的页码并非PDF中直接索引的页码...