0000000f.awl

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

FUNCTION "处理人机信号" : VOID
TITLE =
//H01~H07运行状况选择(空气压缩机）                            NET1-NET45
//空气传送单元的旋转阀选择、包含急停选择                      NET46-NET74
//包含直通旁通（DV)测试，结果传送到HMI、IPC、DCS              NET75-NET132
//碟阀(XV301-XV308)打开信息                                   NET133-148 
//T09-T15的旋转阀(DV)打开信息                                 NET149-NET64
//TO1-T14高暴信号                                             NET165-ET180
//TO1-T14低暴信号                                             NET181-NET196
//VG201-VG208（刀阀）、GV119-GV714（匝刀阀）                  NET197-NET224
//警报器报警信号（ALARM）                                     NET225-NET228
//（包含异常信息）(异常信息模块）
//料槽运行显示信息                                            NET229-NET245
//PTA阀位信息送往HMI                                          NET253_NET
VERSION : 0.1


VAR_TEMP
  B7101_H : BOOL ;	
  B7102_H : BOOL ;	
  STT : BOOL ;	
END_VAR
BEGIN
NETWORK
TITLE =

      A     "R01A运行"; 
      =     "DHI".SEL.R01A_RUN; 
NETWORK
TITLE =

      A     "R01A故障"; 
      =     "DHI".COLOR.R01A_FAULT; 
NETWORK
TITLE =

      A     "R01A加速"; 
      =     "DHI".SEL.R01A_SPEEDON; 
NETWORK
TITLE =

      A     "R01B运行"; 
      =     "DHI".SEL.R01B_RUN; 
NETWORK
TITLE =

      A     "R01B故障"; 
      =     "DHI".COLOR.R01B_FAULT; 
NETWORK
TITLE =

      A     "R01B加速"; 
      =     "DHI".SEL.R01B_SPEEDON; 
NETWORK
TITLE =

      A     "R02A运行"; 
      =     "DHI".SEL.R02A_RUN; 
NETWORK
TITLE =

      A     "R02A故障"; 
      =     "DHI".COLOR.R02A_FAULT; 
NETWORK
TITLE =

      A     "R02A加速"; 
      =     "DHI".SEL.R02A_SPEEDON; 
NETWORK
TITLE =

      A     "R02B运行"; 
      =     "DHI".SEL.R02B_RUN; 
NETWORK
TITLE =

      A     "R02B故障"; 
      =     "DHI".COLOR.R02B_FAULT; 
NETWORK
TITLE =

      A     "R02B加速"; 
      =     "DHI".SEL.R02B_SPEEDON; 
NETWORK
TITLE =

      A     "R02C运行"; 
      =     "DHI".SEL.R02C_RUN; 
NETWORK
TITLE =

      A     "R02C故障"; 
      =     "DHI".COLOR.R02C_FAULT; 
NETWORK
TITLE =

      A     "R02C加速"; 
      =     "DHI".SEL.R02C_SPEEDON; 
NETWORK
TITLE =

      A     "R02D运行"; 
      =     "DHI".SEL.R02D_RUN; 
NETWORK
TITLE =

      A     "R02D故障"; 
      =     "DHI".COLOR.R02D_FAULT; 
NETWORK
TITLE =

      A     "R02D加速"; 
      =     "DHI".SEL.R02D_SPEEDON; 
NETWORK
TITLE =

      A     "R03A运行"; 
      =     "DHI".SEL.R03A_RUN; 
NETWORK
TITLE =

      A     "R03A故障"; 
      =     "DHI".COLOR.R03A_FAULT; 
NETWORK
TITLE =

      A     "R03A加速"; 
      =     "DHI".SEL.R03A_SPEEDON; 
NETWORK
TITLE =

      A     "R03B运行"; 
      =     "DHI".SEL.R03B_RUN; 
NETWORK
TITLE =

      A     "R03B故障"; 
      =     "DHI".COLOR.R03B_FAULT; 
NETWORK
TITLE =

      A     "R03B加速"; 
      =     "DHI".SEL.R03B_SPEEDON; 
NETWORK
TITLE =

      A     "R03C运行"; 
      =     "DHI".SEL.R03C_RUN; 
NETWORK
TITLE =

      A     "R03C故障"; 
      =     "DHI".COLOR.R03C_FAULT; 
