【正文】 ger range 0 to 2047。architecture bhv of bfq issignal s1: integer range 0 to 15。oup3:out integer range 0 to 15)。oup1:out std_logic。RST:in std_logic。entity bfq isport(clk1:in std_logic。library ieee。end。end if。039。139。139。 thencount2:=not count2。event and fullspks=39。process(fullspks)variable count2:std_logic。end if。039。 else count11:=count11+1。fullspks=39。139。begin if preclk39。end process。 then count4:=count4+1。event and clk=39。count4:=0。if count4=12 then 將基準頻率進行12分頻preclk=39。begin preclk=39。signal fullspks:std_logic。end。tone:in integer range 0 to 2047。use 。spkout的輸出頻率將決定每一音符的音調(diào)，這樣分頻計數(shù)器的預置數(shù)tone[10..0]與spkout的輸出頻率就有了對應關系。由于直接從數(shù)控分頻器中出來的輸出信號是脈寬極窄的脈沖信號，為了便于驅動喇叭，需另加一個D觸發(fā)器均衡其占空比，也即作二分頻處理。通過仿真圖可以清楚地看到結果。end 。end case。code1=1。when 14=tone=1541。code=6。code1=1。when 12=tone=1409。code=4。code1=1。when 10=tone=1289。code=2。code1=1。 when 8=tone=1091。code=6。code1=0。architecture bhv of ydbmq isbeginprocess(index)begin case index is when 5=tone=771。tone:out integer range 0 to 2047)。code:out integer range 0 to 15。use 。圖33 手動/自動選擇器仿真圖此仿真圖中輸入cs代表手動\自動演奏的選擇端，輸入rst代表整體復位端，輸入dd2分別代表手動和自動演奏的音符，q為輸出端，由此仿真圖可清楚的看到當rst=1時，不論選擇的是手動還是自動，輸出都為零，達到了整體復位的功能；當rst=0且cs=1時，自動演奏樂曲，因為q與d2的值相同；當rst=0且cs=0時，手動演奏樂曲，因為這時的q與d1的值相同，從而也達到了演奏方式選擇的功能該編碼模塊的作用為將輸入的音符數(shù)據(jù)翻譯為音樂產(chǎn)生模塊的所需要的分頻系數(shù)，并且顯示音符的數(shù)字碼型和高音階，通過對照表22各音名對應的分頻系數(shù)值及初始值，根據(jù)輸入得到初始值，從而得到分頻系數(shù)以便進行分頻，得到所需的頻率。end process。end case。=q=d2。 when 39。039。 then q=0。architecture bhv of bmux isbegin process(cs,rst)beginif rst=39。q:out integer range 0 to 15)。entity bmux isport(d1,d2:in integer range 0 to 15。源程序如下：library ieee。與此同時，還需要一個復位信號rst來控制該演奏器是否工作，當rst為1時，停止演奏，為0時可以演奏。根據(jù)設計的要求，該簡易樂曲演奏器能實現(xiàn)手動或自動演奏樂曲的功能。然后把輸出toneindex輸入到音調(diào)編碼器模塊，進行下一步編碼工作。end。end case。When 78|79|102|103=toneindex=13。When 0|1|4|5|8|9|12 to 17|24|25|40|41|46|47|70|71|76|77|84 to 91|94|95|110 to 115|120 to 123=toneindex=10。when 22|23|32|33|36|37|56 to 59|62|63|66|67|98|99=toneindex=8。process(counter)begincase counter is when 108|109=toneindex=5。end if。139。 elsif clk39。architecture bhv of ydfsq issignal counter:integer range 0 to 200。toneindex:out integer range 0 to 15)。use 。隨著計數(shù)器按4Hz的時鐘頻率做加法計數(shù)時，樂譜逐次被選取，樂曲就開始自然連續(xù)而且循環(huán)地演奏起來。圖31 分頻器仿真圖在此模塊中設置了一個計數(shù)器（計數(shù)最大值為200），這個計數(shù)器的計數(shù)頻率選為4Hz，恰好為當全音符設為1s時，四四拍的4分音符的持續(xù)時間。end process。end if。If count=1500000 then out1=not out1。139。begin If clk39。end fpq。entity fpq is port(clk:in std_logic。源程序如下：library ieee。如圖23所示分頻器手動/自動音調(diào)發(fā)生器數(shù)控分頻器音調(diào)編碼器圖 23 電路結構示意圖演奏時可以通過按鍵選擇是手動演奏還是自動演奏，自動演奏則是演奏已存入的固定樂曲，而且自動播放能重復播放；手動演奏是通過按鍵進行簡易樂曲的演奏；進行手動演奏和自動演奏時，數(shù)碼管上要同時能顯示出演奏樂曲的樂譜。為了能達到演奏時能循環(huán)進行，則需設置一個時長計數(shù)器，當樂曲演奏完時，保證能自動從頭開始演奏。3. 初始值的選取D初始值D = 計數(shù)最大值N 分頻系數(shù)n此次設計中應用的各音名對應的分頻系數(shù)值及初始值如表22所示：由于對應的頻率點都有小數(shù)部分，在分頻時不需花大量時間去產(chǎn)生分頻電路，只要大概頻率點在此范圍內(nèi)即可，本實驗采用頻率點及音符與音譜對應定義如表22所示。n進制計數(shù)器可