用codesys ST 语言 Stein算法写一个求最大公约数的函数 输入输出变量为DINT类型

以下是使用ST语言编写的求最大公约数的函数：

FUNCTION gcd : DINT
VAR_INPUT
    a, b : DINT;
END_VAR
VAR
    temp : DINT;
END_VAR
WHILE b <> 0 DO
    temp := b;
    b := a MOD b;
    a := temp;
END_WHILE
RETURN a;
END_FUNCTION

在此函数中，输入变量a和b是需要计算最大公约数的两个整数。在函数中，我们使用了Stein算法来计算最大公约数。该算法通过反复使用移位和减法操作来计算两个数字的最大公约数，直到其中一个数字为0，此时另一个数字就是最大公约数。

函数的输出为一个DINT类型的整数，即a和b的最大公约数。