NETWORK
TITLE =

      A     "R03C加速"; 
      =     "DHI".SEL.R03C_SPEEDON; 
NETWORK
TITLE =

      A     "R03D运行"; 
      =     "DHI".SEL.R03D_RUN; 
NETWORK
TITLE =

      A     "R03D故障"; 
      =     "DHI".COLOR.R03D_FAULT; 
NETWORK
TITLE =

      A     "R03D加速"; 
      =     "DHI".SEL.R03D_SPEEDON; 
NETWORK
TITLE =

      A     "R04运行"; 
      =     "DHI".SEL.R04_RUN; 
NETWORK
TITLE =

      A     "R04故障"; 
      =     "DHI".COLOR.R04_FAULT; 
NETWORK
TITLE =

      A     "R04加速"; 
      =     "DHI".SEL.R04_SPEEDON; 
NETWORK
TITLE =

      A     "R05运行"; 
      =     "DHI".SEL.R05_RUN; 
NETWORK
TITLE =

      A     "R05故障"; 
      =     "DHI".COLOR.R05_FAULT; 
NETWORK
TITLE =

      A     "R05加速"; 
      =     "DHI".SEL.R05_SPEEDON; 
NETWORK
TITLE =

      A     "R06运行"; 
      =     "DHI".SEL.R06_RUN; 
NETWORK
TITLE =

      A     "R06故障"; 
      =     "DHI".COLOR.R06_FAULT; 
NETWORK
TITLE =

      A     "R06加速"; 
      =     "DHI".SEL.R06_SPEEDON; 
NETWORK
TITLE =

      A     "R07A运行"; 
      =     "DHI".SEL.R07A_RUN; 
NETWORK
TITLE =

      A     "R07A故障"; 
      =     "DHI".COLOR.R07A_FAULT; 
NETWORK
TITLE =

      A     "R07A加速"; 
      =     "DHI".SEL.R07A_SPEEDON; 
NETWORK
TITLE =

      A     "R07B运行"; 
      =     "DHI".SEL.R07B_RUN; 
NETWORK
TITLE =

      A     "R07B故障"; 
      =     "DHI".COLOR.R07B_FAULT; 
NETWORK
TITLE =

      A     "R07B加速"; 
      =     "DHI".SEL.R07B_SPEEDON; 
NETWORK
TITLE =顺序检测开始输入结果H01~H07
//空气压缩机H01选择、本地、旋转阀
//选择结果，包含急停
      O     "H01_ESTOP"; 
      O     "H01_ESTOP_ALL"; 
      =     "DHI".COLOR.H01_ES; 
NETWORK
TITLE =

      A     "BA30LAH"; 
      =     "DHI".SEL.H01_SEL_LR; 
NETWORK
TITLE =

      A     "H01_SEL_R01A"; 
      =     "DHI".SEL.H01_SEL_R01A; 
NETWORK
TITLE =

      A     "H01_SEL_R01B"; 
      =     "DHI".SEL.H01_SEL_R01B; 
NETWORK
TITLE =急停
//空气压缩机H02选择
      O     "H02_ESTOP"; 
      O     "H02_SEL_ES"; 
      =     "DHI".COLOR.H02_ES; 
NETWORK
TITLE =

      A     "H02_SEL_LR"; 
      =     "DHI".SEL.H02_SEL_LR; 
NETWORK
TITLE =

      A     "H02_SEL_R02A"; 
      =     "DHI".SEL.H02_SEL_R02A; 
NETWORK
TITLE =

      A     "H02_SEL_R02B"; 
      =     "DHI".SEL.H02_SEL_R02B; 
NETWORK
TITLE =

      A     "H02_SEL_R02C"; 
      =     "DHI".SEL.H02_SEL_R02C; 
NETWORK
TITLE =

      A     "H02_SEL_R02D"; 
      =     "DHI".SEL.H02_SEL_R02D; 
NETWORK
TITLE =急停
//空气压缩机H03选择
      O     "H03_ESTOP"; 
      O     "H03_SEL_ES"; 
      =     "DHI".COLOR.H03_ES; 
NETWORK
TITLE =

      A     "H03_SEL_LR"; 
      =     "DHI".SEL.H03_SEL_LR; 
