life 发表于 2020-2-21 09:26:05

感谢分享

cdjszdh 发表于 2021-1-20 16:45:39

下载来学习一下

你的样子 发表于 2021-9-24 13:38:39

楼主威武霸气

邬裴良 发表于 2021-10-8 22:21:19

谢谢分享!

国民妹夫 发表于 2021-10-15 15:23:47

学习一下

焕游仁阿生 发表于 2024-3-21 19:19:20

声明
FUNCTION_BLOCK FB_BubbleSortMethod_1
VAR_INPUT
        EN:BOOL;//ENABLE       
    moderder_mode;
        data_IN:ARRAY OF INT;
END_VAR
VAR_OUTPUT
        ENO:BOOL;//out
        data_OUT:ARRAY OF INT;
END_VAR
VAR
        ARR:ARRAY OF INT;
        N: INT;
        I: INT;
        M: INT;
        J: INT;
        T: int;
END_VAR

程序
ENO:=EN;
ARR:=data_IN;
IF EN THEN       
        IF MODE=InvertedSequence THEN
        FOR  N:=0 TO 9 BY 1 DO
            IF I<9-N THEN I:=9-N; END_IF       
                FOR M:=0 TO i-1 BY 1 DO
                        J:=M+1;                 
           IF  ARR>ARR THEN
                                T:=ARR;
                                ARR:=ARR;
                                ARR:=T;
                   END_IF                       
                END_FOR
        END_FOR
        ELSIF MODE=seriation THEN
        FOR  N:=0 TO 9 BY 1 DO
            IF I<9-N THEN I:=9-N; END_IF       
                FOR M:=0 TO i-1 BY 1 DO
                        J:=M+1;                 
           IF  ARR<ARR THEN
                                T:=ARR;
                                ARR:=ARR;
                                ARR:=T;
                   END_IF                       
                END_FOR
        END_FOR
        END_IF
END_IF
IF NOT EN THEN
        data_OUT:=
        data_OUT:=
        data_out:=
        data_out:=
        data_out:=
    data_out:=
        data_out:=
        data_out:=
        data_out:=
        data_out:=0;
END_IF
data_OUT:=ARR;声明
FUNCTION_BLOCK FB_BubbleSortMethod_1
VAR_INPUT
        EN:BOOL;//ENABLE       
    moderder_mode;
        data_IN:ARRAY OF INT;
END_VAR
VAR_OUTPUT
        ENO:BOOL;//out
        data_OUT:ARRAY OF INT;
END_VAR
VAR
        ARR:ARRAY OF INT;
        N: INT;
        I: INT;
        M: INT;
        J: INT;
        T: int;
END_VAR

程序
ENO:=EN;
ARR:=data_IN;
IF EN THEN       
        IF MODE=InvertedSequence THEN
        FOR  N:=0 TO 9 BY 1 DO
            IF I<9-N THEN I:=9-N; END_IF       
                FOR M:=0 TO i-1 BY 1 DO
                        J:=M+1;                 
           IF  ARR>ARR THEN
                                T:=ARR;
                                ARR:=ARR;
                                ARR:=T;
                   END_IF                       
                END_FOR
        END_FOR
        ELSIF MODE=seriation THEN
        FOR  N:=0 TO 9 BY 1 DO
            IF I<9-N THEN I:=9-N; END_IF       
                FOR M:=0 TO i-1 BY 1 DO
                        J:=M+1;                 
           IF  ARR<ARR THEN
                                T:=ARR;
                                ARR:=ARR;
                                ARR:=T;
                   END_IF                       
                END_FOR
        END_FOR
        END_IF
END_IF
IF NOT EN THEN
        data_OUT:=
        data_OUT:=
        data_out:=
        data_out:=
        data_out:=
    data_out:=
        data_out:=
        data_out:=
        data_out:=
        data_out:=0;
END_IF
data_OUT:=ARR;
页: 1 2 3 4 5 6 [7]
查看完整版本: Codesys2.3例子程序(DI输入)