曾经写的一段程序 点击:25 | 回复:2



剑圣打下

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:2帖 | 57回
  • 年度积分:0
  • 历史总积分:51
  • 注册:2018年5月19日
发表于:2025-07-02 09:16: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;




楼主最近还看过



qila

  • 精华:0帖
  • 求助:0帖
  • 帖子:1帖 | 64回
  • 年度积分:61
  • 历史总积分:1019
  • 注册:2000年1月01日
发表于:2025-07-02 14:30:15
1楼

非常好的分享

回复本条

    

Sky25326

  • 精华:0帖
  • 求助:4帖
  • 帖子:12帖 | 147回
  • 年度积分:626
  • 历史总积分:1536
  • 注册:2011年11月14日
发表于:2025-07-02 20:43:45
2楼

看起来不错

回复本条

    

热门招聘
相关主题

官方公众号

智造工程师