编程中间接循环通常指的是在程序运行过程中动态确定地址的循环结构。以下是一个使用间接寻址的STEP 7程序示例，该程序将两个输入变量的值累加到一个数据块的连续存储单元中：
定义数据块
声明一个数据块（例如DB10），用于存储累加的结果。数据块中的每个元素都是一个REAL类型的数据。
编写循环程序
在循环程序中，使用间接寻址来访问数据块的存储单元。每次循环迭代时，计算新的累加值，并将其存储在数据块的下一个地址中。
初始化变量
在循环开始之前，初始化输入变量`Input_1`和`Input_2`，并分配必要的参数给功能FC10。
调用功能
在OB1中调用FC10，并传入`Input_1`、`Input_2`和`DB_No`作为参数。`DB_No`是数据块的编号。
```pascal
// 定义数据块
VALUE: ARRAY [1..100] OF REAL；
// 循环程序
PROGRAM LoopProgram；
VAR
Input_1: REAL；
Input_2: REAL；
DB_No: WORD；
Point_to: ADDRESS；
RET_VAL: WORD；
END_VAR
METHOD Main；
BEGIN
// 初始化输入变量
Input_1 := 0.5；
Input_2 := 1.5；
DB_No := W16A； // 数据块DB10
// 调用FC10功能
Point_to := @VALUE； // 指向数据块的第一个元素的地址
RET_VAL := FC10（Input_1, Input_2, DB_No, Point_to）；
// 检查返回值
IF RET_VAL <> 0 THEN
// 处理错误情况
END_IF；
END_METHOD
METHOD FC10；
VAR
Input1: REAL；
Input2: REAL；
DB_No: WORD；
Point_to: ADDRESS；
Value: REAL；
END_VAR
BEGIN
Input1 := Input_1；
Input2 := Input_2；
DB_No := DB_No；
Point_to := Point_to；
// 将Input_2的值累加到Input_1的初始值上，并保存到数据块中
Value := Input1 + Input2；
PPoint_to := Value；
// 更新Point_to以指向下一个存储单元
Point_to := Point_to + 4；
END_METHOD
```
在这个示例中，`FC10`功能每次被调用时，都会将`Input_2`的值累加到`Input_1`的当前值上，并将结果存储在数据块的下一个地址中。`Point_to`变量用于跟踪当前存储单元的地址，并在每次迭代后更新。
这种间接循环的方法使得程序能够动态地处理不同数量的数据，并且可以灵活地适应不同的数据存储需求。