--Este diseño es propietario el autor y puede ser utilizado con fines de estudio
---------------------------------------------------------------------------
--Proyecto: Primera práctica de Sistemas Digitales
--Diseño: Maquinas de estados finitos (FSM)
--Nombre del fichero: FSM_ascensor.vhd
--Autor: Lorenzo Gomez Velez y Juan Carlos Garcia Gines
--Fecha: 08/03/2016
--Versión:1.0
--Resumen: contiene una entdad y una arquitectura en estilo
--de comportamiento de un modelo de ascensor de 3 pisos
--Actúa por flanco de subida de reloj
--Se utilizan el tipo de datos STD_LOGIC para todas las señales
--Excepto para la señal piso_donde_va que será INTEGER
--Se utilizan el tipo de datos STD_LOGIC_VECTOR para todas las señales.
--La arquitectura se realiza en estilo comportamiento.
--
--Modificaciones:
--
--Fecha Autor Versión Descripción del cambio
-- ========================================================================
--
--
-- ========================================================================

LIBRARY ieee;
USE ieee.STD_LOGIC_1164.all;

ENTITY ascensor_completo IS
 PORT( clk:             IN STD_LOGIC;
  piso_donde_va :  IN STD_LOGIC_VECTOR (2 DOWNTO 0);
  piso_donde_esta: OUT STD_LOGIC_VECTOR(1 DOWNTO 0);
  sube:            OUT STD_LOGIC;
  baja:            OUT STD_LOGIC
);

END ascensor_completo;

ARCHITECTURE arquitectura_ascensor_completo OF ascensor_completo IS
 COMPONENT codifica_boton_grupoLJC IS

 PORT (piso_donde_va: IN	STD_LOGIC_VECTOR (2 DOWNTO 0);
	codigo_piso	: OUT STD_LOGIC_VECTOR (1 DOWNTO 0));
 END COMPONENT codifica_boton_grupoLJC;

 COMPONENT FSM_ascensor IS
      PORT (
	clk			:IN STD_LOGIC; 				-- activo por flanco de subida
	codigo_piso 	:IN STD_LOGIC_VECTOR(1 DOWNTO 0); 	-- código binario del Nº de piso pulsado
	sube, baja  	:OUT STD_LOGIC; 				-- dirección movimiento del motor
	piso_donde_esta 	:OUT STD_LOGIC_VECTOR(1 DOWNTO 0)  	-- código binario del piso donde se encuentra
	);
 END COMPONENT FSM_ascensor;
 SIGNAL aux: STD_LOGIC_VECTOR(1 DOWNTO 0);
BEGIN
boton: codifica_boton_grupoLJC PORT MAP(
                                         piso_donde_va => piso_donde_va,
                                         codigo_piso   => aux
);
FSM: FSM_ascensor PORT MAP(
                                 clk=> clk,
                                 codigo_piso=>aux
);


END arquitectura_Ascensor_completo;