object Screen_ConnectStatusForm: TScreen_ConnectStatusForm
  Left = 234
  Top = 149
  Width = 1513
  Height = 803
  Caption = 'Screen_ConnectStatusForm'
  Color = 4605510
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnMouseDown = TabSheetMouseDown
  DesignSize = (
    1505
    769)
  PixelsPerInch = 96
  TextHeight = 13
  object Label3: TLabel
    Left = 76
    Top = 120
    Width = 30
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'pDIO'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label4: TLabel
    Left = 16
    Top = 120
    Width = 8
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = '1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label8: TLabel
    Left = 480
    Top = 28
    Width = 39
    Height = 13
    Caption = #1055#1086#1088#1090#1099
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label5: TLabel
    Left = 16
    Top = 44
    Width = 91
    Height = 13
    Caption = #1062#1080#1082#1083' '#1086#1089#1085#1086#1074#1085#1086#1081
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label15: TLabel
    Left = 76
    Top = 136
    Width = 30
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'pDIO'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label16: TLabel
    Left = 16
    Top = 136
    Width = 8
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = '3'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label43: TLabel
    Left = 76
    Top = 152
    Width = 33
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'pRKS'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label44: TLabel
    Left = 16
    Top = 152
    Width = 8
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = '2'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label46: TLabel
    Left = 16
    Top = 28
    Width = 81
    Height = 13
    Hint = #1058#1080#1087' '#1082#1086#1085#1090#1088#1086#1083#1083#1077#1088#1072' '#1087#1083#1072#1090#1099
    Caption = #1055#1086#1076#1082#1083#1102#1095#1077#1085#1080#1077
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label7: TLabel
    Left = 76
    Top = 372
    Width = 41
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'TUR01'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label13: TLabel
    Left = 16
    Top = 372
    Width = 23
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'tur1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label49: TLabel
    Left = 262
    Top = 372
    Width = 7
    Height = 13
    Caption = '/'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label50: TLabel
    Left = 76
    Top = 616
    Width = 22
    Height = 13
    Hint = #1058#1077#1093#1085#1086#1083#1086#1075#1080#1095#1077#1089#1082#1080#1081' '#1085#1086#1084#1077#1088' '#1086#1073#1086#1088#1091#1076#1086#1074#1072#1085#1080#1103
    Caption = '210'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label56: TLabel
    Left = 16
    Top = 616
    Width = 38
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'WVHZ'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label106: TLabel
    Left = 262
    Top = 616
    Width = 7
    Height = 13
    Caption = '/'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label51: TLabel
    Left = 76
    Top = 244
    Width = 39
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DA301'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label52: TLabel
    Left = 16
    Top = 244
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'hg1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label53: TLabel
    Left = 262
    Top = 244
    Width = 7
    Height = 13
    Caption = '/'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 76
    Top = 300
    Width = 82
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'Microradar200'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label14: TLabel
    Left = 16
    Top = 300
    Width = 32
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'mrdr1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label17: TLabel
    Left = 262
    Top = 300
    Width = 7
    Height = 13
    Caption = '/'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label19: TLabel
    Left = 76
    Top = 388
    Width = 41
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'TUR01'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label20: TLabel
    Left = 16
    Top = 388
    Width = 23
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'tur2'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label21: TLabel
    Left = 262
    Top = 388
    Width = 7
    Height = 13
    Caption = '/'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label24: TLabel
    Left = 480
    Top = 119
    Width = 81
    Height = 13
    Hint = #1058#1080#1087' '#1082#1086#1085#1090#1088#1086#1083#1083#1077#1088#1072' '#1087#1083#1072#1090#1099
    Caption = #1055#1086#1076#1082#1083#1102#1095#1077#1085#1080#1077
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label25: TLabel
    Left = 480
    Top = 151
    Width = 67
    Height = 13
    Hint = #1058#1080#1087' '#1082#1086#1085#1090#1088#1086#1083#1083#1077#1088#1072' '#1087#1083#1072#1090#1099
    Caption = #1041#1072#1079#1072' '#1090#1077#1075#1086#1074
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label26: TLabel
    Left = 480
    Top = 167
    Width = 100
    Height = 13
    Hint = #1058#1080#1087' '#1082#1086#1085#1090#1088#1086#1083#1083#1077#1088#1072' '#1087#1083#1072#1090#1099
    Caption = #1041#1072#1079#1072' '#1089#1086#1086#1073#1097#1077#1085#1080#1081
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label1: TLabel
    Left = 480
    Top = 135
    Width = 91
    Height = 13
    Hint = #1058#1080#1087' '#1082#1086#1085#1090#1088#1086#1083#1083#1077#1088#1072' '#1087#1083#1072#1090#1099
    Caption = #1062#1080#1082#1083' '#1086#1089#1085#1086#1074#1085#1086#1081
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label2: TLabel
    Left = 76
    Top = 168
    Width = 33
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'pRKS'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label10: TLabel
    Left = 16
    Top = 168
    Width = 8
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = '4'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label11: TLabel
    Left = 76
    Top = 316
    Width = 82
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'Microradar200'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label12: TLabel
    Left = 16
    Top = 316
    Width = 32
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'mrdr2'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label23: TLabel
    Left = 262
    Top = 316
    Width = 7
    Height = 13
    Caption = '/'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label27: TLabel
    Left = 60
    Top = 436
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label28: TLabel
    Left = 16
    Top = 436
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label29: TLabel
    Left = 60
    Top = 452
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label31: TLabel
    Left = 16
    Top = 452
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot2'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label32: TLabel
    Left = 60
    Top = 468
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label33: TLabel
    Left = 16
    Top = 468
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot3'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label34: TLabel
    Left = 60
    Top = 484
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label35: TLabel
    Left = 16
    Top = 484
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot4'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label36: TLabel
    Left = 60
    Top = 500
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label37: TLabel
    Left = 16
    Top = 500
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot5'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label39: TLabel
    Left = 60
    Top = 516
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label40: TLabel
    Left = 16
    Top = 516
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot6'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label41: TLabel
    Left = 60
    Top = 532
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label42: TLabel
    Left = 16
    Top = 532
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot7'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label45: TLabel
    Left = 60
    Top = 548
    Width = 90
    Height = 13
    Hint = #1058#1080#1087' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'DES-LOT-TAPE'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Label47: TLabel
    Left = 16
    Top = 548
    Width = 22
    Height = 13
    Hint = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    Caption = 'lot8'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clSilver
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
  end
  object Panel3: TPanel
    Left = 472
    Top = 6
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label38: TLabel
      Left = 12
      Top = 3
      Width = 47
      Height = 13
      Caption = 'rpsvrtcp'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lbl71: TLabel
      Left = 20
      Top = 31
      Width = 202
      Height = 13
      Caption = #1054#1089#1085#1086#1074#1085#1086#1077' '#1086#1073#1086#1088#1091#1076#1086#1074#1072#1085#1080#1077' '#1089#1080#1089#1090#1077#1084#1099
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object AdvGlowButton1: TAdvGlowButton
    Left = 1397
    Top = 6
    Width = 100
    Height = 41
    Anchors = [akTop, akRight]
    Caption = #1057#1074#1086#1076#1082#1072' '#1072#1076#1088#1077#1089#1086#1074' '#1074#1074#1086#1076#1072'-'#1074#1099#1074#1086#1076#1072
    NotesFont.Charset = DEFAULT_CHARSET
    NotesFont.Color = clWindowText
    NotesFont.Height = -11
    NotesFont.Name = 'Tahoma'
    NotesFont.Style = []
    TabOrder = 1
    OnClick = AdvGlowButton1Click
    Appearance.ColorChecked = 16111818
    Appearance.ColorCheckedTo = 16367008
    Appearance.ColorDisabled = 15921906
    Appearance.ColorDisabledTo = 15921906
    Appearance.ColorDown = 16111818
    Appearance.ColorDownTo = 16367008
    Appearance.ColorHot = 16117985
    Appearance.ColorHotTo = 16372402
    Appearance.ColorMirrorHot = 16107693
    Appearance.ColorMirrorHotTo = 16775412
    Appearance.ColorMirrorDown = 16102556
    Appearance.ColorMirrorDownTo = 16768988
    Appearance.ColorMirrorChecked = 16102556
    Appearance.ColorMirrorCheckedTo = 16768988
    Appearance.ColorMirrorDisabled = 11974326
    Appearance.ColorMirrorDisabledTo = 15921906
  end
  object Panel1: TPanel
    Left = 8
    Top = 6
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object Label54: TLabel
      Left = 12
      Top = 3
      Width = 27
      Height = 13
      Caption = #1055#1051#1050
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label55: TLabel
      Left = 20
      Top = 31
      Width = 202
      Height = 13
      Caption = #1054#1089#1085#1086#1074#1085#1086#1077' '#1086#1073#1086#1088#1091#1076#1086#1074#1072#1085#1080#1077' '#1089#1080#1089#1090#1077#1084#1099
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Panel2: TPanel
    Left = 8
    Top = 97
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object Label57: TLabel
      Left = 12
      Top = 3
      Width = 213
      Height = 13
      Caption = #1052#1086#1076#1091#1083#1080' '#1076#1080#1089#1082#1088#1077#1090#1085#1086#1075#1086' '#1074#1074#1086#1076#1072'/'#1074#1099#1074#1086#1076#1072
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisLabel26: TVisLabel
    Left = 112
    Top = 615
    Width = 53
    Height = 13
    Cursor = crHandPoint
    TagPath = 'WVHZ'
    TagIdRoot = '^'
    ExecuteOnTagChange = True
    TagNames.Strings = (
      'WesSvrState')
    Script.Strings = (
      'begin'
      '  self.visible := self.gettagval(0)=0;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 53
    objLabel.Height = 15
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1040#1088#1093#1080#1074
    objLabel.Color = clRed
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clWhite
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 53
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisLabel4: TVisLabel
    Left = 370
    Top = 119
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'SHDZO'
    TagRoot = 'PLCI_M01'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^_ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel5: TVisNumericPanel
    Left = 303
    Top = 119
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'SHDZO'
    TagRoot = 'PLCI_M01'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_ErrorCounter')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisLabel6: TVisLabel
    Left = 764
    Top = 28
    Width = 17
    Height = 14
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'ser'
    TagRoot = '1'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.opened')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 17
    objLabel.Height = 14
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = '1'
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 17
    objShape.Height = 14
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
    objShape.Visible = False
  end
  object VisLabel12: TVisLabel
    Left = 784
    Top = 28
    Width = 17
    Height = 14
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'ser'
    TagRoot = '2'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.opened')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 17
    objLabel.Height = 14
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = '2'
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 17
    objShape.Height = 14
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
    objShape.Visible = False
  end
  object VisLabel13: TVisLabel
    Left = 804
    Top = 28
    Width = 17
    Height = 14
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'ser'
    TagRoot = '3'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.opened')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 17
    objLabel.Height = 14
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = '3'
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 17
    objShape.Height = 14
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
    objShape.Visible = False
  end
  object VisLabel14: TVisLabel
    Left = 824
    Top = 28
    Width = 17
    Height = 14
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'ser'
    TagRoot = '4'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.opened')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 17
    objLabel.Height = 14
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = '4'
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 17
    objShape.Height = 14
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
    objShape.Visible = False
  end
  object VisLabel15: TVisLabel
    Left = 844
    Top = 28
    Width = 17
    Height = 14
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'ser'
    TagRoot = '5'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.opened')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 17
    objLabel.Height = 14
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = '5'
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 17
    objShape.Height = 14
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
    objShape.Visible = False
  end
  object VisNumericPanel7: TVisNumericPanel
    Left = 167
    Top = 44
    Width = 61
    Height = 14
    Hint = #1044#1083#1080#1090#1077#1083#1100#1085#1086#1089#1090#1100' '#1094#1080#1082#1083#1072', '#1084#1089
    TagPath = 'SHDZO'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYS_INFO_WorkedTime')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 14
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      14)
  end
  object VisNumericPanel13: TVisNumericPanel
    Left = 236
    Top = 119
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'SHDZO'
    TagRoot = 'PLCI_M01'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_DipNetAddress')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel14: TVisNumericPanel
    Left = 303
    Top = 135
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'SHDZO'
    TagRoot = 'PLCI_M03'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_ErrorCounter')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel17: TVisNumericPanel
    Left = 236
    Top = 135
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'SHDZO'
    TagRoot = 'PLCI_M03'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_DipNetAddress')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel50: TVisNumericPanel
    Left = 303
    Top = 151
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'SHDZO'
    TagRoot = 'PLRKS_M02'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_ErrorCounter')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel53: TVisNumericPanel
    Left = 236
    Top = 151
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'SHDZO'
    TagRoot = 'PLRKS_M02'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_DipNetAddress')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel54: TVisNumericPanel
    Left = 303
    Top = 27
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'SHDZO'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel55: TVisNumericPanel
    Left = 167
    Top = 27
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'task_robo'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'timecycle')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel56: TVisNumericPanel
    Left = 272
    Top = 27
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'SHDZO'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel35: TVisLabel
    Left = 370
    Top = 135
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'SHDZO'
    TagRoot = 'PLCI_M03'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^_ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisLabel43: TVisLabel
    Left = 370
    Top = 151
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'SHDZO'
    TagRoot = 'PLRKS_M02'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^_ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisLabel44: TVisLabel
    Left = 370
    Top = 27
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'SHDZO'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object Panel4: TPanel
    Left = 8
    Top = 349
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 24
    object Label58: TLabel
      Left = 12
      Top = 3
      Width = 124
      Height = 13
      Caption = #1058#1077#1088#1084#1086#1087#1086#1076#1074#1077#1089#1082#1080' '#1058#1059#1056
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisLabel7: TVisLabel
    Left = 370
    Top = 371
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'tur1'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel11: TVisNumericPanel
    Left = 303
    Top = 371
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'tur1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel58: TVisNumericPanel
    Left = 167
    Top = 371
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'tur1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel130: TVisNumericPanel
    Left = 272
    Top = 371
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'tur1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel131: TVisNumericPanel
    Left = 236
    Top = 371
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'tur1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object Panel5: TPanel
    Left = 8
    Top = 593
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 30
    object Label107: TLabel
      Left = 12
      Top = 3
      Width = 32
      Height = 13
      Caption = #1042#1077#1089#1099
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisLabel8: TVisLabel
    Left = 370
    Top = 615
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'WVHZ'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel132: TVisNumericPanel
    Left = 303
    Top = 615
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'WVHZ'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel133: TVisNumericPanel
    Left = 167
    Top = 615
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'WVHZ'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel134: TVisNumericPanel
    Left = 272
    Top = 615
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'WVHZ'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel135: TVisNumericPanel
    Left = 236
    Top = 615
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'WVHZ'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object Panel6: TPanel
    Left = 8
    Top = 221
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 36
    object Label59: TLabel
      Left = 12
      Top = 3
      Width = 181
      Height = 13
      Caption = #1052#1086#1076#1091#1083#1080' '#1091#1074#1083#1072#1078#1085#1077#1085#1080#1103' Hygrostek'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisLabel45: TVisLabel
    Left = 370
    Top = 243
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'hg1'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel59: TVisNumericPanel
    Left = 303
    Top = 243
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'hg1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel60: TVisNumericPanel
    Left = 167
    Top = 243
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'hg1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel61: TVisNumericPanel
    Left = 272
    Top = 243
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'hg1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel62: TVisNumericPanel
    Left = 236
    Top = 243
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'hg1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object Panel7: TPanel
    Left = 8
    Top = 277
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 42
    object Label18: TLabel
      Left = 12
      Top = 3
      Width = 197
      Height = 13
      Caption = #1052#1086#1076#1091#1083#1080' '#1091#1074#1083#1072#1078#1085#1077#1085#1080#1103' '#1052#1080#1082#1088#1086#1088#1072#1076#1072#1088
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisLabel33: TVisLabel
    Left = 370
    Top = 299
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'mrdr1'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel6: TVisNumericPanel
    Left = 303
    Top = 299
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'mrdr1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel12: TVisNumericPanel
    Left = 167
    Top = 299
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'mrdr1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel15: TVisNumericPanel
    Left = 272
    Top = 299
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'mrdr1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel16: TVisNumericPanel
    Left = 236
    Top = 299
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'mrdr1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel34: TVisLabel
    Left = 370
    Top = 387
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'tur2'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel18: TVisNumericPanel
    Left = 303
    Top = 387
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'tur2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel19: TVisNumericPanel
    Left = 167
    Top = 387
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'tur2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel20: TVisNumericPanel
    Left = 272
    Top = 387
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'tur2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel21: TVisNumericPanel
    Left = 236
    Top = 387
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'tur2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object Panel8: TPanel
    Left = 472
    Top = 97
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 53
    object Label9: TLabel
      Left = 12
      Top = 3
      Width = 36
      Height = 13
      Caption = 'arcsvr'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label22: TLabel
      Left = 20
      Top = 31
      Width = 202
      Height = 13
      Caption = #1054#1089#1085#1086#1074#1085#1086#1077' '#1086#1073#1086#1088#1091#1076#1086#1074#1072#1085#1080#1077' '#1089#1080#1089#1090#1077#1084#1099
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisNumericPanel1: TVisNumericPanel
    Left = 767
    Top = 118
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'rpcl_arcsvr'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'disconnect.cnt')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel22: TVisNumericPanel
    Left = 631
    Top = 118
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'task_rpcl_arcsvr'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'timecycle')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisLabel17: TVisLabel
    Left = 834
    Top = 118
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'rpcl_arcsvr'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'connected')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel23: TVisNumericPanel
    Left = 767
    Top = 150
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'rpcl_arcsvr'
    TagRoot = 'dbtag'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^.disconnect.cnt')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisLabel18: TVisLabel
    Left = 834
    Top = 150
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'rpcl_arcsvr'
    TagRoot = 'dbtag'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.connected')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel24: TVisNumericPanel
    Left = 767
    Top = 166
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'rpcl_arcsvr'
    TagRoot = 'dbmes'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^.disconnect.cnt')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisLabel19: TVisLabel
    Left = 834
    Top = 166
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'rpcl_arcsvr'
    TagRoot = 'dbmes'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^.connected')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=1 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisLabel20: TVisLabel
    Left = 632
    Top = 150
    Width = 61
    Height = 13
    Cursor = crHandPoint
    TagPath = 'rpcl_arcsvr'
    TagRoot = 'arctag'
    TagIdRoot = '^'
    ExecuteOnTagChange = True
    TagNames.Strings = (
      '^.connected')
    Script.Strings = (
      'begin'
      '  self.visible := self.gettagval(0)=0;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 61
    objLabel.Height = 15
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1040#1088#1093#1080#1074
    objLabel.Color = clRed
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clWhite
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 61
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisLabel21: TVisLabel
    Left = 632
    Top = 166
    Width = 61
    Height = 13
    Cursor = crHandPoint
    TagPath = 'rpcl_arcsvr'
    TagRoot = 'arcmes'
    TagIdRoot = '^'
    ExecuteOnTagChange = True
    TagNames.Strings = (
      '^.connected')
    Script.Strings = (
      'begin'
      '  self.visible := self.gettagval(0)=0;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 61
    objLabel.Height = 15
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1040#1088#1093#1080#1074
    objLabel.Color = clRed
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clWhite
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 61
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel2: TVisNumericPanel
    Left = 631
    Top = 134
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'rpcl_arcsvr'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'task_arcsvr.timecycle')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel3: TVisNumericPanel
    Left = 303
    Top = 167
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'SHDZO'
    TagRoot = 'PLRKS_M04'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_ErrorCounter')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel4: TVisNumericPanel
    Left = 236
    Top = 167
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'SHDZO'
    TagRoot = 'PLRKS_M04'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      '^_DipNetAddress')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel1: TVisLabel
    Left = 370
    Top = 167
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'SHDZO'
    TagRoot = 'PLRKS_M04'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      '^_ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisLabel2: TVisLabel
    Left = 370
    Top = 315
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'mrdr2'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel8: TVisNumericPanel
    Left = 303
    Top = 315
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'mrdr2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel9: TVisNumericPanel
    Left = 167
    Top = 315
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'mrdr2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel10: TVisNumericPanel
    Left = 272
    Top = 315
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'mrdr2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel25: TVisNumericPanel
    Left = 236
    Top = 315
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'mrdr2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object Panel9: TPanel
    Left = 8
    Top = 413
    Width = 397
    Height = 18
    BevelOuter = bvNone
    Color = clGray
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 72
    object Label30: TLabel
      Left = 12
      Top = 3
      Width = 126
      Height = 13
      Caption = #1044#1072#1090#1095#1080#1082#1080' '#1091#1088#1086#1074#1085#1103' '#1051#1054#1058
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object VisLabel3: TVisLabel
    Left = 370
    Top = 435
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot1'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel26: TVisNumericPanel
    Left = 303
    Top = 435
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel27: TVisNumericPanel
    Left = 167
    Top = 435
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel28: TVisNumericPanel
    Left = 272
    Top = 435
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel29: TVisNumericPanel
    Left = 236
    Top = 435
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot1'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel5: TVisLabel
    Left = 370
    Top = 451
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot2'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel30: TVisNumericPanel
    Left = 303
    Top = 451
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel31: TVisNumericPanel
    Left = 167
    Top = 451
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel32: TVisNumericPanel
    Left = 272
    Top = 451
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel33: TVisNumericPanel
    Left = 236
    Top = 451
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot2'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel9: TVisLabel
    Left = 370
    Top = 467
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot3'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel34: TVisNumericPanel
    Left = 303
    Top = 467
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot3'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel35: TVisNumericPanel
    Left = 167
    Top = 467
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot3'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel36: TVisNumericPanel
    Left = 272
    Top = 467
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot3'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel37: TVisNumericPanel
    Left = 236
    Top = 467
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot3'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel10: TVisLabel
    Left = 370
    Top = 483
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot4'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel38: TVisNumericPanel
    Left = 303
    Top = 483
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot4'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel39: TVisNumericPanel
    Left = 167
    Top = 483
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot4'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel40: TVisNumericPanel
    Left = 272
    Top = 483
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot4'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel41: TVisNumericPanel
    Left = 236
    Top = 483
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot4'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel11: TVisLabel
    Left = 370
    Top = 499
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot5'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel42: TVisNumericPanel
    Left = 303
    Top = 499
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot5'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel43: TVisNumericPanel
    Left = 167
    Top = 499
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot5'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel44: TVisNumericPanel
    Left = 272
    Top = 499
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot5'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel45: TVisNumericPanel
    Left = 236
    Top = 499
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot5'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel16: TVisLabel
    Left = 370
    Top = 515
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot6'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel46: TVisNumericPanel
    Left = 303
    Top = 515
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot6'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel47: TVisNumericPanel
    Left = 167
    Top = 515
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot6'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel48: TVisNumericPanel
    Left = 272
    Top = 515
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot6'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel49: TVisNumericPanel
    Left = 236
    Top = 515
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot6'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel22: TVisLabel
    Left = 370
    Top = 531
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot7'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel51: TVisNumericPanel
    Left = 303
    Top = 531
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot7'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel52: TVisNumericPanel
    Left = 167
    Top = 531
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot7'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel57: TVisNumericPanel
    Left = 272
    Top = 531
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot7'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel63: TVisNumericPanel
    Left = 236
    Top = 531
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot7'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisLabel23: TVisLabel
    Left = 370
    Top = 547
    Width = 25
    Height = 13
    Hint = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1086#1076#1082#1083#1102#1095#1077#1085#1080#1103
    TagPath = 'lot8'
    TagIdRoot = '^'
    ExecuteOnTagChange = False
    TagNames.Strings = (
      'SYSTEM.ErrorFlag')
    Script.Strings = (
      'begin'
      '  if self.gettagval(0)=0 then begin'
      '    self.objLabel.Font.Color := clLime;'
      '    self.objLabel.Color := $00606060;'
      '    self.objLabel.Caption := '#39'OK'#39';'
      '  end else begin'
      '    self.objLabel.Font.Color := clWhite;'
      '    self.objLabel.Color := clRed;'
      '    self.objLabel.Caption := '#39#1053#1077#1090#39';'
      '  end;'
      'end.')
    objLabel.Left = 0
    objLabel.Top = 0
    objLabel.Width = 25
    objLabel.Height = 13
    objLabel.Align = alClient
    objLabel.Alignment = taCenter
    objLabel.AutoSize = False
    objLabel.Caption = #1054#1050
    objLabel.Color = 6316128
    objLabel.Font.Charset = DEFAULT_CHARSET
    objLabel.Font.Color = clLime
    objLabel.Font.Height = -11
    objLabel.Font.Name = 'MS Sans Serif'
    objLabel.Font.Style = [fsBold]
    objLabel.ParentColor = False
    objLabel.ParentFont = False
    objLabel.Transparent = False
    objShape.Left = 0
    objShape.Top = 0
    objShape.Width = 25
    objShape.Height = 13
    objShape.Align = alClient
    objShape.Brush.Color = 16640428
    objShape.Pen.Style = psClear
  end
  object VisNumericPanel64: TVisNumericPanel
    Left = 303
    Top = 547
    Width = 61
    Height = 13
    Hint = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1086#1096#1080#1073#1086#1082' '#1089#1074#1103#1079#1080
    TagPath = 'lot8'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = False
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.ErrorCount')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel65: TVisNumericPanel
    Left = 167
    Top = 547
    Width = 61
    Height = 13
    Hint = #1042#1088#1077#1084#1103' '#1086#1087#1088#1086#1089#1072', '#1084#1089
    TagPath = 'lot8'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.TimePeriod')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 61
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      61
      13)
  end
  object VisNumericPanel66: TVisNumericPanel
    Left = 272
    Top = 547
    Width = 24
    Height = 13
    Hint = #1053#1086#1084#1077#1088' '#1087#1086#1089#1083#1077#1076#1086#1074#1072#1090#1077#1083#1100#1085#1086#1075#1086' '#1087#1086#1088#1090#1072
    TagPath = 'lot8'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.Port')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taLeftJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
  object VisNumericPanel67: TVisNumericPanel
    Left = 236
    Top = 547
    Width = 24
    Height = 13
    Hint = #1057#1077#1090#1077#1074#1086#1081' '#1072#1076#1088#1077#1089' '#1091#1089#1090#1088#1086#1081#1089#1090#1074#1072
    TagPath = 'lot8'
    TagIdRoot = '^'
    UseSaveMessage = False
    ExecuteOnTagChange = False
    AutoUpdateApply = True
    ScriptEnabled = False
    ScriptDefEnabled = True
    ReadOnly = True
    ValueMul = 1
    ValueDiv = 1
    Precision = 0
    TagNames.Strings = (
      'SYSTEM.NetAddr')
    Script.Strings = (
      'begin'
      'end.')
    objPanel.Left = 0
    objPanel.Top = 0
    objPanel.Width = 24
    objPanel.Height = 13
    objPanel.Alignment = taRightJustify
    objPanel.Anchors = [akLeft, akTop, akRight, akBottom]
    objPanel.BevelOuter = bvNone
    objPanel.Caption = '0'
    objPanel.Color = 6316128
    objPanel.Font.Charset = DEFAULT_CHARSET
    objPanel.Font.Color = clSilver
    objPanel.Font.Height = -11
    objPanel.Font.Name = 'MS Sans Serif'
    objPanel.Font.Style = [fsBold]
    objPanel.ParentFont = False
    objPanel.TabOrder = 0
    DesignSize = (
      24
      13)
  end
end
