object frmTracker: TfrmTracker Left = 1876 Height = 798 Top = 210 Width = 1416 AllowDropFiles = True Caption = 'hUGETracker' ClientHeight = 798 ClientWidth = 1416 KeyPreview = True Menu = MainMenu1 OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDropFiles = FormDropFiles OnKeyDown = FormKeyDown OnKeyUp = FormKeyUp OnShow = FormShow Position = poDefault ShowHint = True LCLVersion = '3.0.0.3' object TreeView1: TTreeView Left = 0 Height = 684 Top = 93 Width = 193 Align = alLeft ParentFont = False ReadOnly = True TabOrder = 0 OnDblClick = TreeView1DblClick OnSelectionChanged = TreeView1SelectionChanged Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw] Items.Data = { F9FFFFFF020003000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF030000000000 0000010B000000496E737472756D656E7473FFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFF0000000000000000000400000044757479FFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFF0000000000000000000400000057617665FFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFF000000000000000000050000004E6F697365FFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFF000000000000000000050000005761766573FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFF00000000000000000008000000526F7574696E6573 } end object Splitter1: TSplitter Left = 193 Height = 684 Top = 93 Width = 5 end object Panel1: TPanel Left = 198 Height = 684 Top = 93 Width = 1218 Align = alClient BevelOuter = bvNone ClientHeight = 684 ClientWidth = 1218 ParentFont = False TabOrder = 2 object PageControl1: TPageControl Left = 0 Height = 684 Top = 0 Width = 1218 ActivePage = PatternTabSheet Align = alClient ParentFont = False TabIndex = 1 TabOrder = 0 object GeneralTabSheet: TTabSheet Caption = 'General' ClientHeight = 649 ClientWidth = 1212 ParentFont = False object SongInformationGroupbox: TGroupBox Left = 8 Height = 192 Top = 8 Width = 297 Caption = 'Song information' ClientHeight = 188 ClientWidth = 293 ParentFont = False TabOrder = 0 object Label15: TLabel Left = 8 Height = 17 Top = 16 Width = 28 Caption = 'Song' ParentColor = False ParentFont = False end object Label16: TLabel Left = 7 Height = 17 Top = 48 Width = 30 Caption = 'Artist' ParentColor = False ParentFont = False end object SongEdit: TEdit Left = 56 Height = 27 Hint = 'The name of your composition' Top = 8 Width = 216 MaxLength = 255 ParentFont = False TabOrder = 0 OnChange = SongEditChange end object ArtistEdit: TEdit Left = 56 Height = 27 Hint = 'Your name or handle' Top = 40 Width = 216 MaxLength = 255 ParentFont = False TabOrder = 1 OnChange = ArtistEditChange end object Label21: TLabel Left = 8 Height = 17 Top = 78 Width = 120 Caption = 'Tempo (ticks per row)' ParentColor = False ParentFont = False end object TicksPerRowSpinEdit: TSpinEdit Left = 133 Height = 27 Hint = 'How many ticks should happen before the row changes. Higher means slower.' Top = 72 Width = 50 MaxValue = 20 MinValue = 1 OnChange = TicksPerRowSpinEditChange ParentFont = False TabOrder = 2 Value = 7 end object TimerEnabledCheckBox: TCheckBox Left = 7 Height = 21 Hint = 'Enable the GB hardware timer. This allows for more fine-grained tempo control.' Top = 144 Width = 171 Caption = 'Enable timer-based tempo' TabOrder = 3 OnChange = TimerEnabledCheckBoxChange end object TimerTempoLabel: TLabel Left = 8 Height = 17 Top = 112 Width = 120 Caption = 'Tempo (timer divider)' Enabled = False ParentColor = False end object TimerDividerSpinEdit: TSpinEdit Left = 133 Height = 27 Hint = 'The "modulo" value for the GB hardware timer. Higher means faster.' Top = 108 Width = 50 Enabled = False MaxValue = 255 OnChange = TimerDividerSpinEditChange TabOrder = 4 end object TempoBPMLabel: TLabel Left = 192 Height = 17 Top = 96 Width = 94 Caption = 'TempoBPMLabel' ParentColor = False end object TicksPerRowSpinEdit1: TSpinEdit Left = 187 Height = 27 Hint = 'How many ticks should happen before the row changes. Higher means slower.' Top = 72 Width = 50 MaxValue = 20 MinValue = 1 OnChange = TicksPerRowSpinEdit1Change ParentFont = False TabOrder = 5 Value = 7 end object TicksPerRowSpinEdit2: TSpinEdit Left = 241 Height = 27 Hint = 'How many ticks should happen before the row changes. Higher means slower.' Top = 72 Width = 50 MaxValue = 20 MinValue = 1 OnChange = TicksPerRowSpinEdit2Change ParentFont = False TabOrder = 6 Value = 7 end object TicksPerRowSpinEdit3: TSpinEdit Left = 295 Height = 27 Hint = 'How many ticks should happen before the row changes. Higher means slower.' Top = 72 Width = 50 MaxValue = 20 MinValue = 1 OnChange = TicksPerRowSpinEdit3Change ParentFont = False TabOrder = 7 Value = 7 end end end object PatternTabSheet: TTabSheet Caption = 'Patterns' ClientHeight = 649 ClientWidth = 1212 ParentFont = False object Panel3: TPanel Left = 229 Height = 649 Top = 0 Width = 983 Align = alClient ClientHeight = 649 ClientWidth = 983 ParentFont = False TabOrder = 0 object HeaderControl1: THeaderControl Left = 1 Height = 30 Hint = 'Left click to mute, right click to solo' Top = 1 Width = 981 DragReorder = False Images = ImageList2 Sections = < item Alignment = taLeftJustify Width = 32 Visible = True end item Alignment = taCenter ImageIndex = 1 Text = 'Duty 1' Width = 133 Visible = True end item Alignment = taCenter ImageIndex = 1 Text = 'Duty 2' Width = 133 Visible = True end item Alignment = taCenter ImageIndex = 1 Text = 'Wave' Width = 133 Visible = True end item Alignment = taCenter ImageIndex = 1 Text = 'Noise' Width = 133 Visible = True end> OnSectionClick = HeaderControl1SectionClick OnSectionResize = HeaderControl1SectionResize Align = alTop ParentFont = False OnMouseUp = HeaderControl1MouseUp end object ScrollBox1: TScrollBox Left = 1 Height = 617 Top = 31 Width = 981 HorzScrollBar.Increment = 3 HorzScrollBar.Page = 32 HorzScrollBar.Smooth = True HorzScrollBar.Tracking = True VertScrollBar.Increment = 5 VertScrollBar.Page = 50 VertScrollBar.Smooth = True VertScrollBar.Tracking = True Align = alClient BorderStyle = bsNone ClientHeight = 617 ClientWidth = 981 ParentFont = False TabOrder = 1 OnMouseWheelDown = ScrollBox1MouseWheelDown OnMouseWheelUp = ScrollBox1MouseWheelUp object RowNumberStringGrid: TStringGrid Left = 0 Height = 617 Top = 0 Width = 32 Align = alLeft BorderStyle = bsNone ColCount = 1 DefaultColWidth = 32 Enabled = False ParentFont = False RowCount = 64 ScrollBars = ssNone TabOrder = 0 end end end object OrderEditStringGrid: TStringGrid Left = 0 Height = 649 Top = 0 Width = 224 Align = alLeft AutoEdit = False AutoFillColumns = True Columns = < item Alignment = taCenter MinSize = 33 MaxSize = 33 Title.Caption = 'Dty1' Width = 33 end item Alignment = taCenter MinSize = 33 MaxSize = 33 Title.Caption = 'Dty2' Width = 33 end item Alignment = taCenter MinSize = 33 MaxSize = 33 Title.Caption = 'Wav' Width = 33 end item Alignment = taCenter MinSize = 33 MaxSize = 33 Title.Caption = 'Nse' Width = 33 end> DefaultColWidth = 17 DefaultRowHeight = 21 ExtendedSelect = False Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goRangeSelect, goRowMoving, goEditing, goTabs, goSmoothScroll, goFixedRowNumbering, goRowHighlight] ParentFont = False PopupMenu = OrderEditPopup RangeSelectMode = rsmMulti RowCount = 2 ScrollBars = ssVertical TabOrder = 1 UseXORFeatures = True OnAfterSelection = OrderEditStringGridAfterSelection OnCellProcess = OrderEditStringGridCellProcess OnColRowDeleted = OrderEditStringGridColRowDeleted OnColRowExchanged = OrderEditStringGridColRowExchanged OnColRowInserted = OrderEditStringGridColRowInserted OnDblClick = OrderEditStringGridDblClick OnEditingDone = OrderEditStringGridEditingDone OnKeyDown = OrderEditStringGridKeyDown OnMouseDown = OrderEditStringGridMouseDown OnValidateEntry = OrderEditStringGridValidateEntry ColWidths = ( 64 33 33 33 33 ) end object Splitter2: TSplitter Left = 224 Height = 649 Top = 0 Width = 5 end end object InstrumentTabSheet: TTabSheet Caption = 'Instruments' ClientHeight = 649 ClientWidth = 1212 ParentFont = False object FlowPanel1: TFlowPanel Left = 0 Height = 649 Top = 0 Width = 1052 Align = alClient AutoSize = True BevelOuter = bvNone ControlList = < item Control = InstrumentGroupBox WrapAfter = waAuto Index = 0 end item Control = EnvelopeGroupBox WrapAfter = waAuto Index = 1 end item Control = SquareGroupBox WrapAfter = waAuto Index = 2 end item Control = WaveGroupBox WrapAfter = waAuto Index = 3 end item Control = NoiseGroupBox WrapAfter = waAuto Index = 4 end> FlowLayout = tlTop FlowStyle = fsLeftRightTopBottom ParentFont = False PopupMenu = InstrumentPopupMenu TabOrder = 0 object InstrumentGroupBox: TGroupBox Left = 7 Height = 273 Top = 7 Width = 280 Anchors = [] BorderSpacing.Left = 7 BorderSpacing.Top = 7 BorderSpacing.Right = 7 BorderSpacing.Bottom = 7 Caption = 'Instrument' ClientHeight = 254 ClientWidth = 276 ParentFont = False TabOrder = 0 object LengthTrackbar: TTrackBar Left = 76 Height = 44 Top = 112 Width = 189 Max = 63 OnChange = LengthSpinnerChange Position = 0 Enabled = False ParentFont = False TabOrder = 7 end object InstrumentNumberSpinner: TSpinEdit Left = 80 Height = 27 Hint = 'What instrument to edit' Top = 38 Width = 187 MaxValue = 15 MinValue = 1 OnChange = InstrumentNumberSpinnerChange ParentFont = False TabOrder = 0 Value = 1 end object Label1: TLabel Left = 8 Height = 17 Top = 46 Width = 62 Caption = 'Instrument' ParentColor = False ParentFont = False end object Label2: TLabel Left = 8 Height = 17 Top = 78 Width = 34 Caption = 'Name' ParentColor = False ParentFont = False end object InstrumentNameEdit: TEdit Left = 80 Height = 27 Hint = 'The name of the instrument' Top = 70 Width = 187 MaxLength = 255 ParentFont = False TabOrder = 1 OnChange = InstrumentNameEditChange end object Label3: TLabel Left = 8 Height = 17 Top = 16 Width = 50 Caption = 'Channel' Font.Style = [fsBold] ParentColor = False ParentFont = False end object InstrumentTypeCombobox: TComboBox Left = 80 Height = 25 Hint = 'What type of channel this instrument will be played on' Top = 8 Width = 185 ItemHeight = 0 ItemIndex = 0 Items.Strings = ( 'Square' 'Wave' 'Noise' ) ParentFont = False Style = csDropDownList TabOrder = 2 Text = 'Square' OnChange = InstrumentTypeComboboxChange end object LengthEnabledCheckbox: TCheckBox Left = 12 Height = 21 Hint = 'Cut the sound after a certain length of time' Top = 118 Width = 61 Caption = 'Length' ParentFont = False TabOrder = 3 OnChange = LengthEnabledCheckboxChange end object InstrumentImportButton: TButton Left = 12 Height = 25 Hint = 'Import an instrument' Top = 216 Width = 116 Caption = 'Import' ParentFont = False TabOrder = 4 OnClick = InstrumentImportButtonClick end object InstrumentExportButton: TButton Left = 149 Height = 25 Hint = 'Export an instrument' Top = 216 Width = 116 Caption = 'Export' ParentFont = False TabOrder = 5 OnClick = InstrumentExportButtonClick end object TestOctave5Button: TButton Tag = 5 Left = 142 Height = 25 Hint = 'Test out the instrument with a C-5 note' Top = 146 Width = 27 Caption = '5' ParentFont = False TabOrder = 6 OnClick = TestOctaveButtonClick end object Label14: TLabel Left = 12 Height = 17 Top = 152 Width = 66 Caption = 'Test octave:' ParentColor = False ParentFont = False end object TestOctave5Button1: TButton Tag = 4 Left = 110 Height = 25 Hint = 'Test out the instrument with a C-4 note' Top = 146 Width = 27 Caption = '4' ParentFont = False TabOrder = 8 OnClick = TestOctaveButtonClick end object TestOctave5Button2: TButton Tag = 3 Left = 78 Height = 25 Hint = 'Test out the instrument with a C-3 note' Top = 146 Width = 27 Caption = '3' ParentFont = False TabOrder = 9 OnClick = TestOctaveButtonClick end object TestOctave5Button3: TButton Tag = 6 Left = 174 Height = 25 Hint = 'Test out the instrument with a C-6 note' Top = 146 Width = 27 Caption = '6' ParentFont = False TabOrder = 10 OnClick = TestOctaveButtonClick end object TestOctave5Button4: TButton Tag = 7 Left = 206 Height = 25 Hint = 'Test out the instrument with a C-7 note' Top = 146 Width = 27 Caption = '7' ParentFont = False TabOrder = 11 OnClick = TestOctaveButtonClick end object TestOctave5Button5: TButton Tag = 8 Left = 238 Height = 25 Hint = 'Test out the instrument with a C-8 note' Top = 146 Width = 27 Caption = '8' ParentFont = False TabOrder = 12 OnClick = TestOctaveButtonClick end object EnableSubpatternCheckbox: TCheckBox Left = 12 Height = 21 Top = 184 Width = 125 Caption = 'Enable subpattern' TabOrder = 13 OnChange = EnableSubpatternCheckboxChange end end object EnvelopeGroupBox: TGroupBox Left = 301 Height = 153 Top = 7 Width = 582 Anchors = [] BorderSpacing.Left = 7 BorderSpacing.Top = 7 BorderSpacing.Right = 7 BorderSpacing.Bottom = 7 Caption = 'Envelope' ClientHeight = 134 ClientWidth = 578 ParentFont = False TabOrder = 1 object EnvChangeTrackbar: TTrackBar Left = 82 Height = 44 Top = 82 Width = 196 Max = 7 OnChange = EnvChangeSpinnerChange Position = 0 ParentFont = False TabOrder = 3 end object StartVolTrackbar: TTrackBar Left = 82 Height = 44 Top = 8 Width = 196 Max = 15 OnChange = StartVolSpinnerChange Position = 0 ParentFont = False TabOrder = 2 end object Label4: TLabel Left = 8 Height = 17 Top = 16 Width = 49 Caption = 'Start vol.' ParentColor = False ParentFont = False end object Label5: TLabel Left = 8 Height = 17 Top = 54 Width = 51 Caption = 'Direction' ParentColor = False ParentFont = False end object DirectionComboBox: TComboBox Left = 82 Height = 25 Hint = 'Whether to fade the sound in or out' Top = 46 Width = 198 ItemHeight = 0 ItemIndex = 1 Items.Strings = ( 'Up' 'Down' ) ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Down' OnChange = DirectionComboBoxChange end object Label6: TLabel Left = 8 Height = 17 Top = 90 Width = 43 Caption = 'Change' ParentColor = False ParentFont = False end object Panel5: TPanel Left = 300 Height = 104 Top = 0 Width = 270 BevelOuter = bvLowered ClientHeight = 104 ClientWidth = 270 ParentFont = False TabOrder = 1 object EnvelopePaintbox: TPaintBox Left = 1 Height = 102 Hint = 'Preview of the volume envelope' Top = 1 Width = 268 Align = alClient ParentFont = False OnPaint = EnvelopePaintboxPaint end end end object SquareGroupBox: TGroupBox Left = 7 Height = 169 Top = 294 Width = 319 Anchors = [] BorderSpacing.Left = 7 BorderSpacing.Top = 7 BorderSpacing.Right = 7 BorderSpacing.Bottom = 7 Caption = 'Square' ClientHeight = 150 ClientWidth = 315 ParentFont = False TabOrder = 2 object SweepSizeTrackbar: TTrackBar Left = 105 Height = 44 Top = 80 Width = 196 Max = 7 OnChange = SweepSizeSpinnerChange Position = 0 ParentFont = False TabOrder = 3 end object Label7: TLabel Left = 8 Height = 17 Top = 16 Width = 65 Caption = 'Sweep time' ParentColor = False ParentFont = False end object SweepTimeCombobox: TComboBox Left = 104 Height = 25 Hint = 'How long to sweep' Top = 8 Width = 200 ItemHeight = 0 ItemIndex = 0 Items.Strings = ( 'Off - no frequency change' '7.8 ms (1/128Hz)' '15.6 ms (2/128Hz)' '23.4 ms (3/128Hz)' '31.3 ms (4/128Hz)' '39.1 ms (5/128Hz)' '46.9 ms (6/128Hz)' '54.7 ms (7/128Hz)' ) ParentFont = False ParentShowHint = False ShowHint = True Style = csDropDownList TabOrder = 0 Text = 'Off - no frequency change' OnChange = SweepTimeComboboxChange end object SweepDirectionCombobox: TComboBox Left = 104 Height = 25 Hint = 'The direction of the sweep' Top = 40 Width = 200 ItemHeight = 0 ItemIndex = 1 Items.Strings = ( 'Up' 'Down' ) ParentFont = False ParentShowHint = False ShowHint = True Style = csDropDownList TabOrder = 1 Text = 'Down' OnChange = SweepDirectionComboboxChange end object Label8: TLabel Left = 8 Height = 17 Top = 48 Width = 89 Caption = 'Sweep direction' ParentColor = False ParentFont = False end object Label9: TLabel Left = 8 Height = 17 Top = 88 Width = 62 Caption = 'Sweep size' ParentColor = False ParentFont = False end object Label10: TLabel Left = 8 Height = 17 Top = 120 Width = 26 Caption = 'Duty' ParentColor = False ParentFont = False end object DutyCombobox: TComboBox Left = 104 Height = 25 Hint = 'Which duty cycle to use (changes timbre of wave)' Top = 112 Width = 200 ItemHeight = 0 ItemIndex = 2 Items.Strings = ( '12.5%' '25%' '50% (square)' '75%' ) ParentFont = False ParentShowHint = False ShowHint = True Style = csDropDownList TabOrder = 2 Text = '50% (square)' OnChange = DutyComboboxChange end end object WaveGroupBox: TGroupBox Left = 340 Height = 169 Top = 294 Width = 297 Anchors = [] BorderSpacing.Left = 7 BorderSpacing.Top = 7 BorderSpacing.Right = 7 BorderSpacing.Bottom = 7 Caption = 'Wave' ClientHeight = 150 ClientWidth = 293 ParentFont = False TabOrder = 3 object Label11: TLabel Left = 8 Height = 17 Top = 16 Width = 42 Caption = 'Volume' ParentColor = False ParentFont = False end object Label12: TLabel Left = 8 Height = 17 Top = 48 Width = 58 Caption = 'Waveform' ParentColor = False ParentFont = False end object WaveformCombobox: TComboBox Left = 104 Height = 25 Hint = 'Which waveform is associated with this instrument' Top = 40 Width = 176 ItemHeight = 0 ItemIndex = 0 Items.Strings = ( 'Wave #0' 'Wave #1' 'Wave #2' 'Wave #3' 'Wave #4' 'Wave #5' 'Wave #6' 'Wave #7' 'Wave #8' 'Wave #9' 'Wave #10' 'Wave #11' 'Wave #12' 'Wave #13' 'Wave #14' 'Wave #15' ) ParentFont = False Style = csDropDownList TabOrder = 0 Text = 'Wave #0' OnChange = WaveformComboboxChange end object Panel4: TPanel Left = 8 Height = 59 Top = 80 Width = 272 BevelOuter = bvLowered ClientHeight = 59 ClientWidth = 272 ParentFont = False TabOrder = 1 object WavePaintbox: TPaintBox Left = 1 Height = 57 Hint = 'Preview of the waveform associated with this instrument' Top = 1 Width = 270 Align = alClient Color = clBlack ParentColor = False ParentFont = False OnPaint = WavePaintboxPaint end end object WaveVolumeCombobox: TComboBox Left = 104 Height = 25 Hint = 'The initial volume of the wave' Top = 8 Width = 176 ItemHeight = 0 ItemIndex = 1 Items.Strings = ( 'Mute (No sound)' '100% Volume' '50% Volume' '25% Volume' ) ParentFont = False Style = csDropDownList TabOrder = 2 Text = '100% Volume' OnChange = WaveVolumeComboboxChange end end object NoiseGroupBox: TGroupBox Left = 651 Height = 59 Top = 294 Width = 237 Anchors = [] BorderSpacing.Left = 7 BorderSpacing.Top = 7 BorderSpacing.Right = 7 BorderSpacing.Bottom = 7 Caption = 'Noise' ClientHeight = 40 ClientWidth = 233 ParentFont = False TabOrder = 4 object SevenBitCounterCheckbox: TCheckBox Left = 8 Height = 21 Hint = 'Select LFSR width. When checked, output will sound like a tone rather than noise' Top = 8 Width = 224 Alignment = taLeftJustify Caption = '7 bit counter (more tone-like output)' ParentFont = False TabOrder = 0 OnChange = SevenBitCounterCheckboxChange end end end object SubpatternGroupBox: TGroupBox Left = 1052 Height = 642 Top = 7 Width = 160 Align = alRight Anchors = [] BorderSpacing.Top = 7 Caption = 'Subpattern' ClientHeight = 623 ClientWidth = 156 TabOrder = 1 object ScrollBox2: TScrollBox Left = 0 Height = 623 Top = 0 Width = 156 HorzScrollBar.Increment = 3 HorzScrollBar.Page = 32 HorzScrollBar.Smooth = True HorzScrollBar.Tracking = True VertScrollBar.Increment = 5 VertScrollBar.Page = 50 VertScrollBar.Smooth = True VertScrollBar.Tracking = True Align = alClient BorderStyle = bsNone ClientHeight = 623 ClientWidth = 156 TabOrder = 0 OnMouseWheelDown = ScrollBox1MouseWheelDown OnMouseWheelUp = ScrollBox1MouseWheelUp object RowNumberStringGrid1: TStringGrid Left = 124 Height = 623 Top = 0 Width = 32 Align = alRight BorderStyle = bsNone ColCount = 1 DefaultColWidth = 32 Enabled = False ParentFont = False RowCount = 32 ScrollBars = ssNone TabOrder = 0 end end end end object WavesTabSheet: TTabSheet Caption = 'Waves' ClientHeight = 649 ClientWidth = 1212 ParentFont = False object WaveEditPaintBox: TPaintBox AnchorSideTop.Control = WaveEditGroupBox AnchorSideTop.Side = asrBottom Left = 0 Height = 489 Top = 160 Width = 1212 Align = alBottom Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 13 ParentFont = False PopupMenu = WaveEditPopup OnMouseDown = WaveEditPaintBoxMouseDown OnMouseMove = WaveEditPaintBoxMouseMove OnMouseUp = WaveEditPaintBoxMouseUp OnPaint = WaveEditPaintBoxPaint end object WaveEditGroupBox: TGroupBox Left = 8 Height = 139 Top = 8 Width = 568 Caption = 'Wave Editor' ClientHeight = 135 ClientWidth = 564 ParentFont = False TabOrder = 0 object Label20: TLabel Left = 16 Height = 17 Top = 16 Width = 31 Caption = 'Wave' ParentColor = False ParentFont = False end object WaveEditNumberSpinner: TSpinEdit Left = 64 Height = 27 Top = 8 Width = 80 MaxValue = 15 OnChange = WaveEditNumberSpinnerChange ParentFont = False TabOrder = 0 end object ImportWaveButton: TButton Left = 16 Height = 25 Hint = 'Import a wave' Top = 48 Width = 147 Caption = 'Import' ParentFont = False TabOrder = 1 OnClick = ImportWaveButtonClick end object ExportWaveButton: TButton Left = 16 Height = 25 Hint = 'Export a wave' Top = 80 Width = 147 Caption = 'Export' ParentFont = False TabOrder = 2 OnClick = ExportWaveButtonClick end object HexWaveEdit: TEdit Left = 288 Height = 27 Top = 8 Width = 264 MaxLength = 32 ParentFont = False TabOrder = 3 OnChange = HexWaveEditEditingDone OnEditingDone = HexWaveEditEditingDone end object Label13: TLabel Left = 176 Height = 17 Top = 16 Width = 108 Caption = 'Hex representation' ParentColor = False ParentFont = False end object PlayWaveWhileDrawingCheckbox: TCheckBox Left = 176 Height = 21 Top = 40 Width = 158 Caption = 'Play wave while drawing' ParentFont = False TabOrder = 4 end end end object CommentsTabSheet: TTabSheet Caption = 'Comments' ClientHeight = 649 ClientWidth = 1212 ParentFont = False object CommentMemo: TMemo AnchorSideTop.Control = Label17 AnchorSideTop.Side = asrBottom Left = 0 Height = 611 Hint = 'The comments section for your song. Greetings/links/etc' Top = 38 Width = 1212 Align = alBottom Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 13 MaxLength = 255 ParentFont = False TabOrder = 0 OnChange = CommentMemoChange end object Label17: TLabel Left = 8 Height = 17 Top = 8 Width = 351 Caption = 'This is an area to write comments for anyone editing your tune.' ParentColor = False ParentFont = False end end object RoutinesTabSheet: TTabSheet Caption = 'Routines' ClientHeight = 649 ClientWidth = 1212 ParentFont = False inline RoutineSynedit: TSynEdit AnchorSideTop.Control = Label19 AnchorSideTop.Side = asrBottom Left = 0 Height = 528 Top = 121 Width = 1212 Align = alBottom BorderSpacing.Top = 13 Anchors = [akTop, akLeft, akRight, akBottom] Font.Height = -13 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqNonAntialiased ParentColor = False ParentFont = False TabOrder = 0 Gutter.Width = 57 Gutter.MouseActions = <> RightGutter.Width = 0 RightGutter.MouseActions = <> Highlighter = SynAnySyn1 InsertCaret = ctBlock Keystrokes = < item Command = ecUp ShortCut = 38 end item Command = ecSelUp ShortCut = 8230 end item Command = ecScrollUp ShortCut = 16422 end item Command = ecDown ShortCut = 40 end item Command = ecSelDown ShortCut = 8232 end item Command = ecScrollDown ShortCut = 16424 end item Command = ecLeft ShortCut = 37 end item Command = ecSelLeft ShortCut = 8229 end item Command = ecWordLeft ShortCut = 16421 end item Command = ecSelWordLeft ShortCut = 24613 end item Command = ecRight ShortCut = 39 end item Command = ecSelRight ShortCut = 8231 end item Command = ecWordRight ShortCut = 16423 end item Command = ecSelWordRight ShortCut = 24615 end item Command = ecPageDown ShortCut = 34 end item Command = ecSelPageDown ShortCut = 8226 end item Command = ecPageBottom ShortCut = 16418 end item Command = ecSelPageBottom ShortCut = 24610 end item Command = ecPageUp ShortCut = 33 end item Command = ecSelPageUp ShortCut = 8225 end item Command = ecPageTop ShortCut = 16417 end item Command = ecSelPageTop ShortCut = 24609 end item Command = ecLineStart ShortCut = 36 end item Command = ecSelLineStart ShortCut = 8228 end item Command = ecEditorTop ShortCut = 16420 end item Command = ecSelEditorTop ShortCut = 24612 end item Command = ecLineEnd ShortCut = 35 end item Command = ecSelLineEnd ShortCut = 8227 end item Command = ecEditorBottom ShortCut = 16419 end item Command = ecSelEditorBottom ShortCut = 24611 end item Command = ecToggleMode ShortCut = 45 end item Command = ecCopy ShortCut = 16429 end item Command = ecPaste ShortCut = 8237 end item Command = ecDeleteChar ShortCut = 46 end item Command = ecCut ShortCut = 8238 end item Command = ecDeleteLastChar ShortCut = 8 end item Command = ecDeleteLastChar ShortCut = 8200 end item Command = ecDeleteLastWord ShortCut = 16392 end item Command = ecUndo ShortCut = 32776 end item Command = ecRedo ShortCut = 40968 end item Command = ecLineBreak ShortCut = 13 end item Command = ecSelectAll ShortCut = 16449 end item Command = ecCopy ShortCut = 16451 end item Command = ecBlockIndent ShortCut = 24649 end item Command = ecLineBreak ShortCut = 16461 end item Command = ecInsertLine ShortCut = 16462 end item Command = ecDeleteWord ShortCut = 16468 end item Command = ecBlockUnindent ShortCut = 24661 end item Command = ecPaste ShortCut = 16470 end item Command = ecCut ShortCut = 16472 end item Command = ecDeleteLine ShortCut = 16473 end item Command = ecDeleteEOL ShortCut = 24665 end item Command = ecUndo ShortCut = 16474 end item Command = ecRedo ShortCut = 24666 end item Command = ecGotoMarker0 ShortCut = 16432 end item Command = ecGotoMarker1 ShortCut = 16433 end item Command = ecGotoMarker2 ShortCut = 16434 end item Command = ecGotoMarker3 ShortCut = 16435 end item Command = ecGotoMarker4 ShortCut = 16436 end item Command = ecGotoMarker5 ShortCut = 16437 end item Command = ecGotoMarker6 ShortCut = 16438 end item Command = ecGotoMarker7 ShortCut = 16439 end item Command = ecGotoMarker8 ShortCut = 16440 end item Command = ecGotoMarker9 ShortCut = 16441 end item Command = ecSetMarker0 ShortCut = 24624 end item Command = ecSetMarker1 ShortCut = 24625 end item Command = ecSetMarker2 ShortCut = 24626 end item Command = ecSetMarker3 ShortCut = 24627 end item Command = ecSetMarker4 ShortCut = 24628 end item Command = ecSetMarker5 ShortCut = 24629 end item Command = ecSetMarker6 ShortCut = 24630 end item Command = ecSetMarker7 ShortCut = 24631 end item Command = ecSetMarker8 ShortCut = 24632 end item Command = ecSetMarker9 ShortCut = 24633 end item Command = EcFoldLevel1 ShortCut = 41009 end item Command = EcFoldLevel2 ShortCut = 41010 end item Command = EcFoldLevel3 ShortCut = 41011 end item Command = EcFoldLevel4 ShortCut = 41012 end item Command = EcFoldLevel5 ShortCut = 41013 end item Command = EcFoldLevel6 ShortCut = 41014 end item Command = EcFoldLevel7 ShortCut = 41015 end item Command = EcFoldLevel8 ShortCut = 41016 end item Command = EcFoldLevel9 ShortCut = 41017 end item Command = EcFoldLevel0 ShortCut = 41008 end item Command = EcFoldCurrent ShortCut = 41005 end item Command = EcUnFoldCurrent ShortCut = 41003 end item Command = EcToggleMarkupWord ShortCut = 32845 end item Command = ecNormalSelect ShortCut = 24654 end item Command = ecColumnSelect ShortCut = 24643 end item Command = ecLineSelect ShortCut = 24652 end item Command = ecTab ShortCut = 9 end item Command = ecShiftTab ShortCut = 8201 end item Command = ecMatchBracket ShortCut = 24642 end item Command = ecColSelUp ShortCut = 40998 end item Command = ecColSelDown ShortCut = 41000 end item Command = ecColSelLeft ShortCut = 40997 end item Command = ecColSelRight ShortCut = 40999 end item Command = ecColSelPageDown ShortCut = 40994 end item Command = ecColSelPageBottom ShortCut = 57378 end item Command = ecColSelPageUp ShortCut = 40993 end item Command = ecColSelPageTop ShortCut = 57377 end item Command = ecColSelLineStart ShortCut = 40996 end item Command = ecColSelLineEnd ShortCut = 40995 end item Command = ecColSelEditorTop ShortCut = 57380 end item Command = ecColSelEditorBottom ShortCut = 57379 end> MouseActions = <> MouseTextActions = <> MouseSelActions = <> Options = [eoAutoIndent, eoBracketHighlight, eoGroupUndo, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoDoubleClickSelectsLine] MouseOptions = [emDoubleClickSelectsLine] VisibleSpecialChars = [vscSpace, vscTabAtLast] SelectedColor.BackPriority = 50 SelectedColor.ForePriority = 50 SelectedColor.FramePriority = 50 SelectedColor.BoldPriority = 50 SelectedColor.ItalicPriority = 50 SelectedColor.UnderlinePriority = 50 SelectedColor.StrikeOutPriority = 50 BracketHighlightStyle = sbhsBoth BracketMatchColor.Background = clNone BracketMatchColor.Foreground = clNone BracketMatchColor.Style = [fsBold] FoldedCodeColor.Background = clNone FoldedCodeColor.Foreground = clGray FoldedCodeColor.FrameColor = clGray MouseLinkColor.Background = clNone MouseLinkColor.Foreground = clBlue LineHighlightColor.Background = clNone LineHighlightColor.Foreground = clNone OnChange = RoutineSyneditChange inline SynLeftGutterPartList1: TSynGutterPartList object SynGutterMarks1: TSynGutterMarks Width = 24 MouseActions = <> end object SynGutterLineNumber1: TSynGutterLineNumber Width = 17 MouseActions = <> MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 ZeroStart = False LeadingZeros = False end object SynGutterChanges1: TSynGutterChanges Width = 4 MouseActions = <> ModifiedColor = 59900 SavedColor = clGreen end object SynGutterSeparator1: TSynGutterSeparator Width = 2 MouseActions = <> MarkupInfo.Background = clWhite MarkupInfo.Foreground = clGray end object SynGutterCodeFolding1: TSynGutterCodeFolding MouseActions = <> MarkupInfo.Background = clNone MarkupInfo.Foreground = clGray MouseActionsExpanded = <> MouseActionsCollapsed = <> end end end object Label18: TLabel Left = 8 Height = 17 Top = 16 Width = 42 Caption = 'Routine' ParentColor = False ParentFont = False end object RoutineNumberSpinner: TSpinEdit Left = 64 Height = 27 Top = 8 Width = 176 MaxValue = 15 OnChange = RoutineNumberSpinnerChange ParentFont = False TabOrder = 1 Value = 1 end object Label19: TLabel Left = 8 Height = 68 Top = 40 Width = 531 Caption = 'Routines are an advanced feature of hUGETracker, and you likely won''t need them at all'#13#10'if you are only interested in composing music. If you want to create a custom effect, or interface'#13#10'with game code that you''re writing a soundtrack for, then routines will come in handy.'#13#10#13#10'Refer to the user manual for more information!' ParentColor = False ParentFont = False end end end end object ScopesPanel: TPanel Left = 0 Height = 64 Top = 29 Width = 1416 Align = alTop BevelOuter = bvNone ClientHeight = 64 ClientWidth = 1416 ParentFont = False TabOrder = 3 object LEDMeter1: TLEDMeter AnchorSideRight.Control = Duty1Visualizer Left = 0 Height = 32 Top = 32 Width = 628 Anchors = [akTop, akLeft, akRight] BevelStyle = bvLowered Colors.Border = 2168839 Colors.Section1 = 5269552 Colors.Section2 = 7127174 Colors.Section3 = 13629664 FallbackDelay = 0 LEDContrast = 9 Max = 50 Min = 0 NumDigits = 32 PeakHoldTime = 0 Position = 0 SingleLED = False Section2Value = 3 Section3Value = 48 end object LEDMeter2: TLEDMeter AnchorSideRight.Control = Duty1Visualizer Left = 0 Height = 32 Top = 0 Width = 628 Anchors = [akTop, akLeft, akRight] BevelStyle = bvLowered Colors.Border = 2168839 Colors.Section1 = 5269552 Colors.Section2 = 7127174 Colors.Section3 = 13629664 FallbackDelay = 0 LEDContrast = 9 Max = 50 Min = 0 NumDigits = 32 PeakHoldTime = 0 Position = 0 SingleLED = False Section2Value = 3 Section3Value = 48 end object Duty1Visualizer: TPaintBox Left = 628 Height = 64 Top = 0 Width = 197 Align = alRight ParentFont = False OnClick = Duty1VisualizerClick OnPaint = Duty1VisualizerPaint end object Duty2Visualizer: TPaintBox Left = 825 Height = 64 Top = 0 Width = 197 Align = alRight ParentFont = False OnClick = Duty1VisualizerClick OnPaint = Duty2VisualizerPaint end object WaveVisualizer: TPaintBox Left = 1022 Height = 64 Top = 0 Width = 197 Align = alRight ParentFont = False OnClick = Duty1VisualizerClick OnPaint = WaveVisualizerPaint end object NoiseVisualizer: TPaintBox Left = 1219 Height = 64 Top = 0 Width = 197 Align = alRight ParentFont = False OnClick = Duty1VisualizerClick OnPaint = NoiseVisualizerPaint end end object StatusBar1: TStatusBar Left = 0 Height = 21 Top = 777 Width = 1416 AutoHint = True Panels = < item Width = 467 end item Width = 200 end item Width = 200 end> ParentFont = False ParentShowHint = False SimplePanel = False ShowHint = True end object ToolBar1: TToolBar Left = 0 Height = 29 Top = 0 Width = 1416 AutoSize = True Caption = 'ToolBar1' EdgeBorders = [ebBottom] Images = ImageList1 List = True ParentFont = False ShowCaptions = True TabOrder = 5 object ToolButton1: TToolButton Left = 1 Top = 0 Action = FileSaveAs1 AutoSize = True ParentShowHint = False end object PanicToolButton: TToolButton Left = 528 Hint = 'Stops all sound output' Top = 0 AutoSize = True Caption = 'Panic' ImageIndex = 72 OnClick = PanicToolButtonClick ParentShowHint = False ShowHint = True end object ToolButton2: TToolButton Left = 120 Top = 0 Action = PlayCursorAction end object ToolButton4: TToolButton Left = 149 Top = 0 Action = StopAction end object ExportGBButton: TToolButton Left = 246 Hint = 'Export the song as a standalone ROM' Top = 0 AutoSize = True Caption = 'Export GB' ImageIndex = 81 OnClick = ExportGBButtonClick end object ToolButton8: TToolButton Left = 86 Height = 22 Top = 0 Caption = 'ToolButton8' Style = tbsDivider end object ToolButton6: TToolButton Left = 207 Height = 22 Top = 0 Caption = 'ToolButton6' Style = tbsDivider end object ToolButton7: TToolButton Left = 1072 Height = 22 Top = 0 Caption = 'ToolButton7' Style = tbsSeparator end object OctaveSpinEdit: TSpinEdit Left = 638 Height = 27 Hint = 'The octave offset for entering new notes' Top = 0 Width = 65 MaxValue = 5 OnChange = OctaveSpinEditChange ParentFont = False TabOrder = 0 end object ToolButton9: TToolButton Left = 587 Height = 22 Top = 0 Caption = 'ToolButton9' Style = tbsSeparator end object Label22: TLabel Left = 595 Height = 22 Top = 0 Width = 43 AutoSize = False Caption = 'Octave ' Layout = tlCenter ParentColor = False ParentFont = False end object Label23: TLabel Left = 703 Height = 22 Top = 0 Width = 70 AutoSize = False Caption = ' Instrument ' Layout = tlCenter ParentColor = False ParentFont = False end object InstrumentComboBox: TComboBox Left = 773 Height = 25 Hint = 'The selected instrument for new notes' Top = 0 Width = 214 DropDownCount = 999 ItemHeight = 0 ItemIndex = 0 Items.Strings = ( '(no instrument)' ) ParentFont = False Style = csDropDownList TabOrder = 1 Text = '(no instrument)' OnChange = InstrumentComboBoxChange OnCloseUp = InstrumentComboBoxCloseUp end object Label24: TLabel Left = 987 Height = 22 Top = 0 Width = 35 AutoSize = False Caption = ' Step ' Layout = tlCenter ParentColor = False ParentFont = False end object StepSpinEdit: TSpinEdit Left = 1022 Height = 27 Hint = 'How many rows to step down after entering a new note' Top = 0 Width = 50 MaxValue = 63 OnChange = StepSpinEditChange ParentFont = False TabOrder = 2 end object ToolButton3: TToolButton Left = 91 Top = 0 Action = PlayStartAction end object ExportGBSButton: TToolButton Left = 331 Hint = 'Export the song as a GBS soundtrack' Top = 0 Caption = 'Export GBS' ImageIndex = 80 OnClick = ExportGBSButtonClick end object ToolButton5: TToolButton Left = 523 Height = 22 Top = 0 Caption = 'ToolButton5' Style = tbsDivider end object ToolButton10: TToolButton Left = 423 Hint = 'Export the song as WAV or MP3' Top = 0 Caption = 'Render Song' ImageIndex = 77 OnClick = ToolButton10Click end object ToolButton11: TToolButton Left = 241 Height = 22 Top = 0 Caption = 'ToolButton11' Style = tbsDivider end object LoopSongToolButton: TToolButton Left = 212 Top = 0 ImageIndex = 87 OnClick = LoopSongToolButtonClick Style = tbsCheck end object ToolButton12: TToolButton Left = 178 Top = 0 Action = SingleStepAction end end object MainMenu1: TMainMenu Images = ImageList1 Left = 40 Top = 32 object MenuItem1: TMenuItem Caption = 'File' object MenuItem33: TMenuItem Caption = 'New' Hint = 'Create a new song' OnClick = MenuItem33Click end object MenuItem12: TMenuItem Caption = '&Open ...' Hint = 'Open' ImageIndex = 42 ShortCut = 16463 OnClick = MenuItem12Click end object MenuItem42: TMenuItem Action = FileSave1 Hint = 'Save' end object MenuItem13: TMenuItem Action = FileSaveAs1 end object RevertMenuItem: TMenuItem Caption = 'Revert to last saved' Enabled = False OnClick = RevertMenuItemClick end object MenuItem4: TMenuItem Caption = '-' end object MenuItem34: TMenuItem Caption = 'Import GBT Player MOD ...' ImageIndex = 78 OnClick = MenuItem34Click end object MenuItem41: TMenuItem Caption = 'Import DefleMask DMF ...' ImageIndex = 79 OnClick = MenuItem41Click end object MenuItem55: TMenuItem Caption = 'Import TrackerBoy TBM ...' ImageIndex = 86 OnClick = MenuItem55Click end object MenuItem60: TMenuItem Caption = 'Import Furnace FUR ...' ImageIndex = 93 OnClick = MenuItem60Click end object MenuItem35: TMenuItem Caption = '-' end object MenuItem54: TMenuItem Caption = 'Export GB ROM ...' Hint = 'Export the song as a standalone ROM' ImageIndex = 81 OnClick = ExportGBButtonClick end object MenuItem44: TMenuItem Caption = 'Export GBS soundtrack ...' Hint = 'Export the song as a GBS soundtrack' ImageIndex = 80 OnClick = ExportGBSButtonClick end object MenuItem10: TMenuItem Caption = 'Export VGM ...' Hint = 'Export the song as a VGM, useful for creating sound effects' ImageIndex = 84 OnClick = MenuItem10Click end object MenuItem40: TMenuItem Caption = '-' end object ExportAsmMenuItem: TMenuItem Caption = 'Export RGBDS .asm ...' Hint = 'Export an ASM source file suitable for a RGBDS-based project' ImageIndex = 83 OnClick = ExportAsmMenuItemClick end object ExportCMenuItem: TMenuItem Caption = 'Export GBDK .c ...' Hint = 'Export a C source file suitable for a GBDK-based project' ImageIndex = 82 OnClick = ExportCMenuItemClick end object MenuItem43: TMenuItem Caption = '-' end object MenuItem14: TMenuItem Caption = 'E&xit' Hint = 'Exit' OnClick = MenuItem14Click end end object MenuItem2: TMenuItem Caption = 'Edit' object MenuItem11: TMenuItem Caption = '&Undo' Hint = 'Undo' ImageIndex = 66 ShortCut = 16474 OnClick = MenuItem11Click end object MenuItem8: TMenuItem Caption = 'Redo' ImageIndex = 56 ShortCut = 16473 OnClick = MenuItem8Click end object N2: TMenuItem Caption = '-' end object MenuItem6: TMenuItem Action = CopyAction end object MenuItem7: TMenuItem Action = CutAction end object MenuItem9: TMenuItem Action = PasteAction end object MenuItem25: TMenuItem Caption = '-' end object MenuItem26: TMenuItem Caption = 'Find/Replace' ShortCut = 16454 OnClick = MenuItem26Click end object OptionsMenuItem: TMenuItem Caption = 'Options ...' OnClick = OptionsMenuItemClick end end object MenuItem3: TMenuItem Caption = 'Help' object MenuItem15: TMenuItem Caption = 'Open manual ...' ImageIndex = 19 OnClick = MenuItem15Click end object N3: TMenuItem Caption = '-' end object SampleSongsMenuItem: TMenuItem Caption = 'Example Songs' end object MenuItem5: TMenuItem Caption = 'About hUGETracker' ImageIndex = 27 OnClick = MenuItem5Click end end object MenuItem16: TMenuItem Caption = 'Tools' Visible = False object MenuItem24: TMenuItem Caption = 'Find unused elements of song' end object MenuItem23: TMenuItem Caption = 'Find problems in song' end end object DebugButton: TMenuItem Caption = 'Debug button' OnClick = DebugButtonClick object MenuItem59: TMenuItem Caption = 'MenuItem59' OnClick = MenuItem59Click end end end object MenuBarActionList: TActionList Images = ImageList1 Left = 104 Top = 72 object FileOpen1: TFileOpen Category = 'File' Caption = '&Open ...' Dialog.Filter = 'hUGETracker Modules|*.uge' Hint = 'Open' ImageIndex = 42 ShortCut = 16463 OnAccept = FileOpen1Accept end object FileSaveAs1: TFileSaveAs Category = 'File' Caption = 'Save As ...' Dialog.DefaultExt = '.uge' Dialog.Filter = 'hUGETracker Modules|*.uge' Hint = 'Save As' ImageIndex = 59 ShortCut = 24659 BeforeExecute = FileSaveAs1BeforeExecute OnAccept = FileSaveAs1Accept end object FileExit1: TFileExit Category = 'File' Caption = 'E&xit' Hint = 'Exit' end object HelpLookupManual: TAction Category = 'Help' Caption = 'Look up in &Manual ...' ImageIndex = 19 OnExecute = HelpLookupManualExecute ShortCut = 32845 end object CopyAction: TAction Category = 'Edit' Caption = '&Copy' Hint = 'Copy' ImageIndex = 9 OnExecute = CopyActionExecute ShortCut = 16451 end object PasteAction: TAction Category = 'Edit' Caption = '&Paste' Hint = 'Paste' ImageIndex = 47 OnExecute = PasteActionExecute ShortCut = 16470 end object CutAction: TAction Category = 'Edit' Caption = 'Cu&t' ImageIndex = 10 OnExecute = CutActionExecute ShortCut = 16472 end object EditCopy1: TEditCopy Category = 'Edit' Caption = '&Copy' Hint = 'Copy' ImageIndex = 9 ShortCut = 16451 end object EditPaste1: TEditPaste Category = 'Edit' Caption = '&Paste' Hint = 'Paste' ImageIndex = 47 ShortCut = 16470 end object EditUndo1: TEditUndo Category = 'Edit' Caption = '&Undo' DisableIfNoHandler = False Hint = 'Undo' ImageIndex = 66 ShortCut = 16474 end object EditDelete1: TEditDelete Category = 'Edit' Caption = '&Delete' DisableIfNoHandler = False Hint = 'Delete' ImageIndex = 13 ShortCut = 46 end object EditSelectAll1: TEditSelectAll Category = 'Edit' Caption = 'Select &All' DisableIfNoHandler = False Hint = 'Select All' ImageIndex = 39 ShortCut = 16449 end object EditCut1: TEditCut Category = 'Edit' Caption = 'Cu&t' DisableIfNoHandler = False Hint = 'Cut' ShortCut = 16472 end object FileSave1: TAction Category = 'File' Caption = 'Save' ImageIndex = 85 OnExecute = FileSave1Execute ShortCut = 16467 end end object ImageList1: TImageList Left = 152 Top = 32 Bitmap = { 4C7A5E0000001000000010000000352C00000000000078DAED5D077C1445DB9F 24A07E8AA28288D81004C140E852420902A1BC74A91A44AAC24B15115190C517 0845012194D0417A11423334A982C08191262D24A10542A8064248E0F9E699DC 1EBB7B5B66778F2484DBFCFE99DB99F9CF33BDED1442B2CC030A9836933E127B 6AFA32F36DDBB6B9F852B794DC87E6A0C957CAD1FACD2B5FCD5D65F83C295FCB 0D999E8E7CBEF823A6FCEF1E7E75BE322F68845955BE20083248ED29CD24F288 8EDB3CC8EE8F9DB082C13B2F1F4CF2C1CBF7F20D7E6B3E92BA43E6A6539F9874 03CC72B350FB0DA6B862FD2E5139DDB05BF7BAC9E552A5F94AC5CCC80D65FF84 A8B48FA6E5AB84D3B47C491B9F29E1D769AFB9E573A87AF24DA7BFB7FD376AEF 79C3AC8C5B237D4FCAD7EC1F72A69B66FF5643DF6E1D26E36AC936E8033F4A3E 98E1DB31E7885FBBE9438CE28887FF04F6FF1FE7FACB6A7A6996510BFD99CCE6 3F69E17FD2C7EB59B5DC65547A6475B9DEF067CFF07B1FBDF9109C0391C00E9F C79E55F97A7C3D732333337E7C5CF93C6EF09A1BA5A199BC6635EFD9CDB34F42 59B6C3B7235FAA2AE75D25DF7FB8DD12B91ADF1FB9F9BC50F337EF4354E6A75D DFB4A8B991AAC5E7E13235BBCA3703E3EFDBDE3E8867FA6D2483E2CF2BDF2B3F 33E567D7B2CBC5D7596362990F26BE3FAAAD7B31D17F546DA705157D0D3754E7 D7B5F8A2CA2B5F1A2E8DB070CB57BA6F463E517C4F100CCA9709F99A7D334EF9 BA7C3BF23D3516C9A432ADF7FE38F041E5B7153F8007EA454FA583D97192AD71 9A95F19ED2BE6C8CC45166F4C67999C1373B667D4CE70B3CB206C7CCA3C6E71D 7F69F1EDCA978ED1F5DEBDF21F2FF96A9D353D3E4F87310B8D01ECCE3918F653 04937CB3F508CECD80738EC6A8FFAD2647CC1BB4F675C21C3F7D3D783A573A7E 50FA4BCD9F5AF21FDA11DC20BA6156BE68C78C7C2DAE52BE325C465C837D090A 39F2709B956F14FF5A798AD35C734CC829FF5194C9C77D1EC06A1FDFCC3A3F9E 7837C3350A8BF935D1F6D3DA535C3B7EF744DCF1BAC19BFE56D2DEC88D8C1EAF 65D73944A339544FC5B5A9B9964739072368AF55CBB0F07BE53FB9F25DFEE0F8 D6ACC70571CE848DB3493A78BE833F1C93D1DF4EFB22DFC00DD798CED58F4DE7 3837E9BADCD00A8BD4DF44C295AA7A7E70F10577C8DC31E02BFDFBD0DF32BEEA B76717570A412E5B117ED9DCA46BBF19C71E1C9DB6D8D49E1B55F7F8F7DC687F 87D1D90B65181E29D7C2377C1BDC8771628D4B88CDF1425050906004BD322C8E 69B41E342F58B0E0365E7E6C6CAC0B225FCF0D1EF97AFE10CDA3A2A2984C5115 7F23FAF4E9C3CA11AAE9D5363F5F54C5B069F1C5F08AAA9A9E1EDFAE7CAFFFED F95F9A6FD5A0C55FB56A9521571A1E25DFF96E06418FC977047E6E76DA43ACFC 0E6E720FABE07453A99A912F1BE798902FE5A9BD3F6AF99E0ABF9DF87F42F710 DBFD6E6E870F1AE72678AAFCF37EEB071D3D5EBF6BE9999DF7CA287E863E76E7 5D04833D085AAAA7E67F040FAD617FA4716CEF0C12BDBC6485ABF413979FB5E6 5254C222F916A5ACA5D5BFF76A8DFDD4C69EE6F8EAAD050F5F0CBFE47C2CD5F3 C2D4C22F0DA7DA7E0283FA94EFDC309D7AC66D7D9C76FE33BD7E84A35E33CB27 1EE01393ED7F967D38F6AB00CFFC9F41FC811DBEDEF75A13F255DD30B5FFC602 DF8E7CB1EC88F32782C6FE153DAEB3B72B3B278FE8EC7D52C6BBC815F9CAB430 E24B61962F0D3BFAC38CFF0DE20F6CA49FCC0DA9FB46D0E96B5A3D3B26EBD62B 76FA4898CE36CE4EB3D3C773C91661D20F8262FDAB193F88B2DDC261624FA3D5 BEAE52B6593F68C991C6A759D96EE9A1B67F52279CC2E3B7F63EA3C6F966C6E4 A6C7941A635F33FD22CBE7276A8C234CCF6348DDE12E7F4E8E417F977BFC64C6 0F2AB2ADCE2368C6A7DE77589B735EDC6343A51F74C26D769E843B5F69A4AF95 F3899EA43A2733D7C33D167D264FF8D34479F0783C2BFAE656FC60399F78E0EC DE0C59A7F3B8F7D5B5FA5876FAC73C7D332DBB76E41B845FBD3DB4F64DC252FF C3C43704B5BE8B5E5F8C8B6BC20D3BDFBDB8EB2BB5EF2C26E3393BB6BF1ED97F E5DD3F665D3E0FC046DE93AC11B4D29883163C24DF6EF8BDFB47EDC9CF8A7D7B EE394CDEB953AD7954A3BD5E447FEF97E4FE1AE3951FFA7CF73457FB0E9851F2 95C8EEF2EDA4BF8DFC6737FF3F2E6375FEFEA7EB8B9304BCFD4FB5F5EBFC6E68 D9B3C3371F06EB5CA3B820A6F976E65A32974F6C733D117F76E3E0C9983FE03E 375650FFAEA63FF7AB18AFAB7C4F02BDB1BAA03667ACCD070FF0F5FC6AE47FE0 8D0F9D3968C3F830D97FD38D0B5EBF73F009B13E5FC2356FC3395764974F8867 E6A9BDE70C66916F0E56E6D22DCCDD7965DB93ED3DAB33E3C6F0C4EA1C866B7F 3158E34BB8AA733016B86E7338465CAD35B8E25A30B7F3C445AE40B4F666CBF8 4A3788645D2F0F9F48EEC555EEADE4E14BEFCA558645D0D93FABE4ABB9A17647 AF5928CF0F32357697F889A8DC0FCCB31E566D0E8057BEDA1A4833FEC886F55A 66EF9DF2CAF7CAF79EE19FFDD3CF1B7E6FF8BD0FDF9C9029BECE99EEDCF2856C 9846DEB8F5C6D59354870836F654EBDC91C1CDE7B99BE151F13331FF18B677DE F4C9DAE99355EB5C1E73BD3A97C75CE0B85332ABD6C9DEF8F3C69FF7C9F4B907 A5EA99BD68C667616A9F1724DAD1E21A9C2BA1B4ABFACE295F57E50C3FD13F5F 5455BE89F344EDCC27789FCCAEC34D7E3FD1DABFC99B67D4CE7F90E651CDBB5F C5B3E434CE8FD07343AAAF255FCDAEDA3B8F7C2D554FBE915CBDF01BC59DD40D A3F01BA96A7C2BDFE03C3007E97DB246FB6D67FE18AC3CC4E0FE4B758EFC8E1E B3F2EDF2F5FCAF76CFA812BCFC4721DF0CDFAC7CE2FD7E975165D1906FF50C30 1E3EEF19F256CEE0329317BDFCECCB7FECEA0EC97D85927EA0BC5F677426A7EB EE0EE93D1E82EC044D1E37942A77F95570B4F68DA9A59F9B3DB7933F75CF7093 651CE51A35FDBE80ECEE0DA2166756CF11D4CB7746675ADADC3FEA956F939F4D FA1F76FC0E46F16838EF65EF3C57D91DEFCAFBE8CDA4BD55BEA073061FAF7C2D D98F9A6FE477DEF06BC9CE08FE1355F643F7A763A4A303C5504E7470F142F789 F8DFC85349F0D9F6CBD07E6B0208879360C6B9FB30EF22C8B03081869FDA75F1 86FF2962F88A9B00CBAE3F80B0B377A1D79F57A1D6940D30F6B78D324CDCBC09 5E1FB66A72F5A16349B5213F1232EC0F11A14BAEDD87F997D318965EBF0F3D57 1E80AB57CF4352523CC539B8752B0E76EC8880E021C323070D6A5E64E0C0A684 FCB043C4E88557D260EEC55406FCDD71F15E3875EA081C3FFE175CB9120DF1F1 C760FDFA052C0D29B71B451132642B71E2A75F2EA5C2CC73290CF8BBCDEC1D70 FAF43FCC8D1B372E3237E6CF9FE842FDFA450691C19B8813E3675D4881A93177 18F077AB195BE1CC9913CC8DA4A444971BE80F0C4BDFBEF57A90EF22891361D3 E392218CA601027F370FDF0C3131A7981BB76F5F97B9F1EFBFE7A0478FDABDC8 376B891353A69CB903E38FDF62C0DF4D2647425C5C34732339F9A6CC8D3B772E C1E79F07F5215FAF224E4C9F703209C61CB9C180BF1B4E584FF931CC8DBB7793 646EDCBD7B0D3A76ACFA2569FD0321FD9623668D3D760B42A3AE32E0EF7AE356 C3D9B371CC8D7BF7EEC8DCB877EF16B46B57F12B96875B7C4F48EF45F3471FBE 013F1CB8C280BF83C7AC8473E7CE32375253EFCADCB8772F09DAB429FB3565FF 1FC5CBA46BF8EA9151D761C8BECB0CA1F477ED51CBE1FCF9F3CC8DB4B454991B A9A9B7A14993128329F7258A774970F7A915C66FB9D52D32FADE0FFB1361F8C1 6B5073C462B870E102C57978F0E03E451ADCBF7F8FBA95427FA74060E0EB235D E530A00E215DC29B92CE53C2DFF876C9B6E60B0EC43EDD62C0D922459E9DE8EF 9F6B74C992CF872A51B8F073DD65FCCE5308E93891904FC79626213F0E226D86 4DA2266F5314D0C04B8FEA9B2CE73737F56F01C67BB7B8CEF832CB979E216BE0 07C36FBD067E003DD932F7D4FD60B8B7D4C00FE081FE9DD207A00E337C35F7CC A5BF0197A31DD5966B7C2786AE9FD5FC60C0D53E474D5BB6D5F8B75DEA1F87F4 E7E073A7A1552EE1CF7766E32FC3D2DFF01CEF2C5AFFEBAF7134A8FF8DCA3F67 FD6F285BAFFED72AFF195CFF7BBCBF2010FBF72909E6CF54F2887C6FFC79E3EF 498EBF0C1A3318C6BF9D39484FC8CFACF4F3946CABF937BBC49FDD30D89D03B7 5BFF64F16F00E6BF19E8DF452FE30ACEB359A56BD188722DAB68EEBEFE4BCED5 F3A3BA3DA5BB9A3094CFAB6AC897AA82FE5D3EC6F235E6B4D5DA3A2DF95A7CB7 35F53AF2059DFB84ADC857D907C42D5FE90FBDFC6B42BE61BD24648F7B88C431 2958E78215371E9EDF2C77838FAB3C1B9A5FBEAB0E13CF8D218235AEE0E51AB7 1DD6B80FF38776FD6C227FD9BAF73A3BAC2B04597C984D47713D91F619C05C79 C805A57B7A73F24ABBCEF5347A7767EAF1C573B304137D0B979F5D77673E74C7 0CFFE19D97E07283DB0F4E48F99C77A9BB9D93AF72EE1757FEB1728FAC922F8D 7F337957200283F29C2F23AEC84360423CEC473C845EFE51B1E7F28F54CDD2E5 DE0E1FEC9ED76CCB0D90FD593AEFD9961BA0FA67EADC745B6E785EBE840BC053 776B734DF155B84A98C97FDCF275E28A839FF51B76E0BA6F5397AFE3866AFC9B 4E3F9D3CCB251FF4F381B7FC6750F8EDD4BF76EAFFCCB96B207BCDE59BDF7B29 E3DAB9BB486F0D3C2FF711CBD6FCFECB235B3CF7551A8FBCE7E1AA70C1ECDDF3 8AEFCF56F6DCCADEF5E42BCF00D60ABBA67F156331957B7E88957384B5E65F79 C2AF93FFB3D3BE435BEBFF6DDE5D66B9FC67906CCD6F1826F7AC2A55B367AE5B BB53C89A5CCDBBDB8CEA5395F31EB4E240353524F33E4423DC96F78DABF8C96C FC65D7F2CF132EAE7562BA6D914159949E63AFDABEE8E4012957CB0D41650FBA 1657E986C2FF6E5C2DB734E24F56BF68F519ACEE5D2119BC6FCF42FDFDD8CB27 DE730732796EC3DEDDA9206F6374C7465EBE3ADFC6D93DDE32E47DECCF59585C 5BA1B6765B6C9F058E757202E77A7A2D7FF1F8552F5C82C97528BCE157E3EADA B3705798F7C9D031BB27C6CE60876FB60F86F765719EE1A37D6797C0B5875C95 27052F5FE6670BF2957CCE3E8C314720DCE137F20B0F5F1976337C3BF16F14F7 56C36F856FA20FFA249F5F96D5CE6F7BD2EF9FF286FF31297FE3FC3A92F14E0C 19D2D2108306B524FEFE332BFBF89C59E9E3B33BC8C9FF82620C35EF6A84FEFD 5B0E6AF54EDF5DF8B9CBC72762FB38BF0ED40F1D7EBAB5F084B3667BA089ED97 AEC19A356B20393919AABDD4F20021B3837FF2FB8C508C4B9C73181E3C483FA3 410D5B2F5C8606EBFE808117936154C741D0FB99C6BF04FB7E4F7EF46B8FF839 61D6DFEC4C873B776EB86153DC39A8BF6607E3D69CB5022226FC0EC841EE68BF 4F116117A71D80BB77AFC3CD9BF132FC76E634D45DBD8D71AB4F5F0A91FF1C03 B48B1CE486FA8620A69C9BB28FCABA0C8989312EEC3BFD0F04AFFA9D71AB4D5B 0C2B1C7B991DB48B1CE40EF7FD18312D366C0FDC883E034949E75DF82E62239C 4802A8316309AC3FFA17D3433B681739C8FD9F6F5BC4CCD3E377C2E1D08D3260 1EADDB6118CCFD6EB14C1FED2207B9826F6BC49C133F6D8379AD46C1DC962355 816622E226FD09C841EEF7BE2D11F38F8EDA0C0BDAFE087FEED9033B77EC9001 F5D06CE780A5B038641C44FFBC0B9083DCEF7C3F422C3E3462032C69371EB66D DA0493EA0F62F86DF56A06D44333E4AFEA3C054E8EDD0EC841EE00DFA6881547 466E82151DC2606344045311118B1733887AC88FEC311B8EFFB8159083DC377C F2908F7C2AD5ECE5D360E3F47AC2F50DCB96414497A90CEB162D6210F590BFED AB45706CF41640FBC8A5CF5B14011548E14E5D48ADDD3972E418AD063493A221 2937CBC9CD4DF12AD13EE3430BAF3AB959AD1DD7FB366474F6228FCA5367138D 6F557AE36653F285876319A36F6B6E7E54E1F2CF736461AE961D5EAEA0123782 89F81234F6199909B3A07E5E9BE9B81232319DADF67740E33BA9E13DC4F2755B 3277F4D686A8F105237940647C50ECD732922728D6848304447267767ADC839B 3C35FF8B7C41C257BBFF5A4DBED40D1EFF6BEC0590C5B7AE7C4234D7C4ABDD15 AE94A7B717C1254B234E34C26F4A3E0F5F2FFC7A7B41B4EE2AD7BA2B5C8B6F98 DFB5F60FF3AD65F23ED6C67299C1CF68D960D0FF78D47CE281BC0A1E8A37EFE3 F93910FEBE84DAFD3D3C6707AB7038EF8DE2BA3F48C70D6EAECAFCAD39AEDA7A 40B35CB53B4C8CEF29D35A0BA37B4F9915F95C61D288430B5C4FA43FB71B8679 D87AFEF744F9B3F50836CE261074BE950B9CDFC8ADFAC72E9F672C9805FA293C E701EA9E7D697026AAFEFE56FDB53BDAF32C8AB18A8A1F8CFCEFE270AC1F92B9 A1D5A736B9A7D86A1F030CE6C1BCFD14FD3A8F10EBE71059ED477BF91EE0AB94 57B0910F2093F29F77FCFD983FCA365CABDE57EBBB085A6B0255DC101467B79A EDAB98E96718F1EDCA171ED13A3FBD7586DEC703799DE3AE5D63AE73BF8974ED 95517E929CB3A3B5764BAF5FCAF892B96550CECB3BDD502D774EAED4CF828423 E56BF54D65762448CFEB12F774F85A6E887E0062CCD7724710F4F982011F0CEA 3EA2F21D8428BEAB70B4832E7B6AE71E49DF257BA1DCDC50D927A5BB175A750E 473256D1DAFFAC358760533EB1197ECBFD60ABE55E5606C4FE1A67B99796FDF4 DF4EFB66EB0EF17BADB2BCE8947B4944C9648A3CA3722FE36B9459A253EEA47C CE72ABBE6F46ADCC0972D97AFB67D5EE4E27E6F7ED9A9A6B5475CFFC7C9DF6DC AB957DC852AEF2EC3AE3B3ECEC701FC689352E211E5A6F9841ED3FD86CFF55EF EFD46AFFD5E7AEE5E73FE8B5FF84689E46E82A5B7AED3F2F5FB3FDE7F43F4F3D A23696D66DFF896AFB0F86EDBFE0BE2E81676E5290A499248CDC79F861DBAC1D DF3C63789B7C62D5FF36E64CCCCE3D9AAE07CCF05C6B30C4FEAF400CDD51D601 5A655730A83F04C17C5D28F53351ACC979D8866ADCDD20E14AFD0E6EE7DCA8AE 6F723FF7873CECB3882DA06BFFBECB5DE276FE8DF29C522957E986A0902FD6D9 72BE9C0BD2F5551AFC87E92DB871F5E44BFB6C2059EFA3E40A9273BDA56920ED 6B49EB20E599430F93C6FDEE1C5081BCEE4B3F7F1A88B11B82A42E13147A466E 08FAE7B53BED8B67589BEA0F3C8AFAC54C5D63B86E89A39E31FA7EC4736794A9 3B9D2C84DBEC7D4BE0893ADB03ED40467C9F343AD387AB8D51FBCD1B2E1D3EF0 E4398E3651F79C258BFE074F865FE6FF1A61E9089A144EE1E040B88BC3305184 A3D7DC0BD021EC18F49A1E057F9DBE0AB1672FC2B67D27A15BD8BE747D6A8EF6 241C42AAFD2CC2D165EA69F8F0AB95B075FF71183D7A34040606C2D8D0509837 6705D34773B427E11012385684A3D3E49350B5D742888E8983F2E5CB43787838 74EDDA1576AD8F64FA688EF6241C422A8F11E1F86CE23F10D47739AC8AFC0342 870C814F3FFD14E64C9902AB576E66FA688EF6241C423E1829C21132EE30D419 F01BD4EF350BE6CD5E0E7F50B911BF6E82467DE7327D34477B120E21E5878970 B418BE07EAF65D041316ED808347A321EEEC39D8ED3802A1D3D642ED5EF301CD D19E84434899A1221C0DFB2F87AD7B8FC192254BA05DBB76D0A85123E8D1A307 2C9C3D1B7A2CDF04AFCDDA063E5DE7C490EAA3880B01834538262EDC0E8B172F 864A952A41C99225A156AD5A2CFEFEDBF74BA8B96C234C3F7F15728C5A73D567 F5FE67280882F80F14E13878E434B469D3064A942801F9F3E7676A4848087C16 360342B63A60D9ED34A8B1FAC06D9F557F36F259B9872048B1FE221C18DE0F3F FC9001B99B366D82B69F7C025517AC853167AF40CB962D61D0E98434DF15BB67 FA2CDB95838290227D453876EF3B0CED699A75ECD8113EA1BC8F3FFE18DA0E1B 0D4D36EE8541E76FB272F4C5F178281CE9F8D367F1B65A3E8BB61252A0392185 7A221CA161AB60D6D4A92CDD478C1801E1D3A6C187BF4440E743A721F8F03FD0 7FED3A088A3A0481FBFE4EF499BF79AACFBC8D3EAC0CBDD29090D73B39823E9B 06F3662E87D961613078E04068FF43289459FC1B7C782216CAD1F444F9A896A7 787EF9F63D3EB3D657A17ACF12DC8B93BB85A342E74550BDDD14F8FE8739B076 7104345BB41ECAD1F253FCD4652876F2320CBC7A9BA98837F69C48F0098F9841 B9B889A824C9F9C14292B3AE438656831348DF714932F4FF3991FC6F6A14099D B18F8C9917865D221F1F1F11952926532C57C164A739B32B1D1849F8533EFFFC F3788CBB3163C6C0F8F1E361ECD8B1306AD428E8D6AD5B3C9A6BF0578AC07A09 F36C404000E4CB978FA9F88EFA527B0A7E391A07079A366D0A83070F86DAB56B C3B37987805F9E834CC577D44773B487F695FEA74F79AAAEF9F6DB6FA17AF5EA F042F1E3F0BC7F0253F11DF5D1DC694F2BFCEB070C1800CD9A3583E241B3E0CD BA97988AEFA88FE61AE18F14D1BF7F7F66BF54A952F0F6DB6F3315DF515F6A4F C1AF48FD75B24E9D3AF0E597B4ACD6AC0975EBD6852E5DBA3015DF511FCDD11E DA57097F25AAFEDEAB572F56FEB00CD1B4642ABEA33E9A3BED69857FFB7FFFFB 5FE6DFE6CD9B43FBF6ED998AEFA88FE61AE1DF2582E613C6C13AC8DFDF9FA9F8 8EFA527B0A7E20F55742E5CA95597D151C1CCCC28A7511AAF88EFA688EF6D0BE 4AF803A9BAAF53A74E2CBFB46AD50ADAB66DCB547C477D3477DAD3385A901CEA D0A103346CD890C57B8B162D988AEFA88FE66A930CCE3A203FC52E2A2B19EBB9 C68D1B337FA38AEFA88FE614AF513CA7E0E7A5284DF1058583E2920A1C4EF332 14F934D22FDB94FF7AF5EA41EFDEBD996AA5FCF7ECD993953954AD947FCC3798 E751F596FF8C2FFF6FF7791B5E99FB0A53AD947FFF487FF0DFE5CF542BE5BFC6 B81A50FF687DA67ACBBFB7FC6774F9CFDDAD1FF8CD59C5542BE5DFEFB7DD4076 1D65AA95F2FF16EDF3E738729EA9DEF63F6B97FFCC0459F28090A5C0E03B2286 E4E8B0F5E51C1DB78D1141820487145233B42BE523FC5A2FFB2278ECB13D2337 5D0344ED014B5D08EAB710447DB48376293F9CC2E1C2F7471C4BA301440CA0FF 44740D7780D42C47FB8D3F93F9298E6609000D2FA4837C1BE59819751726FDF9 2F43CB919B5C6824AC71E9CF3E94027EEDD6877D5EC167E9F46FDB0022E804E5 F7DFEF98B2EF5F18B7E31AFCBCEB06E3B508DD08B0BF16A4EE0C84DB1BCAC08D 95EFC1E4BDB7C0EF93D5E15D2BF9CE3BB8620C2C08ED02814728BFF71F8EB1DB 136178E44518B5398185FBC3FE8BE1F6EDF3328CDA7C11FCDAFE3AB34B35BFA9 47378543C4B46FA0C241CAEFF6BB63C4868B3078552C0C5D7B8EBA130FBDE71D 82C4C453B071E31238706033FBFDED8A13E0D76AC9BC4E35738C3BB0712A4C5D B5004AFD49F91D231D8357C5D0F83A050397475377E2A043D86E387BF66F197A CC3E00BE1FCD5F44BEDCE328BB1FA0F88E749076AB1D03969E84BEF38FC1578B 4E3077BACD38086D7FFC1D3EFE69AB0BFD161E05DF26D357D1B2B88C84474399 E0760C791A8E8AFE7AC909CA3D0EDF2C3BC5F0ED8A333068652C740EFD15AAD5 6ACBD06D4C04F8D419B533478E1C630879F92AD6CF08FCEDE7E7D79B62324538 C5745F5FDF59140395F6A8ECA5549F16A797FF423D9CAFC0DF3E3E4F11D41791 5EE7E554B1C7EA9DB76871EE4ADFFF4E07FE2645D5E166CFF6F91FB6CBF0A696 6A008A3C4AFDA052F9DC2727B5F9C3F0F78388FF90FBCBEAB8F0FBD0F2E4AB26 05499F066F906EB55FD5E3DFA768ACE4232ECDAC4162C22A9143A101CC7D15C0 85B08013544D7AF06BBD0A7AFC7B934AA9015267567CE1FC8882BBE9EFCB7743 DF29902C1420889BE34BCAF8C983F2A901EEFEEF4D42794F9FFD36EF5EFA3E4F 34BB39D65FC64F1C51985C1F5584A47CF78A14C054EA0655DFBDF6DD2B374533 E44AF9B161E5487C7845722BBC028171C5440053A7942130C13F17FD9D84EFFF 4E2AA7C9BF362B90FC3B3B90C0FC6A088005D5092CFE30FDF7F4F20513C69726 17A75723F133AA875384A8F1991B73AB93B4C5B58082A9B7E7D5287874741982 3831B63CCA7520CE4CAC1822F2CF4FA91044DDD847914601A8264CAF4CDDAB4A A286970CA7F61C52C08529802A350BD93FF45D42117F69511DB8B7A31D5C8D68 0CF4FD14EAEF1C5818E1807313008E7607F8BBDD431CEF076856F28D9CE4D72F 72DF8A9B560962A65684F57D5F85614D9EEF81FA016F3C4D4635CD13BEAE7B7E 8714F0472540F5B71EAF85D02250F08B40DFD0E9AD7D6F4D6BED7BA14345DFE1 54AF9CB39D2EEC9CDFCB31BCD18BE4D74E79C8A290E71D88259FBE1042DDC022 F4A246F9C67EC2CBCEBE0556526466F3A7C88C664F85538450378893CF1EEC67 9A81B40CE3FBC50BE7E1D2A5784848C033ACAEC0D5AB8910137306AE5FBF0671 71B170E3C60DB879F306ADFBE3982A75037F47FD751066D0BE52788D1A0CC78E 1D0587633FFCF3CF3FB4CD3900D36B06A583F6894E9C38E1C63F7CF8104C0B0A A2F68FC1AC06F5A99DE394EF8053A74EC2C183944FFBB0270E1F86BFFEFA0BA2 A3A3DDF8274F9EA0EED7A466A7E1CC9933101B1B0333A8AC05B4EF857E9845FB 800C0D1AC0F9F3E7DDF8681FCDCF9D3B07F3697FF7E2C58B70FAF469B87CF932 732F212101764E9A0433A83FAE5CB9E2C6C7F859F4D147F04BFDFA0C77EFDE65 9C7BF7EE31FB0BFEF39F7450B7535353DDF867CF9E850B340D50EEA54B971837 26268671636363699A24D234B94AD3228EA94A3EDA4533F4FF850B17983BA74E 9D626E89E14060DCA1AAE4A3DD438762982C740771E4C811E6DEB163C7589CA1 1F0FD334403325FFE0C153F0E9A7E97EFEE69B046607E37DF3E633B077EF1126 17D37DFFFEFD70F4E851D62F96F2972FBF0B65CBDE8779F352E9782D0DB66C49 836BD7AED13EFC159839339AF92B2A2A8AFAF16F98316306EB934BF955AA24D3 B1660A0406A650BF25D331C74D68D70ED3290E6AD4888221437E636912191909 03070E74CBFF1B362450FE1DEADF6B94F32FECD993C8C2DBBD7B2C4C9B768085 65C3860D6C3CAB6C03919F907087FA3D99A5ED962D2970FFFE7DE6FFC4C43B34 FF44C3ECD9B3D91854EB239F5E596DD2A4091B3FF27E638D8F8FA7E1D8CCBE05 2D5BB60C76EEDC49CBF175433EAED3C071FFFCF9F361FBF6ED2CAD962E5D4AC3 3F0D860F1FCE8079428D8BF3041111112CFCE283BF31EF21307FEDDBB70F860E 1D0A73E6CC91B9F1F7DF7F337F8A1C04C65F4A4A0A4DEF43346F1D647508CAC6 7C3864C8105A07DD74B98172B1AEC0077952F9C8C13A0381764E9E3C09616161 2C3D45FEA2458B58DE14F96969692E3EE677CCAFE87FB4837501E6BFDDBB77BB F80B162C606164A71F3E78E0928F651FCBCED6AD5BE1975F7E61407FCC9D3B17 76ECD821938FE56CE2C48990274F1EF6ED0BC3876EA16C1C47E3D8F7FDF7DF67 F91EE561DA887CCC971887AB57AF66730E050A14A0656626F303EA631E2A57AE 1C142D5A94CDA1E077552C4F221FCB26A6B31866311E10589ED1AF688EC03218 1A1ACAC2264DC39F7FFE99F130EEC4F8C374C27907B12EC0B8C774C4F92465FE C138C5B896FA01F3E2A04183981F30EF601C4F9F3E9D9561253F2929897D7316 9F3B77EE30ECDDBB97AD3F42D91867388FA497FFA74E9DCAF85857AC5DBB1626 4C98C0E210F351BF7EFD64F1A6E506C6CF9E3D7B589A62DA63D8BEF9E61B967F 78CA2FFA7BFDFAF53079F2649832658A2CAFD85C3FACBA769AF7FE38C51D6C6E 7C2CD74650DB5FC1CB95BA2175C7AC7C2DBEC57890DC57B79E0B6A7C97395BCB 2EF9ED3A234D6EAECA97DA93BE2B55337C15D9867C1DB95CFEB7CAD78A3F0EFF DB4D3F1BF9C76AF9056FF9CF62E5FF387041B5FC2BEDA199F4B708891B9A7C29 57FA6E87AFD0E3E26BA98F9AAF157F3AFEB79B7E995CFE3DF688FD262D60BF08 FBA57A7C710D981AF0DBA29E1B22FFE6F51B6E90BA81678863FFD40A5FEA8655 3E02ED9AE12BDDCA4E7CB5BC6296AF8C5B2B7CBBF2A57CBD7CCCE37F1EE8C55F 669C21E02DFFDEF26F866F054A3E8E8FF11D55B572249A49EB05295F6A4F6A5F AD1C6BF195E5562A4FA9F6EAD9CB50BED2FF6AF58B557868FC0FAE8DCFF479FA E9A7DDEE9F7DF6D967E1D5575FD5BCC308CDC5E799679E71E3E7CA954BF70E24 34CF9B37AFEA3DB5A27BE2933B776E264FC473CF3DC7CCA57E20EEF7DCBADED1 BE9AFFD1CE8B2FBE28D3C73938251FFD83F65E78E105373E51DCFD9423470E55 7D2DF908E4E08332A469A4178768A6B4AB96CEA82F8D3B1144E35C507C305D94 F2B5386A7C657A58E1EBC597115F4C6F69DA9AE1637910D3429CCF34CB17F50C F8448DAF559E54CAAF2D98BDFF07817691835C33F7FFA40300ED2207B9BCF7FF 88403B681739C8E5B9FF470AB4837679EFFF5102EDF0DEFFA30633F7FFA8C1CC FD3F5AF0DEFF93FDEEFF01938FF2F09382F99F3105D10D911B7537165A7D519E 41F91BD167DB4899BEE886979F75F8527B46BFBD7CF73260A5FCD82DBF59610D 70FC8CEAB92ECF0AEA47B191C26100B4D30F3922FFC2B4AAFDAEAF6B179D766C 540A9C1A077A483B3632E5FADA9068E488FCD8499536A61E1E9E92B8AEF3BF5B BF7AC5A107B4732FEA7F29C811F927C69673A41E1A015BBECCEBF8BDDF2BE528 8806CAA19D94833F0072443EAE454BDE3F0436F5C9E3A0205BBE94F3B6F57F83 6CFD2A3F4133B473FB8F816CFD9AC8DF37A498E3DAF60110D9F3650705415039 54CD4736F47A83EC185088C169E648D8D01B9023F2A999E3FCFA5EB0AEFB8B0E 0AB2E68B3C24A22B229DBFFDEB77EA51846FEC939FA09D33CB3B0372443EB5E3 888BE808115D733B567F9EA71CF25676CECBF8913D5FAF87E68875DD5F2568E7 E4C2D680EF229FDADB787E4DBB94A81F8BFD4B7F3B567579251CF954AD87EFD7 F67C0DA822D04ECCD2A629C811F94BDBBFD86FD7B080E8CB6B1AA55C5B1B04F4 DD4181FA8EDB7BBBC1D5882A9018511912575582F85F3F4CD929148D468EC85F 14F27CAE5FDA3CD78F622385637EDB5CE10B3ECE45A85A0FDF53FFA80BA83A81 76FA2147BAFEBF997F4E178AE7F3637AA87E5D3D67BD99CD9F7220A476A4658F 3EB81038A773ADDE4BCEB619DBF62214FECDDFF7EDD4AF8AEF42FABB2C4531E7 7A7F3F05DFCFE9C6FF51E472B6EDD8C1C8E7DC5B20AE09CC2BAE09CC2A7B002E CDAC4E2ECFAA114EE1E04038DA97F2CF8707221CB4630B0F681997E1E45817E0 CC04407B685FCA8F9EF001C291766C34DCDDF39D26520F8702DA43FB52FED1D1 A5118EBBB45CDFDAD0D385AB6BBF80F8151DE0EC927610BBE813B8B2B90FA03D B42FE53B86164738EEFC3988E6D52E10B7A02D1C99DA100EFC5C071CE36BBB70 92BA81F6D0BE94EF2CDF8E6B5BA9FB53EB40D4C41AAA38B9A0392BB7685FCADF D0EB7584E3D2DA66103DA3A426CE2DAE01680FED4BF95856291CB77EAB025717 E5D704EE5B407B685FCA5FF8C9F30847DAA6772175E553DA58FB32A03DB42FE5 CF6EF10CC201BF1706D8900720F22580DF72533C0FB09E8EE3D73F0BB0EEFFA8 FA3CA0BD6F6A3CA5DC7FE3D72FD06F4E78633F8711A8BDB9B81E57C977965B9E 7E771E253FBB00D785D3B69996E3A010DABE62BB8A6D235BE74DDB1B433E7228 1C4E8498E5A37D0A075C08075463C22A8598E1A35DD6961F19097490CDDAE8E3 3F950BE1E5A33DB12DBFB9BE3BDC3F3D9EB5D37F8F2819C2C3473BD82EDFDEFD 2D5CA6F546CC2FADE1A643606DF5DEEFDF0B31E28BF5C085B55DE1E084DAB4FE A8C510BFB9B7ACBDD602B6F5D82E9FFFB5299C082FCF90B0E933D6566FECFDA6 A17C6CEFB18DBEBEA63224CC7F136E6D69C0DAEDD59FBF1A826E1BF1C5363B35 F21D48DD5A9EB5E3CB3E7B2904DD1DD3FC15433E6D97110ED85A049CED78C890 BAB94889D77272F5759BBC9F83886D356DB743C4769CB7AF4C9F67683B3DAF53 59DFAF9CFBF1B0AD2EE86C7F9FE6E0E770B6D7059C9CBCCEF5FDB9B26B9DA1D3 0708D7D253E3CBFA00B4AD17DB79A6173351A6A7C617FB00A9474741F2AE6F5C ED3CD3A37D7BA99E1A5FEC0388655F6CE7514DFCFD4B88A56DBA5ADBAFEC03FC 4BFBF6D8FE8BED3CAAD1CBDAA7F70154DA7E65D93FB7A6036BEBC5761ED5D38B 5BC9F4D4CBBEB30FB0BA316BEBC5761ED50BCB6ACBF4D4F8AE3EC0FA8AACAD17 DB79546F449490E9A9F15D7D808D85585B2FB6F3A8A6AECB27D353E3BBFA005B DE66ED3FFE76E945BEC8DA7FB5B65F5AF6B06D97B4F3D8DF2E80AA44EF17AAF7 944ED9CDCB31E7F6D493D2F6C74DAEE2DA2FE634C3F17B38BEF3B6FD4E7D6686 E5D869CEDDF69F1C57DE659646CB36AAF8AED5F6A7440D83077193646DBF6876 F7C050A68FEF5A6DFF9DBD83E13AEDF7A749DAFEBF86956066E2B81DEDEAB5FD D7567765EDFF6DEA17B1ED47F5F4D24FD9BB5A5F422CEB37B6F683E3339ABAC6 0E97B77D25967BC7095AAF68D50162DB7FF6D7367064521586842DDD5D6D3FAA D10B1A81732CAFD9F65F5E551BCECE7E0FAEFFDED6D5F6AFED969F99C52FAD2C 8EE335DBFEA4F5A5E0CEB66059DB2F9ADD5A55D835B6D76AFBEFEF28276BFB5B 967EE6A1D9BA97C471BC1BBFD82BBE9A6DBF6886E30754F15DA5FCBF816D7FE7 72BEFD247BF75E768EC3DFA6660BA636F275A01DFAFEA60AFF05E7D8E035C9DE 3D1CCB3FE3EC03E4978CDF737BAADC8A0FFA0FC386F183718CE984698DF905F3 1CE65BCCFB587EB00C623996F68D306C183F18C7984E98D6985F30CF61BEC5BC 8FE507CB209663AC0BA47C8C173BF2ED3E76E563BA231FF31FE661560E6859C2 F288651AEB05AC5BB07E72F243947EC07C87F231FF6319C232886519EB03AC53 B05E72CA0FD10A07E67BF43F963FE4633D807509D647E87FAC178DE2C259EE1C 58FEB10EC17A08C38FF5216F7C3AFBFC0EAC7F30FEB01E349B2658EF60FC63FD F7A8D7AD6576FEEF53C9774566E6FFACF6E4C9F312A95FBBBA7F83E01AFE79F3 BCC4CDCB993327A95BABDA6B2D1AD7991650EC9DA480E2EF24B56A5A775ADD5A D55F4333BDA74C29FFA73F69D9B077855245E34B152F945CDAFFDDE4D2EF174E 2D59F41D281F502CF193568DFA942D55E26925AFC06BAFFA7CDCE23F75BA7C54 F560FD2AEFDD29E35F38B95C89C229954A167950AF6A59A858B20894295E18CA F8177DD0A67EA5831FB768580739C80DFEB0DA9B9FB5A8B3E4F326A5EF04572E 968CDCF225DE4D0B2CFD1EB4AA570D1A077DC0F8F56A0741AF1EDDEE572F5F34 B953C352773AB40C5E82DC766D9ACE6950D59FFAB5507240F14277CBBCFFEE83 0F4A16856A65DF873A954B4395D2C5A073FB8FE18BAE1DD3CA942C42C35388D9 FD4FB512C9343C73DAB66E1650B15CC9B8B2258B269728F64E72A1B7DF7850D6 BF28540C2806D53F280523BEEFFFA075F386F7CA96284CFD96CE2D1FF05E72E5 0A01719FB4F928C0D7C787B46DD5CCBF62F992D1A54B38DD28F8E6FD46C14130 2EF4FB073DDBD4BCDBAB45791AA642C96529B702E5067E502A9A72FD7D7DD38F CFC473305A7DD4B868A50A01274B9528921C40FDD828B87A4ADFD6959327F4AE 99FC43C72AC981A5DF4DAE50EABDE4AA154B9F6CD3B26951E7D919B2E7A3A60D 0A55AF54FA58D5B2EF2537A9563CF9BB908A8CDBB359D9E416B54A25D7AD51FE 588B660D0BE9E581E68DEBBDD5B67EA543AD6B0524776F5226B947D3B2C99D1B 974BEED2BCEAA1164D1BBCC593079B37AA5380DA3FD020F07D2A3720B96B8BEA 079A350A2E6026FFD37C9FAF47FB2673BBB56B32B77E70503E2B652877EE1748 EE175ED0B5F3FFABC092D5 } end object OpenDialog1: TOpenDialog Filter = 'hUGETracker Instruments|*.ugi' Left = 80 Top = 56 end object InstrumentSaveDialog: TSaveDialog DefaultExt = '.ugi' Filter = 'hUGETracker Instruments|*.ugi' Left = 80 Top = 56 end object OrderEditPopup: TPopupMenu Left = 128 Top = 40 object MenuItem17: TMenuItem Caption = 'Insert new row' Hint = 'Insert a new row filled with brand new patterns' OnClick = MenuItem17Click end object MenuItem18: TMenuItem Caption = 'Insert empty row' Hint = 'Insert a new with nothing in it yet' OnClick = MenuItem18Click end object MenuItem21: TMenuItem Caption = 'Duplicate row' OnClick = MenuItem21Click end object MenuItem22: TMenuItem Caption = 'Replicate row' OnClick = MenuItem22Click end object MenuItem20: TMenuItem Caption = '-' end object MenuItem19: TMenuItem Caption = 'Remove row' Hint = 'Remove a row-- Does not delete the patterns from existence' OnClick = MenuItem19Click end end object ImageList2: TImageList Height = 32 Width = 32 Left = 48 Top = 86 Bitmap = { 4C7A020000002000000020000000400200000000000078DAED98818EC3200886 7DF4BED9F666DE6CA54504048BBDE572246659B7F503A4C8BF94662CE77EAD34 8E375ABD6DDB9643D89FFBBCDFEF72AFFDF5B8AFEC43F9DCCF16E221EC62970F D2EFEFC4DC247067011F1BE65FF1CEF8A0B3536595454DCF81C58731BB18CEBD CCA7F7B2F83066D3BDE7F95CDC7D4D7AD9C9C4D7727E5C33D52AC386DC6FF533 6A1C1B6AA5CF0DC32FDF8185990D83E74B6CD31ED76BE7B355F99C717C5F9DF7 793EAFE523079A951B800FDC7E8FFB1CF5F1787FDEDFC087679FB2F91E30F2E1 FA2DC4DFD51C7A053EC7BEC34F247ED107863FEAC374B57B75D51E8E1FDED3D7 63FF9B5A1BF4607BFC50FB12FBE83D3996CFD4BF874DFB80BFFEE5FEA3B1612F 43F9F5D9DE17F6C1C8E6EACFC76FAEE7C49F27229B8BDFD6FF2D7EE573F6B09D FF72EEE5EF71E7755B1BB6F37FBCEFFADEF4396F6A3380EF9E7B910FF6F96F76 0E167FD3E460CDFC6BCC833AFF476A33A51E96EA9F6FD17FDFA07FFFADB3D70B 9F57260BDBFF0FBBD7FF3A77155BD6FFC15CC4B6EBFFD8FDF6EBFF78B65DFFAF 61CF9FFF13CF028DFB26BF9FC57CEC91FEB7CD7F4A3FC1CBA9FFEDF3AFFE5CED 3157BE55FFDFAAC10F2B637D8BDE5BF47F243F1BF9C0DD0673D86CFC16FD1FCD 4F24FE91FE473DDFADFF9B67A2F24E7D5FE3D7F4BF95EF8D1F6A5FD7FF89FC97 11C3F7C48F975F7F1B7A8FE603893F840FBA022FC107CC9FD3FF0E7F381F56F5 7FCD07327B3C72FE313E70B3DFD2F35FF0E1D1F987F1E1F1F98FCBC3D3F32FF5 E137E67FC18747F50FDFAF9ED57F7FC87E0086B1DAE2 } end object OscilloscopeUpdateTimer: TTimer Enabled = False Interval = 200 OnTimer = OscilloscopeUpdateTimerTimer Left = 88 Top = 48 end object GBSSaveDialog: TSaveDialog DefaultExt = '.gbs' Filter = 'Gameboy Soundtrack|*.gbs' Left = 288 Top = 24 end object WaveSaveDialog: TSaveDialog DefaultExt = '.ugw' Filter = 'hUGETracker Waves|*.ugw' Left = 368 Top = 24 end object GBSaveDialog: TSaveDialog DefaultExt = '.gb' Filter = 'Gameboy ROM|*.gb' Left = 328 Top = 24 end object NoteHaltTimer: TTimer Enabled = False OnTimer = NoteHaltTimerTimer Left = 80 Top = 86 end object TrackerGridPopup: TPopupMenu Left = 96 Top = 24 object TrackerPopupEditEffect: TMenuItem Caption = 'Edit effect ...' OnClick = TrackerPopupEditEffectClick end object MenuItem28: TMenuItem Caption = '-' end object TrackerPopupSelectAll: TMenuItem Caption = 'Select all' ShortCut = 24652 OnClick = TrackerPopupSelectAllClick end object TrackerPopupSelectChannel: TMenuItem Caption = 'Select channel' ShortCut = 16460 OnClick = TrackerPopupSelectChannelClick end object MenuItem29: TMenuItem Caption = '-' end object TrackerPopupTransposeSemiUp: TMenuItem Caption = 'Transpose +1 semitone' ShortCut = 16465 OnClick = TrackerPopupTransposeSemiUpClick end object TrackerPopupTransposeSemiDown: TMenuItem Caption = 'Transpose -1 semitone' ShortCut = 16449 OnClick = TrackerPopupTransposeSemiDownClick end object TrackerPopupTransposeOctaveUp: TMenuItem Caption = 'Transpose +1 octave' ShortCut = 24657 OnClick = TrackerPopupTransposeOctaveUpClick end object TrackerPopupTransposeOctaveDown: TMenuItem Caption = 'Transpose -1 octave' ShortCut = 24641 OnClick = TrackerPopupTransposeOctaveDownClick end object MenuItem32: TMenuItem Caption = '-' end object MenuItem31: TMenuItem Caption = 'Interpolate' ShortCut = 16459 OnClick = MenuItem31Click end object MenuItem56: TMenuItem Caption = 'Change Instrument' ShortCut = 16457 OnClick = MenuItem56Click end object MenuItem30: TMenuItem Caption = '-' end object TrackerPopupCut: TMenuItem Caption = 'Cut' ShortCut = 16472 OnClick = TrackerPopupCutClick end object TrackerPopupCopy: TMenuItem Caption = 'Copy' ShortCut = 16451 OnClick = TrackerPopupCopyClick end object TrackerPopupPaste: TMenuItem Caption = 'Paste' ShortCut = 16470 OnClick = TrackerPopupPasteClick end object TrackerPopupFloodPaste: TMenuItem Caption = 'Flood paste' ShortCut = 8278 OnClick = TrackerPopupFloodPasteClick end object TrackerPopupMixPaste: TMenuItem Caption = 'Mix paste' ShortCut = 24662 OnClick = TrackerPopupMixPasteClick end object TrackerPopupErase: TMenuItem Caption = 'Erase' ShortCut = 46 OnClick = TrackerPopupEraseClick end object MenuItem27: TMenuItem Caption = '-' end object TrackerPopupUndo: TMenuItem Caption = 'Undo' ShortCut = 16474 OnClick = TrackerPopupUndoClick end object TrackerPopupRedo: TMenuItem Caption = 'Redo' ShortCut = 16473 OnClick = TrackerPopupRedoClick end object MenuItem36: TMenuItem Caption = '-' Visible = False end object MenuItem45: TMenuItem Caption = 'Hidden stuff' Visible = False object MenuItem46: TMenuItem Caption = '+1' ShortCut = 16571 OnClick = OnIncrementValueBy1Click end object MenuItem47: TMenuItem Caption = '-1' ShortCut = 16573 OnClick = OnDecrementValueBy1Click end object MenuItem48: TMenuItem Caption = '+10' ShortCut = 24763 OnClick = OnIncrementValueBy10Click end object MenuItem49: TMenuItem Caption = '-10' ShortCut = 24765 OnClick = OnDecrementValueBy10Click end object MenuItem50: TMenuItem Caption = '+1' ShortCut = 16491 OnClick = OnIncrementValueBy1Click end object MenuItem51: TMenuItem Caption = '-1' ShortCut = 16493 OnClick = OnDecrementValueBy1Click end object MenuItem52: TMenuItem Caption = '+10' ShortCut = 24683 OnClick = OnIncrementValueBy10Click end object MenuItem53: TMenuItem Caption = '-10' ShortCut = 24685 OnClick = OnDecrementValueBy10Click end object MenuItem39: TMenuItem Caption = 'Redo2' ShortCut = 24666 OnClick = TrackerPopupRedoClick end end end object SynAnySyn1: TSynAnySyn Enabled = False CommentAttri.Foreground = clGreen Comments = [csAsmStyle] DetectPreprocessor = False IdentifierChars = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ_abcdefghijklmnopqrstuvwxyz' KeyWords.Strings = ( '' 'A' 'ADC' 'ADD' 'AF' 'AND' 'B' 'BC' 'BIT' 'C' 'CALL' 'CCF' 'CP' 'CPD' 'CPDR' 'CPI' 'CPIR' 'CPL' 'D' 'DAA' 'DB' 'DE' 'DEC' 'DI' 'DJNZ' 'DS' 'DW' 'E' 'EI' 'ENDM' 'ENDR' 'EQU' 'EX' 'EXX' 'H' 'HALT' 'HL' 'IF' 'IM' 'IN' 'INC' 'INCLUDE' 'IND' 'INDR' 'INI' 'INIR' 'IX' 'IY' 'JP' 'JR' 'L' 'LD' 'LDD' 'LDDR' 'LDI' 'LDIR' 'M' 'MACRO' 'MLT' 'NC' 'NEG' 'NOP' 'NZ' 'OR' 'OTDM' 'OTDMR' 'OTDR' 'OTIM' 'OTIMR' 'OTIR' 'OUT' 'OUTD' 'OUTI' 'PC' 'POP' 'PUSH' 'REPT' 'RES' 'RET' 'RETI' 'RETN' 'RL' 'RLA' 'RLC' 'RLCA' 'RLD' 'RR' 'RRA' 'RRC' 'RRCA' 'RRD' 'RST' 'SBC' 'SCF' 'SECTION' 'SET' 'SLA' 'SLP' 'SP' 'SRA' 'SRL' 'SUB' 'SWAP' 'TST' 'TSTIO' 'XOR' 'Z' ) NumberAttri.Foreground = 10485760 StringAttri.Foreground = clRed StringDelim = sdDoubleQuote Markup = False Entity = False DollarVariables = False ActiveDot = False Left = 8 Top = 86 end object MODOpenDialog: TOpenDialog DefaultExt = '.mod' Filter = 'GBT Player MOD files|*.mod' Left = 472 Top = 24 end object WaveEditPopup: TPopupMenu Left = 8 Top = 32 object MenuItem37: TMenuItem Caption = 'Copy' OnClick = MenuItem37Click end object MenuItem38: TMenuItem Caption = 'Paste' OnClick = MenuItem38Click end end object ShortcutsActionList: TActionList Images = ImageList1 Left = 208 Top = 32 object PlayStartAction: TAction DisableIfNoHandler = False Hint = 'Play song from start' ImageIndex = 91 OnExecute = PlayStartActionExecute SecondaryShortCuts.Strings = ( 'F5' ) ShortCut = 24589 end object PlayCursorAction: TAction Hint = 'Play song from cursor' ImageIndex = 89 OnExecute = PlayCursorActionExecute SecondaryShortCuts.Strings = ( 'F6' ) ShortCut = 8205 end object PlayOrderAction: TAction Hint = 'Play song from start of order' ImageIndex = 89 OnExecute = PlayOrderActionExecute SecondaryShortCuts.Strings = ( 'F7' ) ShortCut = 16397 end object StopAction: TAction Hint = 'Stop song' ImageIndex = 88 OnExecute = StopActionExecute SecondaryShortCuts.Strings = ( 'F8' ) ShortCut = 27 end object InsertRowAction: TAction Category = 'TrackerGrid' Caption = 'Insert Row' OnExecute = InsertRowActionExecute OnUpdate = InsertRowActionUpdate ShortCut = 45 end object InsertRowForAllAction: TAction Category = 'TrackerGrid' Caption = 'InsertRowForAllAction' OnExecute = InsertRowForAllActionExecute OnUpdate = InsertRowForAllActionUpdate SecondaryShortCuts.Strings = ( 'Shift+Ins' ) ShortCut = 16429 end object DeleteRowAction: TAction Category = 'TrackerGrid' Caption = 'DeleteRowAction' OnExecute = DeleteRowActionExecute OnUpdate = DeleteRowActionUpdate ShortCut = 8 end object DeleteRowForAllAction: TAction Category = 'TrackerGrid' Caption = 'DeleteRowForAllAction' OnExecute = DeleteRowForAllActionExecute OnUpdate = DeleteRowForAllActionUpdate ShortCut = 16392 end object GotoGeneralAction: TAction Caption = 'GotoGeneralAction' OnExecute = GotoGeneralActionExecute ShortCut = 32839 end object GotoPatternsAction: TAction Caption = 'GotoPatternsAction' OnExecute = GotoPatternsActionExecute ShortCut = 32848 end object GotoInstrumentsAction: TAction Caption = 'GotoInstrumentsAction' OnExecute = GotoInstrumentsActionExecute ShortCut = 32841 end object GotoWavesAction: TAction Caption = 'GotoWavesAction' OnExecute = GotoWavesActionExecute ShortCut = 32855 end object GotoCommentsAction: TAction Caption = 'GotoCommentsAction' OnExecute = GotoCommentsActionExecute ShortCut = 32835 end object GotoRoutinesAction: TAction Caption = 'GotoRoutinesAction' OnExecute = GotoRoutinesActionExecute ShortCut = 32850 end object IncrementCurrentInstrumentAction: TAction Caption = 'IncrementCurrentInstrumentAction' OnExecute = IncrementCurrentInstrumentActionExecute SecondaryShortCuts.Strings = ( 'Shift+=' ) ShortCut = 8379 end object DecrementCurrentInstrumentAction: TAction Caption = 'DecrementCurrentInstrumentAction' OnExecute = DecrementCurrentInstrumentActionExecute ShortCut = 8381 end object IncreaseOctaveAction: TAction Caption = 'IncreaseOctaveAction' OnExecute = IncreaseOctaveActionExecute ShortCut = 106 end object DecreaseOctaveAction: TAction Caption = 'DecreaseOctaveAction' OnExecute = DecreaseOctaveActionExecute ShortCut = 111 end object SingleStepAction: TAction ImageIndex = 92 OnExecute = SingleStepActionExecute ShortCut = 13 end end object GBDKCSaveDialog: TSaveDialog DefaultExt = '.c' Filter = 'GBDK C File|*.c' Left = 248 Top = 24 end object RGBDSAsmSaveDialog: TSaveDialog DefaultExt = '.asm' Filter = 'RGBDS Assembly|*.asm' Left = 272 Top = 48 end object VGMSaveDialog: TSaveDialog DefaultExt = '.vgm' Filter = 'VGM Rip|*.vgm' Left = 356 Top = 52 end object TBMOpenDialog: TOpenDialog DefaultExt = '.tbm' Filter = 'TrackerBoy TBM files|*.tbm' Left = 472 Top = 64 end object FUROpenDialog: TOpenDialog DefaultExt = '.fur' Filter = 'Furnace Tracker modules|*.fur' Left = 472 Top = 104 end object InstrumentPopupMenu: TPopupMenu Images = ImageList1 Left = 568 Top = 296 object MenuItem57: TMenuItem Caption = 'Copy' ImageIndex = 9 OnClick = MenuItem57Click end object MenuItem58: TMenuItem Caption = 'Paste' ImageIndex = 47 OnClick = MenuItem58Click end end end