object Form1: TForm1
  Left = 1499
  Top = 114
  Anchors = []
  AutoScroll = False
  BiDiMode = bdLeftToRight
  Caption = '1-Wire Programmer'
  ClientHeight = 833
  ClientWidth = 405
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  ParentBiDiMode = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 401
    Height = 193
    TabOrder = 0
    object Label1: TLabel
      Left = 182
      Top = 32
      Width = 57
      Height = 16
      Caption = 'Founded:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 7
      Top = 145
      Width = 85
      Height = 16
      Caption = 'Selected chip:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label16: TLabel
      Left = 143
      Top = 145
      Width = 91
      Height = 16
      Caption = 'Selected ROM:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 8
      Top = 165
      Width = 83
      Height = 24
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
    object Button1: TButton
      Left = 8
      Top = 1
      Width = 73
      Height = 25
      Caption = 'Connect'
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 8
      Top = 25
      Width = 73
      Height = 25
      Caption = 'Disconnect'
      TabOrder = 2
      OnClick = Button2Click
    end
    object ComboBox1: TComboBox
      Left = 88
      Top = 1
      Width = 81
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 3
      Text = 'COM1'
      OnChange = ComboBox1Change
      Items.Strings = (
        'COM1'
        'COM2'
        'COM3'
        'COM4'
        'COM5'
        'COM6'
        'COM7'
        'COM8'
        'COM9'
        'COM10')
    end
    object StringGrid1: TStringGrid
      Left = 1
      Top = 54
      Width = 399
      Height = 88
      BiDiMode = bdLeftToRight
      ColCount = 3
      DefaultRowHeight = 18
      FixedCols = 0
      RowCount = 2
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
      ParentBiDiMode = False
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 4
      ColWidths = (
        26
        193
        150)
    end
    object Button3: TButton
      Left = 176
      Top = 3
      Width = 105
      Height = 25
      Caption = 'Scan 1-Wire Bus'
      TabOrder = 5
      OnClick = Button3Click
    end
    object Edit2: TEdit
      Left = 240
      Top = 29
      Width = 39
      Height = 21
      ReadOnly = True
      TabOrder = 6
      Text = '0'
    end
    object Edit3: TEdit
      Left = 101
      Top = 166
      Width = 177
      Height = 22
      Color = clInfoBk
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Courier New'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
      Text = 'FF FF FF FF FF FF FF FF'
      OnKeyDown = Edit3KeyDown
      OnKeyPress = EditsKeyPress
    end
    object Button13: TButton
      Left = 288
      Top = 164
      Width = 105
      Height = 25
      Caption = 'Calculate CRC'
      TabOrder = 8
      OnClick = Button13Click
    end
    object Button16: TButton
      Left = 292
      Top = 16
      Width = 99
      Height = 25
      Caption = 'How to connect...'
      TabOrder = 9
      OnClick = Button16Click
    end
  end
  object Memo1: TMemo
    Left = 136
    Top = 800
    Width = 28
    Height = 28
    TabOrder = 1
    Visible = False
    WordWrap = False
  end
  object Panel2: TPanel
    Left = 0
    Top = 193
    Width = 401
    Height = 575
    Constraints.MinWidth = 401
    TabOrder = 2
    object Label3: TLabel
      Left = 247
      Top = 32
      Width = 20
      Height = 13
      Caption = 'TA1'
    end
    object Label4: TLabel
      Left = 284
      Top = 32
      Width = 20
      Height = 13
      Caption = 'TA2'
    end
    object Label5: TLabel
      Left = 322
      Top = 32
      Width = 19
      Height = 13
      Caption = 'E/S'
    end
    object Label6: TLabel
      Left = 358
      Top = 32
      Width = 21
      Height = 13
      Caption = 'Test'
    end
    object Label15: TLabel
      Left = 4
      Top = 406
      Width = 21
      Height = 13
      Caption = 'Log:'
    end
    object Button15: TButton
      Left = 314
      Top = 68
      Width = 75
      Height = 21
      BiDiMode = bdLeftToRight
      Caption = 'Button15'
      ParentBiDiMode = False
      TabOrder = 20
      OnClick = Button15Click
    end
    object Button4: TButton
      Left = 8
      Top = 8
      Width = 110
      Height = 21
      Caption = 'Button4'
      TabOrder = 0
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 117
      Top = 8
      Width = 110
      Height = 21
      Caption = 'Button5'
      TabOrder = 1
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 239
      Top = 8
      Width = 150
      Height = 21
      Caption = 'Button6'
      TabOrder = 2
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 8
      Top = 28
      Width = 110
      Height = 21
      Caption = 'Button7'
      TabOrder = 3
      OnClick = Button7Click
    end
    object Button8: TButton
      Left = 117
      Top = 28
      Width = 110
      Height = 21
      Caption = 'Button8'
      TabOrder = 4
      OnClick = Button8Click
    end
    object Button9: TButton
      Left = 8
      Top = 48
      Width = 110
      Height = 21
      Caption = 'Button9'
      TabOrder = 5
      OnClick = Button9Click
    end
    object Button10: TButton
      Left = 117
      Top = 48
      Width = 110
      Height = 21
      Caption = 'Button10'
      TabOrder = 6
      OnClick = Button10Click
    end
    object Button11: TButton
      Left = 8
      Top = 68
      Width = 110
      Height = 21
      Caption = 'Button11'
      TabOrder = 7
      OnClick = Button11Click
    end
    object Edit4: TEdit
      Left = 247
      Top = 48
      Width = 21
      Height = 21
      ReadOnly = True
      TabOrder = 8
      Text = '00'
      OnKeyDown = Edit4KeyDown
      OnKeyPress = EditsKeyPress
    end
    object Edit5: TEdit
      Left = 284
      Top = 48
      Width = 21
      Height = 21
      ReadOnly = True
      TabOrder = 9
      Text = '00'
      OnKeyDown = Edit5KeyDown
      OnKeyPress = EditsKeyPress
    end
    object Edit6: TEdit
      Left = 322
      Top = 48
      Width = 20
      Height = 21
      ReadOnly = True
      TabOrder = 10
      Text = '00'
      OnKeyDown = Edit6KeyDown
      OnKeyPress = EditsKeyPress
    end
    object Edit7: TEdit
      Left = 359
      Top = 48
      Width = 20
      Height = 21
      AutoSize = False
      ReadOnly = True
      TabOrder = 11
      Text = '00'
    end
    object PageControl1: TPageControl
      Left = 0
      Top = 142
      Width = 401
      Height = 259
      ActivePage = TabSheet1
      TabIndex = 0
      TabOrder = 12
      object TabSheet1: TTabSheet
        Caption = 'Page 1'
        object Label7: TLabel
          Left = 0
          Top = 0
          Width = 115
          Height = 13
          Caption = 'EEPROM Data Memory:'
        end
        object Label9: TLabel
          Left = 0
          Top = 72
          Width = 75
          Height = 13
          Caption = 'Registers Page:'
        end
        object Label11: TLabel
          Left = 0
          Top = 120
          Width = 58
          Height = 13
          Caption = 'Scratchpad:'
        end
        object Label13: TLabel
          Left = 0
          Top = 168
          Width = 62
          Height = 13
          Caption = 'Secret Page:'
        end
        object RichEdit1: TRichEdit
          Left = 0
          Top = 16
          Width = 393
          Height = 49
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 0
          OnKeyDown = RichEdit1KeyDown
          OnKeyPress = RichEditsKeyPress
        end
        object RichEdit3: TRichEdit
          Left = 0
          Top = 88
          Width = 393
          Height = 25
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 1
          OnKeyDown = RichEdit3KeyDown
          OnKeyPress = RichEditsKeyPress
        end
        object RichEdit5: TRichEdit
          Left = 0
          Top = 136
          Width = 393
          Height = 25
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 2
          OnKeyDown = RichEdit5KeyDown
          OnKeyPress = RichEditsKeyPress
        end
        object RichEdit7: TRichEdit
          Left = 0
          Top = 184
          Width = 393
          Height = 25
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 3
          OnKeyDown = RichEdit7KeyDown
          OnKeyPress = RichEditsKeyPress
        end
      end
      object TabSheet2: TTabSheet
        Caption = 'Page 2'
        ImageIndex = 1
        object Label8: TLabel
          Left = 0
          Top = 0
          Width = 115
          Height = 13
          Caption = 'EEPROM Data Memory:'
        end
        object Label10: TLabel
          Left = 0
          Top = 72
          Width = 75
          Height = 13
          Caption = 'Registers Page:'
        end
        object Label12: TLabel
          Left = 0
          Top = 120
          Width = 58
          Height = 13
          Caption = 'Scratchpad:'
        end
        object Label14: TLabel
          Left = 0
          Top = 168
          Width = 62
          Height = 13
          Caption = 'Secret Page:'
        end
        object RichEdit2: TRichEdit
          Left = 0
          Top = 16
          Width = 393
          Height = 49
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 0
          OnKeyDown = RichEdit2KeyDown
          OnKeyPress = RichEditsKeyPress
        end
        object RichEdit4: TRichEdit
          Left = 0
          Top = 88
          Width = 393
          Height = 25
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 1
          OnKeyDown = RichEdit4KeyDown
          OnKeyPress = RichEditsKeyPress
        end
        object RichEdit6: TRichEdit
          Left = 0
          Top = 136
          Width = 393
          Height = 25
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 2
          OnKeyDown = RichEdit6KeyDown
          OnKeyPress = RichEditsKeyPress
        end
        object RichEdit8: TRichEdit
          Left = 0
          Top = 184
          Width = 393
          Height = 25
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 3
          OnKeyDown = RichEdit8KeyDown
          OnKeyPress = RichEditsKeyPress
        end
      end
    end
    object Button12: TButton
      Left = 117
      Top = 68
      Width = 110
      Height = 21
      Caption = 'Button12'
      TabOrder = 13
      OnClick = Button12Click
    end
    object CheckBox1: TCheckBox
      Left = 8
      Top = 96
      Width = 169
      Height = 17
      Caption = 'CheckBox1'
      TabOrder = 14
    end
    object CheckBox2: TCheckBox
      Left = 200
      Top = 96
      Width = 169
      Height = 17
      Caption = 'CheckBox2'
      TabOrder = 15
    end
    object CheckBox3: TCheckBox
      Left = 8
      Top = 120
      Width = 169
      Height = 17
      Caption = 'CheckBox3'
      TabOrder = 16
    end
    object CheckBox4: TCheckBox
      Left = 200
      Top = 120
      Width = 169
      Height = 17
      Caption = 'CheckBox4'
      TabOrder = 17
    end
    object RichEdit9: TRichEdit
      Left = 4
      Top = 424
      Width = 393
      Height = 100
      Color = clCream
      PlainText = True
      ReadOnly = True
      ScrollBars = ssVertical
      TabOrder = 18
    end
    object Button14: TButton
      Left = 239
      Top = 68
      Width = 75
      Height = 21
      Caption = 'Button14'
      TabOrder = 19
      OnClick = Button14Click
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 768
    Width = 401
    Height = 25
    TabOrder = 3
    object StaticText1: TStaticText
      Left = 4
      Top = 4
      Width = 393
      Height = 17
      AutoSize = False
      BevelInner = bvNone
      BevelKind = bkTile
      TabOrder = 0
    end
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 800
    object File1: TMenuItem
      Caption = 'File'
      object Open1: TMenuItem
        Caption = 'Load Data from File...'
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = 'Save Data to File'
        OnClick = Save1Click
      end
      object Saveas1: TMenuItem
        Caption = 'Save Data to File as...'
        OnClick = Saveas1Click
      end
      object SaveLogas1: TMenuItem
        Caption = 'Save Log as...'
        OnClick = SaveLogas1Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'Exit'
        OnClick = Exit1Click
      end
    end
    object ChipSelect1: TMenuItem
      Caption = 'Chip Select'
      object WritableKeys1: TMenuItem
        Caption = 'Writable Keys'
        object RW19901: TMenuItem
          Caption = 'RW1990'
          OnClick = RW19901Click
        end
        object AN19901: TMenuItem
          Caption = 'AN1990 *'
          OnClick = AN19901Click
        end
        object TM20041: TMenuItem
          Caption = 'TM-2004 *'
          OnClick = TM20041Click
        end
      end
      object DS14xx1: TMenuItem
        Caption = 'DS14xx'
        object DS14251: TMenuItem
          Caption = 'DS1425'
          OnClick = DS14251Click
        end
        object DS14271: TMenuItem
          Caption = 'DS1427'
          OnClick = DS14271Click
        end
      end
      object DS18xx1: TMenuItem
        Caption = 'DS18xx'
        object DS18B201: TMenuItem
          Caption = 'DS18B20'
          OnClick = DS18B201Click
        end
        object DS18S201: TMenuItem
          Caption = 'DS18S20'
          OnClick = DS18S201Click
        end
        object DS18221: TMenuItem
          Caption = 'DS1822'
          OnClick = DS18221Click
        end
      end
      object DS19xx1: TMenuItem
        Caption = 'DS19xx'
        object DS19201: TMenuItem
          Caption = 'DS1920'
          OnClick = DS19201Click
        end
        object DS1961S1: TMenuItem
          Caption = 'DS1961S'
          OnClick = DS1961S1Click
        end
        object DS1963L1: TMenuItem
          Caption = 'DS1963L'
          OnClick = DS1963L1Click
        end
        object DS19711: TMenuItem
          Caption = 'DS1971'
          OnClick = DS19711Click
        end
        object DS19821: TMenuItem
          Caption = 'DS1982 *'
          OnClick = DS19821Click
        end
        object DS19911: TMenuItem
          Caption = 'DS1991'
          OnClick = DS19911Click
        end
        object DS19921: TMenuItem
          Caption = 'DS1992'
          OnClick = DS19921Click
        end
        object DS19931: TMenuItem
          Caption = 'DS1993'
          OnClick = DS19931Click
        end
        object DS19941: TMenuItem
          Caption = 'DS1994'
          OnClick = DS19941Click
        end
        object DS19951: TMenuItem
          Caption = 'DS1995'
          OnClick = DS19951Click
        end
        object DS19961: TMenuItem
          Caption = 'DS1996'
          OnClick = DS19961Click
        end
      end
      object DS24xx1: TMenuItem
        Caption = 'DS24xx'
        object DS24041: TMenuItem
          Caption = 'DS2404'
          OnClick = DS24041Click
        end
        object DS24051: TMenuItem
          Caption = 'DS2405'
          OnClick = DS24051Click
        end
        object DS24151: TMenuItem
          Caption = 'DS2415'
          OnClick = DS24151Click
        end
        object DS24171: TMenuItem
          Caption = 'DS2417'
          OnClick = DS24171Click
        end
        object DS24231: TMenuItem
          Caption = 'DS2423'
          OnClick = DS24231Click
        end
        object DS24301: TMenuItem
          Caption = 'DS2430A'
          OnClick = DS24301Click
        end
        object DS24311: TMenuItem
          Caption = 'DS2431'
          OnClick = DS24311Click
        end
        object DS24321: TMenuItem
          Caption = 'DS2432'
          OnClick = DS24321Click
        end
        object DS24B331: TMenuItem
          Caption = 'DS24B33'
          OnClick = DS24B331Click
        end
      end
      object DS25xx1: TMenuItem
        Caption = 'DS25xx'
        object DS25021: TMenuItem
          Caption = 'DS2502 *'
          OnClick = DS25021Click
        end
      end
      object DS28xx1: TMenuItem
        Caption = 'DS28xx'
        object DS28901: TMenuItem
          Caption = 'DS2890'
          OnClick = DS28901Click
        end
        object DS28E051: TMenuItem
          Caption = 'DS28E05'
          OnClick = DS28E051Click
        end
        object DS28E071: TMenuItem
          Caption = 'DS28E07'
          OnClick = DS28E071Click
        end
        object DS28EC201: TMenuItem
          Caption = 'DS28EC20'
          OnClick = DS28EC201Click
        end
      end
      object MAX1: TMenuItem
        Caption = 'MAXxxxxx'
        object MAX318261: TMenuItem
          Caption = '31826'
          OnClick = MAX318261Click
        end
      end
    end
    object LangSelect1: TMenuItem
      Caption = 'Language'
      object Lang1: TMenuItem
        Caption = '  English'
        OnClick = Lang1Click
      end
      object Lang2: TMenuItem
        Caption = '  '#1056#1091#1089#1089#1082#1080#1081
        OnClick = Lang2Click
      end
    end
    object ProgrammerSelect1: TMenuItem
      Caption = 'Hardware'
      object RH00041: TMenuItem
        Caption = '   RH-0004'
        OnClick = RH00041Click
      end
      object RH00101: TMenuItem
        Caption = '* RH-0010'
        OnClick = RH00101Click
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      object About1: TMenuItem
        Caption = 'About Program'
        OnClick = About1Click
      end
      object Chippdf1: TMenuItem
        Caption = 'About Selected Chip'
        OnClick = Chippdf1Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 40
    Top = 800
    object Select1: TMenuItem
      Caption = 'Select ROM'
      OnClick = Select1Click
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.hex|*.hex|*.bin|*.bin'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
    Left = 72
    Top = 800
  end
  object SaveDialog1: TSaveDialog
    Filter = '*.bin|*.bin|*.hex|*.hex'
    Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
    Left = 104
    Top = 800
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 2000
    OnTimer = Timer1Timer
    Left = 168
    Top = 800
  end
end
