简易电子琴的设计摘要随着基于cpld的eda技术的发展和应用领域的扩大

简易电子琴的设计摘要随着基于cpld的eda技术的发展和应用领域的扩大内容摘要：

AND CLK =39。 139。 )THEN COUNT :=COUNT +1。 IF COUNT =4 THEN CLK2 =39。 139。 ELSIF COUNT =8 THEN CLK2=39。 039。 COUNT:=0。 END IF。 END IF。 END PROCESS。 MUSIC:PROCESS(CLK2) BEGIN IF (CLK239。 EVENT AND CLK2=39。 139。 )THEN IF (COUNT0=31)THEN COUNT0=0。 ELSE COUNT0=COUNT0+1。 END IF。 END IF。 END PROCESS。 COM1:PROCESS(COUNT0,AUTO,INDEX2) BEGIN IF AUTO =39。 039。 THEN CASE COUNT0 IS WHEN 0=INDEX0=00000100。 3 WHEN 1=INDEX0=00000100。 3 WHEN 2=INDEX0=00000100。 3 WHEN 3=INDEX0=00000100。 3 WHEN 4=INDEX0=00010000。 5 WHEN 5=INDEX0=00010000。 5 WHEN 6=INDEX0=00010000。 5 WHEN 7=INDEX0=00100000。 6 WHEN 8=INDEX0=10000000。 8 WHEN 9=INDEX0=10000000。 8 WHEN 10=INDEX0=10000000。 8 WHEN 11=INDEX0=00000100。 3 WHEN 12=INDEX0=00000010。 2 WHEN 13=INDEX0=00000010。 2 WHEN 14=INDEX0=00000001。 1 WHEN 15=INDEX0=00000001。 1 WHEN 16=INDEX0=00010000。 5 WHEN 17=INDEX0=00010000。 5 WHEN 18=INDEX0=00001000。 4 WHEN 19=INDEX0=00001000。 4 WHEN 20=INDEX0=00001000。 4 WHEN 21=INDEX0=00000100。 3 WHEN 22=INDEX0=00000010。 2 WHEN 23=INDEX0=00000010。 2 WHEN 24=INDEX0=00010000。 5 WHEN 25=INDEX0=00010000。 5 WHEN 26=INDEX0=00001000。 4 WHEN 27=INDEX0=00001000。 4 WHEN 28=INDEX0=00000100。 3 WHEN 29=INDEX0=00000100。 3 WHEN 30=INDEX0=00000010。 2 WHEN 31=INDEX0=00000010。 2 WHEN OTHERS =NULL。 END CASE。 ELSE INDEX0=INDEX2。 END IF。 END PROCESS。 END BEHAVIORAL。 （ 2） 音调发生模块 音调发生模块的作用是产生音阶的分频预置值。 当 8 位发声控制输入信号中的某一位为高电平时，则对应某一音节的数值将输出，该数值即为该音阶的分频预置值，分频预置值控制数控分频模块进行分频，由此可得到每个音阶对应的频率。 VHDL 源程序 () LIBRARY IEEE。 USE。 USE。 USE。 ENTITY TONE IS PORT (INDEX: IN STD_LOGIC_VECTOR(7 DOWNTO 0)。 CODE: OUT STD_LOGIC_VECTOR(6 DOWNTO 0)。 HIGH: OUT STD_LOGIC。 TONE0: OUT INTEGER RANGE 0 TO 2047)。 END TONE。 ARCHITECTURE ART OF TONE IS BEGIN SEARCH : PROCESS(INDEX)。