找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 1853|回復(fù): 2
打印 上一主題 下一主題
收起左側(cè)

STM32工程文件 唱歌

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:623452 發(fā)表于 2019-11-6 23:41 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式


        //             低7  1   2   3   4   5   6   7  高1 高2 高3 高4 高5 不發(fā)音
        uc16 tone[] = {247,262,294,330,349,392,440,294,523,587,659,698,784,1000};//音頻數(shù)據(jù)表
        //紅塵情歌
        u8 music[]={        5,5,6,8,7,6,5,6,13,13,//音調(diào)
                                                                5,5,6,8,7,6,5,3,13,13,
                                                          2,2,3,5,3,5,6,3,2,1,
                                                                6,6,5,6,5,3,6,5,13,13,


                                                                5,5,6,8,7,6,5,6,13,13,
                                                                5,5,6,8,7,6,5,3,13,13,
                                                          2,2,3,5,3,5,6,3,2,1,
                                                                6,6,5,6,5,3,6,1,        


                                                                13,8,9,10,10,9,8,10,9,8,6,
                                                                13,6,8,9,9,8,6,9,8,6,5,
                                                                13,2,3,5,5,3,5,5,6,8,7,6,
                                                                6,10,9,9,8,6,5,6,8
        };        
        u8 time[] = {        2,4,2,2,2,2,2,8,4, 4, //時(shí)間
                                                                2,4,2,2,2,2,2,8,4, 4,
                                                                2,4,2,4,2,2,4,2,2,8,
                                                                2,4,2,2,2,2,2,8,4 ,4,
        
                                                                2,4,2,2,2,2,2,8,4, 4,
                                                                2,4,2,2,2,2,2,8,4, 4,
                                                                2,4,2,4,2,2,4,2,2,8,
                                                                2,4,2,2,2,2,2,8,
        
                                                                4, 2,2,2, 4, 2,2,2, 2,2,8,
                                                                4, 2,2,2,4,2,2,2,2,2,8,
                                                                4, 2,2,2,4,2,2,5,2,6,2,4,
                                                                2,2 ,2,4,2,4,2,2,12
        };        
        u32 yanshi;
        u16 i,e;
        yanshi = 10;
        for(i=0;i<sizeof(music)/sizeof(music[0]);i++){
                for(e=0;e<((u16)time)*tone[music[i ]]/yanshi;e++){                        Sound((u32)tone[music[i ]]);                }                }}

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:623452 發(fā)表于 2019-11-6 23:48 | 只看該作者
回復(fù)

使用道具 舉報(bào)

板凳
ID:623452 發(fā)表于 2019-11-6 23:48 | 只看該作者
上面是工程鏈接

音樂.7z

88.51 KB, 下載次數(shù): 3, 下載積分: 黑幣 -5

回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表