编写流水灯PLC程序通常涉及以下步骤：
初始化变量 ：定义灯的状态、计数器和时间变量。顺序控制：
按序切换灯的输出状态。
延时功能：
用PLC自带的定时器实现延迟。
```pascal
PROGRAM PLC_PROGRAM
VAR
Counter: INT := 0; // 计数器变量
DelayTime: TIME := T500ms; // 延时时间
Lamp_Index: INT := 0; // 当前点亮的灯编号(0-7)
Lamps: BOOL Array[0..7]; // 8个灯的输出状态
Delay_Timer: TON; // 定时器,用于延迟
Start: BOOL; // 启动信号
Stop: BOOL; // 停止信号
END_VAR
// 初始化定时器
A "Start" // 启动按钮按下
TON "T1", T500ms // 定时器设定为500ms
A "T1.Q" // 定时器完成信号= "Timer_Done"
// 触发移位
// 字节移位逻辑
A "Timer_Done" // 定时器完成信号
L "Light_Byte" // 加载当前灯状态
SHL 1 // 左移1位
// 顺序点亮逻辑
A %M0.0 // 启动状态
AN %M0.1 // 顺序/逆序状态 (0=顺序点亮,1=逆序熄灭)
O Lamps[Lamp_Index] := TRUE
O Lamps[Lamp_Index - 1] := FALSE
A Lamp_Index := Lamp_Index + 1
A Lamp_Index > 7 // 超过灯数量后复位
A Lamp_Index := 0
// 启动和停止逻辑
A %I0.0 // 启动按钮按下
= %M0.0 // 设置启动状态
A %I0.1 // 停止按钮按下
= %M0.0 // 清除启动状态
O Reset_Bool := TRUE
O Start := FALSE
O Stop := FALSE
```
代码解释：
变量定义
`Counter`：用于计数器变量。
`DelayTime`：用于设定延时时间。
`Lamp_Index`：用于表示当前点亮的灯编号。
`Lamps`：布尔数组，用于存储8个灯的输出状态。
`Delay_Timer`：定时器，用于实现延迟。
`Start`和`Stop`：用于控制流水灯的启动和停止。
初始化定时器
当启动按钮按下时，启动定时器`T1`，设定延迟时间为500毫秒。
字节移位逻辑
定时器完成后，将`Light_Byte`左移1位，实现灯的顺序点亮。
顺序点亮逻辑
根据`Lamp_Index`的值，依次点亮当前灯，并熄灭前一个灯。当`Lamp_Index`超过7时，重置为0。
启动和停止逻辑
当启动按钮按下时，设置启动状态为`TRUE`，停止状态为`FALSE`。
当停止按钮按下时，清除启动状态，设置停止状态为`TRUE`。
这个示例程序展示了如何使用TIA Portal编写一个简单的流水灯PLC程序。你可以根据实际需求调整灯的数量、延时时间以及控制逻辑。
