写一个简单的电车自动门ST程序

以下是一个简单的电车自动门ST程序，使用两个传感器检测车辆和行人的进入和离开：

VAR
    sensor1 : BOOL := FALSE;
    sensor2 : BOOL := FALSE;
    doorOpen : BOOL := FALSE;
END_VAR

WHILE TRUE DO
    IF sensor1 = TRUE AND sensor2 = FALSE AND doorOpen = FALSE THEN
        doorOpen := TRUE;
        // 打开门
        // 设置电机转动方向，使门打开
    ELSIF sensor1 = FALSE AND sensor2 = TRUE AND doorOpen = TRUE THEN
        doorOpen := FALSE;
        // 关闭门
        // 设置电机转动方向，使门关闭
    END_IF
END_WHILE

在这个程序中，`sensor1` 和 `sensor2` 分别代表两个传感器的状态，`doorOpen` 代表门的状态。如果车辆或行人进入，`sensor1` 会变为 `TRUE`，如果离开，`sensor1` 会变为 `FALSE`；同样地，如果车辆或行人离开，`sensor2` 会变为 `TRUE`，如果进入，`sensor2` 会变为 `FALSE`。当 `sensor1` 为 `TRUE` 而 `sensor2` 为 `FALSE` 时，程序会打开门，并将 `doorOpen` 设置为 `TRUE`；当 `sensor1` 为 `FALSE` 而 `sensor2` 为 `TRUE` 时，程序会关闭门，并将 `doorOpen` 设置为 `FALSE`。程序会一直循环执行，直到被停止。