哈哈哈哈哈操欧洲电影,久草网在线,亚洲久久熟女熟妇视频,麻豆精品色,久久福利在线视频,日韩中文字幕的,淫乱毛视频一区,亚洲成人一二三,中文人妻日韩精品电影

您好,歡迎來電子發(fā)燒友網(wǎng)! ,新用戶?[免費(fèi)注冊]

您的位置:電子發(fā)燒友網(wǎng)>源碼下載>單片機(jī)編程>

C51音樂程序

大?。?/span>5.19 KB 人氣: 2011-06-03 需要積分:0

?

/************************************************************************
/**********************************************************************/
#i nclude
#i nclude
//本例采用89C52, 晶振為11.0592MHZ
//關(guān)于如何編制音樂代碼, 其實(shí)十分簡單,各位可以看以下代碼.
//頻率常數(shù)即音樂術(shù)語中的音調(diào),而節(jié)拍常數(shù)即音樂術(shù)語中的多少拍;
//所以拿出譜子, 試探編吧!


void int0()? interrupt 1?? //采用中斷0 控制節(jié)拍
{? TH0=0xd8;
?? TL0=0xef;
?? n--;
}

void delay (unsigned char m)?? //控制頻率延時(shí)
{
?unsigned i=3*m;
?while(--i);
}

void delayms(unsigned char a)? //豪秒延時(shí)子程序
{
? while(--a);????????????????? //采用while(--a) 不要采用while(a--); 各位可編譯一下看看匯編結(jié)果就知道了!
}

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é)束符,延時(shí)1秒,回到開始再來一遍
?????? else if(p==0xff)? { i=i+1;delayms(100),TR0=0; goto a;}? //若碰到休止符,延時(shí)100ms,繼續(xù)取下一音符
??????????? else???????? {m=music_tab[i++], n=music_tab[i++];}? //取頻率常數(shù)和節(jié)拍常數(shù)
???????????? TR0=1;???????????????????????????????????????????? //開定時(shí)器1
?????????? while(n!=0) P1=~P1,delay(m);???????????????????????? //等待節(jié)拍完成, 通過P1口輸出音頻(可多聲道哦!)
?????? TR0=0;???????????????????????????????????????????? //關(guān)定時(shí)器1
??? }
}

?

?

非常好我支持^.^

(2) 4.9%

不好我反對

(39) 95.1%

      發(fā)表評(píng)論

      用戶評(píng)論
      評(píng)價(jià):好評(píng)中評(píng)差評(píng)

      發(fā)表評(píng)論,獲取積分! 請遵守相關(guān)規(guī)定!

      ?
      稻城县| 苍梧县| 潮安县| 常德市| 莆田市| 晋中市| 蓬安县| 扎兰屯市| 精河县| 巴东县| 容城县| 崇阳县| 育儿| 博罗县| 沁源县| 淅川县| 皋兰县| 巴彦淖尔市| 绥芬河市| 清水县| 阿拉善右旗| 兴安县| 布尔津县| 蕉岭县| 商洛市| 奈曼旗| 彭泽县| 云浮市| 通海县| 阿克苏市| 黑山县| 衢州市| 鹿邑县| 佛山市| 永川市| 镇康县| 乌鲁木齐县| 广宗县| 乌兰浩特市| 奉化市| 东乡县|