首页 论坛积分规则 正文

回复

曾经写的一段程序

论坛积分规则 浏览:93 回复:3 收藏

剑圣打下  2025-07-02 09:20

IF "HMI_Display_DB".工艺号=1 AND "中间变量".暂存工艺号=1 THEN

    #"程序段1~10段执行时间时分" := 0;

    FOR #"程序段1~10段执行时间时分" := 0 TO 19 BY 1 DO

        IF "HMI_Display_DB"."程序段1~10段执行时间时分"[#"程序段1~10段执行时间时分"] = "Tech1_Save_DB"."工艺号1程序段1~10段执行时间时分"[#"程序段1~10段执行时间时分"] THEN

            ;

        ELSE

            "Tech1_Save_DB"."工艺号1程序段1~10段执行时间时分"[#"程序段1~10段执行时间时分"] := "HMI_Display_DB"."程序段1~10段执行时间时分"[#"程序段1~10段执行时间时分"];

        END_IF;

    END_FOR;   //程序段1~10执行时间时分的比较

    #"程序段1~10温度" := 0;

    FOR #"程序段1~10温度" := 0 TO 9 BY 1 DO

        IF "HMI_Display_DB"."程序段1~10温度"[#"程序段1~10温度"] = "Tech1_Save_DB"."工艺号1程序段1~10温度"[#"程序段1~10温度"] THEN

            ;

        ELSE

            "Tech1_Save_DB"."工艺号1程序段1~10温度"[#"程序段1~10温度"] := "HMI_Display_DB"."程序段1~10温度"[#"程序段1~10温度"];

        END_IF;

    END_FOR;  //程序段1~10温度的比较

    #"程序段1~10碳势" := 0;

    FOR #"程序段1~10碳势" := 0 TO 9 BY 1 DO

        IF "HMI_Display_DB"."程序段1~10碳势"[#"程序段1~10碳势"] = "Tech1_Save_DB"."工艺号1程序段1~10碳势"[#"程序段1~10碳势"] THEN

            ;

        ELSE

            "Tech1_Save_DB"."工艺号1程序段1~10碳势"[#"程序段1~10碳势"] := "HMI_Display_DB"."程序段1~10碳势"[#"程序段1~10碳势"];

        END_IF;

    END_FOR;  //程序段1~10碳势的比较

    #"程序段1~10状态" := 0;

    FOR #"程序段1~10状态" := 0 TO 4 BY 1 DO

        IF "HMI_Display_DB"."程序段1~10状态"[#"程序段1~10状态"] = "Tech1_Save_DB"."工艺号1程序段1~10状态"[#"程序段1~10状态"] THEN

            ;

        ELSE

            "Tech1_Save_DB"."工艺号1程序段1~10状态"[#"程序段1~10状态"] := "HMI_Display_DB"."程序段1~10状态"[#"程序段1~10状态"];

        END_IF;

    END_FOR;  //程序段1~10状态的比较

    #"程序段1~10温度允差" := 0;

    FOR #"程序段1~10温度允差" := 0 TO 9 BY 1 DO

        IF "HMI_Display_DB"."程序段1~10温度允差"[#"程序段1~10温度允差"] = "Tech1_Save_DB"."工艺号1程序段1~10温度允差"[#"程序段1~10温度允差"] THEN

            ;

        ELSE

            "Tech1_Save_DB"."工艺号1程序段1~10温度允差"[#"程序段1~10温度允差"] := "HMI_Display_DB"."程序段1~10温度允差"[#"程序段1~10温度允差"];

        END_IF;

    END_FOR;   //程序段1~10温度允差的比较

    #"程序段1~10碳势允差" := 0;

    FOR #"程序段1~10碳势允差" := 0 TO 9 BY 1 DO

        IF "HMI_Display_DB"."程序段1~10碳势允差"[#"程序段1~10碳势允差"] = "Tech1_Save_DB"."工艺号1程序段1~10碳势允差"[#"程序段1~10碳势允差"] THEN

            ;

        ELSE

            "Tech1_Save_DB"."工艺号1程序段1~10碳势允差"[#"程序段1~10碳势允差"] := "HMI_Display_DB"."程序段1~10碳势允差"[#"程序段1~10碳势允差"];

        END_IF;

    END_FOR;  //程序段1~10碳势允差的比较

        IF "HMI_Display_DB".程序段工艺名称 = "Tech1_Save_DB".工艺号1工艺名称 THEN

            ;

        ELSE

            "Tech1_Save_DB".工艺号1工艺名称 := "HMI_Display_DB".程序段工艺名称;

        END_IF;  //程序段工艺名称

        IF "HMI_Display_DB".程序段启动温度 = "Tech1_Save_DB".工艺号1启动温度 THEN

            ;

        ELSE

            "Tech1_Save_DB".工艺号1启动温度 :=  "HMI_Display_DB".程序段启动温度;

        END_IF;  //程序段工艺启动温度

        IF "HMI_Display_DB".程序段启动碳势 = "Tech1_Save_DB".工艺号1启动碳势 THEN

            ;

        ELSE

            "Tech1_Save_DB".工艺号1启动碳势 := "HMI_Display_DB".程序段启动碳势;

        END_IF;  //程序段工艺启动碳势

        IF "HMI_Display_DB".程序段启动温度偏差 = "Tech1_Save_DB".工艺号1启动温度偏差 THEN

            ;

        ELSE

            "Tech1_Save_DB".工艺号1启动温度偏差 := "HMI_Display_DB".程序段启动温度偏差;

        END_IF;  //程序段工艺启动温度偏差

        IF "HMI_Display_DB".程序段启动碳势偏差 = "Tech1_Save_DB".工艺号1启动碳势偏差 THEN

            ;

        ELSE

            "Tech1_Save_DB".工艺号1启动碳势偏差 := "HMI_Display_DB".程序段启动碳势偏差;

        END_IF;  //程序段工艺启动碳势偏差

        IF "HMI_Display_DB".程序段工件运动方式 = "Tech1_Save_DB".工艺号1工件运动方式 THEN

            ;

        ELSE

            "Tech1_Save_DB".工艺号1工件运动方式 := "HMI_Display_DB".程序段工件运动方式;

        END_IF;  //程序段工件运动方式

        IF "HMI_Display_DB".不带搅拌时间 = "Tech1_Save_DB".不带搅拌时间 THEN

            ;

        ELSE

            "Tech1_Save_DB".不带搅拌时间 := "HMI_Display_DB".不带搅拌时间;

        END_IF;  //不带搅拌时间

        IF "HMI_Display_DB".慢搅拌时间 = "Tech1_Save_DB".慢搅拌时间 THEN

            ;

        ELSE

            "Tech1_Save_DB".慢搅拌时间 := "HMI_Display_DB".慢搅拌时间;

        END_IF;  //慢搅拌时间

        IF "HMI_Display_DB".快搅拌时间 = "Tech1_Save_DB".快搅拌时间 THEN

            ;

        ELSE

            "Tech1_Save_DB".快搅拌时间 := "HMI_Display_DB".快搅拌时间;

        END_IF;  //快搅拌时间

        IF "HMI_Display_DB".慢搅拌转速 = "Tech1_Save_DB".慢搅拌转速 THEN

            ;

        ELSE

            "Tech1_Save_DB".慢搅拌转速 := "HMI_Display_DB".慢搅拌转速;

        END_IF;  //慢搅拌转速

        IF "HMI_Display_DB".快搅拌转速 = "Tech1_Save_DB".快搅拌转速 THEN

            ;

        ELSE

            "Tech1_Save_DB".快搅拌转速 := "HMI_Display_DB".快搅拌转速;

        END_IF;  //快搅拌转速

        IF "HMI_Display_DB".淬火时间 = "Tech1_Save_DB".淬火时间 THEN

            ;

        ELSE

            "Tech1_Save_DB".淬火时间 := "HMI_Display_DB".淬火时间;

        END_IF;  //淬火时间

        IF "HMI_Display_DB".滴油时间 = "Tech1_Save_DB".滴油时间 THEN

            ;

        ELSE

            "Tech1_Save_DB".滴油时间 := "HMI_Display_DB".滴油时间;

        END_IF;  //滴油时间

ELSE

    ;

END_IF;


我知道了