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