其实要实现的就是这段程序要完成的功能，只不过200smart用不了这么高级的SCL语言，STL实现起来比较麻烦
FUNCTION "Calc_Air_by_Fuel"

{ S7_Optimized_Access := 'TRUE' }

VAR_INPUT

    Fuel_Open : REAL;                     // 当前燃油开度

    P_Fuel    : ARRAY[0..9] OF REAL;      // 燃油分段点

    P_Air     : ARRAY[0..9] OF REAL;      // 风门分段点

END_VAR

VAR_OUTPUT

    Air_Open : REAL;                      // 风门开度输出

END_VAR

VAR

    i           : INT := 1;

    LowerIndex  : INT;

    UpperIndex  : INT;

    Slope       : REAL;

END_VAR

BEGIN

// ========== 边界处理 ==========

IF Fuel_Open <= P_Fuel[0] THEN

    Air_Open := P_Air[0];

    RETURN;

END_IF;

IF Fuel_Open >= P_Fuel[9] THEN

    Air_Open := P_Air[9];

    RETURN;

END_IF;

// ========== 查找所在区间 ==========

FOR i := 1 TO 9 DO

    IF Fuel_Open <= P_Fuel[i] THEN

        LowerIndex := i - 1;

        UpperIndex := i;

        EXIT;

    END_IF;

END_FOR;

// ========== 线性插值计算 ==========

Slope := (P_Air[UpperIndex] - P_Air[LowerIndex]) /

         (P_Fuel[UpperIndex] - P_Fuel[LowerIndex]);

Air_Open := P_Air[LowerIndex] +

            Slope * (Fuel_Open - P_Fuel[LowerIndex]);

// ========== 限幅保护 ==========

Air_Open := LIMIT(0.0, Air_Open, 100.0);

END_FUNCTION_BLOCK