【正文】 0x1A,0x02, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x03, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x16, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03, 0x0F,0x02, 0x10,0x03, 0x15,0x00, 0x00,0x00 }。}include include include ../void main(){ InitialSound()。 }}/*說明************************************************************************** 曲譜存貯格式 unsigned char code MusicName{音高，音長，音高，音長...., 0,0}。***************************************************************************/ifndef __SOUNDPLAY_H_REVISION_FIRST__define __SOUNDPLAY_H_REVISION_FIRST__//**************************************************************************define SYSTEM_OSC 6000000 //定義晶振頻率12000000HZdefine SOUND_SPACE 4/5 //定義普通音符演奏的長度分率,//每4分音符間隔sbit BeepIO = P0^1。 // 計算TL1應裝入的初值 (10ms的初裝值) Sound_Temp_TL1 = (65535(1/1200)*SYSTEM_OSC)%256。 EA = 1。 for(i=0。 } SoundLength = 0。 // 普通音最長間隔標準 TR0 = 0。 //高音 Temp_T = 65536(50000/CurrentFre)*10/(12000000/SYSTEM_OSC)。 LDiv=LDiv0/SLen。 //算出不發(fā)音的長度 if (SL!=0) { TR0=1。 BeepIO=0。 Tone=Sound[Point]。參考文獻單片機原理與工程應用書籍音樂盒設計STC系列增強型8051單片機書籍51單片機典型應用開發(fā)范列大全34。 } BeepIO = 0。i0。i0。 if(XG!=1) if(XG==0) //算出普通音符的演奏長度 if (SLen=4) LDiv1=LDivLDiv4。 Sound_Temp_TL0 = Temp_T%256。 while(Point SoundLength) { SL=Tone%10。 } Point = 0。i++) // 根據(jù)調(diào)號及升降八度來生成新的頻率表 { j = i + Signature。 TH0 = Sound_Temp_TH0。 TL1 = Sound_Temp_TL1。 //原始頻率表unsigned char code SignTab[7] = { 0,2,4,5,7,9,11 }。 百位表示這個音符是否要升半音: 0不升，1升半音。 //初始化開發(fā)板 while(1) { Play(Music_Same,0,3,150)。十七、程序設計include include include include include ../void Delay1ms(unsigned int count){ unsigned int i,j。舉例2：音調(diào)re,發(fā)音長度為半拍，即八分音符，將其編碼為0x22歌曲播放的設計。1/，只要設定延遲時間就可求得節(jié)拍的時間。至于1拍多少s，并沒有嚴格規(guī)定，就像人的心跳一樣，大部分人的心跳是每分鐘72下，有些人快一點，有些人慢一點，只要聽的悅耳就好。 此外結束符和休止符可以分別用代碼00H和FFH來表示，若查表結果為00H，則表示曲子終了；若查表結果為FFH，則產(chǎn)生相應的停頓效果。兩個音之間的距離有兩個“半音”，就叫“全音”。用戶也可以采用外部時鐘。該器件采用ATMEL高密度非易失存儲器制造技術制造，與工業(yè)標準的MCS51指令集和輸出管腳相兼容。Keil提供了包括C編譯器、宏匯編、連接器、庫管理和一個功能強大的仿真調(diào)試器等在內(nèi)的完整開發(fā)方案，通過一個集成開發(fā)環(huán)境（uVision）將這些部份組合在一起。它不僅具有其它EDA工具軟件的仿真功能，還能仿真單片機及外圍器件。另外，可以設計彩燈外觀效果，使音樂盒的功能更加豐富。但是，機械式的音樂盒體積比較大，比較笨重，且發(fā)音單調(diào)。單片機原理及應用課 程 設 計 報 告課題名稱 電子音樂盒 專 業(yè) 電氣自動化技術 班 級 學 號 姓 名 指導教師 201264目 錄1題目及要求……………………………………………………32設計方案 ………………………………………………………33. 課題意義………………………………………………………34. 研究內(nèi)容………………………………………………………3…………………………………………………4…………………………………………4………………………………………………4………………………………………………5…………………………………………………6………………………………………………………6………………………………………7………………………………………………7……………………………………………………8………………………………………………………9……………………………………………………10…………………………………………………………22………………………………………………………22…………………………………………33一、題目及要求 （1）負責音樂編碼規(guī)則設計，音樂編碼，統(tǒng)調(diào)。傳統(tǒng)的音樂盒多是機械音樂盒，其工作原理是通過齒輪帶動一個帶有鐵釘?shù)蔫F桶轉動,鐵桶上的鐵釘撞擊鐵片制成的琴鍵，從而發(fā)出聲音。根據(jù)存儲容量的大小，可以盡可能多的存儲歌曲。系統(tǒng)組成框圖如圖： 六、PROTEUS軟件在介紹Proteus軟件是英國Labcenter electronics公司出版的EDA工具軟件（該軟件中國總代理為廣州風標電子技術有限公司）。機器匯編是通過匯編軟件將源程序變?yōu)闄C器碼，用于MCS51單片機的匯編軟件有早期的A51，隨著單片機開發(fā)技術的不斷發(fā)展，從普遍使用匯編語言到逐漸使用高級語言開發(fā)，單片機的開發(fā)軟件也在不斷發(fā)展，Keil軟件是目前最流行開發(fā)MCS51系列單片機的軟件，這從近年來各仿真機廠商紛紛宣布全面支持Keil即可看出。單片機的可擦除只讀存儲器可以反復擦除100次。如果使用石英晶體，我們推薦電容使用30PF10PF，而如果使用陶瓷振蕩器建議選擇40PF10PF。把C、D、E、F、G、A、B這一組音的距離分成12個等份，每一個等份叫一個“半音”。 2）利用AT89C51的內(nèi)部定時器使其工作在計數(shù)器模式MODE1下，改變計數(shù)值TH0及TL0以產(chǎn)生不同頻率的方法。則1/4 。節(jié)拍碼節(jié)拍數(shù)節(jié)拍碼節(jié)拍數(shù)11/4拍11/8拍22/4拍21/4拍33/4拍33/8拍41拍42/1拍51又1/4拍55/8拍61又1/2拍63/4拍82拍81拍A2又1/2拍A1又1/4拍C3拍C1又1/2拍F3又3/4拍每個音符使用1個字節(jié)，字節(jié)的高4位代表音符的高低，低4位代表音符的節(jié)拍。舉例1：音調(diào)do,發(fā)音長度為兩拍，即二分音符，將其編碼為0x18。十六、仿真圖 完全播放四首歌。 //初始化定時器參數(shù) InitConfigOfDZR01A()。 末尾:0,0 表示結束(Important) 音高由三位數(shù)字組成： 個位是表示 1~7 這七個音符 十位是表示音符所在的音區(qū):1低音，2中音，3高音。 //定義輸出管腳unsigned int code FreTab[12] = { 262,277,294,311,330,349,369,392,415,440,466,494 }。 // 計算TH1應裝入的初值 TH1 = Sound_Temp_TH1。}void BeepTimer0(void) interrupt 1 //音符發(fā)生中斷{ BeepIO = !BeepIO。i12。 while(Sound[SoundLength] != 0x00) //計算歌曲長度 { SoundLength+=2。 TR1 = 1。//計算計數(shù)器初值 Sound_Temp_TH0 = Temp_T/256。 //算出連音音符演奏的長度(多少個10ms) if (FD==1) LDiv=LDiv+LDiv/2。 for(i=LDiv1。 for(i=LDiv2。 Length=Sound[Point+1]