module2.bas

电力机车牵引变压器试验站总控程序

Attribute VB_Name = "Module2"
'*****************************************************************
'                   PLC通讯字定义
'*****************************************************************

'*********************试验启动与停止*******************************

Public Const TEST_START = "00000000"

Public Const OPERATION_DONE = "008FFF"

Public Const ZP_START = "000FFF"
Public Const ZP_STOP = "0001FF"

Public Const FZ_START = "000AFF"
Public Const FZ_STOP = "000BFF"

Public Const KZ_START = "0008FF"
Public Const KZ_STOP = "0009FF"

Public Const GPNY_START = "0004FF"
Public Const GPNY_STOP = "0005FF"

Public Const KV100_START = "0002FF"
Public Const KV100_STOP = "0003FF"

Public Const HGQ_START = "0006FF"
Public Const HGQ_STOP = "0007FF"

Public Const DKQ_START = "0013FF"
Public Const DKQ_STOP = "0014FF"

Public Const QYB_ROLL = "000CFF"
Public Const QYB_VICE_ROLL = "000DFF"
Public Const QYB_STOP = "000EFF"

Public Const TYQ_VOLTAGE_UP = "0010FF"
Public Const TYQ_VOLTAGE_DOWN = "0011FF"
Public Const TYQ_VOLTAGE_STOP = "0012FF"

Public Const VOLTAGE_UPLIMIT = "005BFF"
Public Const VOLTAGE_LOWLIMIT = "005CFF"
'******************************故障*******************************

Public Const JC1_ERR = "0040FF"
Public Const JC2_ERR = "0041FF"
Public Const JC3_ERR = "0042FF"
Public Const JC16_ERR = "0043FF"
Public Const JC5_ERR = "0044FF"
Public Const JC8_ERR = "0045FF"
Public Const JC9_ERR = "0046FF"
Public Const JC17_ERR = "0047FF"
Public Const JC18_ERR = "0048FF"
Public Const JC6_ERR = "0049FF"
Public Const JC7_ERR = "004AFF"
Public Const JC14_ERR = "004BFF"
Public Const JC15_ERR = "004CFF"
Public Const JC10_ERR = "004DFF"
Public Const JC11_ERR = "004EFF"
Public Const JC120_ERR = "004FFF"
Public Const JC121_ERR = "0050FF"
Public Const JC122_ERR = "0051FF"
Public Const JC130_ERR = "005AFF"
Public Const JC131_ERR = "0052FF"
Public Const JC132_ERR = "0053FF"

'**************************电流继电器******************************

Public Const GL1_SPLIT = "0054FF"
Public Const GL2_SPLIT = "0055FF"
Public Const GL3_SPLIT = "0056FF"
Public Const GL4_SPLIT = "0057FF"
Public Const GL5_SPLIT = "0058FF"
Public Const GL6_SPLIT = "0059FF"

'*****************************************************************
'                   VVVF通讯字定义
'*****************************************************************
Public Const VVVF_START = "020600047F0FA0D0"              '频率40Hz
Public Const VVVF_STOP = "020600047E00007E"
Public Const VVVF_FREQUENCECHANGE1 = "020600047F05DCA6"   '频率15Hz
Public Const VVVF_FREQUENCECHANGE2 = ""
Public Const VVVF_VICE = "0206000C7F0FA0D8"

'*****************************************************************
'                   commPort定义
'*****************************************************************
Public Const portPLC = 0
Public Const portVVVF = 1


'*****************************************************************
'                   数据库密码
'*****************************************************************
Public Const DBPwd = 111



'*****************************************************************
'                   面板仪表
'*****************************************************************
Public Const ZP_VOLTAGE = "510A"
Public Const ZP_HIGH_VOLTAGE = "4E0A"
Public Const ZP_CURRENT = "470A"
Public Const ZP_AUX_VOLTAGE = "520A"

Public Const KV100_VOLTAGE = "560A"

Public Const KV10_VOLTAGE = "4F0A"

Public Const A2000_CURRENT = "490A"

Public Const HGQ_CURRENT = "420A"

Public Const ENV_TEMP = "580A"
Public Const OIL_TEMP = "570A"

Public Const QYB_CURRENT_A = "440A"
Public Const QYB_CURRENT_B = "450A"
Public Const QYB_CURRENT_C = "430A"
Public Const QYB_POWER = "530A"

Public Const FZ_VOLTAGE = "4D0A"
Public Const FZ_CURRENT = "460A"
Public Const FZ_POWER = "550A"

Public Const SHORT_CURRENT = "4A0A"

Public Const KZ_VOLTAGE = "4C0A"
Public Const KZ_CURRENT = "480A"
Public Const KZ_POWER = "540A"

Public Const AUX_VOLTAGE = "500A"