程序错误，求救

淼森

下面程序中有错误，新手，不知如何解决，求解答
library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
use ieee.std_logic_unsigned.all;

entity mycounter_60 is
    port(clk,clr,en,bcd1wr,bcd10wr:in std_logic;
         din:in std_logic_vector(3 downto 0);
, Z5 a: ^0 d. I         bcd1: out std_logic_vector(3 downto 0);
         co: out std_logic;
* k+ E' v2 L' Y         bcd10: out std_logic_vector(2 downto 0));
2 G0 `# B5 X- pend mycounter_60;
' a9 ?) E" i. n- Z! G; \2 F3 Z
! n  O  M! c/ z- R; P) Carchitecture art2 of mycounter_60 is
9 V$ c, Z2 h% J4 P# v3 Ksignal bcd1n:std_logic_vector(3 downto 0);
5 J0 u" j7 g: L, @signal bcd10n:std_logic_vector(2 downto 0);
; J0 `) c) J5 k* f  lbegin
    PROCESS(clk,clr,en,bcd1wr) is
: `2 S; g& J7 X$ m) F. f    begin
8 A1 F; |: G* ^4 b) m" V) K5 z        if(clr='0') then
            bcd1n<=(others=>'0');
& R& A4 X! @3 P2 A1 O            bcd10n<=(others=>'0');
        elsif(clk'event and clk='1') then
            if(bcd1wr='1' and en='1') then
                bcd1n<=din;
            elsif(en='1') then
0 |4 X6 K3 q! C9 O                bcd1n<=bcd1n+1;
                if(bcd1n>=9) then
1 ^% U5 Q. {9 P2 @# P                    bcd1n<="0000";
                end if;
5 D3 V1 p; u& F2 L            end if;
        end if;
3 s4 x: t' A, h5 q% K% |    end process;
   
: ?' K: A+ w+ d- \    process(bcd10wr,en,bcd1n) is
    begin
        if(bcd10wr='1' and en='1') then
            bcd10n<=din(2 downto 0);
        elsif(bcd1n=9 and en='1') then
            bcd10n<=bcd10n+1;
            if(bcd10n=5) then
                bcd10n<="000";
                co<='1';
1 c2 o& O3 P( L+ ^- K            else
                co<='0';
            end if;
        end if;
    end process;
$ x" Y6 |2 D" o" k4 Z   
# `4 H" v3 k8 J! B3 Y, ]    bcd1<=bcd1n;
    bcd10<=bcd10n;
end art2;

非常感谢

alec4050

这些都是小错误，希望细心一点
( V  E# M9 J' |library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
- m0 z. x$ X8 Q6 [4 Luse ieee.std_logic_unsigned.all;
entity  mycounter_60   is
/ E1 q* b6 @: Sport(  clk,clr,en,bcd1wr,bcd10wr :in std_logic;
% d. U4 h7 ?: Y1 n2 Y        din:in std_logic_vector(3 downto 0);
        cout std_logic;
  [5 j  k: K/ s( C; v- ?       bcd1 ut std_logic_vector(3 downto 0);
& I7 F. L; w" F1 l1 c5 R        bcd10 ut std_logic_vector(2 downto 0)
       );
) G* Y) G2 i* T# D, Tend;
; E" r0 |5 T+ q+ \2 earchitecture behav of  mycounter_60   is
6 ^: R, d3 k# b! d! D: nsignal bcd1n:std_logic_vector(3 downto 0);
* W6 F7 @2 V7 R8 a) msignal bcd10n:std_logic_vector(2 downto 0);
/ q( ?# U2 q8 a
begin
, t4 P9 e7 P4 f1 Y* F   process(bcd1wr,clr,en,clk)
3 T. y- b% G- B: c  p6 i   begin
$ ?" j- T1 v8 rif(clr='0')then
7 z+ U  _+ }* V% Y# \6 N$ N0 \bcd1n<=(others=>'0');

# \2 [5 @( l1 q# l% Xelsif(clk'event and clk='1')then
0 N' m' J6 @# a8 w$ {" hif (bcd1wr='1' and en='1')then
/ k0 f7 [/ C  c6 B6 g, y6 _& vbcd1n<=din;
elsif (en='1')then
bcd1n<=bcd1n+1;
if (bcd1n>=9)then
bcd1n<="0000";

end if;
3 `2 _# Y  E( vend if;
end if;
end process;

, U4 C3 p8 Q% O: T0 k! q
process(bcd10wr,en)
begin
& M7 Q, Z' X4 y2 i+ v- @) nif(clr='0')then
( F: T1 @# ?. s4 o: Rbcd10n<=(others=>'0');
% W0 a2 V5 c) _8 m7 @0 e3 aif(bcd10wr='1' and en='1')then
; e, R) i1 }7 T3 A( i& Lbcd10n<=din(2 downto 0);
elsif(bcd1n=9 and en='1') then
4 s9 L. q. p4 q( _5 `bcd10n<=bcd10n+1;
if(bcd10n=5) then
$ i  |( q  S! T# a& ]* Y& u9 sbcd10n<="000";
# ?' R5 f. \4 H0 X! ^co<='1';
else
1 D, e6 j. [/ S: p5 A* e1 r$ Ico<='0';
end if;
end if;
: u* L6 d- _% c8 Vend if;
: T1 v9 h7 }1 A: P5 Pend process;

3 u1 b$ p, J" \: P! q/ Sbcd1<=bcd1n;
bcd10<=bcd10n;
+ p0 @3 d& x8 b! N/ hend behav;