六十进制计数器错误

淼森

六十进制计数器
  [- _1 I5 Q" ~library ieee;
use ieee.std_logic_1164.all;
2 V9 ~. A) Q6 \! k0 l0 z1 z  Duse ieee.std_logic_unsigned.all;

3 z: k5 b  _, \, C" Q) tentity counter_60 is
0 c9 p! P; G& E  t4 m8 @        port(clk,bcd1wr,bcd10wr,cin:in std_logic;
                 co: out std_logic;
                 datain: in std_logic_vector(3 downto 0);
                 bcd1: out std_logic_vector(3 downto 0);
                 bcd10: out std_logic_vector(2 downto 0));
8 m4 p, ?2 ^; ]! K3 _% e2 f* Xend counter_60;
$ f+ P  ]- A8 K5 |* ?
" P5 U  V+ `. e, p0 S  i7 |architecture rtl of counter_60 is
, G$ a; C, q' z( w4 F4 rsignal bcd1n:std_logic_vector(3 downto 0);
: L" m6 N+ m4 j0 L" x+ lsignal bcd10n:std_logic_vector(2 downto 0);
begin
        bcd1<=bcd1n;
& f8 U& p! B. @        bcd10<=bcd10n;
- Z$ v+ v* g# w1 E  ^+ I$ h        process(clk,bcd1wr,datain) is
" N+ `: J8 m$ y9 d. ]$ Q* U        begin
. s7 o5 r' p; S% r) M                if(bcd1wr='1') then
                        bcd1n<=datain;
                elsif(clk'event and clk='1') then
                        if(cin='1') then
, K! f/ ]* L# k$ N                                if(bcd1n=9) then
3 B0 C6 g. m/ `+ u3 K# ?                                        bcd1n<="0000";
8 ~7 y* N, O* r: r& K. s                                else
                                        bcd1n<=bcd1n+'1';
                                end if;
9 e* o8 Y' ~6 ]* _" F7 F2 S                        end if;
/ f( b; F7 K, _0 y( e! d4 }                end if;
        end process;
      
        process(clk,bcd10wr,datain) is
        begin
                if(bcd10wr='1') then
  l& U$ ~" X) ~5 _1 @9 y6 F                        bcd10n<=datain(2 downto 0);
6 k$ T6 k1 `9 ^- A2 N3 c                elsif(clk'event and clk='1') then
                        if(cin='1' and bcd1n=9) then
. K- r" H5 ?% r  s                                if(bcd10n=5) then
! D/ c/ G7 M5 K- ?( R9 w' V                                        bcd10n<="000";
6 x/ N) l% ?  }3 e  y                                else
                                        bcd10n<=bcd10n+'1';
/ D2 D" \) }6 M* b6 h! f7 \6 Q/ b- s                                end if;
9 [* Y7 u5 a3 ~                        end if;
                end if;
& z+ b+ P6 N. v2 \        end process;
      
        process(bcd10n,bcd1n,cin) is
        begin
5 w6 y, n. f- A( w, A4 M                if((cin='1') and (bcd1n=9) and (bcd10n=5)) then
: B: F& v+ G8 W' N" x                        co<='1';
% z: l5 |* F* ]8 W+ V% d1 B                else
                        co<='0';
                end if;
        end process;
end rtl;
) i' t8 m+ s4 s; G) P' E2 D' B7 w  L% {可以编译，但是仿真不合适，仿真不计数，请各位老师同仁指正，万分感谢

alec4050

     把赋值放到前面去，怎么会变， bcd1<=bcd1n;
        bcd10<=bcd10n;放在最后
* Z1 a2 K+ L' X  q0 p5 @: }