用Modelsim仿真的时候出现上面问题，哪位高手可以帮帮忙？真是感激不尽！
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;

entity counter6 is
  port(csignal,clear:in std_logic;
    over:out std_logic;
    result1,result2,result3,result4,result5,result6:out std_logic_vector(3 downto 0)
    );
end counter6;

architecture Behavioral of counter6 is
  signal indiv,ten,hun,thou,tenthou,hunthou:integer range 0 to 9:=0;
begin
  t1:process(clear,csignal)
    begin
        if(clear='1')then
          result1<="0000";
          result2<="0000";
          result3<="0000";
          result4<="0000";
          result5<="0000";
          result6<="0000";
          indiv<=0;
          ten<=0;
          hun<=0;
          thou<=0;
          tenthou<=0;
          hunthou<=0;
          over<='0';
        elsif csignal'event and csignal='1' then              
          if indiv=9 then
            indiv<=0;
            ten<=ten+1;
          else
            indiv<=indiv+1;
          end if;
          if ten=9 and indiv=9 then
            ten<=0;
            hun<=hun+1;
          end if;
          if hun=9 and ten=9 and indiv=9 then
            hun<=0;
            thou<=thou+1;
          end if;
          if thou=9 and hun=9 and ten=9 and indiv=9 then
            thou<=0;
            tenthou<=tenthou+1;
          end if;
          if tenthou=9 and thou=9 and hun=9 and ten=9 and indiv=9 then
            tenthou<=0;
            hunthou<=hunthou+1;
          end if;
          if hunthou=9 and tenthou=9 and thou=9 and hun=9 and ten=9 and indiv=9 then
            over<='1';
          else
            over<='0';
          end if;
        end if;
    end process ;
  result1<="0000"when indiv=0 else
        "0001"when indiv=1 else
        "0010"when indiv=2 else
        "0011"when indiv=3 else
        "0100"when indiv=4 else
        "0101"when indiv=5 else
        "0110"when indiv=6 else
        "0111"when indiv=7 else
        "1000"when indiv=8 else
        "1001";        
  result2<="0000"when ten=0 else
        "0001"when ten=1 else
        "0010"when ten=2 else
        "0011"when ten=3 else
        "0100"when ten=4 else
        "0101"when ten=5 else
        "0110"when ten=6 else
        "0111"when ten=7 else
        "1000"when ten=8 else
        "1001";
  result3<="0000"when hun=0 else
        "0001"when hun=1 else
        "0010"when hun=2 else
        "0011"when hun=3 else
        "0100"when hun=4 else
        "0101"when hun=5 else
        "0110"when hun=6 else
        "0111"when hun=7 else
        "1000"when hun=8 else
        "1001";
  result4<="0000"when thou=0 else
        "0001"when thou=1 else
        "0010"when thou=2 else
        "0011"when thou=3 else
        "0100"when thou=4 else
        "0101"when thou=5 else
        "0110"when thou=6 else
        "0111"when thou=7 else
        "1000"when thou=8 else
        "1001";
  result5<="0000"when tenthou=0 else
        "0001"when tenthou=1 else
        "0010"when tenthou=2 else
        "0011"when tenthou=3 else
        "0100"when tenthou=4 else
        "0101"when tenthou=5 else
        "0110"when tenthou=6 else
        "0111"when tenthou=7 else
        "1000"when tenthou=8 else
        "1001";  
  result6<="0000"when hunthou=0 else
        "0001"when hunthou=1 else
        "0010"when hunthou=2 else
        "0011"when hunthou=3 else
        "0100"when hunthou=4 else
        "0101"when hunthou=5 else
        "0110"when hunthou=6 else
        "0111"when hunthou=7 else
        "1000"when hunthou=8 else
        "1001";  

         
end Behavioral;


[ 此贴被blacklong在2007-05-16 16:06重新编辑 ]