background image

1) 电梯到达有停站要求的梯层后,经过 0.5 秒,电梯门自动打开(开门指示灯

亮),经过 5 秒后,电梯门自动关闭(开门指示灯灭),电梯继续运行;

2) 能保证响应电梯内外的所有请求信号,,并按照电梯运行规则次第响应,每个

请求信号保留至执行后撤除;

3) 开机时,电梯应停在一楼,而各种上下请求均被清除。

程序设计说明:

请求处理模块:
LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
ENTITY key IS

PORT(

reset

: IN STD_LOGIC;

up1,up2,up3

: IN STD_LOGIC;

dn2,dn3,dn4

: IN STD_LOGIC;

to1,to2,to3,to4

: IN STD_LOGIC;

cup1,cup2,cup3

: IN STD_LOGIC;

cdn2,cdn3,cdn4

: IN STD_LOGIC;

cto1,cto2,cto3,cto4 : IN STD_LOGIC;
lup1,lup2,lup3

: OUT

STD_LOGIC;

ldn2,ldn3,ldn4

: OUT

STD_LOGIC;

lto1,lto2,lto3,lto4

: OUT

STD_LOGIC);

END key;
ARCHITECTURE a OF key IS
BEGIN
up1label:
PROCESS (reset,up1,cup1)
BEGIN
IF cup1='1' or reset='1' THEN

――清零或复位

    lup1<='0';
ELSIF up1'event AND up1='1' THEN――保存请求信号
    lup1<='1';
END IF;
END PROCESS up1label;

――以下类似处理

up2label:
PROCESS (reset,up2,cup2)
BEGIN
IF cup2='1' or reset='1' THEN
    lup2<='0';
ELSIF up2'event AND up2='1' THEN
    lup2<='1';
END IF;
END PROCESS up2label;
up3label: