久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

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

51單片機c語言音樂程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:1132927 發(fā)表于 2024-11-4 18:20 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
#include <reg52.h>   
#include <intrins.h>

sbit Beep =  P2^3 ;


unsigned char n=0;  //n為節(jié)拍常數(shù)變量   
unsigned char code music_tab[] ={   
0x18, 0x30, 0x1C , 0x10, //格式為: 頻率常數(shù), 節(jié)拍常數(shù), 頻率常數(shù), 節(jié)拍常數(shù),   
0x20, 0x40, 0x1C , 0x10,   
0x18, 0x10, 0x20 , 0x10,   
0x1C, 0x10, 0x18 , 0x40,   
0x1C, 0x20, 0x20 , 0x20,   
0x1C, 0x20, 0x18 , 0x20,   
0x20, 0x80, 0xFF , 0x20,   
0x30, 0x1C, 0x10 , 0x18,   
0x20, 0x15, 0x20 , 0x1C,   
0x20, 0x20, 0x20 , 0x26,   
0x40, 0x20, 0x20 , 0x2B,   
0x20, 0x26, 0x20 , 0x20,   
0x20, 0x30, 0x80 , 0xFF,   
0x20, 0x20, 0x1C , 0x10,   
0x18, 0x10, 0x20 , 0x20,   
0x26, 0x20, 0x2B , 0x20,   
0x30, 0x20, 0x2B , 0x40,   
0x20, 0x20, 0x1C , 0x10,   
0x18, 0x10, 0x20 , 0x20,   
0x26, 0x20, 0x2B , 0x20,   
0x30, 0x20, 0x2B , 0x40,   
0x20, 0x30, 0x1C , 0x10,   
0x18, 0x20, 0x15 , 0x20,   
0x1C, 0x20, 0x20 , 0x20,   
0x26, 0x40, 0x20 , 0x20,   
0x2B, 0x20, 0x26 , 0x20,   
0x20, 0x20, 0x30 , 0x80,   
0x20, 0x30, 0x1C , 0x10,   
0x20, 0x10, 0x1C , 0x10,   
0x20, 0x20, 0x26 , 0x20,   
0x2B, 0x20, 0x30 , 0x20,   
0x2B, 0x40, 0x20 , 0x15,   
0x1F, 0x05, 0x20 , 0x10,   
0x1C, 0x10, 0x20 , 0x20,   
0x26, 0x20, 0x2B , 0x20,   
0x30, 0x20, 0x2B , 0x40,   
0x20, 0x30, 0x1C , 0x10,   
0x18, 0x20, 0x15 , 0x20,   
0x1C, 0x20, 0x20 , 0x20,   
0x26, 0x40, 0x20 , 0x20,   
0x2B, 0x20, 0x26 , 0x20,   
0x20, 0x20, 0x30 , 0x30,   
0x20, 0x30, 0x1C , 0x10,   
0x18, 0x40, 0x1C , 0x20,   
0x20, 0x20, 0x26 , 0x40,   
0x13, 0x60, 0x18 , 0x20,   
0x15, 0x40, 0x13 , 0x40,   
0x18, 0x80, 0x00   
};   

void delay (unsigned char m)   //控制頻率延時   
{   
unsigned i=3*m;   
while(--i);   
}   
void delayms(unsigned char a)  //豪秒延時子程序   
{   
  while(--a);     
}   
void main()   
{
        unsigned char p,m;   //m為頻率常數(shù)變量   
        unsigned char i=0;   
        TMOD&=0x0f;   
        TMOD|=0x01;   
        TH0=0xd8;TL0=0xef;   
        IE=0x82;   
play:
        while(1)   
    {   
        a:  p=music_tab[ i];   
                if(p==0x00)      
                {
                        i=0, delayms(1000); goto play; //如果碰到結(jié)束符,延時1秒,回到開始再來一遍  
                }      
                else
                        if(p==0xff)  
                        {
                                i=i+1;delayms(100),TR0=0; goto a;  //若碰到休止符,延時100ms,繼續(xù)取下一音符
                        }      
                        else
                        {
                                m=music_tab[i++], n=music_tab[i++];         //取頻率常數(shù) 和 節(jié)拍常數(shù)
                        }      
                        TR0=1;                                             //開定時器0   
                while(n!=0)                    //等待節(jié)拍完成,輸出音頻  
                {
                        Beep=~Beep;
                        delay(m);   
                }
                TR0=0;                                             //關(guān)定時器0   
    }   
}
void int0() interrupt 1   //采用中斷定時器0 控制節(jié)拍   
{  
        TH0=0xd8;   
        TL0=0xef;   
        n--;   
}
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂 踩
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

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

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

快速回復(fù) 返回頂部 返回列表
主站蜘蛛池模板: 欧美一区二区三区视频 | 日韩中文字幕 | www.青娱乐| 亚洲视频欧美视频 | 中文字幕一级毛片视频 | 久久久久久久久久久久久九 | 欧美激情综合 | 成人在线一级片 | 精彩视频一区二区三区 | 国产欧美精品一区二区色综合朱莉 | 91久久| 中文字幕亚洲视频 | 免费精品久久久久久中文字幕 | 成人国产精品久久 | 久久婷婷香蕉热狠狠综合 | 久久免费精品 | 黄色片a级 | 中文字幕一区二区三区不卡在线 | 九九热国产视频 | 一区二区三区四区不卡 | 91av国产在线视频 | 国产精品影视在线观看 | 国产日韩精品久久 | 国产99免费 | 国产精品欧美一区二区 | 蜜桃五月天 | 99热精品在线观看 | 亚洲国产成人久久久 | 欧美一区二区三区在线 | 国产激情精品 | 欧美一a | 九九伊人sl水蜜桃色推荐 | 国产日韩欧美电影 | 中文字幕免费在线 | 欧美日韩精品一区二区三区四区 | 日韩一区二区三区在线视频 | 婷婷丁香综合网 | 国产a级黄色录像 | 日韩欧美手机在线 | 国产日韩欧美 | 欧美一区二区三区四区五区无卡码 |