rmmain.lfm

object RMMainForm: TRMMainForm
  Left = 335
  Height = 859
  Top = 197
  Width = 1600
  Align = alClient
  Caption = 'Raster Master'
  ClientHeight = 859
  ClientWidth = 1600
  DefaultMonitor = dmDesktop
  KeyPreview = True
  Menu = MainMenu1
  Position = poDefault
  LCLVersion = '4.8.0.0'
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  object RightPanel: TPanel
    AnchorSideLeft.Control = RightHSplitter
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = StatusBar
    Left = 1409
    Height = 836
    Top = 0
    Width = 191
    Anchors = [akTop, akLeft, akRight, akBottom]
    ClientHeight = 836
    ClientWidth = 191
    TabOrder = 5
    object RMPanel: TPanel
      AnchorSideLeft.Control = RightPanel
      AnchorSideRight.Control = RightPanel
      AnchorSideRight.Side = asrBottom
      AnchorSideBottom.Control = RightPanel
      AnchorSideBottom.Side = asrBottom
      Cursor = crNo
      Left = 8
      Height = 121
      Hint = 'Click To Hide Logo'
      Top = 700
      Width = 158
      Anchors = [akLeft, akBottom]
      BorderSpacing.Left = 7
      BorderSpacing.Right = 15
      BorderSpacing.Bottom = 14
      ClientHeight = 121
      ClientWidth = 158
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = RMPanelClick
      object RMLogo: TImage
        AnchorSideTop.Control = RMPanel
        Cursor = crHandPoint
        Left = 16
        Height = 64
        Hint = 'Click Me! And Subscribe to my YouTube Channel!'
        Top = 17
        Width = 128
        AutoSize = True
        BorderSpacing.Top = 16
        ParentShowHint = False
        ShowHint = True
        StretchOutEnabled = False
        StretchInEnabled = False
        Transparent = True
        OnClick = RMLogoClick
      end
    end
    object ColorPalette1: TColorPalette
      Left = 8
      Height = 234
      Top = 120
      Width = 60
      ButtonHeight = 30
      ButtonWidth = 30
      ColumnCount = 8
      Flipped = True
      PickedIndex = 0
      SelectionColor = clWhite
      SelectionKind = pskThickInverted
      OnColorPick = ColorPalette1ColorPick
      OnGetHintText = ColorPalette1GetHintText
      ParentColor = False
      ParentShowHint = False
      ShowHint = True
    end
    object Panel1: TPanel
      Left = 8
      Height = 110
      Top = 1
      Width = 136
      ClientHeight = 110
      ClientWidth = 136
      TabOrder = 1
      object ColorBox1: TShape
        Left = 8
        Height = 64
        Top = 8
        Width = 60
        Brush.Color = clSkyBlue
        ParentShowHint = False
        Pen.Color = clRed
        Pen.Width = 3
        ShowHint = True
        OnMouseDown = ColorBox1MouseDown
        OnMouseEnter = ColorBox1MouseEnter
      end
      object ColorBox2: TShape
        Left = 72
        Height = 64
        Top = 7
        Width = 56
        Brush.Color = clSkyBlue
        ParentShowHint = False
        ShowHint = True
        OnMouseDown = ColorBox2MouseDown
        OnMouseEnter = ColorBox2MouseEnter
      end
      object EditColorBox1: TButton
        Left = 8
        Height = 25
        Hint = 'Edit Color 1'
        Top = 80
        Width = 60
        Caption = 'Edit'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = EditColorBox1Click
      end
      object EditColorBox2: TButton
        Left = 72
        Height = 25
        Hint = 'Edit Color 2'
        Top = 80
        Width = 60
        Caption = 'Edit'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = EditColorBox2Click
      end
    end
  end
  object MiddleBottomPanel: TPanel
    AnchorSideLeft.Control = LeftHSplitter
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = MiddleTopPanel
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = RightHSplitter
    AnchorSideBottom.Control = StatusBar
    Left = 292
    Height = 700
    Top = 136
    Width = 1106
    Anchors = [akTop, akLeft, akRight, akBottom]
    BevelOuter = bvNone
    ClientHeight = 700
    ClientWidth = 1106
    TabOrder = 1
    object ZoomScrollBox: TScrollBox
      AnchorSideLeft.Control = MiddleBottomPanel
      AnchorSideTop.Control = MiddleBottomPanel
      AnchorSideBottom.Control = MiddleBottomPanel
      Left = 0
      Height = 700
      Top = 0
      Width = 1106
      HorzScrollBar.Increment = 93
      HorzScrollBar.Page = 862
      HorzScrollBar.Tracking = True
      VertScrollBar.Increment = 69
      VertScrollBar.Page = 1
      VertScrollBar.Tracking = True
      Align = alClient
      Anchors = [akRight, akBottom]
      BorderStyle = bsNone
      ClientHeight = 700
      ClientWidth = 1106
      TabOrder = 0
      OnMouseWheel = ZoomScrollBoxMouseWheel
      object ZoomPaintBox: TPaintBox
        AnchorSideLeft.Control = ZoomScrollBox
        AnchorSideTop.Control = ZoomScrollBox
        AnchorSideBottom.Control = ZoomScrollBox
        Cursor = crCross
        Left = 0
        Height = 0
        Top = 0
        Width = 862
        OnClick = ZoomPaintBoxClick
        OnMouseDown = ZPaintBoxMouseDown
        OnMouseEnter = ZoomPaintBoxMouseEnter
        OnMouseLeave = ZoomPaintBoxMouseLeave
        OnMouseMove = ZPaintBoxMouseMove
        OnMouseUp = ZPaintBoxMouseUp
        OnPaint = ZoomPaintBoxPaint
      end
    end
  end
  object LeftPanel: TPanel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = LeftHSplitter
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = StatusBar
    Left = 0
    Height = 836
    Top = 0
    Width = 292
    Anchors = [akTop, akLeft, akRight, akBottom]
    BevelOuter = bvNone
    ClientHeight = 836
    ClientWidth = 292
    TabOrder = 0
    object LeftVSplitter: TSplitter
      AnchorSideLeft.Control = LeftPanel
      AnchorSideTop.Control = ActualPane
      AnchorSideTop.Side = asrBottom
      AnchorSideRight.Control = LeftPanel
      AnchorSideRight.Side = asrCenter
      AnchorSideBottom.Control = ListView1
      Cursor = crVSplit
      Left = 0
      Height = 13
      Hint = 'Drag Bar To Resize View'
      Top = 273
      Width = 292
      Align = alNone
      Anchors = [akLeft, akRight]
      Color = 11625216
      ParentColor = False
      ParentShowHint = False
      ResizeAnchor = akBottom
      ShowHint = True
    end
    object ListView1: TListView
      AnchorSideLeft.Control = LeftPanel
      AnchorSideTop.Control = LeftVSplitter
      AnchorSideTop.Side = asrBottom
      AnchorSideRight.Control = LeftPanel
      AnchorSideRight.Side = asrBottom
      AnchorSideBottom.Control = SpriteHitBoxPanel
      Left = 0
      Height = 390
      Top = 286
      Width = 281
      Anchors = [akTop, akLeft, akRight, akBottom]
      BorderSpacing.Right = 11
      Color = 15790320
      Columns = <>
      IconOptions.AutoArrange = True
      LargeImages = ImageList1
      LargeImagesWidth = 128
      PopupMenu = ExportPropsMenu
      ReadOnly = True
      TabOrder = 1
      ViewStyle = vsIcon
      OnClick = ListView1Click
    end
    object SpriteHitBoxPanel: TPanel
      AnchorSideLeft.Control = LeftPanel
      AnchorSideRight.Control = LeftPanel
      AnchorSideRight.Side = asrBottom
      AnchorSideBottom.Control = LeftPanel
      AnchorSideBottom.Side = asrBottom
      Left = 0
      Height = 160
      Top = 676
      Width = 281
      Anchors = [akLeft, akRight, akBottom]
      BorderSpacing.Right = 11
      BevelOuter = bvNone
      ClientHeight = 160
      ClientWidth = 281
      TabOrder = 3
      object SpriteHitBoxHeader: TPanel
        Left = 0
        Height = 20
        Top = 0
        Width = 281
        Align = alTop
        Alignment = taLeftJustify
        BevelOuter = bvNone
        Caption = ' Hit Boxes'
        Color = 11625216
        ParentBackground = False
        ParentColor = False
        TabOrder = 0
      end
      object SpriteHitBoxButtons: TPanel
        Left = 0
        Height = 28
        Top = 132
        Width = 281
        Align = alBottom
        BevelOuter = bvNone
        ClientHeight = 28
        ClientWidth = 281
        TabOrder = 1
        object BtnSprHBAdd: TButton
          Left = 2
          Height = 24
          Hint = 'Add a hit box from the selected area'
          Top = 2
          Width = 30
          Caption = '+'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = BtnSprHBAddClick
        end
        object BtnSprHBDel: TButton
          Left = 34
          Height = 24
          Hint = 'Delete the selected hit box'
          Top = 2
          Width = 30
          Caption = '-'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnClick = BtnSprHBDelClick
        end
        object BtnSprHBClear: TButton
          Left = 66
          Height = 24
          Hint = 'Delete every hit box on this sprite'
          Top = 2
          Width = 76
          Caption = 'Delete All'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          OnClick = BtnSprHBClearClick
        end
        object BtnSprHBShow: TButton
          Left = 144
          Height = 24
          Hint = 'Show or hide the hit box overlay'
          Top = 2
          Width = 60
          Caption = 'Show'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          OnClick = BtnSprHBShowClick
        end
      end
      object SpriteHitBoxList: TListView
        Left = 0
        Height = 112
        Top = 20
        Width = 281
        Align = alClient
        Columns = <        
          item
            Caption = '#'
            Width = 26
          end        
          item
            Caption = 'X'
            Width = 38
          end        
          item
            Caption = 'Y'
            Width = 38
          end        
          item
            Caption = 'X2'
            Width = 38
          end        
          item
            Caption = 'Y2'
            Width = 38
          end        
          item
            Caption = 'Size'
            Width = 70
          end>
        ReadOnly = True
        RowSelect = True
        TabOrder = 2
        ToolTips = False
        ViewStyle = vsReport
        OnClick = SpriteHitBoxListClick
      end
    end
    object ActualPane: TPanel
      AnchorSideLeft.Control = LeftPanel
      AnchorSideTop.Control = LeftPanel
      AnchorSideRight.Control = LeftPanel
      AnchorSideRight.Side = asrBottom
      AnchorSideBottom.Control = LeftVSplitter
      Left = 0
      Height = 273
      Top = 0
      Width = 277
      Anchors = [akTop, akLeft, akRight, akBottom]
      BorderSpacing.Right = 15
      BevelOuter = bvNone
      ClientHeight = 273
      ClientWidth = 277
      TabOrder = 0
      object ActualBox: TImage
        Left = 16
        Height = 256
        Top = 8
        Width = 256
      end
    end
  end
  object LeftHSplitter: TSplitter
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideBottom.Control = StatusBar
    AnchorSideBottom.Side = asrBottom
    Left = 281
    Height = 859
    Hint = 'Drag Bar To Resize View'
    Top = 0
    Width = 11
    Align = alNone
    Anchors = [akTop, akBottom]
    Color = 11625216
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
  end
  object RightHSplitter: TSplitter
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideBottom.Control = StatusBar
    AnchorSideBottom.Side = asrBottom
    Left = 1398
    Height = 859
    Hint = 'Drag Bar To Resize View'
    Top = 0
    Width = 11
    Align = alNone
    Anchors = [akTop, akBottom]
    Color = 11625216
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
  end
  object MiddleTopPanel: TPanel
    AnchorSideLeft.Control = LeftHSplitter
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = RightHSplitter
    Left = 292
    Height = 136
    Top = 0
    Width = 1106
    Anchors = [akTop, akLeft, akRight]
    ClientHeight = 136
    ClientWidth = 1106
    TabOrder = 2
    object DitherPatternPanel: TPanel
      AnchorSideLeft.Control = MiddleTopPanel
      AnchorSideTop.Control = MiddleTopPanel
      AnchorSideRight.Control = ToolPanel
      Left = 49
      Height = 126
      Top = 8
      Width = 431
      Anchors = [akTop, akRight]
      BorderSpacing.Left = 4
      BorderSpacing.Top = 7
      BorderSpacing.Right = 4
      ClientHeight = 126
      ClientWidth = 431
      TabOrder = 2
      object DitherPatternPaintBox: TPaintBox
        AnchorSideLeft.Control = DitherPatternPanel
        Left = 11
        Height = 108
        Top = 12
        Width = 413
        BorderSpacing.Left = 10
        OnMouseDown = DitherPatternPaintBoxMouseDown
        OnPaint = DitherPatternPaintBoxPaint
      end
    end
    object ToolPanel: TPanel
      AnchorSideTop.Control = MiddleTopPanel
      AnchorSideRight.Control = MiddleTopPanel
      AnchorSideRight.Side = asrBottom
      Left = 484
      Height = 127
      Top = 8
      Width = 571
      Anchors = [akTop, akRight]
      BorderSpacing.Top = 7
      BorderSpacing.Right = 50
      ClientHeight = 127
      ClientWidth = 571
      TabOrder = 0
      object ToolCircleIcon: TImage
        Left = 96
        Height = 32
        Hint = 'Empty Circle'
        Top = 8
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolCircleMenuClick
      end
      object ToolFCircleIcon: TImage
        Left = 96
        Height = 32
        Hint = 'Filled Circle'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolFCircleMenuClick
      end
      object ToolPencilIcon: TImage
        Left = 16
        Height = 32
        Hint = 'Pencil'
        Top = 8
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolPencilMenuClick
      end
      object ToolLineIcon: TImage
        Left = 16
        Height = 32
        Hint = 'Line'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolLineMenuClick
      end
      object ToolRectangleIcon: TImage
        Left = 56
        Height = 32
        Hint = 'Empty Rectangle'
        Top = 8
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolRectangleMenuClick
      end
      object ToolFRectangleIcon: TImage
        Left = 56
        Height = 32
        Hint = 'Filled Rectangle'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolFRectangleMenuClick
      end
      object ToolSprayPaintIcon: TImage
        Left = 176
        Height = 32
        Hint = 'Spray Paint'
        Top = 8
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolMenuSprayPaintClick
      end
      object ToolPaintIcon: TImage
        Left = 176
        Height = 32
        Hint = 'Paint'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolMenuPaintClick
      end
      object ToolGridIcon: TImage
        Left = 216
        Height = 32
        Hint = 'Toggle Grid'
        Top = 7
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolGridMenuClick
      end
      object ToolSelectAreaIcon: TImage
        Left = 216
        Height = 32
        Hint = 'Select Area'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolMenuSelectAreaMenuClick
      end
      object ToolScrollLeftIcon: TImage
        Left = 341
        Height = 32
        Hint = 'Scroll Left'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolScrollLeftMenuClick
      end
      object ToolScrollRightIcon: TImage
        Left = 381
        Height = 32
        Hint = 'Scroll Right'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolScrollRightMenuClick
      end
      object ToolScrollUpIcon: TImage
        Left = 421
        Height = 32
        Hint = 'Scroll Up'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolScrollUpMenuClick
      end
      object ToolScrollDownIcon: TImage
        Left = 461
        Height = 32
        Hint = 'Scroll Down'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolScrollDownMenuClick
      end
      object ToolUndoIcon: TImage
        Left = 461
        Height = 32
        Hint = 'Undo'
        Top = 7
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolUndoIconClick
      end
      object ToolEllipseIcon: TImage
        Left = 136
        Height = 32
        Hint = 'Empty Ellipse'
        Top = 9
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolEllipseMenuClick
      end
      object ToolFEllipseIcon: TImage
        Left = 136
        Height = 32
        Hint = 'Filled Ellipse'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolFEllipseMenuClick
      end
      object ToolTextIcon: TImage
        Left = 296
        Height = 32
        Hint = 'Text'
        Top = 7
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolTextMenuClick
      end
      object ToolFontIcon: TImage
        Left = 296
        Height = 32
        Hint = 'Font Select'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = ToolFontIconClick
      end
      object TextDrawEdit: TEdit
        Left = 341
        Height = 30
        Top = 9
        Width = 112
        AutoSize = False
        Font.Height = -16
        ParentFont = False
        TabOrder = 0
        Text = 'HI!'
        OnChange = TextDrawEditChange
      end
      object ToolVFLIP: TButton
        Left = 504
        Height = 30
        Hint = 'Vertical Flip'
        Top = 8
        Width = 51
        Caption = 'VFLIP'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = ToolFlipVirtMenuClick
      end
      object ToolHFLIP: TButton
        Left = 504
        Height = 30
        Hint = 'Horizontal Flip'
        Top = 48
        Width = 51
        Caption = 'HFLIP'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = ToolFlipHorizMenuClick
      end
      object ToolBrushIcon: TImage
        Left = 256
        Height = 32
        Hint = 'Brush Stamp'
        Top = 7
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = BrushStampToolClick
      end
      object ToolBrushFXIcon: TImage
        Left = 256
        Height = 32
        Hint = 'Brush Effects'
        Top = 48
        Width = 32
        ParentShowHint = False
        ShowHint = True
        OnClick = BrushEffectsClick
      end
      object DrawMethod: TRadioGroup
        Left = 16
        Height = 40
        Hint = 'Use Color 1 and Color 2 for Dither and Gradient '
        Top = 80
        Width = 232
        AutoFill = True
        Caption = 'Draw Method'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 4
        ClientHeight = 20
        ClientWidth = 228
        Columns = 4
        ItemIndex = 0
        Items.Strings = (
          'Color'
          'Brush'
          'Dither'
          'Gradient'
        )
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = DrawMethodClick
      end
      object GradientMethod: TComboBox
        Left = 256
        Height = 23
        Hint = 'Gradient Direction'
        Top = 97
        Width = 100
        ItemHeight = 15
        ItemIndex = 0
        Items.Strings = (
          'Horizontal'
          'Vertical'
          'Circular'
        )
        ParentShowHint = False
        ShowHint = True
        Style = csDropDownList
        TabOrder = 4
        Text = 'Horizontal'
        OnChange = GradientMethodChange
      end
      object DrawMethodPreview: TPaintBox
        Left = 368
        Height = 32
        Top = 88
        Width = 187
        OnPaint = DrawMethodPreviewPaint
      end
    end
    object ZoomTrackBar: TTrackBar
      Left = 1070
      Height = 134
      Hint = 'Zoom Level'
      Top = 1
      Width = 30
      Max = 20
      Min = 1
      Orientation = trVertical
      Position = 1
      TickMarks = tmTopLeft
      OnChange = ZoomTrackBarChange
      Align = alRight
      BorderSpacing.Right = 5
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Height = 23
    Top = 836
    Width = 1600
    Panels = <    
      item
        Width = 260
      end    
      item
        Width = 280
      end    
      item
        Width = 420
      end    
      item
        Width = 640
      end>
    SimplePanel = False
  end
  object MainMenu1: TMainMenu
    Left = 1176
    Top = 248
    object FileExitMenu: TMenuItem
      Caption = 'File'
      object NewFile: TMenuItem
        Caption = 'New'
        OnClick = NewClick
      end
      object OpenFile: TMenuItem
        Caption = 'Open'
        OnClick = OpenFileClick
      end
      object OpenProjectFile: TMenuItem
        Caption = 'Open Project'
        OnClick = OpenProjectFileClick
      end
      object InsertProjectFile: TMenuItem
        Caption = 'Insert Project'
        OnClick = OpenProjectFileClick
      end
      object OpenProjectJSONFile: TMenuItem
        Caption = 'Open Project (JSON)'
        OnClick = OpenProjectJSONClick
      end
      object InsertProjectJSONFile: TMenuItem
        Caption = 'Insert Project (JSON)'
        OnClick = OpenProjectJSONClick
      end
      object SaveFile: TMenuItem
        Caption = 'Save'
        OnClick = SaveFileClick
      end
      object SaveProjectFile: TMenuItem
        Caption = 'Save Project'
        OnClick = SaveProjectFileClick
      end
      object SaveProjectJSONFile: TMenuItem
        Caption = 'Save Project (JSON)'
        OnClick = SaveProjectJSONClick
      end
      object FileDelete: TMenuItem
        Caption = 'Delete'
        OnClick = FileDeleteClick
      end
      object DeleteAll: TMenuItem
        Caption = 'Delete All'
        OnClick = DeleteAllClick
      end
      object SaveFileAs: TMenuItem
        Caption = 'Save As'
        Enabled = False
        Visible = False
      end
      object MenuItem10: TMenuItem
        Caption = 'Import'
        Enabled = False
        Visible = False
      end
      object MenuItem9: TMenuItem
        Caption = 'Export'
        object ExportRESInclude: TMenuItem
          Caption = 'RES Text Include File'
          OnClick = RESExportClick
        end
        object ExportRESBinary: TMenuItem
          Caption = 'RES Binary File'
          OnClick = RESExportClick
        end
        object ExportTiledSep: TMenuItem
          Caption = '-'
        end
        object ExportTiled: TMenuItem
          Caption = 'Tiled (TMX)'
          object ExportTiledCurrentSheet: TMenuItem
            Caption = 'Current Map - Sprite Sheet'
            OnClick = MenuExportTiledClick
          end
          object ExportTiledAllSheet: TMenuItem
            Tag = 1
            Caption = 'All Maps - Sprite Sheet (shared .tsx)'
            OnClick = MenuExportTiledClick
          end
          object ExportTiledSep2: TMenuItem
            Caption = '-'
          end
          object ExportTiledCurrentColl: TMenuItem
            Tag = 2
            Caption = 'Current Map - Image Collection'
            OnClick = MenuExportTiledClick
          end
          object ExportTiledAllColl: TMenuItem
            Tag = 3
            Caption = 'All Maps - Image Collection (shared .tsx)'
            OnClick = MenuExportTiledClick
          end
        end
        object ExportTiledSep3: TMenuItem
          Caption = '-'
        end
        object ExportJSONSprite: TMenuItem
          Caption = 'JSON'
          OnClick = ExportJSONSpriteClick
        end
        object ExportJSONRES: TMenuItem
          Caption = 'JSON RES'
          OnClick = ExportJSONRESClick
        end
        object AmigaBasic: TMenuItem
          Caption = 'AmigaBasic'
          object ABPutData: TMenuItem
            Caption = 'Put Data Statements'
            OnClick = AmigaBasicClick
          end
          object ABPutPlusMaskData: TMenuItem
            Caption = 'Put+Mask Data Statements'
            OnClick = AmigaBasicClick
          end
          object ABBobData: TMenuItem
            Caption = 'Bob Data Statements'
            OnClick = AmigaBasicClick
          end
          object ABVSpriteData: TMenuItem
            Caption = 'VSprite Data Statements'
            OnClick = AmigaBasicClick
          end
          object ABPutFile: TMenuItem
            Caption = 'Put File'
            OnClick = AmigaBasicClick
          end
          object ABBobFile: TMenuItem
            Caption = 'Bob File'
            OnClick = AmigaBasicClick
          end
          object ABVSpriteFile: TMenuItem
            Caption = 'VSprite File'
            OnClick = AmigaBasicClick
          end
        end
        object AmigaC: TMenuItem
          Caption = 'Amiga C'
          object CBOBBitmapArray: TMenuItem
            Caption = 'Bob Bitmap Array'
            OnClick = AmigaCClick
          end
          object CVSpriteBitmapArray: TMenuItem
            Caption = 'VSprite Bitmap Array'
            OnClick = AmigaCClick
          end
          object ACBobFile: TMenuItem
            Caption = 'Bob Bitmap File'
            OnClick = AmigaCClick
          end
          object ACVSpriteFile: TMenuItem
            Caption = 'VSprite Bitmap File'
            OnClick = AmigaCClick
          end
        end
        object AmigaPascal: TMenuItem
          Caption = 'Amiga Pascal'
          object PascalBOBBitmapArray: TMenuItem
            Caption = 'Bob Bitmap Array'
            OnClick = AmigaPascalClick
          end
          object PascalVSpriteBitmapArray: TMenuItem
            Caption = 'VSprite Bitmap Array'
            OnClick = AmigaPascalClick
          end
          object PascalBOBBitmapFile: TMenuItem
            Caption = 'Bob Bitmap File'
            OnClick = AmigaPascalClick
          end
          object PascalVSpriteBitmapFile: TMenuItem
            Caption = 'VSprite Bitmap File'
            OnClick = AmigaPascalClick
          end
        end
        object MenuItem13: TMenuItem
          Caption = 'Amiga QuickBasic AQB'
          object AqbPsetBitMap: TMenuItem
            Caption = 'PSet BitMap Data'
            OnClick = AqbPsetBitMapClick
          end
        end
        object MenuItem1: TMenuItem
          Caption = 'BAM Basic'
          object BAMPutData: TMenuItem
            Caption = 'Put Data Statements'
            OnClick = BAMPutDataClick
          end
          object BAMPutPlusMaskData: TMenuItem
            Caption = 'Put+Mask Data Statements'
            OnClick = BAMPutDataClick
          end
          object BAMRGBPutData: TMenuItem
            Caption = 'Put RGB Data Statements'
            OnClick = BAMPutDataClick
          end
        end
        object FreeBASIC: TMenuItem
          Caption = 'FreeBASIC - QB Mode'
          object FBPutData: TMenuItem
            Caption = 'Put Data Statements'
            OnClick = FreeBASICClick
          end
          object FBPutPlusMaskData: TMenuItem
            Caption = 'Put+Mask Data Statements'
            OnClick = FreeBASICClick
          end
          object FBPutFile: TMenuItem
            Caption = 'Put File'
            OnClick = FreeBASICClick
          end
          object FBMouseShapeData: TMenuItem
            Caption = 'Mouse Shape Data Statements'
            OnClick = MouseSaveClick
          end
          object FBMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object MenuItem8: TMenuItem
          Caption = 'FreeBASIC'
          object fbRayLibFuchsia: TMenuItem
            Caption = 'RGBA - Fuchsia Array'
            OnClick = RayLibExportClick
          end
          object fbRayLibIndex0: TMenuItem
            Caption = 'RGBA - Index 0 Array'
            OnClick = RayLibExportClick
          end
          object fbRayLibRGB: TMenuItem
            Caption = 'RGB Array'
            OnClick = RayLibExportClick
          end
        end
        object FreePascal: TMenuItem
          Caption = 'FreePascal'
          object FPPutImageArray: TMenuItem
            Caption = 'PutImage Array'
            OnClick = FreePascalClick
          end
          object FPPutImagePlusMaskArray: TMenuItem
            Caption = 'PutImage+Mask Array'
            OnClick = FreePascalClick
          end
          object FPPutImageFile: TMenuItem
            Caption = 'PutImage File'
            OnClick = FreePascalClick
          end
          object FPMouseShapeArray: TMenuItem
            Caption = 'Mouse Shape Array'
            OnClick = MouseSaveClick
          end
          object FPMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
          object fpRayLibFuchsia: TMenuItem
            Caption = 'RayLib (RGBA - Fuchsia) Array'
            OnClick = RayLibExportClick
          end
          object fpRayLibIndex0: TMenuItem
            Caption = 'RayLib (RGBA - Index 0) Array'
            OnClick = RayLibExportClick
          end
          object fpRayLibCustom: TMenuItem
            Caption = 'RayLib (RGBA - Custom) Array'
            OnClick = RayLibExportClick
          end
          object fpRayLibRGB: TMenuItem
            Caption = 'RayLib (RGB) Array'
            OnClick = RayLibExportClick
          end
        end
        object gcc: TMenuItem
          Caption = 'gcc \ Emscripten'
          object gccRayLibFuchsia: TMenuItem
            Caption = 'RayLib (RGBA - Fuchsia) Array'
            OnClick = RayLibExportClick
          end
          object gccRayLibIndex0: TMenuItem
            Caption = 'RayLib (RGBA - Index 0) Array'
            OnClick = RayLibExportClick
          end
          object gccRayLibCustom: TMenuItem
            Caption = 'RayLib (RGBA - Custom) Array'
            OnClick = RayLibExportClick
          end
          object gccRayLibRGB: TMenuItem
            Caption = 'RayLib (RGB) Array'
            OnClick = RayLibExportClick
          end
        end
        object GWBASIC: TMenuItem
          Caption = 'GWBASIC'
          object GWPutData: TMenuItem
            Caption = 'Put Data Statements'
            OnClick = GWBASICClick
          end
          object GWPutPlusMaskData: TMenuItem
            Caption = 'Put+Mask Data Statements'
            OnClick = GWBASICClick
          end
          object GWPutFile: TMenuItem
            Caption = 'Put File'
            OnClick = GWBASICClick
          end
          object GWMouseShapeData: TMenuItem
            Caption = 'Mouse Shape Data Statements'
            OnClick = MouseSaveClick
          end
          object GWMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object JavaScript: TMenuItem
          Caption = 'JavaScript'
          object TransparentImage: TMenuItem
            Caption = 'Transparent Image Array'
            OnClick = javaScriptArrayClick
          end
          object NonTransparentImage: TMenuItem
            Caption = 'Non Transparent Image Array'
            OnClick = javaScriptArrayClick
          end
        end
        object OpenWatcom: TMenuItem
          Caption = 'Open Watcom C'
          object OWPutImageArray: TMenuItem
            Caption = '_putimage array'
            OnClick = OpenWatcomCClick
          end
          object OWPutImagePlusMaskArray: TMenuItem
            Caption = '_putimage+Mask array'
            OnClick = OpenWatcomCClick
          end
          object OWPutImageFile: TMenuItem
            Caption = '_putimage File'
            OnClick = OpenWatcomCClick
          end
          object OWMouseShapeArray: TMenuItem
            Caption = 'Mouse Shape Array'
            OnClick = MouseSaveClick
          end
          object MenuItem14: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object QuickBasic: TMenuItem
          Caption = 'QBasic\QuickBasic'
          object QBPutData: TMenuItem
            Caption = 'Put Data Statements'
            OnClick = QBasicDataClick
          end
          object QBPutPlusMaskData: TMenuItem
            Caption = 'Put+Mask Data Statements'
            OnClick = QBasicDataClick
          end
          object QBPutFile: TMenuItem
            Caption = 'Put File'
            OnClick = QBasicDataClick
          end
          object QBMouseShapeData: TMenuItem
            Caption = 'Mouse Shape Data Statements'
            OnClick = MouseSaveClick
          end
          object QBMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object QB64: TMenuItem
          Caption = 'QB64'
          object qb64RGBAFuchsia: TMenuItem
            Caption = 'RGBA - Fuchsia Data Statements'
            OnClick = RayLibExportClick
          end
          object qb64RGBAIndex0: TMenuItem
            Caption = 'RGBA - Index 0 Data Statements'
            OnClick = RayLibExportClick
          end
          object qb64RGBACustom: TMenuItem
            Caption = 'RGBA - Custom Data Statements'
            OnClick = RayLibExportClick
          end
          object qb64RGB: TMenuItem
            Caption = 'RGB Data Statements'
            OnClick = RayLibExportClick
          end
        end
        object QBJS: TMenuItem
          Caption = 'QBJS'
          object qbjsRGBAFuchsia: TMenuItem
            Caption = 'RGBA - Fuchsia Data Statements'
            OnClick = RayLibExportClick
          end
          object qbjsRGBAIndex0: TMenuItem
            Caption = 'RGBA - Index 0 Data Statements'
            OnClick = RayLibExportClick
          end
          object qbjsRGBACustom: TMenuItem
            Caption = 'RGBA - Custom Data Statements'
            OnClick = RayLibExportClick
          end
          object qbjsRGB: TMenuItem
            Caption = 'RGB Data Statements'
            OnClick = RayLibExportClick
          end
        end
        object QuickC: TMenuItem
          Caption = 'Quick C'
          object QCPutImageArray: TMenuItem
            Caption = '_putimage array'
            OnClick = QuickCClick
          end
          object QCPutImagePlusMaskArray: TMenuItem
            Caption = '_putimage+Mask array'
            OnClick = QuickCClick
          end
          object QCPutImageFile: TMenuItem
            Caption = '_putimage File'
            OnClick = QuickCClick
          end
          object QCMouseShapeArray: TMenuItem
            Caption = 'Mouse Shape Array'
            OnClick = MouseSaveClick
          end
          object QCMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object QuickPascal: TMenuItem
          Caption = 'Quick Pascal'
          object QPPutImageArray: TMenuItem
            Caption = 'PutImage Array'
            OnClick = QuickPascalClick
          end
          object QPPutImagePlusMaskArray: TMenuItem
            Caption = 'PutImage+Mask Array'
            OnClick = QuickPascalClick
          end
          object QPPutImageFile: TMenuItem
            Caption = 'PutImage File'
            OnClick = QuickPascalClick
          end
          object QPMouseShapeArray: TMenuItem
            Caption = 'Mouse Shape Array'
            OnClick = MouseSaveClick
          end
          object QPMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object TurboBasic: TMenuItem
          Caption = 'Turbo\Power Basic'
          object TBPutData: TMenuItem
            Caption = 'Put Data Statements'
            OnClick = TurboPowerBasicClick
          end
          object TBPutPlusMaskData: TMenuItem
            Caption = 'Put+Mask Data Statements'
            OnClick = TurboPowerBasicClick
          end
          object TBPutFile: TMenuItem
            Caption = 'Put File'
            OnClick = TurboPowerBasicClick
          end
          object TBMouseShapeData: TMenuItem
            Caption = 'Mouse Shape Data Statements'
            OnClick = MouseSaveClick
          end
          object TBMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
        end
        object TurboPascal: TMenuItem
          Caption = 'Turbo Pascal'
          object TPPutImageArray: TMenuItem
            Caption = 'PutImage Array'
            OnClick = TurboPascalClick
          end
          object TPPutImagePlusMaskArray: TMenuItem
            Caption = 'PutImage+Mask Array'
            OnClick = TurboPascalClick
          end
          object TPPutImageFile: TMenuItem
            Caption = 'PutImage File'
            OnClick = TurboPascalClick
          end
          object TPMouseShapeArray: TMenuItem
            Caption = 'Mouse Shape Array'
            OnClick = MouseSaveClick
          end
          object TPMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
          object TPDOSLBMArray: TMenuItem
            Caption = 'DOS Xlib LBM Array'
            OnClick = TurboPascalClick
          end
          object TPDOSLBMFile: TMenuItem
            Caption = 'DOS Xlib LBM File'
            OnClick = TurboPascalClick
          end
          object TPDOSPBMArray: TMenuItem
            Caption = 'DOS Xlib PBM Array'
            OnClick = TurboPascalClick
          end
          object TPDOSPBMFile: TMenuItem
            Caption = 'DOS Xlib PBM File'
            OnClick = TurboPascalClick
          end
        end
        object TurboC: TMenuItem
          Caption = 'Turbo C'
          object TCPutImageArray: TMenuItem
            Caption = 'putimage Array'
            OnClick = TurboCClick
          end
          object TCPutImagePlusMaskArray: TMenuItem
            Caption = 'putimage+Mask Array'
            OnClick = TurboCClick
          end
          object TCPutImageFile: TMenuItem
            Caption = 'putimage File'
            OnClick = TurboCClick
          end
          object TCMouseShapeArray: TMenuItem
            Caption = 'Mouse Shape Array'
            OnClick = MouseSaveClick
          end
          object TCMouseShapeFile: TMenuItem
            Caption = 'Mouse Shape File'
            OnClick = MouseSaveClick
          end
          object TCDOSLBMArray: TMenuItem
            Caption = 'DOS Xlib LBM Array'
            OnClick = TurboCClick
          end
          object TCDOSLBMFile: TMenuItem
            Caption = 'DOS Xlib LBM File'
            OnClick = TurboCClick
          end
          object TCDOSPBMArray: TMenuItem
            Caption = 'DOS Xlib PBM Array'
            OnClick = TurboCClick
          end
          object TCDOSPBMFile: TMenuItem
            Caption = 'DOS Xlib PBM File'
            OnClick = TurboCClick
          end
        end
        object MenuItem12: TMenuItem
          Caption = 'TMT Pascal'
          object TMTPutImageArray: TMenuItem
            Caption = 'PutImage Array'
            OnClick = TMTPascalClick
          end
          object TMTPutImageFile: TMenuItem
            Caption = 'PutImage File'
            OnClick = TMTPascalClick
          end
        end
      end
      object BulkExportPNG: TMenuItem
        Caption = 'Bulk Export PNG''s'
        OnClick = BulkExportPNGClick
      end
      object PropertiesFileDialog: TMenuItem
        Caption = 'Properties'
        OnClick = PropertiesFileDialogClick
      end
      object MenuItem11: TMenuItem
        Caption = 'Exit'
        OnClick = FileExitMenuClick
      end
    end
    object MenuEdit: TMenuItem
      Caption = 'Edit'
      object EditClear: TMenuItem
        Caption = 'Clear'
        OnClick = EditClearClick
      end
      object EditClone: TMenuItem
        Caption = 'Clone'
        OnClick = EditCloneClick
      end
      object EditUndo: TMenuItem
        Caption = 'Undo'
        OnClick = ToolUndoIconClick
      end
      object EditRedo: TMenuItem
        Caption = 'Redo'
        OnClick = EditRedoClick
      end
      object EditCopy: TMenuItem
        Caption = 'Copy'
        OnClick = EditCopyClick
      end
      object EditPaste: TMenuItem
        Caption = 'Paste'
        OnClick = EditPasteClick
      end
      object EditPastePalette: TMenuItem
        Caption = 'Paste (with Palette)'
        OnClick = EditPastePaletteClick
      end
      object EditProperties: TMenuItem
        Caption = 'Properties'
        OnClick = PropertiesClick
      end
    end
    object MenuItem17: TMenuItem
      Caption = 'View'
      object SpriteHitBoxToggle: TMenuItem
        AutoCheck = True
        Caption = 'Show Hit Boxes'
        OnClick = SpriteHitBoxToggleClick
      end
      object SpriteHitBoxListToggle: TMenuItem
        AutoCheck = True
        Caption = 'Show Hit Box List'
        Checked = True
        OnClick = SpriteHitBoxListToggleClick
      end
      object TransparentToggle: TMenuItem
        Caption = 'Show Color 0 Transparent'
        OnClick = TransparentToggleClick
      end
      object rmToggle: TMenuItem
        Caption = 'Hide RM Logo'
        OnClick = rmToggleClick
      end
      object MenuItem18: TMenuItem
        Caption = 'Sprite Size'
        object EditResizeTo8: TMenuItem
          Caption = '8 X 8'
          OnClick = EditResizeToNewSize
        end
        object EditResizeTo16: TMenuItem
          Caption = '16 X 16'
          OnClick = EditResizeToNewSize
        end
        object EditResizeTo32: TMenuItem
          Caption = '32 X 32'
          OnClick = EditResizeToNewSize
        end
        object EditResizeTo64: TMenuItem
          Caption = '64 X 64'
          OnClick = EditResizeToNewSize
        end
        object EditResizeTo128: TMenuItem
          Caption = '128 X 128'
          OnClick = EditResizeToNewSize
        end
        object EditResizeTo256: TMenuItem
          Caption = '256 X 256'
          OnClick = EditResizeToNewSize
        end
        object ShowCustomSize: TMenuItem
          Enabled = False
        end
        object EditResizeCustom: TMenuItem
          Caption = 'Set Custom Size'
          OnClick = EditResizeCustomClick
        end
      end
      object MenuScaleToSize: TMenuItem
        Caption = 'Scale To Size'
        object EditScaleTo8: TMenuItem
          Caption = '8 X 8'
          OnClick = EditScaleToNewSize
        end
        object EditScaleTo16: TMenuItem
          Caption = '16 X 16'
          OnClick = EditScaleToNewSize
        end
        object EditScaleTo32: TMenuItem
          Caption = '32 X 32'
          OnClick = EditScaleToNewSize
        end
        object EditScaleTo64: TMenuItem
          Caption = '64 X 64'
          OnClick = EditScaleToNewSize
        end
        object EditScaleTo128: TMenuItem
          Caption = '128 X 128'
          OnClick = EditScaleToNewSize
        end
        object EditScaleTo256: TMenuItem
          Caption = '256 X 256'
          OnClick = EditScaleToNewSize
        end
        object ShowScaleSize: TMenuItem
          Enabled = False
        end
        object EditScaleCustom: TMenuItem
          Caption = 'Set Custom Size'
          OnClick = EditScaleCustomClick
        end
      end
      object MenuItem27: TMenuItem
        Caption = 'Grid Cell Size'
        object gcNormal: TMenuItem
          Caption = 'Normal (10 X 9)'
          OnClick = SetGridCellClick
        end
        object gcWide: TMenuItem
          Caption = 'Wide (16 X 8)'
          OnClick = SetGridCellClick
        end
        object gcTall: TMenuItem
          Caption = 'Tall (8 X 16)'
          OnClick = SetGridCellClick
        end
        object gcCustomShow: TMenuItem
          Enabled = False
        end
        object gcCustom: TMenuItem
          Caption = 'Set Custom Size'
          OnClick = SetCustomGridCellClick
        end
      end
    end
    object MenuItem4: TMenuItem
      Caption = 'Palette'
      object PaletteCopy: TMenuItem
        Caption = 'Copy'
        OnClick = PaletteCopyClick
      end
      object PalettePaste: TMenuItem
        Caption = 'Paste'
        OnClick = PalettePasteClick
      end
      object PaletteCopyToClipboard: TMenuItem
        Caption = 'Copy To Clipboard'
        OnClick = PaletteCopyJASCClick
      end
      object PalettePasteFromClipboard: TMenuItem
        Caption = 'Paste From Clipboard'
        OnClick = PalettePasteJASCClick
      end
      object PaletteOpen: TMenuItem
        Caption = 'Open'
        OnClick = PaletteOpenClick
      end
      object PaletteSave: TMenuItem
        Caption = 'Save'
        OnClick = PaletteSaveClick
      end
      object PaletteResetDefault: TMenuItem
        Caption = 'Reset To Default'
        OnClick = PaletteResetDefaultClick
      end
      object PaletteSortColors: TMenuItem
        Caption = 'Sort Colors'
        OnClick = PaletteSortColorsClick
      end
      object PaletteExport: TMenuItem
        Caption = 'Export'
        object PaletteExportJSON: TMenuItem
          Caption = 'JSON'
          OnClick = PaletteSaveJSONClick
        end
        object PaletteExportAmigaBasic: TMenuItem
          Caption = 'AmigaBasic'
          object ABPaletteData: TMenuItem
            Caption = 'Palette Data Statements'
            OnClick = PaletteExportAmigaBasicClick
          end
          object ABPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportAmigaBasicClick
          end
        end
        object MenuItem6: TMenuItem
          Caption = 'Amiga C'
          object ACVSpriteColorArray: TMenuItem
            Caption = 'VSprite Color Array'
            OnClick = AmigaCPaletteClick
          end
          object ACPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = AmigaCPaletteClick
          end
          object ACRGB4PaletteArray: TMenuItem
            Caption = 'RGB4 Palette Array'
            OnClick = AmigaCPaletteClick
          end
        end
        object MenuItem5: TMenuItem
          Caption = 'Amiga Pascal'
          object APVSpriteColorArray: TMenuItem
            Caption = 'VSprite Color Array'
            OnClick = AmigaPascalPaletteClick
          end
          object APPaletteArray: TMenuItem
            Caption = 'Palette Array'
            OnClick = AmigaPascalPaletteClick
          end
          object APRGB4PaletteArray: TMenuItem
            Caption = 'RGB4 Palette Array'
            OnClick = AmigaPascalPaletteClick
          end
        end
        object MenuItem16: TMenuItem
          Caption = 'BAM Basic'
          object BAMPaletteData: TMenuItem
            Caption = 'Palette Data Statements'
            OnClick = PaletteExportQBasicClick
          end
          object BAMPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportQBasicClick
          end
        end
        object MenuItem3: TMenuItem
          Caption = 'FreeBASIC'
          object FBPaletteData: TMenuItem
            Caption = 'Palette Data Statements'
            OnClick = PaletteExportQBasicClick
          end
          object FBPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportQBasicClick
          end
          object FBDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object MenuItem2: TMenuItem
          Caption = 'FreePascal'
          object FPPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = PaletteExportTurboPascalClick
          end
          object FPPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportTurboPascalClick
          end
          object FPDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportGWBasic: TMenuItem
          Caption = 'GWBASIC'
          object GWPaletteData: TMenuItem
            Caption = 'Palette Data Statements'
            OnClick = PaletteExportGWBasicClick
          end
          object GWPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportGWBasicClick
          end
          object GWDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object MenuItem15: TMenuItem
          Caption = 'Open Watcom C'
          object OWPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = PaletteExportOWCClick
          end
          object OWPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportOWCClick
          end
          object OWDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportQBasic: TMenuItem
          Caption = 'QuickBasic\QB64'
          object QBPaletteData: TMenuItem
            Caption = 'Palette Data Statements'
            OnClick = PaletteExportQBasicClick
          end
          object QBPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportQBasicClick
          end
          object QBDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportQuickC: TMenuItem
          Caption = 'Quick C'
          object QCPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = PaletteExportQuickCClick
          end
          object QCPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportQuickCClick
          end
          object QCDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportQuickPascal: TMenuItem
          Caption = 'QuickPascal'
          object QPPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = PaletteExportQuickCClick
          end
          object QPPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportQuickCClick
          end
        end
        object MenuItem7: TMenuItem
          Caption = 'Turbo\Power Basic'
          object PBPaletteData: TMenuItem
            Caption = 'Palette Data Statements'
            OnClick = PaletteExportQBasicClick
          end
          object PBPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportQBasicClick
          end
          object PBDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportTurboC: TMenuItem
          Caption = 'Turbo C'
          object TCPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = PaletteExportTurboCClick
          end
          object TCPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportTurboCClick
          end
          object TCDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportTurboPascal: TMenuItem
          Caption = 'Turbo Pascal'
          object TPPaletteArray: TMenuItem
            Caption = 'Palettte Array'
            OnClick = PaletteExportTurboPascalClick
          end
          object TPPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportTurboPascalClick
          end
          object TPDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
        object PaletteExportTMTPascal: TMenuItem
          Caption = 'TMT Pascal'
          object TMTPaletteArray: TMenuItem
            Caption = 'Palette Array'
            OnClick = PaletteExportTurboPascalClick
          end
          object TMTPaletteCommands: TMenuItem
            Caption = 'Palette Commands'
            OnClick = PaletteExportTurboPascalClick
          end
          object TMTDACOutPalette: TMenuItem
            Caption = 'VGA DAC OUT Palette'
            OnClick = PaletteExportDACOutClick
          end
        end
      end
      object EditColor: TMenuItem
        Caption = 'Edit Colors'
        OnClick = PaletteEditColors
      end
      object PalettePC: TMenuItem
        Caption = 'PC'
        object PaletteMono: TMenuItem
          Caption = 'Mono'
          OnClick = PaletteMonoClick
        end
        object PaletteCGA0: TMenuItem
          Caption = 'CGA Palette 0'
          OnClick = PaletteCGA0Click
        end
        object PaletteCGA1: TMenuItem
          Caption = 'CGA Palette 1'
          OnClick = PaletteCGA1Click
        end
        object PaletteEGA: TMenuItem
          Caption = 'EGA Palette'
          OnClick = PaletteEGAClick
        end
        object PaletteVGA: TMenuItem
          Caption = 'VGA Palette'
          OnClick = PaletteVGAClick
        end
        object PaletteVGA256: TMenuItem
          Caption = 'VGA Palette 256'
          OnClick = PaletteVGA256Click
        end
        object PaletteXGA: TMenuItem
          Caption = 'XGA Palette'
          OnClick = PaletteXGAClick
        end
        object PaletteXGA256: TMenuItem
          Caption = 'XGA Palette 256'
          OnClick = PaletteXGA256Click
        end
      end
      object PaletteAmiga: TMenuItem
        Caption = 'Amiga'
        object PaletteAmiga2: TMenuItem
          Caption = '2 Color'
          OnClick = PaletteAmiga2Click
        end
        object PaletteAmiga4: TMenuItem
          Caption = '4 Color'
          OnClick = PaletteAmiga4Click
        end
        object PaletteAmiga8: TMenuItem
          Caption = '8 Color'
          OnClick = PaletteAmiga8Click
        end
        object PaletteAmiga16: TMenuItem
          Caption = '16 Color'
          OnClick = PaletteAmiga16Click
        end
        object PaletteAmiga32: TMenuItem
          Caption = '32 Color'
          OnClick = PaletteAmiga32Click
        end
      end
    end
    object ToolMenu: TMenuItem
      Caption = 'Tools'
      object SymmetryMenu: TMenuItem
        Caption = 'Symmetry'
        object SymOff: TMenuItem
          AutoCheck = True
          Caption = 'Off'
          Checked = True
          GroupIndex = 7
          RadioItem = True
          OnClick = SymmetryClick
        end
        object SymLeftRight: TMenuItem
          Tag = 1
          AutoCheck = True
          Caption = 'Left / Right'
          GroupIndex = 7
          RadioItem = True
          OnClick = SymmetryClick
        end
        object SymTopBottom: TMenuItem
          Tag = 2
          AutoCheck = True
          Caption = 'Top / Bottom'
          GroupIndex = 7
          RadioItem = True
          OnClick = SymmetryClick
        end
        object SymFourWay: TMenuItem
          Tag = 3
          AutoCheck = True
          Caption = 'Four Way'
          GroupIndex = 7
          RadioItem = True
          OnClick = SymmetryClick
        end
      end
      object SymmetrySep: TMenuItem
        Caption = '-'
      end
      object ToolPencilMenu: TMenuItem
        Caption = 'Pencil'
        OnClick = ToolPencilMenuClick
      end
      object ToolLineMenu: TMenuItem
        Caption = 'Line'
        OnClick = ToolLineMenuClick
      end
      object ToolRectangleMenu: TMenuItem
        Caption = 'Rectangle'
        OnClick = ToolRectangleMenuClick
      end
      object ToolFRectangleMenu: TMenuItem
        Caption = 'Filled Rectangle'
        OnClick = ToolFRectangleMenuClick
      end
      object ToolCircleMenu: TMenuItem
        Caption = 'Circle'
        OnClick = ToolCircleMenuClick
      end
      object ToolFCircleMenu: TMenuItem
        Caption = 'Filled Circle'
        OnClick = ToolFCircleMenuClick
      end
      object ToolEllipseMenu: TMenuItem
        Caption = 'Ellipse'
        OnClick = ToolEllipseMenuClick
      end
      object ToolFEllipseMenu: TMenuItem
        Caption = 'Filled Ellipse'
      end
      object ToolMenuPaint: TMenuItem
        Caption = 'Paint'
        OnClick = ToolMenuPaintClick
      end
      object ToolMenuSprayPaint: TMenuItem
        Caption = 'Spray Paint'
        OnClick = ToolMenuSprayPaintClick
      end
      object ToolTextMenu: TMenuItem
        Caption = 'Text'
        OnClick = ToolTextMenuClick
      end
      object ToolDropperMenu: TMenuItem
        Caption = 'Eyedropper'
        OnClick = ToolDropperMenuClick
      end
      object ToolHBMoveMenu: TMenuItem
        Caption = 'Move Hit Box'
        OnClick = ToolHBMoveMenuClick
      end
      object ToolSelectAreaMenu: TMenuItem
        Caption = 'Select Area'
        OnClick = ToolMenuSelectAreaMenuClick
      end
      object ToolGridMenu: TMenuItem
        Caption = 'Grid'
        OnClick = ToolGridMenuClick
      end
      object ToolFlipMenu: TMenuItem
        Caption = 'Flip'
        object ToolFlipHorizMenu: TMenuItem
          Caption = 'Horizontal'
          OnClick = ToolFlipHorizMenuClick
        end
        object ToolFlipVirtMenu: TMenuItem
          Caption = 'Vertical'
          OnClick = ToolFlipVirtMenuClick
        end
      end
      object ToolRotateMenu: TMenuItem
        Caption = 'Rotate'
        object ToolRotate90: TMenuItem
          Tag = 90
          Caption = '90 Clockwise'
          OnClick = ToolRotateClick
        end
        object ToolRotate270: TMenuItem
          Tag = 270
          Caption = '90 Counter Clockwise'
          OnClick = ToolRotateClick
        end
        object ToolRotate180: TMenuItem
          Tag = 180
          Caption = '180'
          OnClick = ToolRotateClick
        end
      end
      object ToolScrollMenu: TMenuItem
        Caption = 'Scroll'
        object ToolScrollRightMenu: TMenuItem
          Caption = 'Right'
          OnClick = ToolScrollRightMenuClick
        end
        object ToolScrollLeftMenu: TMenuItem
          Caption = 'Left'
        end
        object ToolScrollUpMenu: TMenuItem
          Caption = 'Up'
          OnClick = ToolScrollUpMenuClick
        end
        object ToolScrollDownMenu: TMenuItem
          Caption = 'Down'
          OnClick = ToolScrollDownMenuClick
        end
      end
    end
    object BrushMenu: TMenuItem
      Caption = 'Brush'
      object MnuBrushGrabSelection: TMenuItem
        Caption = 'Grab from Selection'
        OnClick = BrushGrabSelectionClick
      end
      object MnuBrushGrabSprite: TMenuItem
        Caption = 'Grab Entire Sprite'
        OnClick = BrushGrabSpriteClick
      end
      object MnuBrushGrabClipboard: TMenuItem
        Caption = 'Grab from Clipboard'
        OnClick = BrushGrabClipboardClick
      end
      object MnuBrushSep1: TMenuItem
        Caption = '-'
      end
      object MnuBrushOpen: TMenuItem
        Caption = 'Open Brush...'
        OnClick = BrushOpenClick
      end
      object MnuBrushSave: TMenuItem
        Caption = 'Save Brush...'
        OnClick = BrushSaveClick
      end
      object MnuBrushSep1b: TMenuItem
        Caption = '-'
      end
      object MnuBrushEffects: TMenuItem
        Caption = 'Brush Effects...'
        OnClick = BrushEffectsClick
      end
      object MnuBrushSep2: TMenuItem
        Caption = '-'
      end
      object MnuBrushStampTool: TMenuItem
        Caption = 'Stamp Tool'
        OnClick = BrushStampToolClick
      end
      object MnuBrushSep3: TMenuItem
        Caption = '-'
      end
      object MnuBrushSetTransColor: TMenuItem
        Caption = 'Set Transparent Color (Current Color 1)'
        OnClick = BrushSetTransColorClick
      end
      object MnuBrushClear: TMenuItem
        Caption = 'Clear Brush'
        OnClick = BrushClearClick
      end
    end
    object MaterialsMenu: TMenuItem
      Caption = 'Materials'
      object MnuMatDirt: TMenuItem
        Caption = 'Dirt'
        object MnuMatDirtSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatDirtTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatRock: TMenuItem
        Caption = 'Rock'
        object MnuMatRockSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatRockTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatGrass: TMenuItem
        Caption = 'Grass'
        object MnuMatGrassSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatGrassTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatSnow: TMenuItem
        Caption = 'Snow'
        object MnuMatSnowSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatSnowTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatIce: TMenuItem
        Caption = 'Ice'
        object MnuMatIceSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatIceTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatWood: TMenuItem
        Caption = 'Wood'
        object MnuMatWoodSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatWoodTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatMetal: TMenuItem
        Caption = 'Metal'
        object MnuMatMetalSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatMetalTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatSilver: TMenuItem
        Caption = 'Silver'
        object MnuMatSilverSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatSilverTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatGold: TMenuItem
        Caption = 'Gold'
        object MnuMatGoldSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatGoldTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatWater: TMenuItem
        Caption = 'Water'
        object MnuMatWaterSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatWaterTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatCrate: TMenuItem
        Caption = 'Wooden Crate'
        object MnuMatCrateSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatCrateTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatBrownBrick: TMenuItem
        Caption = 'Brown Bricks'
        object MnuMatBrownBrickSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatBrownBrickTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatStoneBrick: TMenuItem
        Caption = 'Stone Bricks'
        object MnuMatStoneBrickSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatStoneBrickTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatWoodFloor: TMenuItem
        Caption = 'Wooden Floor'
        object MnuMatWoodFloorSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatWoodFloorTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
      object MnuMatCeramicTile: TMenuItem
        Caption = 'Ceramic Tiles'
        object MnuMatCeramicTileSide: TMenuItem
          Caption = 'Side View'
          OnClick = MaterialClick
        end
        object MnuMatCeramicTileTop: TMenuItem
          Caption = 'Top View'
          OnClick = MaterialClick
        end
      end
    end
    object Utilities: TMenuItem
      Caption = 'Utilities'
      object MapEditMenu: TMenuItem
        Caption = 'Map Editor'
        OnClick = MapEditMenuClick
      end
      object SpriteImportMenu: TMenuItem
        Caption = 'Sprite Sheet Import '
        OnClick = SpriteImportMenuClick
      end
      object SpriteExportMenu: TMenuItem
        Caption = 'Sprite Sheet Export'
        OnClick = SpriteExportMenuClick
      end
      object FontSheetExportMenu: TMenuItem
        Caption = 'Font Sheet Export'
        OnClick = FontSheetExportMenuClick
      end
      object SpriteAnimationMenu: TMenuItem
        Caption = 'Sprite Animation'
        OnClick = SpriteAnimationMenuClick
      end
      object SoundGenerator: TMenuItem
        Caption = 'Sound Generator (SFXR)'
        OnClick = SoundGeneratorClick
      end
    end
    object ScriptMenu: TMenuItem
      Caption = 'Script'
      object ScriptMenuLoad: TMenuItem
        Caption = 'Load from file'
        OnClick = ScriptMenuLoadClick
      end
      object ScriptMenuRun: TMenuItem
        Caption = 'Run'
        OnClick = ScriptMenuRunClick
      end
    end
    object HelpMenu: TMenuItem
      Caption = 'Help'
      object RMAboutDialog: TMenuItem
        Caption = 'About Raster Master'
        OnClick = RMAboutDialogClick
      end
    end
  end
  object ActionList1: TActionList
    Left = 1176
    Top = 336
    object EditCut1: TEditCut
      Category = 'Edit'
      Caption = 'Cu&t'
      Hint = 'Cut'
      ShortCut = 16472
    end
    object Action1: TAction
      Caption = 'Action1'
    end
    object FileOpen1: TFileOpen
      Category = 'File'
      Caption = '&Open ...'
      Hint = 'Open'
      ShortCut = 16463
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = 'Windows BMP|*.bmp|PC Paintbrush |*.pcx|All Files|*.*'
    Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
    Left = 1176
    Top = 416
  end
  object SaveDialog1: TSaveDialog
    Title = 'Save'
    Filter = 'Windows BMP|*.bmp|PC Paintbrush |*.pcx|*.lbm|Amiga ILBM|*.ilbm|Amiga ILBM|All Files|*.*'
    Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
    Left = 1176
    Top = 496
  end
  object ExportDialog: TSaveDialog
    Title = 'Export'
    Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
    Left = 1176
    Top = 568
  end
  object ImageList1: TImageList
    Left = 1176
    Top = 648
  end
  object TransImageList1: TImageList
    Height = 128
    Width = 128
    Left = 1176
    Top = 712
  end
  object ExportPropsMenu: TPopupMenu
    Left = 168
    Top = 376
    object NewImage: TMenuItem
      Caption = 'New Image'
      OnClick = NewClick
    end
    object DeleteImage: TMenuItem
      Caption = 'Delete'
      OnClick = DeleteImageClick
    end
    object ExportInclude: TMenuItem
      Caption = 'Export Include'
      OnClick = ThumbPopUpMenuExportClick
    end
    object Properties: TMenuItem
      Caption = 'Properties'
      OnClick = PropertiesClick
    end
  end
  object RMScript: TPSScript
    CompilerOptions = []
    OnCompile = RMScriptCompile
    Plugins = <    
      item
      end>
    UsePreProcessor = False
    Left = 1184
    Top = 184
  end
  object SelectDirectoryDialog: TSelectDirectoryDialog
    Title = 'Select Export Directory'
    Left = 1176
    Top = 704
  end
  object FontDialog1: TFontDialog
    MinFontSize = 0
    MaxFontSize = 0
    Left = 1160
    Top = 152
  end
end