4 (262)

-.-_____ - —

Ti tle "zadanie 1";

SUBOESIGN zadl ( xl.x2.clk

K    ^yli-

byc musi,

automat

)

zadl.tdf

VARIABLE

8EGIN

end;

ENO TABLE;

:INPUT;

m

m.clk

TABLE

:OUTPUT;	— W	zadani	u nie ma wyjścia		na sc
:MACHINĘ WITH	STATES	(zl.z2	-- wiec ,23,24,25);	jest	taki
clk;
m, xl,	x2	=>	m,	y[];
zl.	0.	X	=>	z2,	2
Zl.	1.	X	=>	zl,	1
z2,	X,	0	=>	z3,	3
z2.	0.	1	=>	z4,	4
z2,	1.	1	=>	zS,	5
z3,	0.	X	*>	z5,	5
z3.	1.	X	=>	z3,	3
z4.	X,	X	=>	z5.	5
zS,	X.	0	=>	z3,	3
Z5,	X,	1	=>	zl,	1

SUBOESIGN zad2(

busf2..0],ready :input; go

)

BEGIN

:output;

ENO;

IF ready then

IF bus[] < 5 THEN go = GNO;

ELSE

go = vcc;

END IF;

ELSE

go = GNO;

END IF;

SUBOESIGN va start

)

zegar

:INPUT;

:OUTPUT;

VARIABLE

reg[2..0] start

:dff;

:dff^

BEGIN

reg[].clk = zegar; start.clk ■ zegar; reg[] - val □;

IF reg[] < 5 then

ENO;

ELSE ENO IF;

start - gnd; start « vcc;