Untitled Document
Untitled Document
WHEN x2_st => IF (dne_i='1') THEN nxt_st <= idle_st; -- all done?
ELSE nxt_st <= x2_st; -- no, more
to go
END IF;
END CASE;
END PROCESS st_trans;
-- --------------------------------------------------------------------
ausgabe : PROCESS (now_st)
BEGIN
CASE now_st IS
WHEN idle_st => cl_o <= '1'; en_o <= '0'; dv_o <= '0';
WHEN x1_st => cl_o <= '0'; en_o <= '1'; dv_o <= '0';
WHEN dv_st => cl_o <= '0'; en_o <= '0'; dv_o <= '1';
WHEN x2_st => cl_o <= '0'; en_o <= '0'; dv_o <= '0';
END CASE;
END PROCESS ausgabe;
-- --------------------------------------------------------------------
END ar1;