simple.tdf

12MCS-51单片机原理与应用实例. 下一篇: 可编程控制器技术及应用(三菱系列). 上一篇: C51单片机应用与C语言程序设计--基于机器人工程对象的项目实践. Tags标签 ... www.r

SUBDESIGN simple
(
	clk		: INPUT;
	reset		: INPUT;
	d			: INPUT;
	q			: OUTPUT;
)
VARIABLE
	ss: MACHINE WITH STATES (s0, s1);
BEGIN
	ss.clk = clk;
	ss.reset = reset;

	CASE ss IS
		WHEN s0 =>
			q = GND;

			IF d THEN
				ss = s1;
			END IF;
		WHEN s1 =>
			q = VCC;

			IF !d THEN
				ss = s0;
			END IF;
	END CASE;
END;