securite.vhd

3层电梯的控制

library ieee;
use ieee.std_logic_1164.all;

ENTITY securite IS
	PORT(
		A,R         	: IN	STD_LOGIC;
		M,D				: IN	STD_LOGIC;
		M1,D1    		: OUT	STD_LOGIC);
END securite;

ARCHITECTURE Graphe3etats OF securite IS
	SIGNAL Y1,Y2 : STD_LOGIC;

BEGIN

Y1 <= ((not Y2) and  Y1 ) or (Y2);
Y2 <= ((not A) and Y2) or ((not A) and R and (not Y2)) or (Y2 and R);

M1 <='0' When Y1='1' and Y2='0'  else M;
D1 <='0' when Y1='1' and Y2='0'  else D;

END Graphe3etats;