数字电压表设计试验EDA原理及应用课件.PPT

数字电压表设计-VHDL描述 process(scan_out) begin case scan_out is when 00 = seg=display(bcd_value(3 downto 0));sel=00;dp=0; when 01 = seg=display(bcd_value(7 downto 4)); sel=01;dp=0; when 10 = seg=display(bcd_value(11 downto 8));sel=10;dp=1; when others = seg=display(1111);sel=11;dp=1; end case; end process; end Behavioral; 第十三章 ● 数字电压表设计-程序包的设计 在该设计中，在处理数码管显示部分会多次使用到BCD码到7段码，为了提高对程序代码的复用和减少程序代码长度，在设计中将BCD码到7段码的转换过程通过函数调用实现。下面给出在程序包中的函数声明过程。 第十三章 ● 数字电压表设计-程序包的设计 library IEEE; use IEEE.STD_LOGIC_1164.all; package disp_driver is function display(a : in std_logic_vector(3 downto 0) ) return std_logic_vector; function bin_bcd(bin : in std_logic_vector(3 downto 0); flag : std_logic) return std_logic_vector; end disp_driver; 第十三章 ● 数字电压表设计-程序包的设计 package body disp_driver is function bin_bcd(bin : std_logic_vector;flag : std_logic) return std_logic_vector is variable bcd_x : std_logic_vector(11 downto 0); begin if(flag=0)then case bin is when 0000 = bcd_x:=000000000000; when 0001 = bcd_x:=000000000010; when 0010 = bcd_x:=000000000100;when 0011= bcd_x:=000000000110; when 0100= bcd_x:=000000001000;when 0101= bcd_x:=000000001010; when 0110= bcd_x:=000000001100;when 0111= bcd_x:=000000001110; when 1000= bcd_x:=000000010000;when 1001= bcd_x:=000000010010; when 1010= bcd_x:=000000100000;when 1011= bcd_x:=000000100010; when 1100= bcd_x:=000000100100;when 1101= bcd_x:=000000100110; when 1110= bcd_x:=000000101000;when 1111= bcd_x:=000000110000; when others = bcd_x:=111111111111; end case; elsif(flag=1)then 第十三章 ● 数字电压表设计-程序包的设计 case bin is when 0000 = bcd_x:=000000000000;when 0001 = bcd_x:=000000110010; when 0010 = bcd_x:=000001100100;when 0011= bcd_x:=000010010110; when 0100= bcd_x:=000100101000;when 0101= bcd_x:=000101100000; when 0110= bcd_x:=000110010010;when 0111= bcd_x:=001000100100; when 1000= bcd_x:=001001010110;when 1001= bcd_x:=001010001000; wh