I need the VHDL code and i want to get like figure 1 (timing diagram )

also no need for step number 4

Elevator Project 5 entity elev_control is Port ( reset, clk: in STD_LOGIC; call1 : in STD LOGIC; -call button at floor 1 call2 : in STD LOGIC; -call buttion at floor 2 fb1 : in STD_LOGIC; floor button in elevator for floor 1 fb2 : in STD_LOGIC; floor button in elevator for floor 2 fs1 : in STD_LOGIC;floor switch indicating elevator is at floor 1 fs2 : in STD_LOGIC;floor switch indicating elevator is at floor 2 up: out STD_LOGIC; -motor drive to cause the elevator to go up down : out STD_LOGIC); --motor drive to cause the elevator to go udown 8 end elev_control; architecture Behavioral of elev control is type state_type is (F1, F12, F2, F21); signal state, next_state: state_type; component CallingElevator -Storage circuit in block diagram Port ( reset in STD_LOGIC; clk: in STD_LOGIC; fb: in STD_LOGIC call: in STD_LOGIC; call button at floor landing R: in STD LOGIC;- N: out STD_LOGIC); elevator request signal to go to another floor -floor button in elevator - reset floor and call after elevator reaches the floor end component; component DoorControl is -Door Mechanism in block diagram Port (reset, clk: in STD_LOGIC; fs1: in STD_LOGIC;elevator at floor 1 fs2 : in STD_LOGIC; -elevator at floor 2 do: in STD_LOGIC; open door dc: out STD_LOGIC); - close door end component; signal R1: std_logic:'0'; -reset call elevator at floor 1 signal R2: std_logic'0' reset call elevator at floor signal N1 : stdlogic-'0; -send elevator to floor 1; signal N2 : std_logic:- '0'; -- send elevator to floor 2; signal do : std_logic open door signal dc : std_logic: 0: -close door 2 Elevator Project 5 entity elev_control is Port ( reset, clk: in STD_LOGIC; call1 : in STD LOGIC; -call button at floor 1 call2 : in STD LOGIC; -call buttion at floor 2 fb1 : in STD_LOGIC; floor button in elevator for floor 1 fb2 : in STD_LOGIC; floor button in elevator for floor 2 fs1 : in STD_LOGIC;floor switch indicating elevator is at floor 1 fs2 : in STD_LOGIC;floor switch indicating elevator is at floor 2 up: out STD_LOGIC; -motor drive to cause the elevator to go up down : out STD_LOGIC); --motor drive to cause the elevator to go udown 8 end elev_control; architecture Behavioral of elev control is type state_type is (F1, F12, F2, F21); signal state, next_state: state_type; component CallingElevator -Storage circuit in block diagram Port ( reset in STD_LOGIC; clk: in STD_LOGIC; fb: in STD_LOGIC call: in STD_LOGIC; call button at floor landing R: in STD LOGIC;- N: out STD_LOGIC); elevator request signal to go to another floor -floor button in elevator - reset floor and call after elevator reaches the floor end component; component DoorControl is -Door Mechanism in block diagram Port (reset, clk: in STD_LOGIC; fs1: in STD_LOGIC;elevator at floor 1 fs2 : in STD_LOGIC; -elevator at floor 2 do: in STD_LOGIC; open door dc: out STD_LOGIC); - close door end component; signal R1: std_logic:'0'; -reset call elevator at floor 1 signal R2: std_logic'0' reset call elevator at floor signal N1 : stdlogic-'0; -send elevator to floor 1; signal N2 : std_logic:- '0'; -- send elevator to floor 2; signal do : std_logic open door signal dc : std_logic: 0: -close door 2