PPT Slide

-- q is present state, d is next state.

clogic: process (q, ra, rb, d7_i, d11_i, d2312_i)

begin

-- defaults

win <= '0'; lose <= '0';

sp <= '0'; roll <= '0';

d <= q; -- default is to stay in same state.

case q is

when S0 => if (rb = '1') then d <= S1; end if;

when S1 =>  if (ra = '1') then

if (d7_i = '1' or d11_i = '1') then

d <= S3;

elsif (d2312_i = '1') then

d <= S2;

else

sp <= '1';

d <= S4;

end if;

else

roll <= '1';

end if;

when S2 => lose <= '1';

when S3 => win <= '1';

when S4 => if (rb = '1') then d <= S5; end if;

when S5 =>  if (ra = '1') then

if (eq = '1') then

d <= S3;

elsif (d7_i = '1') then

d <= S2;

else

d <= S4;

end if;

else

roll <= '1';

end if;

when others => d <= S0;

end case;

end process clogic;

Previous slide

Next slide

Back to first slide

View graphic version