object MainForm: TMainForm
  Left = 254
  Top = 197
  Width = 546
  Height = 375
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = True
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 0
    Top = 170
    Width = 538
    Height = 3
    Cursor = crVSplit
    Align = alBottom
  end
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 538
    Height = 170
    Align = alClient
    ScrollBars = ssVertical
    TabOrder = 0
    OnChange = Memo1Change
  end
  object Memo2: TMemo
    Left = 0
    Top = 173
    Width = 538
    Height = 156
    Align = alBottom
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 1
  end
  object MainMenu1: TMainMenu
    Left = 104
    Top = 32
    object File1: TMenuItem
      Caption = '&File'
      object New1: TMenuItem
        Caption = '&New'
        OnClick = New1Click
      end
      object Open1: TMenuItem
        Caption = '&Open...'
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = '&Save'
        OnClick = Save1Click
      end
      object SaveAs1: TMenuItem
        Caption = 'Save &As...'
        OnClick = SaveAs1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Toosl1: TMenuItem
      Caption = '&Script'
      object Compile1: TMenuItem
        Caption = '&Compile'
        ShortCut = 120
        OnClick = Compile1Click
      end
      object CompilewithTimer1: TMenuItem
        Caption = 'Compile with &Timer'
        OnClick = CompilewithTimer1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Stop1: TMenuItem
        Caption = '&Stop'
        ShortCut = 16497
        OnClick = Stop1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object CompileandDisassemble1: TMenuItem
        Caption = 'Compile and &Disassemble'
        OnClick = CompileandDisassemble1Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'ifps3'
    FileName = '*.ifps3'
    Filter = 'IFPS3 files (*.ifps3)|*.ifps3'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Left = 200
    Top = 152
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'ifps3'
    FileName = '*.ifps3'
    Filter = 'IFPS3 files (*.ifps3)|*.ifps3'
    Options = [ofHideReadOnly, ofPathMustExist]
    Left = 232
    Top = 152
  end
end