【導(dǎo)讀】撥碼開關(guān)實(shí)現(xiàn)電子琴相應(yīng)功能的控制，電子琴的輸出有兩個(gè)聲道，可獨(dú)立輸出。該電子琴還具有存儲(chǔ)輸入按鍵值并回放功能。

　　

【正文】 index_output2=index_output2_temp。 elsif(contrl1=39。039。 and contrl2=39。139。 and contrl3=39。039。) then 輸出鍵盤和原曲 index_output1=key_data。 index_output2=index_output1_temp。 elsif(contrl1=39。039。 and contrl2=39。139。 and contrl3=39。139。) then 輸出原曲 index_output1=index_output1_temp。 index_output2=index_output1_temp。 elsif(contrl1=39。139。 and contrl2=39。039。 and contrl3=39。039。) then 輸出伴奏 index_output1=index_output2_temp。 index_output2=index_output2_temp。 else 輸出原曲加伴奏 index_output1=index_output1_temp。 index_output2=index_output2_temp。 end if。 else index_output1=RAM(count_r)。 輸出剛剛存儲(chǔ)的按鍵值 index_output2=RAM(count_r)。 end if。 end process。 process(clk_50MHz) 此進(jìn)程完成對(duì) 50MHz 的輸入時(shí)鐘分頻得到 8Hz 的節(jié)拍時(shí)鐘 begin if(key_or_auto_input=39。139。) then 當(dāng) key_or_auto_input=39。139。時(shí)，表示由鍵盤輸入控制 count_for_4Hz=0。 clk_4Hz=39。039。 else if rising_edge(clk_50MHz) then if(count_for_4Hz=12499999) then 此處 count_for_4Hz=6249999,則分頻得到8Hz，若 12499999，則 4Hz count_for_4Hz=0。 clk_4Hz=39。139。 else count_for_4Hz=count_for_4Hz+1。 clk_4Hz=39。039。 end if。 end if。 end if。 end process。 process(clk_50MHz) 此進(jìn)程完成對(duì) 50MHz 的輸入時(shí)鐘分頻得到 6Hz 的節(jié)拍時(shí)鐘 begin if rising_edge(clk_50MHz) then if(count_for_6Hz=8333299) then 此處 count_for_4Hz=8333299,則分頻得到6Hz count_for_6Hz=0。 clk_6Hz=39。139。 else count_for_6Hz=count_for_6Hz+1。 clk_6Hz=39。039。 end if。 end if。 end process。 process(clk_4Hz) 節(jié)拍計(jì)數(shù) begin if rising_edge(clk_4Hz) then if count0_2=31 then count0_2=0。 else count0_2=count0_2+1。 end if。 end if。 end process。 process(clk_6Hz) begin if rising_edge(clk_6Hz) then if count_r=31 then count_r=0。 else count_r=count_r+1。 end if。 if(recall=39。039。) then 若 recall 為低，則在 6Hz 時(shí)鐘的驅(qū)動(dòng)下，不斷地將鍵盤的值存進(jìn) 數(shù)組中 RAM(count_r) =key_data。 end if。 end if。 end process。 process(count0_2) begin 在節(jié)拍計(jì)數(shù)變量的驅(qū)動(dòng)下，不斷將內(nèi)置的樂曲輸出 以下為梁祝曲的伴奏 case count0_2 is when 0 = index_output2_temp=000101。 d6 when 1 = index_output2_temp=000101。3 when 2 = index_output2_temp=000101。2 when 3 = index_output2_temp=000101。1 when 4 = index_output2_temp=000101。d7 when 5 = index_output2_temp=000101。d7 when 6 = index_output2_temp=000101。d5 when 7 = index_output2_temp=000110。d5 when 8 = index_output2_temp=000110。d5 when 9 = index_output2_temp=000110。d5 when 10 = index_output2_temp=000110。d5 when 11 = index_output2_temp=000110。d5 when 12 = index_output2_temp=000110。d5 when 13 = index_output2_temp=000110。d5 when 14 = index_output2_temp=000101。d5 when 15 = index_output2_temp=000101。d5 when 16 = index_output2_temp=000101。0 when 17 = index_output2_temp=000110。d5 when 18 = index_output2_temp=000110。d6 when 19 = index_output2_temp=000110。3 when 20 = index_output2_temp=010101。2 when 21 = index_output2_temp=010101。2 when 22 = index_output2_temp=010101。1 when 23 = index_output2_temp=010001。2 when 24 = index_output2_temp=010110。2 when 25 = index_output2_temp=010110。3 when 26 = index_output2_temp=010101。3 when 27 = index_output2_temp=010101。3 when 28 = index_output2_temp=010011。 when 29 = index_output2_temp=010011。 when 30 = index_output2_temp=010101。 0 when 31 = index_output2_temp=010101。0 when others = null。 end case。 以下為梁祝曲 case count0_2 is when 0 = index_output1_temp=000011。 when 1 = index_output1_temp=000011。 when 2 = index_output1_temp=000011。 when 3 = index_output1_temp=000011。 when 4 = index_output1_temp=000101。 when 5 = index_output1_temp=000101。 when 6 = index_output1_temp=000101。 when 7 = index_output1_temp=000110。 when 8 = index_output1_temp=010001。 when 9 = index_output1_temp=010001。 when 10 = index_output1_temp=010001。 when 11 = index_output1_temp=010010。 when 12 = index_output1_temp=000110。d6 when 13 = index_output1_temp=010001。1 when 14 = index_output1_temp=000101。d5 when 15 = index_output1_temp=000101。 when 16 = index_output1_temp=010101。5 when 17 = index_output1_temp=010101。 when 18 = index_output1_temp=010101。 when 19 = index_output1_temp=100001。g1 when 20 = index_output1_temp=010110。6 when 21 = index_output1_temp=010101。5 when 22 = index_output1_temp=010011。3 when 23 = index_output1_temp=010101。5 when 24 = index_output1_temp=010010。 when 25 = index_output1_temp=010010。 when 26 = index_output1_temp=010010。 when 27 = index_output1_temp=010010。 when 28 = index_output1_temp=010010。 when 29 = index_output1_temp=010010。 when 30 = index_output1_temp=000000。 when 31 = index_output1_temp=000000。 when others = null。 end case。 end process。 end Behavioral。 音調(diào)發(fā)生器模塊（ tone） Company: Engineer: Create Date: 14:55:18 05/20/2020 Design Name: Module Name: tone Behavioral Project Name: Target Devices: Tool versions: Description: Dependencies: Revision: Revision File Created Additional Comments: library IEEE。 use 。 use 。 use 。 Unment the following library declaration if using arithmetic functions with Signed or Unsigned values use 。 Unment the following library declaration if instantiating any Xilinx primitives in this cod