曲线加热全局库

软件版本：TIA15.1

功能：用户可设定加热速率从而控制温升曲线。

使用：代码开源，变量声明中有对每个引脚的介绍，简单易懂。

优点：可省去加热模块成本，直接用plc控制调功器，实现曲线加热。代码语言为SCL,可方便一直到其他品牌plc。库为FB块，引脚少，使用方便。

缺点：目前此库只编写了单步单曲线加热，如有需要可后期改程序改成多步多曲线加热。

仿真图：

封装：↓

代码：

IEC_Timer_0_Instance(IN:=NOT #P_TIME ,

                      PT:=T#100MS,

                      Q=>#P_TIME);

#R_TRIG_Instance(CLK:=#START,

                 Q=>#P_START);

IF #P_START THEN

    #TEMP := #INPUT;

END_IF;

IF #START THEN

    IF #BIPOLAR = 0 THEN

        IF #P_TIME AND #TEMP < #Setpoint THEN

            #TEMP := #TEMP + #Setspeed / 36000;

            #BUSY := 1;

            #Done := 0;

        END_IF;

        IF #TEMP >= #Setpoint THEN

            #Done := 1;

            #BUSY := 0;

        END_IF;

    END_IF;

    IF #BIPOLAR = 1 THEN

        IF #P_TIME AND #TEMP<#Setpoint THEN

            #TEMP := #TEMP + #Setspeed / 600;

            #BUSY := 1;

            #Done := 0;

        END_IF;

        IF #TEMP >= #Setpoint THEN

            #Done := 1;

            #BUSY := 0;

        END_IF;

    END_IF;

    #Output := #TEMP;

    IF #TEMP >= #Setpoint THEN

        #Output := #Setpoint;

    END_IF;

END_IF;

IF #START = 0 THEN

    #Output := 0;

    #Done := 0;

    #BUSY := 0;

END_IF;

曲线加热全局库.rar

编辑不易 点个赞呗