NETWORK
TITLE =

      A     "H03_SEL_R03A"; 
      =     "DHI".SEL.H03_SEL_R02A; 
NETWORK
TITLE =

      A     "H03_SEL_R03B"; 
      =     "DHI".SEL.H03_SEL_R02B; 
NETWORK
TITLE =

      A     "H03_SEL_R03C"; 
      =     "DHI".SEL.H03_SEL_R02C; 
NETWORK
TITLE =

      A     "H03_SEL_R03D"; 
      =     "DHI".SEL.H03_SEL_R02D; 
NETWORK
TITLE =急停
//空气压缩机H04选择
      O     "H04_ESTOP"; 
      O     "H04_SEL_ES"; 
      =     "DHI".COLOR.H04_ES; 
NETWORK
TITLE =

      A     "H04_SEL_LR"; 
      =     "DHI".SEL.H04_SEL_LR; 
NETWORK
TITLE =

      A     "H04_SEL_R04"; 
      =     "DHI".SEL.H04_SEL_R04; 
NETWORK
TITLE =急停
//空气压缩机H05选择
      O     "H05_ESTOP"; 
      O     "H05_SEL_ES"; 
      =     "DHI".COLOR.H05_ES; 
NETWORK
TITLE =

      A     "H05_SEL_R05"; 
      =     "DHI".SEL.H05_SEL_R05; 
NETWORK
TITLE =急停
//空气压缩机H06选择
      O     "H06_ESTOP"; 
      O     "H06_SEL_ES"; 
      =     "DHI".COLOR.H06_ES; 
NETWORK
TITLE =

      A     "H06_SEL_LR"; 
      =     "DHI".SEL.H06_SEL_LR; 
NETWORK
TITLE =

      A     "H06_SEL_R06"; 
      =     "DHI".SEL.H06_SEL_R06; 
NETWORK
TITLE =急停
//空气压缩机H07选择
      O     "H07_ESTOP"; 
      O     "H07_SEL_ES"; 
      =     "DHI".COLOR.H07_ES; 
NETWORK
TITLE =

      A     "H07_SEL_LR"; 
      =     "DHI".SEL.H07_SEL_LR; 
NETWORK
TITLE =

      A     "H07_SEL_R07A"; 
      =     "DHI".SEL.H07_SEL_R07A; 
NETWORK
TITLE =

      A     "H07_SEL_R07B"; 
      =     "DHI".SEL.H07_SEL_R07B; 
NETWORK
TITLE =PTA急停

      A     "PTA_ESTOP"; 
      =     "DHI".COLOR.PTA_ES; 
NETWORK
TITLE =直通 旁通  测试
//DV101直通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV101直通",
           Q_FIX                    := "MDV101直通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV101_ST_F);

NETWORK
TITLE =
//DV101旁通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV101旁通",
           Q_FIX                    := "MDV101旁通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV101_BR_F);

NETWORK
TITLE =
//DV102直通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV102直通",
           Q_FIX                    := "MDV102直通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV102_ST_F);

NETWORK
TITLE =
//DV102旁通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV102旁通",
           Q_FIX                    := "MDV102旁通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV102_BR_F);

NETWORK
TITLE =
//DV103直通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV103直通",
           Q_FIX                    := "MDV103直通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV103_ST_F);

NETWORK
TITLE =
//DV103旁通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV103旁通",
           Q_FIX                    := "MDV103旁通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV103_BR_F);

NETWORK
TITLE =
//DV104直通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV104直通",
           Q_FIX                    := "MDV104直通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV104_ST_F);

NETWORK
TITLE =
//DV104旁通
//

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV104旁通",
           Q_FIX                    := "MDV104旁通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV104_BR_F);

NETWORK
TITLE =
//DV105直通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV105直通",
           Q_FIX                    := "MDV105直通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV105_ST_F);

NETWORK
TITLE =
//DV105旁通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV105旁通",
           Q_FIX                    := "MDV105旁通",
           T_SET                    := L      1.2,
           FAL                      := "DHI".SEL.DV105_BR_F);

NETWORK
TITLE =
//DV106直通

      A     "T_FIX_5S_H01"; 
      =     L      1.2; 
      BLD   103; 
      CALL "处理阀定位信息" (
           I_FIX                    := "DV106直通",
           Q_FIX                    := "MDV106直通",