IMG36

- Funkcja pr*ejść-wy|SĆ automatu process(state_reg. start. load. cnt_done) begin

cnt reset <= 0; cnt“count <= ’0; x load <= ’0 ; x"update <= '0; result Joad <= O ; ready_next <= 'O'; case State regls when sO =>

if load = T then

state_next <= sl; e!se

state_next <= $0; end if. when sl =>

$tate_next <= s2; x loa*3 <= T; whens2 =>

If start = T then State next <= s3; eise

state_next <= s2; end if; when s3 =>

State next <= s4; cnt reset <=T; when s* =>

if cnt done = T then siatę next <= s6; else

State next <= s5; end If;

x_upaate <= 'l': when s5 =>

state_next <= s4; cnt count <= T; when =>

if load = T then State next <= s2; else

state_next <= s6; end if;

ready_next <= T; resultjoad <= T; when others =>

State next <= $0; end case; ” end process; ready <= ready_reg; end;