object Form1: TForm1
  Left = 1212
  Top = 136
  Width = 698
  Height = 672
  Caption = 'PIC Serial Programmer'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 685
    Height = 105
    TabOrder = 0
    DesignSize = (
      685
      105)
    object Label2: TLabel
      Left = 184
      Top = 4
      Width = 67
      Height = 16
      Caption = 'Chip name:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label16: TLabel
      Left = 260
      Top = 4
      Width = 48
      Height = 16
      Caption = 'ID word:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 114
      Top = 50
      Width = 64
      Height = 13
      Caption = 'Delays value:'
    end
    object Edit1: TEdit
      Left = 182
      Top = 22
      Width = 73
      Height = 22
      AutoSize = False
      Color = clInfoBk
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      Text = 'None'
    end
    object Button1: TButton
      Left = 6
      Top = 4
      Width = 81
      Height = 21
      Caption = 'Connect'
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 6
      Top = 24
      Width = 81
      Height = 21
      Caption = 'Disconnect'
      TabOrder = 2
      OnClick = Button2Click
    end
    object ComboBox1: TComboBox
      Left = 6
      Top = 48
      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 Button3: TButton
      Left = 92
      Top = 4
      Width = 86
      Height = 41
      Caption = 'Autosearch chip'
      TabOrder = 4
      OnClick = Button3Click
    end
    object Edit2: TEdit
      Left = 258
      Top = 22
      Width = 53
      Height = 22
      Anchors = [akTop, akRight]
      AutoSize = False
      Color = clInfoBk
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'Courier New'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
      Text = '3FFF'
      OnKeyDown = Edit2KeyDown
      OnKeyPress = RichEditsKeyPress
    end
    object Button4: TButton
      Left = 318
      Top = 4
      Width = 163
      Height = 21
      Caption = 'Read Program && Configuration'
      TabOrder = 6
      OnClick = Button4Click
    end
    object Button8: TButton
      Left = 480
      Top = 4
      Width = 97
      Height = 21
      Caption = 'Read Data'
      TabOrder = 7
      OnClick = Button8Click
    end
    object Button5: TButton
      Left = 318
      Top = 24
      Width = 163
      Height = 21
      Caption = 'Write Program && Configuration'
      TabOrder = 8
      OnClick = Button5Click
    end
    object Button9: TButton
      Left = 480
      Top = 24
      Width = 97
      Height = 21
      Caption = 'Write Data'
      TabOrder = 9
      OnClick = Button9Click
    end
    object Button6: TButton
      Left = 318
      Top = 44
      Width = 163
      Height = 21
      Caption = 'Verify Program && Configuration'
      TabOrder = 10
      OnClick = Button6Click
    end
    object Button10: TButton
      Left = 480
      Top = 44
      Width = 97
      Height = 21
      Caption = 'Verify Data'
      TabOrder = 11
      OnClick = Button10Click
    end
    object Button11: TButton
      Left = 584
      Top = 4
      Width = 97
      Height = 29
      Caption = 'Chip Erase'
      TabOrder = 13
      OnClick = Button11Click
    end
    object TrackBar1: TTrackBar
      Left = 182
      Top = 46
      Width = 129
      Height = 30
      Max = 5
      Orientation = trHorizontal
      Frequency = 1
      Position = 0
      SelEnd = 0
      SelStart = 0
      TabOrder = 14
      TickMarks = tmBottomRight
      TickStyle = tsAuto
      OnChange = TrackBar1Change
    end
    object Button7: TButton
      Left = 584
      Top = 44
      Width = 97
      Height = 21
      Caption = 'Read OSCCAL(S)'
      TabOrder = 12
      OnClick = Button7Click
    end
    object CheckBox1: TCheckBox
      Left = 328
      Top = 72
      Width = 353
      Height = 17
      Caption = 
        'Save / restore calibration values during Erase / Write operation' +
        's'
      TabOrder = 15
    end
    object CheckBox2: TCheckBox
      Left = 328
      Top = 88
      Width = 353
      Height = 17
      Caption = 'Write the entire configuration memory (not only the Config Word)'
      TabOrder = 16
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 104
    Width = 685
    Height = 353
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 2
    object TabSheet1: TTabSheet
      Caption = 'Page1'
      object Label3: TLabel
        Left = 0
        Top = 0
        Width = 116
        Height = 13
        Caption = 'Program Memory (Flash):'
      end
      object Label5: TLabel
        Left = 0
        Top = 240
        Width = 121
        Height = 13
        Caption = 'Data Memory (EEPROM):'
      end
      object Label8: TLabel
        Left = 0
        Top = 160
        Width = 107
        Height = 13
        Caption = 'Config Memory (Flash):'
      end
      object Label10: TLabel
        Left = 0
        Top = 176
        Width = 138
        Height = 13
        Caption = 'Configuration Memory Map: ?'
      end
      object RichEdit1: TRichEdit
        Left = 0
        Top = 16
        Width = 677
        Height = 137
        Font.Charset = ANSI_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 = 256
        Width = 677
        Height = 65
        Font.Charset = ANSI_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 RichEdit6: TRichEdit
        Left = 0
        Top = 192
        Width = 677
        Height = 37
        Font.Charset = ANSI_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
    end
    object TabSheet2: TTabSheet
      Caption = 'Page2'
      ImageIndex = 1
      object Label4: TLabel
        Left = 0
        Top = 0
        Width = 116
        Height = 13
        Caption = 'Program Memory (Flash):'
      end
      object Label6: TLabel
        Left = 0
        Top = 224
        Width = 121
        Height = 13
        Caption = 'Data Memory (EEPROM):'
      end
      object Label9: TLabel
        Left = 0
        Top = 160
        Width = 107
        Height = 13
        Caption = 'Config Memory (Flash):'
      end
      object RichEdit2: TRichEdit
        Left = 0
        Top = 16
        Width = 677
        Height = 137
        Font.Charset = ANSI_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 = 240
        Width = 677
        Height = 65
        Font.Charset = ANSI_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 RichEdit7: TRichEdit
        Left = 0
        Top = 176
        Width = 677
        Height = 37
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 2
        OnKeyDown = RichEdit7KeyDown
        OnKeyPress = RichEditsKeyPress
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 456
    Width = 685
    Height = 129
    TabOrder = 1
    object Label7: TLabel
      Left = 8
      Top = 4
      Width = 21
      Height = 13
      Caption = 'Log:'
    end
    object RichEdit5: TRichEdit
      Left = 4
      Top = 20
      Width = 677
      Height = 105
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Courier New'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      ScrollBars = ssBoth
      TabOrder = 0
      WordWrap = False
    end
  end
  object Memo1: TMemo
    Left = 104
    Top = 592
    Width = 28
    Height = 28
    TabOrder = 3
    Visible = False
    WordWrap = False
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 592
    object File1: TMenuItem
      Caption = 'File'
      object LoadAllfromFile1: TMenuItem
        Caption = 'Load All from File...'
        OnClick = LoadAllfromFile1Click
      end
      object SaveAlltoFile1: TMenuItem
        Caption = 'Save All to File...'
        OnClick = SaveAlltoFile1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object LoadProgramfromFile1: TMenuItem
        Caption = 'Load Program from File...'
        OnClick = LoadProgramfromFile1Click
      end
      object SaveProgramtoFile1: TMenuItem
        Caption = 'Save Program to File...'
        OnClick = SaveProgramtoFile1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object LoadConfigfromFile1: TMenuItem
        Caption = 'Load Config from File...'
        OnClick = LoadConfigfromFile1Click
      end
      object SaveConfigtoFile1: TMenuItem
        Caption = 'Save Config to File...'
        OnClick = SaveConfigtoFile1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Open1: TMenuItem
        Caption = 'Load Data from File...'
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = 'Save Data to File...'
        OnClick = Save1Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object SaveLogas1: TMenuItem
        Caption = 'Save Log as...'
        OnClick = SaveLogas1Click
      end
      object Exit1: TMenuItem
        Caption = 'Exit'
        OnClick = Exit1Click
      end
    end
    object Edit3: TMenuItem
      Caption = 'Edit'
      object LockFuses1: TMenuItem
        Caption = 'Configuration word...'
        OnClick = LockFuses1Click
      end
    end
    object ChipSelect1: TMenuItem
      Caption = 'Chip Select'
      object PIC121: TMenuItem
        Caption = 'PIC12...'
        object N7: TMenuItem
          Caption = '...'
          object PIC12F6091: TMenuItem
            Caption = 'PIC12F609'
            OnClick = PIC12F6091Click
          end
          object PIC12F6151: TMenuItem
            Caption = 'PIC12F615'
            OnClick = PIC12F6151Click
          end
          object PIC12F6171: TMenuItem
            Caption = 'PIC12F617'
            OnClick = PIC12F6171Click
          end
          object PIC12F6291: TMenuItem
            Caption = 'PIC12F629'
            OnClick = PIC12F6291Click
          end
          object PIC12F6351: TMenuItem
            Caption = 'PIC12F635'
            OnClick = PIC12F6351Click
          end
          object PIC12F6751: TMenuItem
            Caption = 'PIC12F675'
            OnClick = PIC12F6751Click
          end
          object PIC12F6831: TMenuItem
            Caption = 'PIC12F683'
            OnClick = PIC12F6831Click
          end
          object PIC12F7521: TMenuItem
            Caption = 'PIC12F752'
            OnClick = PIC12F7521Click
          end
        end
        object PIC12F15011: TMenuItem
          Caption = 'PIC12F1501'
          OnClick = PIC12F15011Click
        end
        object PIC12LF15011: TMenuItem
          Caption = 'PIC12LF1501'
          OnClick = PIC12LF15011Click
        end
        object PIC12F18221: TMenuItem
          Caption = 'PIC12F1822'
          OnClick = PIC12F18221Click
        end
        object PIC12LF18221: TMenuItem
          Caption = 'PIC12LF1822'
          OnClick = PIC12LF18221Click
        end
        object PIC12F18401: TMenuItem
          Caption = 'PIC12F1840'
          OnClick = PIC12F18401Click
        end
        object PIC12LF18401: TMenuItem
          Caption = 'PIC12LF1840'
          OnClick = PIC12LF18401Click
        end
      end
      object AVRtiny1: TMenuItem
        Caption = 'PIC16...'
        object N6: TMenuItem
          Caption = '...'
          object N8: TMenuItem
            Caption = '...'
            object N9: TMenuItem
              Caption = '...'
              object PIC16F8821: TMenuItem
                Caption = 'PIC16F882'
                OnClick = PIC16F8821Click
              end
              object PIC16F8831: TMenuItem
                Caption = 'PIC16F883'
                OnClick = PIC16F8831Click
              end
              object PIC16F8841: TMenuItem
                Caption = 'PIC16F884'
                OnClick = PIC16F8841Click
              end
              object PIC16F8861: TMenuItem
                Caption = 'PIC16F886'
                OnClick = PIC16F8861Click
              end
              object PIC16F8871: TMenuItem
                Caption = 'PIC16F887'
                OnClick = PIC16F8871Click
              end
            end
            object PIC16F7071: TMenuItem
              Caption = 'PIC16F707'
              OnClick = PIC16F7071Click
            end
            object PIC16LF7071: TMenuItem
              Caption = 'PIC16LF707'
              OnClick = PIC16LF7071Click
            end
            object PIC16F7201: TMenuItem
              Caption = 'PIC16F720'
              OnClick = PIC16F7201Click
            end
            object PIC16LF7201: TMenuItem
              Caption = 'PIC16LF720'
              OnClick = PIC16LF7201Click
            end
            object PIC16F7211: TMenuItem
              Caption = 'PIC16F721'
              OnClick = PIC16F7211Click
            end
            object PIC16LF7211: TMenuItem
              Caption = 'PIC16LF721'
              OnClick = PIC16LF7211Click
            end
            object PIC16F7221: TMenuItem
              Caption = 'PIC16F722'
              OnClick = PIC16F7221Click
            end
            object PIC16LF7221: TMenuItem
              Caption = 'PIC16LF722'
              OnClick = PIC16LF7221Click
            end
            object PIC16F722A1: TMenuItem
              Caption = 'PIC16F722A'
              OnClick = PIC16F722A1Click
            end
            object PIC16LF722A1: TMenuItem
              Caption = 'PIC16LF722A'
              OnClick = PIC16LF722A1Click
            end
            object PIC16F7231: TMenuItem
              Caption = 'PIC16F723'
              OnClick = PIC16F7231Click
            end
            object PIC16LF7231: TMenuItem
              Caption = 'PIC16LF723'
              OnClick = PIC16LF7231Click
            end
            object PIC16F723A1: TMenuItem
              Caption = 'PIC16F723A'
              OnClick = PIC16F723A1Click
            end
            object PIC16LF723A1: TMenuItem
              Caption = 'PIC16LF723A'
              OnClick = PIC16LF723A1Click
            end
            object PIC16F7241: TMenuItem
              Caption = 'PIC16F724'
              OnClick = PIC16F7241Click
            end
            object PIC16LF7241: TMenuItem
              Caption = 'PIC16LF724'
              OnClick = PIC16LF7241Click
            end
            object PIC16F7261: TMenuItem
              Caption = 'PIC16F726'
              OnClick = PIC16F7261Click
            end
            object PIC16LF7261: TMenuItem
              Caption = 'PIC16LF726'
              OnClick = PIC16LF7261Click
            end
            object PIC16F7271: TMenuItem
              Caption = 'PIC16F727'
              OnClick = PIC16F7271Click
            end
            object PIC16LF7271: TMenuItem
              Caption = 'PIC16LF727'
              OnClick = PIC16LF7271Click
            end
            object PIC16F7531: TMenuItem
              Caption = 'PIC16F753'
              OnClick = PIC16F7531Click
            end
            object PIC16F7851: TMenuItem
              Caption = 'PIC16F785'
              OnClick = PIC16F7851Click
            end
          end
          object PIC16F6101: TMenuItem
            Caption = 'PIC16F610'
            OnClick = PIC16F6101Click
          end
          object PIC16F6161: TMenuItem
            Caption = 'PIC16F616'
            OnClick = PIC16F6161Click
          end
          object PIC16F627A1: TMenuItem
            Caption = 'PIC16F627A'
            OnClick = PIC16F627A1Click
          end
          object PIC16F628A1: TMenuItem
            Caption = 'PIC16F628A'
            OnClick = PIC16F628A1Click
          end
          object PIC16F6301: TMenuItem
            Caption = 'PIC16F630'
            OnClick = PIC16F6301Click
          end
          object PIC16F6311: TMenuItem
            Caption = 'PIC16F631'
            OnClick = PIC16F6311Click
          end
          object PIC16F6361: TMenuItem
            Caption = 'PIC16F636 / 639'
            OnClick = PIC16F6361Click
          end
          object PIC16F648A1: TMenuItem
            Caption = 'PIC16F648A'
            OnClick = PIC16F648A1Click
          end
          object PIC16F6761: TMenuItem
            Caption = 'PIC16F676'
            OnClick = PIC16F6761Click
          end
          object PIC16F6771: TMenuItem
            Caption = 'PIC16F677'
            OnClick = PIC16F6771Click
          end
          object PIC16F6841: TMenuItem
            Caption = 'PIC16F684'
            OnClick = PIC16F6841Click
          end
          object PIC16F6851: TMenuItem
            Caption = 'PIC16F685'
            OnClick = PIC16F6851Click
          end
          object PIC16F6871: TMenuItem
            Caption = 'PIC16F687'
            OnClick = PIC16F6871Click
          end
          object PIC16F6881: TMenuItem
            Caption = 'PIC16F688'
            OnClick = PIC16F6881Click
          end
          object PIC16F6891: TMenuItem
            Caption = 'PIC16F689'
            OnClick = PIC16F6891Click
          end
          object PIC16F6901: TMenuItem
            Caption = 'PIC16F690'
            OnClick = PIC16F6901Click
          end
        end
        object PIC16F15031: TMenuItem
          Caption = 'PIC16F1503'
          OnClick = PIC16F15031Click
        end
        object PIC16LF15031: TMenuItem
          Caption = 'PIC16LF1503'
          OnClick = PIC16LF15031Click
        end
        object PIC16F15071: TMenuItem
          Caption = 'PIC16F1507'
          OnClick = PIC16F15071Click
        end
        object PIC16LF15071: TMenuItem
          Caption = 'PIC16LF1507'
          OnClick = PIC16LF15071Click
        end
        object PIC16F15081: TMenuItem
          Caption = 'PIC16F1508'
          OnClick = PIC16F15081Click
        end
        object PIC16LF15081: TMenuItem
          Caption = 'PIC16LF1508'
          OnClick = PIC16LF15081Click
        end
        object PIC16F15091: TMenuItem
          Caption = 'PIC16F1509'
          OnClick = PIC16F15091Click
        end
        object PIC16LF15091: TMenuItem
          Caption = 'PIC16LF1509'
          OnClick = PIC16LF15091Click
        end
        object PIC16F18231: TMenuItem
          Caption = 'PIC16F1823'
          OnClick = PIC16F18231Click
        end
        object PIC16LF18231: TMenuItem
          Caption = 'PIC16LF1823'
          OnClick = PIC16LF18231Click
        end
        object PIC16F18241: TMenuItem
          Caption = 'PIC16F1824'
          OnClick = PIC16F18241Click
        end
        object PIC16LF18241: TMenuItem
          Caption = 'PIC16LF1824'
          OnClick = PIC16LF18241Click
        end
        object PIC16F18251: TMenuItem
          Caption = 'PIC16F1825'
          OnClick = PIC16F18251Click
        end
        object PIC16LF18251: TMenuItem
          Caption = 'PIC16LF1825'
          OnClick = PIC16LF18251Click
        end
        object PIC16F18261: TMenuItem
          Caption = 'PIC16F1826'
          OnClick = PIC16F18261Click
        end
        object PIC16LF18261: TMenuItem
          Caption = 'PIC16LF1826'
          OnClick = PIC16LF18261Click
        end
        object PIC16F18271: TMenuItem
          Caption = 'PIC16F1827'
          OnClick = PIC16F18271Click
        end
        object PIC16LF18271: TMenuItem
          Caption = 'PIC16LF1827'
          OnClick = PIC16LF18271Click
        end
        object PIC16F18281: TMenuItem
          Caption = 'PIC16F1828'
          OnClick = PIC16F18281Click
        end
        object PIC16LF18281: TMenuItem
          Caption = 'PIC16LF1828'
          OnClick = PIC16LF18281Click
        end
        object PIC16F18291: TMenuItem
          Caption = 'PIC16F1829'
          OnClick = PIC16F18291Click
        end
        object PIC16LF18291: TMenuItem
          Caption = 'PIC16LF1829'
          OnClick = PIC16LF18291Click
        end
        object PIC16F18471: TMenuItem
          Caption = 'PIC16F1847'
          OnClick = PIC16F18471Click
        end
        object PIC16LF18471: TMenuItem
          Caption = 'PIC16LF1847'
          OnClick = PIC16LF18471Click
        end
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      object About1: TMenuItem
        Caption = 'About Program'
        OnClick = About1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object RH0010Connection1: TMenuItem
        Caption = 'How to connect...'
        OnClick = RH0010Connection1Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.hex|*.hex|*.eep|*.eep|*.bin|*.bin'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
    Left = 40
    Top = 592
  end
  object SaveDialog1: TSaveDialog
    Filter = '*.hex|*.hex|*.eep|*.eep|*.bin|*.bin'
    Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
    Left = 72
    Top = 592
  end
end
