8位可逆计数器，通过数码管显示，vhdl程序

以下是一个使用共阳数码管显示8位可逆计数器的VHDL程序示例：

entity reversible_counter is
    port (
        clk   : in  std_logic;
        reset : in  std_logic;
        seg   : out std_logic_vector(6 downto 0);
        an    : out std_logic_vector(3 downto 0)
    );
end entity;

architecture behavioral of reversible_counter is
    signal count : unsigned(7 downto 0) := (others => '0');
    signal disp  : std_logic_vector(6 downto 0);
    signal an_sel: std_logic_vector(3 downto 0) := "1110";
begin
    process(clk, reset)
    begin
        if reset = '1' then
            count <= (others => '0');
        elsif rising_edge(clk) then
            if count = "100000000" then
                count <= "00000000";
            else
                count <= count + 1;
            end if;
        end if;
    end process;
    
    with count select
        disp <= "0000001" when "00000000",
                "1001111" when "00000001",
                "0010010" when "00000010",
                "0000110" when "00000011",
                "1001100" when "00000100",
                "0100100" when "00000101",
                "0100000" when "00000110",
                "0001111" when "00000111",
                "0000000" when "00001000";
    
    with an_sel select
        an <= "1110" when "00",
              "1101" when "01",
              "1011" when "10",
              "0111" when others;

    process(clk)
    begin
        if rising_edge(clk) then
            if an_sel = "0001" then
                seg <= disp(6 downto 0);
            else
                seg <= disp(6 downto 0) xor "1111111";
            end if;
            
            an_sel <= an_sel(2 downto 0) & an_sel(3);
        end if;
    end process;
end architecture;

这个计数器包含一个时钟输入和一个异步复位输入。每当时钟上升沿到来时，计数器会自动增加一个单位，当计数器的值达到255时，它会自动回滚到0。使用一个带有共阳极数码管的显示器来显示计数器的值。在这个示例程序中，使用一个包含256个值的查找表来将每个计数器值与相应的数字和显示段映射起来。

在这个程序中，还使用了一个计数器选择器(an_sel)来控制哪个数码管显示器处于活动状态。当an_sel为"0001"时，第一个数码管被选中，当an_sel为"0010"时，第二个数码管被选中，以此类推。因此，通过更改an_sel的值，可以在多个数码管之间切换并显示8位计数器的值。