sorry there was some error now i have uploaded again
plz try this one
begin
ACC1 :acc port map (
inp => sCHANNEL(to_integer(sTEMP)),
rst => sRST,
clk => sCLK,
imp => sComp,
op => sOP
);
counter1 : counter port map (
rst => sRST,
trigger => sTRIG_in,
clk => sCLK,
digit => sDIGIT
);
compare1 : compare port map (
clk => sCLK,
rst => sRST,
inp1 => sOP,
inp2 => sDIGIT,
output => sComp
);
proc1 : proc port map (
inp_pulse => sComp,
clk => sCLK,
rst => sRST,
op => sOutput
);
sSIGNAL <= (others => '0');
process(rst,clk)
begin
if (rst = '1') then
sTEMP <= "001";
sStop_1 <= '1';
-- sOP <= (others => '1');
elsif (clk'event and clk = '1' and sCOMP = '1') then
sTEMP <= sTEMP + "001";
if (sTEMP = "100") then
sStop_1 <= '0';
end if;
end if;
end process;
Process (rst, clk)
begin
if (rst = '1') then
sSTOP <= '1';
elsif (clk' event and clk = '1') then
if (sCHANNEL(to_integer(sTEMP))=X"00000") then
sSTOP <= '0';
end if;
end if;
end process;
--sample1 <= sStop_1;
--sample <= sSTOP;
sRST <= rst;
sCLK <= clk;
sTrig_in <= trig_in;
sCHANNEL <= CHANNEL;
output <= sSTOP and sOutput and sStop_1;
end behavior;