帮忙用SCL语言，用for循环写一个移位指令

SCL (Structured Text) 是 IEC 61131-3 中的标准编程语言，常用于SIEMENS PLC控制器编程。要使用 for 循环编写一个简单的移位指令，假设我们有一个二进制数（bit vector），我们可以将其中一位向左或向右移动。这里是一个基本的例子，展示如何将一个位向左移一位：

VAR
  InputData : BIT_VECTOR(7);   // 输入数据，8位二进制
  OutputData : BIT_VECTOR(7);  // 输出数据，同样8位
  ShiftCount : INTEGER;        // 移位次数

BEGIN
  FOR ShiftCount = 0 TO 7 DO
    BEGIN
      // 将InputData的第一位移至OutputData的第八位
      OutputData(ShiftCount+1) := InputData(1);
      
      // 将剩余的InputData位填充到OutputData的前面
      OutputData(1..ShiftCount) := InputData(ShiftCount+2..8);
      
      // 清空InputData的第一位
      InputData(1) := 0;
    END;
END;

在这个例子中，`ShiftCount` 变量控制了循环的次数，每次循环都会将 `InputData` 的第一位移到 `OutputData` 的相应位置，然后清除 `InputData` 的第一位。