object InterpreterForm: TInterpreterForm
  Left = 262
  Height = 509
  Top = 127
  Width = 762
  Caption = 'Interpretter'
  ClientHeight = 509
  ClientWidth = 762
  OnHide = FormHide
  OnShow = FormShow
  LCLVersion = '0.9.31'
  object Panel3: TPanel
    Left = 0
    Height = 483
    Top = 26
    Width = 323
    Align = alLeft
    BevelOuter = bvNone
    ClientHeight = 483
    ClientWidth = 323
    TabOrder = 0
    object Panel1: TPanel
      Left = 0
      Height = 242
      Top = 0
      Width = 323
      Align = alTop
      BevelOuter = bvNone
      ClientHeight = 242
      ClientWidth = 323
      TabOrder = 0
      object MemoInput: TMemo
        Left = 8
        Height = 210
        Top = 22
        Width = 309
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.Height = -12
        Font.Name = 'Courier New'
        OnKeyPress = MemoInputKeyPress
        ParentFont = False
        ScrollBars = ssAutoBoth
        TabOrder = 0
      end
      object Label1: TLabel
        Left = 8
        Height = 18
        Top = 8
        Width = 38
        Caption = 'Input:'
        ParentColor = False
      end
    end
    object Splitter1: TSplitter
      Cursor = crVSplit
      Left = 0
      Height = 5
      Top = 242
      Width = 323
      Align = alTop
      ResizeAnchor = akTop
    end
    object Panel2: TPanel
      Left = 0
      Height = 236
      Top = 247
      Width = 323
      Align = alClient
      BevelOuter = bvNone
      ClientHeight = 236
      ClientWidth = 323
      TabOrder = 2
      object Label2: TLabel
        Left = 8
        Height = 18
        Top = 6
        Width = 49
        Caption = 'Output:'
        ParentColor = False
      end
      object MemoOutput: TMemo
        Left = 8
        Height = 211
        Top = 22
        Width = 309
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.Height = -12
        Font.Name = 'Courier New'
        ParentFont = False
        ScrollBars = ssAutoBoth
        TabOrder = 0
      end
    end
  end
  object Splitter2: TSplitter
    Left = 323
    Height = 483
    Top = 26
    Width = 5
  end
  object Panel4: TPanel
    Left = 328
    Height = 483
    Top = 26
    Width = 434
    Align = alClient
    BevelOuter = bvNone
    ClientHeight = 483
    ClientWidth = 434
    TabOrder = 2
    object Label3: TLabel
      Left = 1
      Height = 18
      Top = 8
      Width = 110
      Caption = 'Program pointer:'
      ParentColor = False
    end
    object LabelProgramPointer: TLabel
      Left = 112
      Height = 18
      Top = 8
      Width = 13
      Caption = '   '
      ParentColor = False
    end
    object Label5: TLabel
      Left = 1
      Height = 18
      Top = 24
      Width = 108
      Caption = 'Memory pointer:'
      ParentColor = False
    end
    object LabelMemoryPointer: TLabel
      Left = 112
      Height = 18
      Top = 24
      Width = 13
      Caption = '   '
      ParentColor = False
    end
    object Label4: TLabel
      Left = 1
      Height = 18
      Top = 42
      Width = 87
      Caption = 'Step counter:'
      ParentColor = False
    end
    object LabelStepCounter: TLabel
      Left = 112
      Height = 18
      Top = 42
      Width = 13
      Caption = '   '
      ParentColor = False
    end
    object ListViewMemory: TListView
      Left = 1
      Height = 358
      Top = 120
      Width = 429
      Anchors = [akTop, akLeft, akRight, akBottom]
      Columns = <      
        item
          Caption = 'Address'
          Width = 80
        end      
        item
          Caption = 'Data'
          Width = 330
        end>
      Font.Height = -11
      Font.Name = 'Courier New'
      OwnerData = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      ViewStyle = vsReport
      OnData = ListViewMemoryData
    end
    object Label6: TLabel
      Left = 8
      Height = 18
      Top = 104
      Width = 57
      Caption = 'Memory:'
      ParentColor = False
    end
    object Label7: TLabel
      Left = 1
      Height = 18
      Top = 62
      Width = 45
      Caption = 'Speed:'
      ParentColor = False
    end
    object LabelStepSpeed: TLabel
      Left = 112
      Height = 18
      Top = 62
      Width = 13
      Caption = '   '
      ParentColor = False
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Height = 26
    Top = 0
    Width = 762
    Images = MainForm.ImageList1
    TabOrder = 3
    object ToolButton1: TToolButton
      Left = 1
      Top = 2
      Action = MainForm.AProgramRun
    end
    object ToolButton2: TToolButton
      Left = 24
      Top = 2
      Action = MainForm.AProgramPause
    end
    object ToolButton3: TToolButton
      Left = 47
      Top = 2
      Action = MainForm.AProgramStop
    end
    object ToolButton4: TToolButton
      Left = 70
      Top = 2
      Action = MainForm.AInterpretterRunToCursor
    end
    object ToolButton5: TToolButton
      Left = 93
      Top = 2
      Action = MainForm.AInterpretterStepInto
    end
    object ToolButton6: TToolButton
      Left = 116
      Top = 2
      Action = MainForm.AInterpretterStepOut
    end
    object ToolButton7: TToolButton
      Left = 139
      Top = 2
      Action = MainForm.AInterpretterStopOver
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    left = 495
    top = 61
  end
end