object FormAssembler: TFormAssembler
  Left = 474
  Height = 648
  Top = 313
  Width = 846
  Caption = 'Assembler'
  ClientHeight = 648
  ClientWidth = 846
  DesignTimePPI = 144
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  LCLVersion = '2.0.2.0'
  object MemoSource: TMemo
    Left = 10
    Height = 459
    Top = 10
    Width = 829
    Anchors = [akTop, akLeft, akRight, akBottom]
    Lines.Strings = (
      '  // Print Hello world text'
      '  LDI R1, HelloWorld'
      '  LDI R2, 13'
      '  CALL Print'
      '  HALT'
      ''
      'Print:'
      '  PUSH R3'
      '  PUSH R2'
      '  PUSH R1'
      'PrintLoop:'
      '  LDM R3, R1'
      '  OUT (0), R3'
      '  INC R1'
      '  DEC R2'
      '  TESTNZ R2'
      '  JRC PrintLoop'
      '  POP R1'
      '  POP R2'
      '  POP R3'
      '  RET'
      'HelloWorld:'
      '  STRING ''Hello_World!'''
    )
    ParentFont = False
    ScrollBars = ssAutoBoth
    TabOrder = 0
  end
  object ButtonLoadFromFile: TButton
    Left = 10
    Height = 37
    Top = 603
    Width = 163
    Anchors = [akLeft, akBottom]
    Caption = 'Load from file'
    OnClick = ButtonLoadFromFileClick
    ParentFont = False
    TabOrder = 1
  end
  object ButtonSaveToFile: TButton
    Left = 192
    Height = 37
    Top = 603
    Width = 154
    Anchors = [akLeft, akBottom]
    Caption = 'Save to file'
    OnClick = ButtonSaveToFileClick
    ParentFont = False
    TabOrder = 2
  end
  object ButtonCompile: TButton
    Left = 356
    Height = 37
    Top = 603
    Width = 151
    Anchors = [akLeft, akBottom]
    Caption = 'Compile'
    OnClick = ButtonCompileClick
    ParentFont = False
    TabOrder = 3
  end
  object MemoMessages: TMemo
    Left = 10
    Height = 116
    Top = 483
    Width = 826
    Anchors = [akLeft, akRight, akBottom]
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssAutoBoth
    TabOrder = 4
  end
  object OpenDialog1: TOpenDialog
    left = 137
    top = 182
  end
  object SaveDialog1: TSaveDialog
    left = 455
    top = 182
  end
end