0000001d.awl

本程序为化工厂输送系统控制程序 长达15000行

FUNCTION "10PT01" : VOID
TITLE =
VERSION : 0.1


VAR_INPUT
  PT01 : INT ;	
END_VAR
VAR_OUTPUT
  PT_HH : BOOL ;	//高高信号 用于第一阶段
  PT_LL : BOOL ;	//中高信号 用于地二阶段
  PT_UN : BOOL ;	//停机信号
END_VAR
VAR_TEMP
  PT_L_L : BOOL ;	//存储模拟量转换值
  PT_H_H : BOOL ;	
  PV : REAL ;	
END_VAR
BEGIN
NETWORK
TITLE =(PIS01)

      L     #PT01; 
      ITD   ; 
      DTR   ; 
      T     #PV; 
      L     #PV; //HH值需要现场实测
      L     1.000000e+003; 
      >=R   ; 
      =     #PT_H_H; 


      L     #PV; //LL值需要现场实测
      L     2.000000e+002; 
      <=R   ; 
      =     #PT_L_L; 




      A     #PT_H_H; //压力过高超过3秒
      L     S5T#3S; 
      SD    "T_10PT01"; 

      A     "T_PIS01"; 
      A     #PT_H_H; 
      =     #PT_HH; //压力过高超过3秒,且高暴信号仍存在则报警
//////////////////////////////////////////////////////////////////////////////////////////////////
      A     #PT_H_H; 
      L     S5T#5S; //如果高暴信号在3秒内消失，则报正常
      SD    "T_10PT101"; //如果在3秒内消失，但在5秒内消失则不停机


      A     "T_10PT101"; //超过5秒则停机
      AN    #PT_H_H; 
      =     #PT_LL; //中高信号 用于第二阶段 。如果该信号出现则进入第二阶段，如果该信号不出现则停机
///////////////////////////////////////////////////////////////////////////////////////////////////


      A     #PT_H_H; //高暴信号消失后在30秒内没有出现低暴，则报正常，否则、报异常，并停机
      L     S5T#30S; 
      SF    "T_10PT201"; 

      A     "T_10PT201"; 
      A     #PT_L_L; 

      =     #PT_UN; 





END_FUNCTION