object frmEffectEditor: TfrmEffectEditor
  Left = 640
  Height = 317
  Top = 502
  Width = 521
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'Effect Editor'
  ClientHeight = 317
  ClientWidth = 521
  DesignTimePPI = 128
  FormStyle = fsStayOnTop
  KeyPreview = True
  OnCloseQuery = FormCloseQuery
  OnKeyDown = FormKeyDown
  OnShow = FormCreate
  Position = poMainFormCenter
  ShowInTaskBar = stNever
  LCLVersion = '3.0.0.3'
  object ComboBox1: TComboBox
    Left = 104
    Height = 31
    Top = 12
    Width = 404
    DropDownCount = 99
    ItemHeight = 0
    ItemIndex = 0
    Items.Strings = (
      '0 - Arpeggio'
      '1 - Portamento up'
      '2 - Portamento down'
      '3 - Tone Portamento'
      '4 - Vibrato'
      '5 - Set Master Volume'
      '6 - Call Routine'
      '7 - Note Delay'
      '8 - Set Panning'
      '9 - Set Duty Cycle'
      'A - Volume Slide'
      'B - Position Jump'
      'C - Set Volume'
      'D - Pattern Break'
      'E - Note Cut'
      'F - Set Speed'
    )
    ParentFont = False
    Style = csDropDownList
    TabOrder = 0
    Text = '0 - Arpeggio'
    OnChange = ComboBox1Change
  end
  object Label1: TLabel
    Left = 19
    Height = 23
    Top = 19
    Width = 80
    Caption = 'Effect type'
    ParentColor = False
    ParentFont = False
  end
  object Notebook1: TNotebook
    Left = 19
    Height = 244
    Top = 61
    Width = 489
    PageIndex = 0
    TabOrder = 1
    object OneParamPage: TPage
      object OneParamTrackBar: TTrackBar
        Left = 24
        Height = 59
        Top = 55
        Width = 445
        Max = 255
        OnChange = OneParamTrackBarChange
        Position = 0
        ParentFont = False
        TabOrder = 0
      end
      object Value: TLabel
        Left = 24
        Height = 23
        Top = 12
        Width = 445
        Alignment = taCenter
        AutoSize = False
        Caption = 'Value'
        ParentColor = False
        ParentFont = False
      end
    end
    object TwoParamsPage: TPage
      object TwoParamsTrackBar1: TTrackBar
        Left = 24
        Height = 33
        Top = 55
        Width = 445
        Max = 15
        OnChange = TwoParamsTrackBar1Change
        Position = 0
        ParentFont = False
        TabOrder = 0
      end
      object TwoParamsTrackBar2: TTrackBar
        Left = 24
        Height = 33
        Top = 104
        Width = 445
        Max = 15
        OnChange = TwoParamsTrackBar2Change
        Position = 0
        ParentFont = False
        TabOrder = 1
      end
      object Value1: TLabel
        Left = 24
        Height = 23
        Top = 12
        Width = 445
        Alignment = taCenter
        AutoSize = False
        Caption = 'Value1'
        ParentColor = False
        ParentFont = False
      end
    end
    object VibratoPage: TPage
      object VibratoDepthTrackBar: TTrackBar
        Left = 0
        Height = 33
        Top = 32
        Width = 480
        Max = 15
        OnChange = VibratoDepthTrackBarChange
        Position = 0
        ParentFont = False
        TabOrder = 0
      end
      object Label2: TLabel
        Left = 224
        Height = 15
        Top = 0
        Width = 32
        Caption = 'Depth'
        ParentColor = False
        ParentFont = False
      end
      object VibratoComboBox: TComboBox
        Left = 128
        Height = 23
        Top = 117
        Width = 235
        ItemHeight = 15
        ItemIndex = 0
        Items.Strings = (
          '0: _________________________'
          '1: _-_-_-_-_-_-_-_-_-_-_-_-_'
          '2: __--__--__--__--__--__--_'
          '3: _---_---_---_---_---_---_'
          '4: ____----____----____----_'
          '5: _-_-----_-_-----_-_-----_'
          '6: __------__------__------_'
          '7: _-------_-------_-------_'
          '8: ________--------________-'
          '9: _-_-_-_---------_-_-_-_--'
          'a: __--__----------__--__---'
          'b: _---_-----------_---_----'
          'c: ____------------____-----'
          'd: _-_-------------_-_------'
          'e: __--------------__-------'
          'f: _---------------_--------'
        )
        Style = csDropDownList
        TabOrder = 1
        Text = '0: _________________________'
        OnChange = VibratoComboBoxChange
      end
      object Label3: TLabel
        Left = 213
        Height = 15
        Top = 85
        Width = 55
        Caption = 'Waveform'
        ParentColor = False
      end
    end
    object MasterVolumePage: TPage
      object Value2: TLabel
        Left = 24
        Height = 23
        Top = 24
        Width = 445
        Alignment = taCenter
        AutoSize = False
        Caption = 'Value2'
        ParentColor = False
        ParentFont = False
      end
      object LeftVolumeTrackBar: TTrackBar
        Left = 24
        Height = 33
        Top = 67
        Width = 445
        Max = 7
        OnChange = RightVolumeTrackBarChange
        Position = 0
        ParentFont = False
        TabOrder = 0
      end
      object RightVolumeTrackBar: TTrackBar
        Left = 24
        Height = 33
        Top = 116
        Width = 445
        Max = 7
        OnChange = RightVolumeTrackBarChange
        Position = 0
        ParentFont = False
        TabOrder = 1
      end
    end
    object PanningPage: TPage
      object LeftPanCheckGroup: TCheckGroup
        Left = 0
        Height = 244
        Top = 0
        Width = 241
        AutoFill = True
        Caption = 'Left'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 219
        ClientWidth = 237
        ParentFont = False
        TabOrder = 0
        object CheckBox1: TCheckBox
          Left = 4
          Height = 69
          Top = 4
          Width = 300
          Caption = 'Duty 1'
          ParentFont = False
          TabOrder = 0
          OnClick = CheckBox1Change
        end
        object CheckBox2: TCheckBox
          Left = 4
          Height = 69
          Top = 57
          Width = 300
          Caption = 'Duty 2'
          ParentFont = False
          TabOrder = 1
          OnClick = CheckBox1Change
        end
        object CheckBox3: TCheckBox
          Left = 4
          Height = 69
          Top = 109
          Width = 300
          Caption = 'Wave'
          ParentFont = False
          TabOrder = 2
          OnClick = CheckBox1Change
        end
        object CheckBox4: TCheckBox
          Left = 4
          Height = 66
          Top = 163
          Width = 300
          Caption = 'Noise'
          ParentFont = False
          TabOrder = 3
          OnClick = CheckBox1Change
        end
      end
      object RightPanCheckGroup: TCheckGroup
        Left = 244
        Height = 244
        Top = 0
        Width = 241
        AutoFill = True
        Caption = 'Right'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 219
        ClientWidth = 237
        ParentFont = False
        TabOrder = 1
        object CheckBox5: TCheckBox
          Left = 4
          Height = 69
          Top = 4
          Width = 300
          Caption = 'Duty 1'
          ParentFont = False
          TabOrder = 0
          OnClick = CheckBox1Change
        end
        object CheckBox6: TCheckBox
          Left = 4
          Height = 69
          Top = 57
          Width = 300
          Caption = 'Duty 2'
          ParentFont = False
          TabOrder = 1
          OnClick = CheckBox1Change
        end
        object CheckBox7: TCheckBox
          Left = 4
          Height = 69
          Top = 109
          Width = 300
          Caption = 'Wave'
          ParentFont = False
          TabOrder = 2
          OnClick = CheckBox1Change
        end
        object CheckBox8: TCheckBox
          Left = 4
          Height = 66
          Top = 163
          Width = 300
          Caption = 'Noise'
          ParentFont = False
          TabOrder = 3
          OnClick = CheckBox1Change
        end
      end
    end
    object DutyCyclePage: TPage
      object DutyRadioGroup: TRadioGroup
        Left = 73
        Height = 225
        Top = 0
        Width = 323
        AutoFill = True
        Caption = 'Duty Cycle'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 200
        ClientWidth = 319
        Items.Strings = (
          '12.5% ( _-------_-------_------- )'
          '25%   ( __------__------__------ )'
          '50%   ( ____----____----____---- ) (Square)'
          '75%   ( ______--______--______-- )'
        )
        OnSelectionChanged = DutyRadioGroupSelectionChanged
        ParentFont = False
        TabOrder = 0
      end
    end
  end
end