home *** CD-ROM | disk | FTP | other *** search
/ Freelog 6 / Freelog006.iso / Logs / Musique / Orangator / ORAN20.EXE / 0 / RCDATA / TORANGATOR / TORANGATOR.txt < prev   
Text File  |  1998-02-08  |  84KB  |  3,354 lines

  1. object Orangator: TOrangator
  2.   Left = -4
  3.   Top = -4
  4.   Width = 648
  5.   Height = 460
  6.   Caption = 'Orangator'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Icon.Data = {<image000.ico>}
  13.   Menu = MainMenu
  14.   Position = poDefault
  15.   WindowState = wsMaximized
  16.   OnCreate = FormCreate
  17.   OnDestroy = FormDestroy
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object AboutLabel: TLabel
  21.     Left = 430
  22.     Top = 296
  23.     Width = 206
  24.     Height = 13
  25.     Caption = 'rangator v2.0 (c) 1997 Sharonov Oleg // trx'
  26.   end
  27.   object PlayButton: TButton
  28.     Left = 583
  29.     Top = 313
  30.     Width = 55
  31.     Height = 23
  32.     Caption = 'Play'
  33.     Font.Charset = DEFAULT_CHARSET
  34.     Font.Color = clBlack
  35.     Font.Height = -15
  36.     Font.Name = 'MS Sans Serif'
  37.     Font.Style = [fsBold]
  38.     ParentFont = False
  39.     TabOrder = 3
  40.     OnClick = PlayClick
  41.   end
  42.   object StopButton: TButton
  43.     Left = 583
  44.     Top = 338
  45.     Width = 55
  46.     Height = 23
  47.     Caption = 'Stop'
  48.     Font.Charset = DEFAULT_CHARSET
  49.     Font.Color = clBlack
  50.     Font.Height = -15
  51.     Font.Name = 'MS Sans Serif'
  52.     Font.Style = [fsBold]
  53.     ParentFont = False
  54.     TabOrder = 4
  55.     OnClick = StopClick
  56.   end
  57.   object ExitButton: TButton
  58.     Left = 583
  59.     Top = 363
  60.     Width = 55
  61.     Height = 23
  62.     Caption = 'Exit'
  63.     Font.Charset = DEFAULT_CHARSET
  64.     Font.Color = clBlack
  65.     Font.Height = -15
  66.     Font.Name = 'MS Sans Serif'
  67.     Font.Style = [fsBold]
  68.     ParentFont = False
  69.     TabOrder = 5
  70.     OnClick = Exit1Click
  71.   end
  72.   object TabControl: TPageControl
  73.     Left = 1
  74.     Top = 0
  75.     Width = 638
  76.     Height = 296
  77.     ActivePage = OscillatorsSheet
  78.     TabOrder = 7
  79.     object MixerSheet: TTabSheet
  80.       Caption = 'Mixer'
  81.       object FrequencyGroupBox: TGroupBox
  82.         Left = 0
  83.         Top = -2
  84.         Width = 313
  85.         Height = 115
  86.         Caption = 'Parameters'
  87.         TabOrder = 0
  88.         object FrequencyLabel: TLabel
  89.           Left = 72
  90.           Top = 9
  91.           Width = 105
  92.           Height = 13
  93.           Caption = 'Frequency: 22050Hz'
  94.         end
  95.         object FrequencyScrollBar: TScrollBar
  96.           Left = 8
  97.           Top = 24
  98.           Width = 289
  99.           Height = 16
  100.           Max = 9600
  101.           Min = 200
  102.           Position = 4410
  103.           TabOrder = 0
  104.           OnChange = FrequencyScrollBarChange
  105.         end
  106.         object Frequency22050Button: TButton
  107.           Left = 72
  108.           Top = 48
  109.           Width = 49
  110.           Height = 17
  111.           Caption = '22050'
  112.           TabOrder = 1
  113.           OnClick = Frequency22050ButtonClick
  114.         end
  115.         object Frequency44100Button: TButton
  116.           Left = 128
  117.           Top = 48
  118.           Width = 49
  119.           Height = 17
  120.           Caption = '44100'
  121.           TabOrder = 2
  122.           OnClick = Frequency44100ButtonClick
  123.         end
  124.         object Frequency11025Button: TButton
  125.           Left = 16
  126.           Top = 48
  127.           Width = 49
  128.           Height = 17
  129.           Caption = '11025'
  130.           TabOrder = 3
  131.           OnClick = Frequency11025ButtonClick
  132.         end
  133.         object Frequency48000Button: TButton
  134.           Left = 184
  135.           Top = 48
  136.           Width = 49
  137.           Height = 17
  138.           Caption = '48000'
  139.           TabOrder = 4
  140.           OnClick = Frequency48000ButtonClick
  141.         end
  142.         object LengthNumberEdit: TNumberEdit
  143.           Left = 8
  144.           Top = 72
  145.           Width = 297
  146.           Height = 36
  147.           TabOrder = 5
  148.           Mult = 1.000000000000000000
  149.           ScrollMax = 256
  150.           ScrollMin = 1
  151.           Min = 1
  152.           Value = 10.000000000000000000
  153.           Description = 'Length: 0.227s, 10K'
  154.           OnChange = LengthNumberEditChange
  155.         end
  156.       end
  157.       object SamplesInfoGroupBox: TGroupBox
  158.         Left = 320
  159.         Top = -2
  160.         Width = 305
  161.         Height = 121
  162.         Caption = 'Samples Info'
  163.         TabOrder = 1
  164.         object Sample1Name: TLabel
  165.           Left = 80
  166.           Top = 9
  167.           Width = 73
  168.           Height = 16
  169.           Caption = 'No sample'
  170.         end
  171.         object Sample2Name: TLabel
  172.           Left = 81
  173.           Top = 65
  174.           Width = 72
  175.           Height = 16
  176.           Caption = 'No sample'
  177.         end
  178.         object Sample1StartPosNumberEdit: TNumberEdit
  179.           Left = 8
  180.           Top = 24
  181.           Width = 289
  182.           Height = 36
  183.           TabOrder = 0
  184.           Mult = 1.000000000000000000
  185.           ScrollMax = 1024
  186.           ScrollMin = 0
  187.           Min = 0
  188.           Description = 'Sample #1 start'
  189.           OnChange = Sample1StartPosNumberEditChange
  190.         end
  191.         object Sample2StartPosNumberEdit: TNumberEdit
  192.           Left = 8
  193.           Top = 80
  194.           Width = 289
  195.           Height = 36
  196.           TabOrder = 1
  197.           Mult = 1.000000000000000000
  198.           ScrollMax = 1024
  199.           ScrollMin = 0
  200.           Min = 0
  201.           Description = 'Sample #2 start'
  202.           OnChange = Sample2StartPosNumberEditChange
  203.         end
  204.       end
  205.     end
  206.     object AmplifiersSheet: TTabSheet
  207.       Caption = 'Amplifiers'
  208.       object FeedBackGroupBox: TGroupBox
  209.         Left = 0
  210.         Top = 76
  211.         Width = 305
  212.         Height = 177
  213.         Caption = 'FeedBack'
  214.         TabOrder = 2
  215.         object FeedBackVolumeLabel: TLabel
  216.           Left = 112
  217.           Top = 9
  218.           Width = 57
  219.           Height = 16
  220.           Caption = 'Volume'
  221.         end
  222.         object FeedBackDelayLabel: TLabel
  223.           Left = 112
  224.           Top = 74
  225.           Width = 129
  226.           Height = 15
  227.           Caption = 'Delay: 79.8ms (3.520K)'
  228.         end
  229.         object AdditionalSilenceLabel: TLabel
  230.           Left = 112
  231.           Top = 106
  232.           Width = 161
  233.           Height = 15
  234.           Caption = 'Additional Silence : 0.0sec (0K)'
  235.         end
  236.         object FeedBackDecayLabel: TLabel
  237.           Left = 112
  238.           Top = 41
  239.           Width = 81
  240.           Height = 16
  241.           Caption = 'Decay'
  242.         end
  243.         object FeedBackCutOffLabel: TLabel
  244.           Left = 112
  245.           Top = 138
  246.           Width = 81
  247.           Height = 15
  248.           Caption = 'Cut off'
  249.         end
  250.         object FeedBackVolumeScrollBar: TScrollBar
  251.           Left = 8
  252.           Top = 24
  253.           Width = 289
  254.           Height = 16
  255.           Max = 256
  256.           Position = 180
  257.           TabOrder = 0
  258.           OnChange = FeedBackVolumeScrollBarChange
  259.         end
  260.         object FeedBackDelayScrollBar: TScrollBar
  261.           Left = 8
  262.           Top = 88
  263.           Width = 289
  264.           Height = 16
  265.           LargeChange = 32
  266.           Max = 4096
  267.           Position = 220
  268.           TabOrder = 1
  269.           OnChange = FeedBackDelayScrollBarChange
  270.         end
  271.         object FeedBackActiveCheckBox: TCheckBox
  272.           Left = 248
  273.           Top = 0
  274.           Width = 50
  275.           Height = 17
  276.           Caption = 'Active'
  277.           TabOrder = 2
  278.           OnClick = FeedBackActiveCheckBoxClick
  279.         end
  280.         object AdditionalSilenceScrollBar: TScrollBar
  281.           Left = 8
  282.           Top = 120
  283.           Width = 289
  284.           Height = 16
  285.           Max = 256
  286.           TabOrder = 3
  287.           OnChange = AdditionalSilenceScrollBarChange
  288.         end
  289.         object FeedBackCyclicCheckBox: TCheckBox
  290.           Left = 61
  291.           Top = 0
  292.           Width = 46
  293.           Height = 16
  294.           Caption = 'Cyclic'
  295.           TabOrder = 4
  296.           OnClick = FeedBackCyclicCheckBoxClick
  297.         end
  298.         object FeedBackDecayScrollBar: TScrollBar
  299.           Left = 8
  300.           Top = 56
  301.           Width = 289
  302.           Height = 16
  303.           Max = 256
  304.           Position = 180
  305.           TabOrder = 5
  306.           OnChange = FeedBackVolumeScrollBarChange
  307.         end
  308.         object FeedBackCutOffScrollBar: TScrollBar
  309.           Left = 7
  310.           Top = 152
  311.           Width = 289
  312.           Height = 16
  313.           Max = 256
  314.           Position = 192
  315.           TabOrder = 6
  316.           OnChange = ReverbCutOffScrollBarChange
  317.         end
  318.       end
  319.       object MainAmplifierBox: TGroupBox
  320.         Left = 0
  321.         Top = -2
  322.         Width = 305
  323.         Height = 77
  324.         Caption = 'Main'
  325.         TabOrder = 1
  326.         object MainVolumeLabel: TLabel
  327.           Left = 128
  328.           Top = 9
  329.           Width = 49
  330.           Height = 13
  331.           Caption = 'Volume'
  332.         end
  333.         object MainVolumeBar: TScrollBar
  334.           Left = 8
  335.           Top = 24
  336.           Width = 289
  337.           Height = 16
  338.           Max = 256
  339.           Position = 256
  340.           TabOrder = 0
  341.           OnChange = MainVolumeBarChange
  342.         end
  343.         object VolumeModulationBox: TListBox
  344.           Left = 8
  345.           Top = 40
  346.           Width = 289
  347.           Height = 30
  348.           Columns = 9
  349.           ExtendedSelect = False
  350.           ItemHeight = 13
  351.           Items.Strings = (
  352.             'None'
  353.             'Env1'
  354.             'Env2'
  355.             'Env3'
  356.             'LFO1'
  357.             'LFO2'
  358.             'Noise'
  359.             'Graph'
  360.             'Seq'
  361.             'SEnv'
  362.             'Midi1'
  363.             'Midi2'
  364.             'MEnv1'
  365.             'MEnv2')
  366.           MultiSelect = True
  367.           TabOrder = 1
  368.           OnClick = VolumeModulationBoxClick
  369.         end
  370.       end
  371.       object AmplifierBox: TGroupBox
  372.         Left = 312
  373.         Top = 0
  374.         Width = 305
  375.         Height = 113
  376.         Caption = 'Amplifier'
  377.         TabOrder = 0
  378.         object PreOverdriveLabel: TLabel
  379.           Left = 112
  380.           Top = 9
  381.           Width = 105
  382.           Height = 16
  383.           Caption = 'PreOverdrive: 1.0'
  384.         end
  385.         object PostOverdriveLabel: TLabel
  386.           Left = 112
  387.           Top = 41
  388.           Width = 113
  389.           Height = 16
  390.           Caption = 'PostOverdrive: 1.0'
  391.         end
  392.         object WrapOverdriveLabel: TLabel
  393.           Left = 112
  394.           Top = 75
  395.           Width = 97
  396.           Height = 14
  397.           Caption = 'WrapOverdrive: 1.0'
  398.         end
  399.         object PreOverdriveScrollBar: TScrollBar
  400.           Left = 8
  401.           Top = 24
  402.           Width = 289
  403.           Height = 16
  404.           LargeChange = 16
  405.           Max = 256
  406.           Min = 16
  407.           Position = 16
  408.           TabOrder = 0
  409.           OnChange = PreOverdriveScrollBarChange
  410.         end
  411.         object PostOverdriveScrollBar: TScrollBar
  412.           Left = 8
  413.           Top = 55
  414.           Width = 289
  415.           Height = 16
  416.           LargeChange = 16
  417.           Max = 256
  418.           Min = 16
  419.           Position = 16
  420.           TabOrder = 1
  421.           OnChange = PostOverdriveScrollBarChange
  422.         end
  423.         object WrapOverdriveScrollBar: TScrollBar
  424.           Left = 8
  425.           Top = 90
  426.           Width = 289
  427.           Height = 16
  428.           LargeChange = 32
  429.           Max = 256
  430.           Min = 32
  431.           Position = 32
  432.           TabOrder = 2
  433.           OnChange = WrapOverdriveScrollBarChange
  434.         end
  435.         object WrapOverdriveCheckBox: TCheckBox
  436.           Left = 248
  437.           Top = 72
  438.           Width = 49
  439.           Height = 16
  440.           Caption = 'Active'
  441.           TabOrder = 3
  442.           OnClick = WrapOverdriveCheckBoxClick
  443.         end
  444.       end
  445.       object ReverbGroupBox: TGroupBox
  446.         Left = 312
  447.         Top = 113
  448.         Width = 305
  449.         Height = 144
  450.         Caption = 'Reverb'
  451.         TabOrder = 3
  452.         object ReverbVolume: TLabel
  453.           Left = 64
  454.           Top = 9
  455.           Width = 73
  456.           Height = 15
  457.           Caption = 'Dry volume'
  458.         end
  459.         object ReverbLengthLabel: TLabel
  460.           Left = 112
  461.           Top = 41
  462.           Width = 57
  463.           Height = 13
  464.           Caption = 'Length: 200ms'
  465.         end
  466.         object ReverbAttackLabel: TLabel
  467.           Left = 112
  468.           Top = 73
  469.           Width = 113
  470.           Height = 13
  471.           Caption = 'Attack length: 15ms'
  472.         end
  473.         object ReverbCutOffLabel: TLabel
  474.           Left = 112
  475.           Top = 105
  476.           Width = 57
  477.           Height = 13
  478.           Caption = 'Cut off'
  479.         end
  480.         object ReverbWetVolumeLabel: TLabel
  481.           Left = 160
  482.           Top = 8
  483.           Width = 73
  484.           Height = 14
  485.           Caption = 'Wet volume'
  486.         end
  487.         object ReverbActiveCheckBox: TCheckBox
  488.           Left = 248
  489.           Top = 0
  490.           Width = 49
  491.           Height = 16
  492.           Caption = 'Active'
  493.           TabOrder = 0
  494.           OnClick = ReverbActiveCheckBoxClick
  495.         end
  496.         object ReverbDryVolumeScrollBar: TScrollBar
  497.           Left = 8
  498.           Top = 24
  499.           Width = 145
  500.           Height = 16
  501.           Max = 32767
  502.           Position = 32767
  503.           TabOrder = 1
  504.           OnChange = ReverbVolumeScrollBarChange
  505.         end
  506.         object ReverbLengthScrollBar: TScrollBar
  507.           Left = 8
  508.           Top = 56
  509.           Width = 289
  510.           Height = 16
  511.           Max = 2000
  512.           Position = 200
  513.           TabOrder = 2
  514.           OnChange = ReverbLengthScrollBarChange
  515.         end
  516.         object ReverbAttackScrollBar: TScrollBar
  517.           Left = 8
  518.           Top = 88
  519.           Width = 289
  520.           Height = 16
  521.           Max = 600
  522.           Position = 15
  523.           TabOrder = 3
  524.           OnChange = ReverbAttackScrollBarChange
  525.         end
  526.         object ReverbCutOffScrollBar: TScrollBar
  527.           Left = 7
  528.           Top = 120
  529.           Width = 289
  530.           Height = 16
  531.           Max = 256
  532.           Position = 192
  533.           TabOrder = 4
  534.           OnChange = ReverbCutOffScrollBarChange
  535.         end
  536.         object ReverbWetVolumeScrollBar: TScrollBar
  537.           Left = 160
  538.           Top = 24
  539.           Width = 137
  540.           Height = 16
  541.           Max = 32767
  542.           Position = 15000
  543.           TabOrder = 5
  544.           OnChange = ReverbVolumeScrollBarChange
  545.         end
  546.       end
  547.     end
  548.     object OscillatorsSheet: TTabSheet
  549.       Caption = 'Oscillators'
  550.       object SignalGeneratorBox: TGroupBox
  551.         Left = 124
  552.         Top = -2
  553.         Width = 506
  554.         Height = 270
  555.         Caption = 'Oscillator'
  556.         Font.Charset = DEFAULT_CHARSET
  557.         Font.Color = clWindowText
  558.         Font.Height = -12
  559.         Font.Name = 'MS Sans Serif'
  560.         Font.Style = [fsBold]
  561.         ParentFont = False
  562.         TabOrder = 0
  563.         object SineGeneratorVolumeLabel: TLabel
  564.           Left = 96
  565.           Top = 7
  566.           Width = 64
  567.           Height = 13
  568.           Caption = 'Volume: 50'
  569.         end
  570.         object ShapeLabel: TLabel
  571.           Left = 96
  572.           Top = 157
  573.           Width = 77
  574.           Height = 13
  575.           Caption = 'Shape: 1.000'
  576.         end
  577.         object SineGeneratorFrequencyLabel: TLabel
  578.           Left = 96
  579.           Top = 67
  580.           Width = 104
  581.           Height = 13
  582.           Caption = 'Frequency: 440Hz'
  583.         end
  584.         object SineGeneratorRelativeFrequencyLabel: TLabel
  585.           Left = 96
  586.           Top = 127
  587.           Width = 148
  588.           Height = 13
  589.           Caption = 'Relative frequency: 100.0'
  590.         end
  591.         object SineGeneratorPhaseLabel: TLabel
  592.           Left = 96
  593.           Top = 218
  594.           Width = 56
  595.           Height = 13
  596.           Caption = 'Phase: 0∩┐╜'
  597.         end
  598.         object SineGeneratorVolumeBar: TScrollBar
  599.           Left = 6
  600.           Top = 21
  601.           Width = 332
  602.           Height = 16
  603.           LargeChange = 16
  604.           Max = 256
  605.           Position = 128
  606.           TabOrder = 0
  607.           OnChange = SineGeneratorVolumeBarChange
  608.         end
  609.         object SineGeneratorShapeBar: TScrollBar
  610.           Left = 6
  611.           Top = 171
  612.           Width = 332
  613.           Height = 16
  614.           LargeChange = 32
  615.           Max = 2048
  616.           Position = 1024
  617.           TabOrder = 5
  618.           OnChange = SineGeneratorShapeBarChange
  619.         end
  620.         object SineGeneratorShapeModulationBox: TListBox
  621.           Left = 5
  622.           Top = 188
  623.           Width = 334
  624.           Height = 30
  625.           Columns = 9
  626.           ExtendedSelect = False
  627.           ItemHeight = 13
  628.           Items.Strings = (
  629.             'None'
  630.             'Env1'
  631.             'Env2'
  632.             'Env3'
  633.             'LFO1'
  634.             'LFO2'
  635.             'Noise'
  636.             'Graph'
  637.             'Seq'
  638.             'SEnv'
  639.             'Midi1'
  640.             'Midi2'
  641.             'MEnv1'
  642.             'MEnv2')
  643.           MultiSelect = True
  644.           TabOrder = 6
  645.           OnClick = SineGeneratorShapeModulationBoxClick
  646.         end
  647.         object OscillatorFrequencyBar: TScrollBar
  648.           Left = 6
  649.           Top = 81
  650.           Width = 332
  651.           Height = 16
  652.           LargeChange = 10
  653.           Max = 11025
  654.           Position = 440
  655.           TabOrder = 2
  656.           OnChange = OscillatorFrequencyBarChange
  657.         end
  658.         object SineGeneratorFrequencyModulationBox: TListBox
  659.           Left = 5
  660.           Top = 98
  661.           Width = 334
  662.           Height = 30
  663.           Columns = 9
  664.           DragCursor = 2
  665.           ExtendedSelect = False
  666.           ItemHeight = 13
  667.           Items.Strings = (
  668.             'None'
  669.             'Env1'
  670.             'Env2'
  671.             'Env3'
  672.             'LFO1'
  673.             'LFO2'
  674.             'Noise'
  675.             'Graph'
  676.             'Seq'
  677.             'SEnv'
  678.             'Midi1'
  679.             'Midi2'
  680.             'MEnv1'
  681.             'MEnv2')
  682.           MultiSelect = True
  683.           TabOrder = 3
  684.           OnClick = SineGeneratorFrequencyModulationBoxClick
  685.         end
  686.         object SineGeneratorRelativeFrequencyBar: TScrollBar
  687.           Left = 6
  688.           Top = 140
  689.           Width = 332
  690.           Height = 16
  691.           LargeChange = 10
  692.           Max = 4000
  693.           Position = 1000
  694.           TabOrder = 4
  695.           OnChange = SineGeneratorRelativeFrequencyBarChange
  696.         end
  697.         object SineGeneratorPhaseScrollBar: TScrollBar
  698.           Left = 6
  699.           Top = 231
  700.           Width = 153
  701.           Height = 16
  702.           Max = 256
  703.           TabOrder = 7
  704.           OnChange = SineGeneratorPhaseScrollBarChange
  705.         end
  706.         object SineGeneratorVolumeModulationBox: TListBox
  707.           Left = 5
  708.           Top = 38
  709.           Width = 334
  710.           Height = 30
  711.           Columns = 9
  712.           ExtendedSelect = False
  713.           Font.Charset = DEFAULT_CHARSET
  714.           Font.Color = clWindowText
  715.           Font.Height = -12
  716.           Font.Name = 'MS Sans Serif'
  717.           Font.Style = [fsBold]
  718.           ItemHeight = 13
  719.           Items.Strings = (
  720.             'None'
  721.             'Env1'
  722.             'Env2'
  723.             'Env3'
  724.             'LFO1'
  725.             'LFO2'
  726.             'Noise'
  727.             'Graph'
  728.             'Seq'
  729.             'SEnv'
  730.             'Midi1'
  731.             'Midi2'
  732.             'MEnv1'
  733.             'MEnv2')
  734.           MultiSelect = True
  735.           ParentFont = False
  736.           Style = lbOwnerDrawVariable
  737.           TabOrder = 1
  738.           OnClick = SineGeneratorFrequencyModulationBoxClick
  739.         end
  740.         object OscillatorFilteredCheckBox: TCheckBox
  741.           Left = 275
  742.           Top = 236
  743.           Width = 51
  744.           Height = 14
  745.           Caption = 'Filter'
  746.           State = cbChecked
  747.           TabOrder = 8
  748.           OnClick = OscillatorWaveTypeRadioButtonClick
  749.         end
  750.         object HarmonicsGroupBox: TGroupBox
  751.           Left = 344
  752.           Top = 7
  753.           Width = 159
  754.           Height = 261
  755.           Caption = 'Harmonics'
  756.           TabOrder = 10
  757.           object HarmonicsActiveCheckBox: TCheckBox
  758.             Left = 88
  759.             Top = -1
  760.             Width = 57
  761.             Height = 17
  762.             Caption = 'Active'
  763.             TabOrder = 0
  764.             OnClick = HarmonicBarChange
  765.           end
  766.           object HarmonicsClearButton: TButton
  767.             Left = 3
  768.             Top = 147
  769.             Width = 51
  770.             Height = 17
  771.             Caption = 'Clear'
  772.             TabOrder = 1
  773.             OnClick = HarmonicsClearButtonClick
  774.           end
  775.           object HarmonicsRandomButton: TButton
  776.             Left = 3
  777.             Top = 181
  778.             Width = 51
  779.             Height = 17
  780.             Caption = 'Random'
  781.             TabOrder = 2
  782.             OnClick = HarmonicsRandomButtonClick
  783.           end
  784.           object HarmonicsExpButton: TButton
  785.             Left = 55
  786.             Top = 147
  787.             Width = 50
  788.             Height = 17
  789.             Caption = 'Exp'
  790.             TabOrder = 3
  791.             OnClick = HarmonicsExpButtonClick
  792.           end
  793.           object HarmonicsAllButton: TButton
  794.             Left = 3
  795.             Top = 164
  796.             Width = 51
  797.             Height = 17
  798.             Caption = 'Max'
  799.             TabOrder = 4
  800.             OnClick = HarmonicsAllButtonClick
  801.           end
  802.           object Harmonics1101Button: TButton
  803.             Left = 106
  804.             Top = 147
  805.             Width = 51
  806.             Height = 17
  807.             Caption = '11010'
  808.             TabOrder = 5
  809.             OnClick = Harmonics1101ButtonClick
  810.           end
  811.           object Harmonics1010Button: TButton
  812.             Left = 106
  813.             Top = 164
  814.             Width = 51
  815.             Height = 17
  816.             Caption = '10101'
  817.             TabOrder = 6
  818.             OnClick = Harmonics1010ButtonClick
  819.           end
  820.           object HarmonicsMultButton: TButton
  821.             Left = 106
  822.             Top = 181
  823.             Width = 51
  824.             Height = 17
  825.             Caption = 'Mult'
  826.             TabOrder = 7
  827.             OnClick = HarmonicsMultButtonClick
  828.           end
  829.           object HarmonicsDecButton: TButton
  830.             Left = 55
  831.             Top = 164
  832.             Width = 50
  833.             Height = 17
  834.             Caption = 'Decay'
  835.             TabOrder = 8
  836.             OnClick = HarmonicsDecButtonClick
  837.           end
  838.           object HarmonicBars: THarmonicBars
  839.             Left = 6
  840.             Top = 14
  841.             Width = 146
  842.             Height = 133
  843.             TabOrder = 9
  844.             OnChange = HarmonicBarsChange
  845.           end
  846.           object DetuneHarmonicBars: THarmonicBars
  847.             Left = 6
  848.             Top = 198
  849.             Width = 146
  850.             Height = 61
  851.             TabOrder = 10
  852.             OnChange = HarmonicBarsChange
  853.           end
  854.         end
  855.         object OscillatorMelodicCheckBox: TCheckBox
  856.           Left = 275
  857.           Top = 220
  858.           Width = 65
  859.           Height = 14
  860.           Caption = 'Melodic'
  861.           State = cbChecked
  862.           TabOrder = 9
  863.           OnClick = OscillatorMelodicCheckBoxClick
  864.         end
  865.         object WaveFormComboBox: TComboBox
  866.           Left = 164
  867.           Top = 227
  868.           Width = 101
  869.           Height = 22
  870.           Style = csOwnerDrawFixed
  871.           Font.Charset = DEFAULT_CHARSET
  872.           Font.Color = clBlack
  873.           Font.Height = -15
  874.           Font.Name = 'MS Sans Serif'
  875.           Font.Style = [fsBold]
  876.           ItemHeight = 16
  877.           Items.Strings = (
  878.             'Sine'
  879.             '|Sine|'
  880.             'EvenSine'
  881.             'Square'
  882.             'Triangle'
  883.             'Saw'
  884.             '2xSaw'
  885.             'Noise'
  886.             'Light noise'
  887.             'Custom'
  888.             'Sample 1'
  889.             'Sample 2')
  890.           ParentFont = False
  891.           TabOrder = 11
  892.           OnChange = WaveFormComboBoxChange
  893.         end
  894.         object OscillatorInvertCheckBox: TCheckBox
  895.           Left = 275
  896.           Top = 251
  897.           Width = 60
  898.           Height = 14
  899.           Caption = 'Invert'
  900.           TabOrder = 12
  901.           OnClick = OscillatorWaveTypeRadioButtonClick
  902.         end
  903.         object OscillatorRingModCheckBox: TCheckBox
  904.           Left = 59
  905.           Top = 252
  906.           Width = 72
  907.           Height = 14
  908.           Caption = 'RingMod'
  909.           TabOrder = 13
  910.           OnClick = OscillatorRingModCheckBoxClick
  911.         end
  912.         object OscillatorSyncCheckBox: TCheckBox
  913.           Left = 5
  914.           Top = 252
  915.           Width = 51
  916.           Height = 13
  917.           Caption = 'Sync'
  918.           TabOrder = 14
  919.           OnClick = OscillatorRingModCheckBoxClick
  920.         end
  921.         object OscillatorPhaseModCheckBox: TCheckBox
  922.           Left = 139
  923.           Top = 252
  924.           Width = 86
  925.           Height = 14
  926.           Caption = 'PhaseMod'
  927.           TabOrder = 15
  928.           OnClick = OscillatorRingModCheckBoxClick
  929.         end
  930.         object OscillatorFMCheckBox: TCheckBox
  931.           Left = 227
  932.           Top = 252
  933.           Width = 46
  934.           Height = 14
  935.           Caption = 'FM'
  936.           TabOrder = 16
  937.           OnClick = OscillatorRingModCheckBoxClick
  938.         end
  939.       end
  940.       object OscillatorsBox: TGroupBox
  941.         Left = 0
  942.         Top = -2
  943.         Width = 117
  944.         Height = 235
  945.         Caption = 'Oscillators'
  946.         TabOrder = 1
  947.         object OscillatorsVolumeLabel: TLabel
  948.           Left = 24
  949.           Top = 179
  950.           Width = 81
  951.           Height = 14
  952.           Caption = 'Volume: 100.0'
  953.         end
  954.         object Oscillator1CheckBox: TLightCheckBox
  955.           Left = 52
  956.           Top = 14
  957.           Width = 49
  958.           Height = 17
  959.           Checked = False
  960.           OffColor = clMaroon
  961.           OnClick = OscillatorActiveChange
  962.           Caption = 'Active'
  963.         end
  964.         object Oscillator1RadioButton: TRadioButton
  965.           Left = 8
  966.           Top = 14
  967.           Width = 33
  968.           Height = 17
  969.           Caption = '#&1'
  970.           Checked = True
  971.           TabOrder = 0
  972.           TabStop = True
  973.           OnClick = Oscillator1RadioButtonClick
  974.         end
  975.         object Oscillator2RadioButton: TRadioButton
  976.           Left = 8
  977.           Top = 30
  978.           Width = 33
  979.           Height = 17
  980.           Caption = '#&2'
  981.           TabOrder = 1
  982.           OnClick = Oscillator2RadioButtonClick
  983.         end
  984.         object Oscillator3RadioButton: TRadioButton
  985.           Left = 8
  986.           Top = 46
  987.           Width = 33
  988.           Height = 17
  989.           Caption = '#&3'
  990.           TabOrder = 2
  991.           OnClick = Oscillator3RadioButtonClick
  992.         end
  993.         object Oscillator2CheckBox: TLightCheckBox
  994.           Left = 52
  995.           Top = 30
  996.           Width = 49
  997.           Height = 17
  998.           Checked = False
  999.           OffColor = clMaroon
  1000.           OnClick = OscillatorActiveChange
  1001.           Caption = 'Active'
  1002.         end
  1003.         object Oscillator3CheckBox: TLightCheckBox
  1004.           Left = 52
  1005.           Top = 46
  1006.           Width = 49
  1007.           Height = 17
  1008.           Checked = False
  1009.           OffColor = clMaroon
  1010.           OnClick = OscillatorActiveChange
  1011.           Caption = 'Active'
  1012.         end
  1013.         object Oscillator4RadioButton: TRadioButton
  1014.           Left = 8
  1015.           Top = 62
  1016.           Width = 33
  1017.           Height = 17
  1018.           Caption = '#&4'
  1019.           TabOrder = 3
  1020.           OnClick = Oscillator4RadioButtonClick
  1021.         end
  1022.         object Oscillator4CheckBox: TLightCheckBox
  1023.           Left = 52
  1024.           Top = 62
  1025.           Width = 49
  1026.           Height = 17
  1027.           Checked = False
  1028.           OffColor = clMaroon
  1029.           OnClick = OscillatorActiveChange
  1030.           Caption = 'Active'
  1031.         end
  1032.         object Oscillator5RadioButton: TRadioButton
  1033.           Left = 8
  1034.           Top = 78
  1035.           Width = 33
  1036.           Height = 17
  1037.           Caption = '#&5'
  1038.           TabOrder = 4
  1039.           OnClick = Oscillator5RadioButtonClick
  1040.         end
  1041.         object Oscillator6RadioButton: TRadioButton
  1042.           Left = 8
  1043.           Top = 94
  1044.           Width = 33
  1045.           Height = 17
  1046.           Caption = '#&6'
  1047.           TabOrder = 5
  1048.           OnClick = Oscillator6RadioButtonClick
  1049.         end
  1050.         object Oscillator7RadioButton: TRadioButton
  1051.           Left = 8
  1052.           Top = 110
  1053.           Width = 33
  1054.           Height = 17
  1055.           Caption = '#&7'
  1056.           TabOrder = 6
  1057.           OnClick = Oscillator7RadioButtonClick
  1058.         end
  1059.         object Oscillator8RadioButton: TRadioButton
  1060.           Left = 8
  1061.           Top = 126
  1062.           Width = 33
  1063.           Height = 17
  1064.           Caption = '#&8'
  1065.           TabOrder = 7
  1066.           OnClick = Oscillator8RadioButtonClick
  1067.         end
  1068.         object Oscillator9RadioButton: TRadioButton
  1069.           Left = 8
  1070.           Top = 142
  1071.           Width = 33
  1072.           Height = 17
  1073.           Caption = '#&9'
  1074.           TabOrder = 8
  1075.           OnClick = Oscillator9RadioButtonClick
  1076.         end
  1077.         object Oscillator10RadioButton: TRadioButton
  1078.           Left = 8
  1079.           Top = 158
  1080.           Width = 39
  1081.           Height = 17
  1082.           Caption = '#1&0'
  1083.           TabOrder = 9
  1084.           OnClick = Oscillator10RadioButtonClick
  1085.         end
  1086.         object Oscillator5CheckBox: TLightCheckBox
  1087.           Left = 52
  1088.           Top = 78
  1089.           Width = 49
  1090.           Height = 17
  1091.           Checked = False
  1092.           OffColor = clMaroon
  1093.           OnClick = OscillatorActiveChange
  1094.           Caption = 'Active'
  1095.         end
  1096.         object Oscillator6CheckBox: TLightCheckBox
  1097.           Left = 52
  1098.           Top = 94
  1099.           Width = 49
  1100.           Height = 17
  1101.           Checked = False
  1102.           OffColor = clMaroon
  1103.           OnClick = OscillatorActiveChange
  1104.           Caption = 'Active'
  1105.         end
  1106.         object Oscillator7CheckBox: TLightCheckBox
  1107.           Left = 52
  1108.           Top = 110
  1109.           Width = 49
  1110.           Height = 17
  1111.           Checked = False
  1112.           OffColor = clMaroon
  1113.           OnClick = OscillatorActiveChange
  1114.           Caption = 'Active'
  1115.         end
  1116.         object Oscillator8CheckBox: TLightCheckBox
  1117.           Left = 52
  1118.           Top = 126
  1119.           Width = 49
  1120.           Height = 17
  1121.           Checked = False
  1122.           OffColor = clMaroon
  1123.           OnClick = OscillatorActiveChange
  1124.           Caption = 'Active'
  1125.         end
  1126.         object Oscillator9CheckBox: TLightCheckBox
  1127.           Left = 52
  1128.           Top = 142
  1129.           Width = 49
  1130.           Height = 17
  1131.           Checked = False
  1132.           OffColor = clMaroon
  1133.           OnClick = OscillatorActiveChange
  1134.           Caption = 'Active'
  1135.         end
  1136.         object Oscillator10CheckBox: TLightCheckBox
  1137.           Left = 52
  1138.           Top = 158
  1139.           Width = 49
  1140.           Height = 15
  1141.           Checked = False
  1142.           OffColor = clMaroon
  1143.           OnClick = OscillatorActiveChange
  1144.           Caption = 'Active'
  1145.         end
  1146.         object OscillatorsVolumeScrollBar: TScrollBar
  1147.           Left = 5
  1148.           Top = 194
  1149.           Width = 107
  1150.           Height = 16
  1151.           LargeChange = 32
  1152.           Max = 256
  1153.           Position = 256
  1154.           TabOrder = 19
  1155.           OnChange = OscillatorsVolumeScrollBarChange
  1156.         end
  1157.         object OscillatorsCalmCheckBox: TCheckBox
  1158.           Left = 6
  1159.           Top = 214
  1160.           Width = 49
  1161.           Height = 17
  1162.           Caption = 'Calm'
  1163.           TabOrder = 21
  1164.           OnClick = OscillatorsCalmCheckBoxClick
  1165.         end
  1166.       end
  1167.     end
  1168.     object WaveFormSheet: TTabSheet
  1169.       Caption = 'Waveform'
  1170.       object WaveFormGraphBox: TEnvelopeGraphBox
  1171.         Left = 0
  1172.         Top = 0
  1173.         Width = 629
  1174.         Height = 261
  1175.         TabOrder = 0
  1176.         OnChange = WaveFormGraphBoxChange
  1177.       end
  1178.     end
  1179.     object EnvelopesSheet: TTabSheet
  1180.       Caption = 'Envelope'
  1181.       object Envelope1Box1: TGroupBox
  1182.         Left = 0
  1183.         Top = -2
  1184.         Width = 201
  1185.         Height = 241
  1186.         Caption = 'Envelope 1'
  1187.         TabOrder = 0
  1188.         object Env1AttackLabel: TLabel
  1189.           Left = 80
  1190.           Top = 10
  1191.           Width = 73
  1192.           Height = 16
  1193.           Caption = 'Attack: 0.0%'
  1194.         end
  1195.         object Env1ReleaseLabel: TLabel
  1196.           Left = 80
  1197.           Top = 74
  1198.           Width = 81
  1199.           Height = 16
  1200.           Caption = 'Release: 70.3%'
  1201.         end
  1202.         object Env1AmplitudeLabel: TLabel
  1203.           Left = 80
  1204.           Top = 106
  1205.           Width = 97
  1206.           Height = 16
  1207.           Caption = 'Amplitude: 100.0'
  1208.         end
  1209.         object Env1BaseLabel: TLabel
  1210.           Left = 80
  1211.           Top = 138
  1212.           Width = 49
  1213.           Height = 11
  1214.           Caption = 'Base: 0.0'
  1215.         end
  1216.         object Env1SustainLabel: TLabel
  1217.           Left = 80
  1218.           Top = 42
  1219.           Width = 81
  1220.           Height = 16
  1221.           Caption = 'Sustain: 0.0%'
  1222.         end
  1223.         object Env1ShapeLabel: TLabel
  1224.           Left = 80
  1225.           Top = 170
  1226.           Width = 65
  1227.           Height = 16
  1228.           Caption = 'Shape: 1.000'
  1229.         end
  1230.         object Env1IterationsLabel: TLabel
  1231.           Left = 80
  1232.           Top = 202
  1233.           Width = 65
  1234.           Height = 16
  1235.           Caption = 'Iterations: 1'
  1236.           DragCursor = 2
  1237.         end
  1238.         object Env1AttackBar: TScrollBar
  1239.           Left = 8
  1240.           Top = 24
  1241.           Width = 185
  1242.           Height = 16
  1243.           Max = 1024
  1244.           TabOrder = 0
  1245.           OnChange = Env1AttackBarChange
  1246.         end
  1247.         object Env1ReleaseBar: TScrollBar
  1248.           Left = 8
  1249.           Top = 88
  1250.           Width = 185
  1251.           Height = 16
  1252.           Max = 1024
  1253.           Position = 720
  1254.           TabOrder = 2
  1255.           OnChange = Env1ReleaseBarChange
  1256.         end
  1257.         object Env1AmplitudeBar: TScrollBar
  1258.           Left = 8
  1259.           Top = 120
  1260.           Width = 185
  1261.           Height = 16
  1262.           Max = 1024
  1263.           Position = 1024
  1264.           TabOrder = 3
  1265.           OnChange = Env1AmplitudeBarChange
  1266.         end
  1267.         object Env1BaseBar: TScrollBar
  1268.           Left = 8
  1269.           Top = 152
  1270.           Width = 185
  1271.           Height = 16
  1272.           Max = 1024
  1273.           Min = -1024
  1274.           TabOrder = 4
  1275.           OnChange = Env1BaseBarChange
  1276.         end
  1277.         object Env1SustainBar: TScrollBar
  1278.           Left = 8
  1279.           Top = 56
  1280.           Width = 185
  1281.           Height = 16
  1282.           Max = 1024
  1283.           TabOrder = 1
  1284.           OnChange = Env1SustainBarChange
  1285.         end
  1286.         object Env1ShapeBar: TScrollBar
  1287.           Left = 8
  1288.           Top = 184
  1289.           Width = 185
  1290.           Height = 16
  1291.           Max = 512
  1292.           Position = 256
  1293.           TabOrder = 5
  1294.           OnChange = Env1ShapeBarChange
  1295.         end
  1296.         object Env1IterationsBar: TScrollBar
  1297.           Left = 8
  1298.           Top = 216
  1299.           Width = 185
  1300.           Height = 16
  1301.           Max = 32
  1302.           Min = 1
  1303.           Position = 1
  1304.           TabOrder = 6
  1305.           OnChange = Env1IterationsBarChange
  1306.         end
  1307.       end
  1308.       object Envelope2Box: TGroupBox
  1309.         Left = 208
  1310.         Top = -2
  1311.         Width = 201
  1312.         Height = 241
  1313.         Caption = 'Envelope 2'
  1314.         TabOrder = 1
  1315.         object Env2AttackLabel: TLabel
  1316.           Left = 72
  1317.           Top = 10
  1318.           Width = 73
  1319.           Height = 16
  1320.           Caption = 'Attack: 0.0%'
  1321.         end
  1322.         object Env2ReleaseLabel: TLabel
  1323.           Left = 72
  1324.           Top = 74
  1325.           Width = 81
  1326.           Height = 16
  1327.           Caption = 'Release: 70.3%'
  1328.         end
  1329.         object Env2AmplitudeLabel: TLabel
  1330.           Left = 72
  1331.           Top = 106
  1332.           Width = 81
  1333.           Height = 16
  1334.           Caption = 'Amplitude: 100.0'
  1335.         end
  1336.         object Env2BaseLabel: TLabel
  1337.           Left = 72
  1338.           Top = 138
  1339.           Width = 57
  1340.           Height = 16
  1341.           Caption = 'Base: 0.0'
  1342.         end
  1343.         object Env2SustainLabel: TLabel
  1344.           Left = 72
  1345.           Top = 42
  1346.           Width = 73
  1347.           Height = 16
  1348.           Caption = 'Sustain: 0.0%'
  1349.         end
  1350.         object Env2ShapeLabel: TLabel
  1351.           Left = 72
  1352.           Top = 170
  1353.           Width = 89
  1354.           Height = 16
  1355.           Caption = 'Shape: 1.000'
  1356.         end
  1357.         object Env2IterationsLabel: TLabel
  1358.           Left = 72
  1359.           Top = 202
  1360.           Width = 65
  1361.           Height = 16
  1362.           Caption = 'Iterations: 1'
  1363.         end
  1364.         object Env2AttackBar: TScrollBar
  1365.           Left = 8
  1366.           Top = 24
  1367.           Width = 185
  1368.           Height = 16
  1369.           Max = 1024
  1370.           TabOrder = 0
  1371.           OnChange = Env2AttackBarChange
  1372.         end
  1373.         object Env2ReleaseBar: TScrollBar
  1374.           Left = 8
  1375.           Top = 88
  1376.           Width = 185
  1377.           Height = 16
  1378.           Max = 1024
  1379.           Position = 720
  1380.           TabOrder = 2
  1381.           OnChange = Env2ReleaseBarChange
  1382.         end
  1383.         object Env2AmplitudeBar: TScrollBar
  1384.           Left = 8
  1385.           Top = 120
  1386.           Width = 185
  1387.           Height = 16
  1388.           Max = 1024
  1389.           Position = 1024
  1390.           TabOrder = 3
  1391.           OnChange = Env2AmplitudeBarChange
  1392.         end
  1393.         object Env2BaseBar: TScrollBar
  1394.           Left = 8
  1395.           Top = 152
  1396.           Width = 185
  1397.           Height = 16
  1398.           Max = 1024
  1399.           Min = -1024
  1400.           TabOrder = 4
  1401.           OnChange = Env2BaseBarChange
  1402.         end
  1403.         object Env2SustainBar: TScrollBar
  1404.           Left = 8
  1405.           Top = 56
  1406.           Width = 185
  1407.           Height = 16
  1408.           Max = 1024
  1409.           TabOrder = 1
  1410.           OnChange = Env2SustainBarChange
  1411.         end
  1412.         object Env2ShapeBar: TScrollBar
  1413.           Left = 8
  1414.           Top = 184
  1415.           Width = 185
  1416.           Height = 16
  1417.           Max = 512
  1418.           Position = 256
  1419.           TabOrder = 5
  1420.           OnChange = Env2ShapeBarChange
  1421.         end
  1422.         object Env2IterationsBar: TScrollBar
  1423.           Left = 8
  1424.           Top = 216
  1425.           Width = 185
  1426.           Height = 16
  1427.           Max = 32
  1428.           Min = 1
  1429.           Position = 1
  1430.           TabOrder = 6
  1431.           OnChange = Env2IterationsBarChange
  1432.         end
  1433.       end
  1434.       object Envelope3Box: TGroupBox
  1435.         Left = 416
  1436.         Top = -2
  1437.         Width = 201
  1438.         Height = 241
  1439.         Caption = 'Envelope 3'
  1440.         TabOrder = 2
  1441.         object Env3AttackLabel: TLabel
  1442.           Left = 72
  1443.           Top = 10
  1444.           Width = 73
  1445.           Height = 16
  1446.           Caption = 'Attack: 0.0%'
  1447.         end
  1448.         object Env3ReleaseLabel: TLabel
  1449.           Left = 72
  1450.           Top = 74
  1451.           Width = 81
  1452.           Height = 16
  1453.           Caption = 'Release: 70.3%'
  1454.         end
  1455.         object Env3AmplitudeLabel: TLabel
  1456.           Left = 72
  1457.           Top = 106
  1458.           Width = 81
  1459.           Height = 16
  1460.           Caption = 'Amplitude: 100.0'
  1461.         end
  1462.         object Env3BaseLabel: TLabel
  1463.           Left = 72
  1464.           Top = 138
  1465.           Width = 81
  1466.           Height = 16
  1467.           Caption = 'Base: 0.0'
  1468.         end
  1469.         object Env3SustainLabel: TLabel
  1470.           Left = 72
  1471.           Top = 42
  1472.           Width = 73
  1473.           Height = 16
  1474.           Caption = 'Sustain: 0.0%'
  1475.         end
  1476.         object Env3ShapeLabel: TLabel
  1477.           Left = 72
  1478.           Top = 170
  1479.           Width = 81
  1480.           Height = 16
  1481.           Caption = 'Shape: 1.000'
  1482.         end
  1483.         object Env3IterationsLabel: TLabel
  1484.           Left = 72
  1485.           Top = 202
  1486.           Width = 73
  1487.           Height = 16
  1488.           Caption = 'Iterations: 1'
  1489.         end
  1490.         object Env3AttackBar: TScrollBar
  1491.           Left = 8
  1492.           Top = 24
  1493.           Width = 185
  1494.           Height = 16
  1495.           Max = 1024
  1496.           TabOrder = 0
  1497.           OnChange = Env3AttackBarChange
  1498.         end
  1499.         object Env3ReleaseBar: TScrollBar
  1500.           Left = 8
  1501.           Top = 88
  1502.           Width = 185
  1503.           Height = 16
  1504.           Max = 1024
  1505.           Position = 720
  1506.           TabOrder = 2
  1507.           OnChange = Env3ReleaseBarChange
  1508.         end
  1509.         object Env3AmplitudeBar: TScrollBar
  1510.           Left = 8
  1511.           Top = 120
  1512.           Width = 185
  1513.           Height = 16
  1514.           Max = 1024
  1515.           Position = 1024
  1516.           TabOrder = 3
  1517.           OnChange = Env3AmplitudeBarChange
  1518.         end
  1519.         object Env3BaseBar: TScrollBar
  1520.           Left = 8
  1521.           Top = 152
  1522.           Width = 185
  1523.           Height = 16
  1524.           Max = 1024
  1525.           Min = -1024
  1526.           TabOrder = 4
  1527.           OnChange = Env3BaseBarChange
  1528.         end
  1529.         object Env3SustainBar: TScrollBar
  1530.           Left = 8
  1531.           Top = 56
  1532.           Width = 185
  1533.           Height = 16
  1534.           Max = 1024
  1535.           TabOrder = 1
  1536.           OnChange = Env3SustainBarChange
  1537.         end
  1538.         object Env3ShapeBar: TScrollBar
  1539.           Left = 8
  1540.           Top = 184
  1541.           Width = 185
  1542.           Height = 16
  1543.           Max = 512
  1544.           Position = 256
  1545.           TabOrder = 5
  1546.           OnChange = Env3ShapeBarChange
  1547.         end
  1548.         object Env3IterationsBar: TScrollBar
  1549.           Left = 8
  1550.           Top = 216
  1551.           Width = 185
  1552.           Height = 16
  1553.           Max = 32
  1554.           Min = 1
  1555.           Position = 1
  1556.           TabOrder = 6
  1557.           OnChange = Env3IterationsBarChange
  1558.         end
  1559.       end
  1560.     end
  1561.     object GraphEnvelopeSheet: TTabSheet
  1562.       Caption = 'GraphEnv'
  1563.       object EnvelopeGraphBox: TEnvelopeGraphBox
  1564.         Left = 0
  1565.         Top = 0
  1566.         Width = 629
  1567.         Height = 261
  1568.         TabOrder = 0
  1569.         OnChange = EnvelopeGraphBoxChange
  1570.       end
  1571.     end
  1572.     object LFOSheet: TTabSheet
  1573.       Caption = 'LFO'
  1574.       object LFO1Box: TGroupBox
  1575.         Left = 0
  1576.         Top = -2
  1577.         Width = 305
  1578.         Height = 145
  1579.         Caption = 'LFO 1'
  1580.         TabOrder = 0
  1581.         object LFO1FrequencyLabel: TLabel
  1582.           Left = 72
  1583.           Top = 10
  1584.           Width = 89
  1585.           Height = 16
  1586.           Caption = 'Frequency: 2.0Hz'
  1587.         end
  1588.         object LFO1AmplitudeLabel: TLabel
  1589.           Left = 72
  1590.           Top = 42
  1591.           Width = 81
  1592.           Height = 16
  1593.           Caption = 'Amplitude: 6.25'
  1594.         end
  1595.         object LFO1BaseLabel: TLabel
  1596.           Left = 72
  1597.           Top = 74
  1598.           Width = 73
  1599.           Height = 16
  1600.           Caption = 'Base: 0.0'
  1601.         end
  1602.         object LFO1PhaseLabel: TLabel
  1603.           Left = 136
  1604.           Top = 106
  1605.           Width = 57
  1606.           Height = 16
  1607.           Caption = 'Phase: 0∩┐╜'
  1608.         end
  1609.         object LFO1FrequencyBar: TScrollBar
  1610.           Left = 8
  1611.           Top = 24
  1612.           Width = 289
  1613.           Height = 16
  1614.           Max = 1600
  1615.           Position = 32
  1616.           TabOrder = 0
  1617.           OnChange = LFO1FrequencyBarChange
  1618.         end
  1619.         object LFO1AmplitudeBar: TScrollBar
  1620.           Left = 8
  1621.           Top = 56
  1622.           Width = 289
  1623.           Height = 16
  1624.           Max = 8192
  1625.           Position = 256
  1626.           TabOrder = 1
  1627.           OnChange = LFO1AmplitudeBarChange
  1628.         end
  1629.         object LFO1BaseBar: TScrollBar
  1630.           Left = 8
  1631.           Top = 88
  1632.           Width = 289
  1633.           Height = 16
  1634.           Max = 256
  1635.           Min = -256
  1636.           TabOrder = 2
  1637.           OnChange = LFO1BaseBarChange
  1638.         end
  1639.         object LFO1SineRadioButton: TRadioButton
  1640.           Left = 8
  1641.           Top = 105
  1642.           Width = 41
  1643.           Height = 17
  1644.           Caption = 'Sine'
  1645.           Checked = True
  1646.           TabOrder = 3
  1647.           TabStop = True
  1648.           OnClick = LFOFormRadioButtonClick
  1649.         end
  1650.         object LFO1RandomRadioButton: TRadioButton
  1651.           Left = 56
  1652.           Top = 105
  1653.           Width = 65
  1654.           Height = 17
  1655.           Caption = 'Random'
  1656.           TabOrder = 4
  1657.           OnClick = LFOFormRadioButtonClick
  1658.         end
  1659.         object LFO1PhaseScrollBar: TScrollBar
  1660.           Left = 136
  1661.           Top = 120
  1662.           Width = 161
  1663.           Height = 16
  1664.           Max = 256
  1665.           TabOrder = 5
  1666.           OnChange = LFO1PhaseScrollBarChange
  1667.         end
  1668.         object LFO1TriangleRadioButton: TRadioButton
  1669.           Left = 8
  1670.           Top = 120
  1671.           Width = 65
  1672.           Height = 17
  1673.           Caption = 'Triangle'
  1674.           TabOrder = 6
  1675.           OnClick = LFOFormRadioButtonClick
  1676.         end
  1677.       end
  1678.       object NoiseGroupBox: TGroupBox
  1679.         Left = 312
  1680.         Top = 142
  1681.         Width = 305
  1682.         Height = 112
  1683.         Caption = 'Noise 1'
  1684.         TabOrder = 2
  1685.         object NoiseFrequencyLabel: TLabel
  1686.           Left = 72
  1687.           Top = 10
  1688.           Width = 97
  1689.           Height = 16
  1690.           Caption = 'Frequency: 2.0Hz'
  1691.         end
  1692.         object NoiseAmplitudeLabel: TLabel
  1693.           Left = 72
  1694.           Top = 42
  1695.           Width = 105
  1696.           Height = 16
  1697.           Caption = 'Amplitude: 6.25'
  1698.         end
  1699.         object NoiseBaseLabel: TLabel
  1700.           Left = 72
  1701.           Top = 74
  1702.           Width = 97
  1703.           Height = 16
  1704.           Caption = 'Base: 0.0'
  1705.         end
  1706.         object NoiseFrequencyScrollBar: TScrollBar
  1707.           Left = 8
  1708.           Top = 24
  1709.           Width = 289
  1710.           Height = 16
  1711.           Max = 8820
  1712.           Position = 32
  1713.           TabOrder = 0
  1714.           OnChange = NoiseFrequencyScrollBarChange
  1715.         end
  1716.         object NoiseAmplitudeScrollBar: TScrollBar
  1717.           Left = 8
  1718.           Top = 56
  1719.           Width = 289
  1720.           Height = 16
  1721.           Max = 4096
  1722.           Position = 256
  1723.           TabOrder = 1
  1724.           OnChange = NoiseAmplitudeScrollBarChange
  1725.         end
  1726.         object NoiseBaseScrollBar: TScrollBar
  1727.           Left = 8
  1728.           Top = 88
  1729.           Width = 289
  1730.           Height = 16
  1731.           Max = 256
  1732.           Min = -256
  1733.           TabOrder = 2
  1734.           OnChange = NoiseBaseScrollBarChange
  1735.         end
  1736.       end
  1737.       object LFO2Box: TGroupBox
  1738.         Left = 312
  1739.         Top = -2
  1740.         Width = 305
  1741.         Height = 145
  1742.         Caption = 'LFO 2'
  1743.         TabOrder = 1
  1744.         object LFO2FrequencyLabel: TLabel
  1745.           Left = 72
  1746.           Top = 10
  1747.           Width = 89
  1748.           Height = 16
  1749.           Caption = 'Frequency: 2.0Hz'
  1750.         end
  1751.         object LFO2AmplitudeLabel: TLabel
  1752.           Left = 72
  1753.           Top = 42
  1754.           Width = 89
  1755.           Height = 16
  1756.           Caption = 'Amplitude: 6.25'
  1757.         end
  1758.         object LFO2BaseLabel: TLabel
  1759.           Left = 72
  1760.           Top = 74
  1761.           Width = 49
  1762.           Height = 16
  1763.           Caption = 'Base: 0.0'
  1764.         end
  1765.         object LFO2PhaseLabel: TLabel
  1766.           Left = 136
  1767.           Top = 106
  1768.           Width = 57
  1769.           Height = 16
  1770.           Caption = 'Phase: 0∩┐╜'
  1771.         end
  1772.         object LFO2FrequencyBar: TScrollBar
  1773.           Left = 8
  1774.           Top = 24
  1775.           Width = 289
  1776.           Height = 16
  1777.           Max = 1600
  1778.           Position = 32
  1779.           TabOrder = 0
  1780.           OnChange = LFO2FrequencyBarChange
  1781.         end
  1782.         object LFO2AmplitudeBar: TScrollBar
  1783.           Left = 8
  1784.           Top = 56
  1785.           Width = 289
  1786.           Height = 16
  1787.           Max = 8192
  1788.           Position = 256
  1789.           TabOrder = 1
  1790.           OnChange = LFO2AmplitudeBarChange
  1791.         end
  1792.         object LFO2BaseBar: TScrollBar
  1793.           Left = 8
  1794.           Top = 88
  1795.           Width = 289
  1796.           Height = 16
  1797.           Max = 256
  1798.           Min = -256
  1799.           TabOrder = 2
  1800.           OnChange = LFO2BaseBarChange
  1801.         end
  1802.         object LFO2SineRadioButton: TRadioButton
  1803.           Left = 8
  1804.           Top = 105
  1805.           Width = 41
  1806.           Height = 17
  1807.           Caption = 'Sine'
  1808.           Checked = True
  1809.           TabOrder = 3
  1810.           TabStop = True
  1811.           OnClick = LFOFormRadioButtonClick
  1812.         end
  1813.         object LFO2RandomRadioButton: TRadioButton
  1814.           Left = 56
  1815.           Top = 105
  1816.           Width = 65
  1817.           Height = 17
  1818.           Caption = 'Random'
  1819.           TabOrder = 4
  1820.           OnClick = LFOFormRadioButtonClick
  1821.         end
  1822.         object LFO2PhaseScrollBar: TScrollBar
  1823.           Left = 136
  1824.           Top = 120
  1825.           Width = 161
  1826.           Height = 16
  1827.           Max = 256
  1828.           TabOrder = 5
  1829.           OnChange = LFO2PhaseScrollBarChange
  1830.         end
  1831.         object LFO2TriangleRadioButton: TRadioButton
  1832.           Left = 8
  1833.           Top = 120
  1834.           Width = 65
  1835.           Height = 17
  1836.           Caption = 'Triangle'
  1837.           TabOrder = 6
  1838.           OnClick = LFOFormRadioButtonClick
  1839.         end
  1840.       end
  1841.     end
  1842.     object FiltersSheet: TTabSheet
  1843.       Caption = 'Filters'
  1844.       object FilterBox1: TGroupBox
  1845.         Left = 312
  1846.         Top = 0
  1847.         Width = 305
  1848.         Height = 112
  1849.         Caption = 'Average Filter'
  1850.         TabOrder = 0
  1851.         object FilterWindowSize: TLabel
  1852.           Left = 112
  1853.           Top = 10
  1854.           Width = 97
  1855.           Height = 16
  1856.           Caption = 'Window size'
  1857.         end
  1858.         object TrebleVolumeLabel: TLabel
  1859.           Left = 112
  1860.           Top = 42
  1861.           Width = 89
  1862.           Height = 16
  1863.           Caption = 'TrebleVolume'
  1864.         end
  1865.         object BassVolumeLabel1: TLabel
  1866.           Left = 112
  1867.           Top = 74
  1868.           Width = 97
  1869.           Height = 16
  1870.           Caption = 'BassVolume'
  1871.         end
  1872.         object AverageFilterWindowWidthBar: TScrollBar
  1873.           Left = 8
  1874.           Top = 24
  1875.           Width = 289
  1876.           Height = 16
  1877.           Min = 1
  1878.           Position = 1
  1879.           TabOrder = 0
  1880.           OnChange = ParametersChanged
  1881.         end
  1882.         object AverageFilterTrebleVolumeBar: TScrollBar
  1883.           Left = 8
  1884.           Top = 56
  1885.           Width = 289
  1886.           Height = 16
  1887.           Max = 256
  1888.           Position = 256
  1889.           TabOrder = 1
  1890.           OnChange = AverageFilterTrebleVolumeBarChange
  1891.         end
  1892.         object AverageFilterBassVolumeBar: TScrollBar
  1893.           Left = 8
  1894.           Top = 88
  1895.           Width = 289
  1896.           Height = 16
  1897.           Max = 256
  1898.           Position = 256
  1899.           TabOrder = 2
  1900.           OnChange = AverageFilterBassVolumeBarChange
  1901.         end
  1902.         object AverageFilterCheckBox: TCheckBox
  1903.           Left = 248
  1904.           Top = 0
  1905.           Width = 49
  1906.           Height = 17
  1907.           Caption = 'Active'
  1908.           TabOrder = 3
  1909.           OnClick = AverageFilterCheckBoxClick
  1910.         end
  1911.       end
  1912.       object FilterWindowBox: TGroupBox
  1913.         Left = 312
  1914.         Top = 112
  1915.         Width = 305
  1916.         Height = 80
  1917.         Caption = 'Avg ResonanceFilter'
  1918.         TabOrder = 1
  1919.         object FilterWindowPosLabel1: TLabel
  1920.           Left = 112
  1921.           Top = 10
  1922.           Width = 105
  1923.           Height = 16
  1924.           Caption = 'Window position'
  1925.         end
  1926.         object FilterWindowWidthLabel1: TLabel
  1927.           Left = 112
  1928.           Top = 42
  1929.           Width = 97
  1930.           Height = 16
  1931.           Caption = 'Window width'
  1932.         end
  1933.         object FW_WindowPosBar: TScrollBar
  1934.           Left = 8
  1935.           Top = 24
  1936.           Width = 289
  1937.           Height = 16
  1938.           Max = 256
  1939.           TabOrder = 1
  1940.           OnChange = FW_WindowPosBarChange
  1941.         end
  1942.         object FW_WindowWidthBar: TScrollBar
  1943.           Left = 8
  1944.           Top = 56
  1945.           Width = 289
  1946.           Height = 16
  1947.           Max = 256
  1948.           Min = 1
  1949.           Position = 1
  1950.           TabOrder = 2
  1951.           OnChange = FW_WindowWidthBarChange
  1952.         end
  1953.         object WindowFilterActiveBox: TCheckBox
  1954.           Left = 248
  1955.           Top = 0
  1956.           Width = 49
  1957.           Height = 17
  1958.           Caption = 'Active'
  1959.           TabOrder = 0
  1960.           OnClick = WindowFilterActiveBoxClick
  1961.         end
  1962.       end
  1963.       object ResonanceBox1: TGroupBox
  1964.         Left = 0
  1965.         Top = 0
  1966.         Width = 305
  1967.         Height = 176
  1968.         Caption = 'Resonance'
  1969.         TabOrder = 2
  1970.         object ResonanceVolumeLabel: TLabel
  1971.           Left = 112
  1972.           Top = 9
  1973.           Width = 81
  1974.           Height = 16
  1975.           Caption = 'Volume: 100.0'
  1976.         end
  1977.         object ResonanceFrequencyLabel: TLabel
  1978.           Left = 112
  1979.           Top = 42
  1980.           Width = 89
  1981.           Height = 15
  1982.           Caption = 'Frequency: 0Hz'
  1983.         end
  1984.         object ResonanceCalmingSpeedLabel: TLabel
  1985.           Left = 112
  1986.           Top = 105
  1987.           Width = 113
  1988.           Height = 16
  1989.           Caption = 'Calming speed: 0.063'
  1990.         end
  1991.         object ResonanceCalmingDependenceLabel: TLabel
  1992.           Left = 112
  1993.           Top = 137
  1994.           Width = 153
  1995.           Height = 16
  1996.           Caption = 'Calming dependence: 25.0%'
  1997.         end
  1998.         object ResonanceActiveBox: TCheckBox
  1999.           Left = 248
  2000.           Top = 0
  2001.           Width = 49
  2002.           Height = 17
  2003.           Caption = 'Active'
  2004.           TabOrder = 0
  2005.           OnClick = ResonanceActiveBoxClick
  2006.         end
  2007.         object ResonanceVolumeBar: TScrollBar
  2008.           Left = 8
  2009.           Top = 24
  2010.           Width = 289
  2011.           Height = 16
  2012.           LargeChange = 16
  2013.           Max = 512
  2014.           Position = 256
  2015.           TabOrder = 1
  2016.           OnChange = ResonanceVolumeBarChange
  2017.           OnKeyDown = ResonanceVolumeBarKeyDown
  2018.         end
  2019.         object ResonanceFrequencyModulationBox: TListBox
  2020.           Left = 8
  2021.           Top = 72
  2022.           Width = 289
  2023.           Height = 30
  2024.           Columns = 9
  2025.           ExtendedSelect = False
  2026.           Font.Charset = DEFAULT_CHARSET
  2027.           Font.Color = clWindowText
  2028.           Font.Height = -12
  2029.           Font.Name = 'MS Sans Serif'
  2030.           Font.Style = [fsBold]
  2031.           ItemHeight = 13
  2032.           Items.Strings = (
  2033.             'None'
  2034.             'Env1'
  2035.             'Env2'
  2036.             'Env3'
  2037.             'LFO1'
  2038.             'LFO2'
  2039.             'Noise'
  2040.             'Graph'
  2041.             'Seq'
  2042.             'SEnv'
  2043.             'Midi1'
  2044.             'Midi2'
  2045.             'MEnv1'
  2046.             'MEnv2')
  2047.           MultiSelect = True
  2048.           ParentFont = False
  2049.           TabOrder = 3
  2050.           OnClick = ResonanceFrequencyModulationBoxClick
  2051.         end
  2052.         object ResonanceFrequencyBar: TScrollBar
  2053.           Left = 8
  2054.           Top = 56
  2055.           Width = 289
  2056.           Height = 16
  2057.           LargeChange = 4
  2058.           Max = 8000
  2059.           TabOrder = 2
  2060.           OnChange = ResonanceFrequencyBarChange
  2061.         end
  2062.         object ResonanceCalmingSpeedBar: TScrollBar
  2063.           Left = 8
  2064.           Top = 120
  2065.           Width = 289
  2066.           Height = 16
  2067.           Max = 1024
  2068.           Position = 960
  2069.           TabOrder = 4
  2070.           OnChange = ResonanceCalmingSpeedBarChange
  2071.         end
  2072.         object ResonanceDependenceScrollBar: TScrollBar
  2073.           Left = 8
  2074.           Top = 152
  2075.           Width = 289
  2076.           Height = 16
  2077.           Max = 512
  2078.           Position = 128
  2079.           TabOrder = 5
  2080.           OnChange = ResonanceDependenceScrollBarChange
  2081.         end
  2082.       end
  2083.       object CutOffGroupBox: TGroupBox
  2084.         Left = 0
  2085.         Top = 176
  2086.         Width = 305
  2087.         Height = 81
  2088.         Caption = ' Cut Off '
  2089.         TabOrder = 3
  2090.         object CutOffLabel: TLabel
  2091.           Left = 112
  2092.           Top = 9
  2093.           Width = 81
  2094.           Height = 16
  2095.           Caption = 'Frequency'
  2096.         end
  2097.         object CutOffBar: TScrollBar
  2098.           Left = 8
  2099.           Top = 24
  2100.           Width = 289
  2101.           Height = 16
  2102.           Max = 255
  2103.           Position = 128
  2104.           TabOrder = 1
  2105.           OnChange = CutOffBarChange
  2106.         end
  2107.         object CutOffModulationBox: TListBox
  2108.           Left = 8
  2109.           Top = 40
  2110.           Width = 289
  2111.           Height = 30
  2112.           Columns = 9
  2113.           ExtendedSelect = False
  2114.           Font.Charset = DEFAULT_CHARSET
  2115.           Font.Color = clBlack
  2116.           Font.Height = -12
  2117.           Font.Name = 'MS Sans Serif'
  2118.           Font.Style = [fsBold]
  2119.           ItemHeight = 13
  2120.           Items.Strings = (
  2121.             'None'
  2122.             'Env1'
  2123.             'Env2'
  2124.             'Env3'
  2125.             'LFO1'
  2126.             'LFO2'
  2127.             'Noise'
  2128.             'Graph'
  2129.             'Seq'
  2130.             'SEnv'
  2131.             'Midi1'
  2132.             'Midi2'
  2133.             'MEnv1'
  2134.             'MEnv2')
  2135.           MultiSelect = True
  2136.           ParentFont = False
  2137.           Style = lbOwnerDrawFixed
  2138.           TabOrder = 2
  2139.           OnClick = CutOffModulationBoxClick
  2140.         end
  2141.         object CutOffActiveBox: TCheckBox
  2142.           Left = 248
  2143.           Top = 0
  2144.           Width = 49
  2145.           Height = 17
  2146.           Caption = 'Active'
  2147.           TabOrder = 0
  2148.           OnClick = CutOffActiveBoxClick
  2149.         end
  2150.         object CutOffHighRadioButton: TRadioButton
  2151.           Left = 167
  2152.           Top = 0
  2153.           Width = 41
  2154.           Height = 17
  2155.           Caption = 'High-p'
  2156.           TabOrder = 3
  2157.           OnClick = CutOffRadioButtonClick
  2158.         end
  2159.         object CutOffLowRadioButton: TRadioButton
  2160.           Left = 208
  2161.           Top = 0
  2162.           Width = 41
  2163.           Height = 17
  2164.           Caption = 'Low'
  2165.           Checked = True
  2166.           TabOrder = 4
  2167.           TabStop = True
  2168.           OnClick = CutOffRadioButtonClick
  2169.         end
  2170.       end
  2171.     end
  2172.     object SequencerSheet: TTabSheet
  2173.       Caption = 'Sequencer'
  2174.       object SequencerGroupBox: TPanel
  2175.         Left = 0
  2176.         Top = 0
  2177.         Width = 265
  2178.         Height = 257
  2179.         BevelInner = bvLowered
  2180.         BevelOuter = bvNone
  2181.         TabOrder = 0
  2182.       end
  2183.       object SequencerEnvelopeGroupBox: TPanel
  2184.         Left = 272
  2185.         Top = 0
  2186.         Width = 345
  2187.         Height = 180
  2188.         BevelInner = bvLowered
  2189.         BevelOuter = bvNone
  2190.         Ctl3D = True
  2191.         ParentCtl3D = False
  2192.         TabOrder = 1
  2193.       end
  2194.       object SequencerFrequencyGroupBox: TPanel
  2195.         Left = 272
  2196.         Top = 185
  2197.         Width = 345
  2198.         Height = 36
  2199.         BevelInner = bvLowered
  2200.         BevelOuter = bvNone
  2201.         TabOrder = 2
  2202.       end
  2203.       object ChordEdit: TEdit
  2204.         Left = 336
  2205.         Top = 224
  2206.         Width = 161
  2207.         Height = 21
  2208.         Enabled = False
  2209.         TabOrder = 3
  2210.         Text = 'C-5,E-5'
  2211.       end
  2212.       object ChordCheckBox: TCheckBox
  2213.         Left = 272
  2214.         Top = 224
  2215.         Width = 49
  2216.         Height = 17
  2217.         Caption = 'Chord'
  2218.         TabOrder = 4
  2219.         OnClick = ChordCheckBoxClick
  2220.       end
  2221.     end
  2222.     object OptionsSheet: TTabSheet
  2223.       Caption = 'Options'
  2224.       object RTBufferLengthLabel: TLabel
  2225.         Left = 320
  2226.         Top = 184
  2227.         Width = 133
  2228.         Height = 13
  2229.         Caption = 'Real-time buffer length: 0.5k'
  2230.       end
  2231.       object OptionsWaveOutDevicesBox: TGroupBox
  2232.         Left = 0
  2233.         Top = -2
  2234.         Width = 305
  2235.         Height = 89
  2236.         Caption = 'Wave Out Devices'
  2237.         TabOrder = 0
  2238.         object WaveOutDevicesListBox: TListBox
  2239.           Left = 8
  2240.           Top = 16
  2241.           Width = 289
  2242.           Height = 65
  2243.           ItemHeight = 13
  2244.           TabOrder = 0
  2245.         end
  2246.       end
  2247.       object OptionsMidiOutDevicesBox: TGroupBox
  2248.         Left = 312
  2249.         Top = -2
  2250.         Width = 305
  2251.         Height = 89
  2252.         Caption = 'Midi Out Devices'
  2253.         TabOrder = 1
  2254.         object MidiOutDevicesListBox: TListBox
  2255.           Left = 8
  2256.           Top = 16
  2257.           Width = 289
  2258.           Height = 65
  2259.           Enabled = False
  2260.           ItemHeight = 13
  2261.           TabOrder = 0
  2262.         end
  2263.       end
  2264.       object OptionsWaveInDevicesBox: TGroupBox
  2265.         Left = 0
  2266.         Top = 87
  2267.         Width = 305
  2268.         Height = 87
  2269.         Caption = 'Wave In Devices'
  2270.         TabOrder = 2
  2271.         object WaveInDevicesListBox: TListBox
  2272.           Left = 8
  2273.           Top = 16
  2274.           Width = 289
  2275.           Height = 65
  2276.           Enabled = False
  2277.           ItemHeight = 13
  2278.           TabOrder = 0
  2279.         end
  2280.       end
  2281.       object OptionsMidiInDevicesBox: TGroupBox
  2282.         Left = 312
  2283.         Top = 87
  2284.         Width = 305
  2285.         Height = 87
  2286.         Caption = 'Midi In Devices'
  2287.         TabOrder = 3
  2288.         object MidiInDevicesListBox: TListBox
  2289.           Left = 8
  2290.           Top = 16
  2291.           Width = 289
  2292.           Height = 65
  2293.           ItemHeight = 13
  2294.           TabOrder = 0
  2295.           OnClick = MidiInDevicesListBoxClick
  2296.         end
  2297.       end
  2298.       object SaveFormatGroupBox: TGroupBox
  2299.         Left = 0
  2300.         Top = 174
  2301.         Width = 137
  2302.         Height = 83
  2303.         Caption = 'Saving format'
  2304.         TabOrder = 4
  2305.         object SaveTypeMotorolaPCMRadioButton: TRadioButton
  2306.           Left = 8
  2307.           Top = 16
  2308.           Width = 121
  2309.           Height = 17
  2310.           Caption = 'Raw PCM (Motorola)'
  2311.           TabOrder = 0
  2312.         end
  2313.         object SaveTypeWAVRadioButton: TRadioButton
  2314.           Left = 8
  2315.           Top = 48
  2316.           Width = 97
  2317.           Height = 17
  2318.           Caption = 'Microsoft WAV'
  2319.           TabOrder = 2
  2320.         end
  2321.         object SaveTypeXIRadioButton: TRadioButton
  2322.           Left = 8
  2323.           Top = 64
  2324.           Width = 97
  2325.           Height = 17
  2326.           Caption = 'FastTracker'#39's XI'
  2327.           Checked = True
  2328.           TabOrder = 3
  2329.           TabStop = True
  2330.         end
  2331.         object SaveTypeIntelPCMRadioButton: TRadioButton
  2332.           Left = 8
  2333.           Top = 32
  2334.           Width = 105
  2335.           Height = 17
  2336.           Caption = 'Raw PCM (Intel)'
  2337.           TabOrder = 1
  2338.         end
  2339.       end
  2340.       object QualityRadioGroup: TRadioGroup
  2341.         Left = 144
  2342.         Top = 174
  2343.         Width = 73
  2344.         Height = 49
  2345.         Caption = 'Quality'
  2346.         ItemIndex = 1
  2347.         Items.Strings = (
  2348.           '8 bits'
  2349.           '16 bits')
  2350.         TabOrder = 5
  2351.         OnClick = QualityRadioGroupClick
  2352.       end
  2353.       object RealTimeDelayScrollBar: TScrollBar
  2354.         Left = 320
  2355.         Top = 200
  2356.         Width = 145
  2357.         Height = 16
  2358.         Max = 32
  2359.         Min = 1
  2360.         Position = 1
  2361.         TabOrder = 6
  2362.         OnChange = RealTimeDelayScrollBarChange
  2363.       end
  2364.     end
  2365.     object RealTimeTabSheet: TTabSheet
  2366.       Caption = 'Realtime'
  2367.       object TempoGroupBox: TGroupBox
  2368.         Left = 312
  2369.         Top = 184
  2370.         Width = 257
  2371.         Height = 57
  2372.         Caption = 'Tempo'
  2373.         TabOrder = 0
  2374.         object TempoEdit: TNumberEdit
  2375.           Left = 8
  2376.           Top = 16
  2377.           Width = 241
  2378.           Height = 36
  2379.           TabOrder = 0
  2380.           Mult = 1.000000000000000000
  2381.           ScrollMax = 256
  2382.           ScrollMin = 32
  2383.           Min = 0
  2384.           Value = 112.000000000000000000
  2385.           Description = 'Tempo'
  2386.           OnChange = TempoEditChange
  2387.         end
  2388.       end
  2389.       object MidiControllersGroupBox: TGroupBox
  2390.         Left = 0
  2391.         Top = 177
  2392.         Width = 257
  2393.         Height = 80
  2394.         Caption = 'Midi Controllers'
  2395.         TabOrder = 1
  2396.         object Controller1AmplitudeLabel: TLabel
  2397.           Left = 88
  2398.           Top = 10
  2399.           Width = 57
  2400.           Height = 16
  2401.           Caption = 'Sensitivity'
  2402.         end
  2403.         object Controller2AmplitudeLabel: TLabel
  2404.           Left = 88
  2405.           Top = 42
  2406.           Width = 57
  2407.           Height = 16
  2408.           Caption = 'Sensitivity'
  2409.         end
  2410.         object Controller1SensetivityScrollBar: TScrollBar
  2411.           Left = 72
  2412.           Top = 24
  2413.           Width = 177
  2414.           Height = 16
  2415.           Max = 256
  2416.           Min = 1
  2417.           Position = 256
  2418.           TabOrder = 0
  2419.           OnChange = Controller1SensetivityScrollBarChange
  2420.         end
  2421.         object MidiController1SpinEdit: TSpinEdit
  2422.           Left = 8
  2423.           Top = 20
  2424.           Width = 49
  2425.           Height = 22
  2426.           MaxValue = 255
  2427.           MinValue = 0
  2428.           TabOrder = 1
  2429.           Value = 7
  2430.           OnChange = MidiController1SpinEditChange
  2431.         end
  2432.         object MidiController2SpinEdit: TSpinEdit
  2433.           Left = 8
  2434.           Top = 52
  2435.           Width = 49
  2436.           Height = 22
  2437.           MaxValue = 0
  2438.           MinValue = 0
  2439.           TabOrder = 2
  2440.           Value = 10
  2441.           OnChange = MidiController2SpinEditChange
  2442.         end
  2443.         object Controller2SensetivityScrollBar: TScrollBar
  2444.           Left = 72
  2445.           Top = 56
  2446.           Width = 177
  2447.           Height = 16
  2448.           Max = 256
  2449.           Min = 1
  2450.           Position = 256
  2451.           TabOrder = 3
  2452.           OnChange = Controller1SensetivityScrollBarChange
  2453.         end
  2454.       end
  2455.       object OscillatorMidiInCheckBox: TCheckBox
  2456.         Left = 310
  2457.         Top = 242
  2458.         Width = 171
  2459.         Height = 17
  2460.         Caption = 'Oscillators response to MIDI In'
  2461.         Ctl3D = False
  2462.         ParentCtl3D = False
  2463.         State = cbChecked
  2464.         TabOrder = 2
  2465.       end
  2466.       object MIDIEnvelopeGroupBox: TGroupBox
  2467.         Left = 0
  2468.         Top = -2
  2469.         Width = 305
  2470.         Height = 169
  2471.         Caption = 'MIDIEnvelope1'
  2472.         TabOrder = 3
  2473.         object MIDIAttack1Label: TLabel
  2474.           Left = 88
  2475.           Top = 9
  2476.           Width = 57
  2477.           Height = 16
  2478.           Caption = 'Attack'
  2479.         end
  2480.         object Release1Label: TLabel
  2481.           Left = 88
  2482.           Top = 106
  2483.           Width = 57
  2484.           Height = 17
  2485.           Caption = 'Release'
  2486.         end
  2487.         object MIDIDecay1Label: TLabel
  2488.           Left = 88
  2489.           Top = 42
  2490.           Width = 57
  2491.           Height = 15
  2492.           Caption = 'Decay'
  2493.         end
  2494.         object MidiSustain1Label: TLabel
  2495.           Left = 88
  2496.           Top = 74
  2497.           Width = 57
  2498.           Height = 15
  2499.           Caption = 'Sustain'
  2500.         end
  2501.         object MIDIEnvelope1AttackScrollBar: TScrollBar
  2502.           Left = 8
  2503.           Top = 24
  2504.           Width = 289
  2505.           Height = 16
  2506.           Max = 256
  2507.           Position = 10
  2508.           TabOrder = 0
  2509.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2510.         end
  2511.         object MidiEnvelope1ReleaseScrollBar: TScrollBar
  2512.           Left = 8
  2513.           Top = 120
  2514.           Width = 289
  2515.           Height = 16
  2516.           Max = 256
  2517.           Position = 20
  2518.           TabOrder = 1
  2519.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2520.         end
  2521.         object MidiEnvelope1AmplitudeScrollBar: TScrollBar
  2522.           Left = 8
  2523.           Top = 144
  2524.           Width = 289
  2525.           Height = 16
  2526.           Max = 32768
  2527.           Position = 16384
  2528.           TabOrder = 2
  2529.           OnChange = MidiEnvelope1AmplitudeScrollBarChange
  2530.         end
  2531.         object MidiEnvelope1DecayScrollBar: TScrollBar
  2532.           Left = 8
  2533.           Top = 56
  2534.           Width = 289
  2535.           Height = 16
  2536.           Max = 256
  2537.           Position = 20
  2538.           TabOrder = 3
  2539.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2540.         end
  2541.         object MidiEnvelope1SustainScrollBar: TScrollBar
  2542.           Left = 8
  2543.           Top = 88
  2544.           Width = 289
  2545.           Height = 16
  2546.           Max = 127
  2547.           Position = 100
  2548.           TabOrder = 4
  2549.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2550.         end
  2551.       end
  2552.       object MidiEnvelope2GroupBox: TGroupBox
  2553.         Left = 312
  2554.         Top = -2
  2555.         Width = 305
  2556.         Height = 169
  2557.         Caption = 'MIDIEnvelope2'
  2558.         TabOrder = 4
  2559.         object MIDIAttack2Label: TLabel
  2560.           Left = 88
  2561.           Top = 9
  2562.           Width = 57
  2563.           Height = 16
  2564.           Caption = 'Attack'
  2565.         end
  2566.         object Release2Label: TLabel
  2567.           Left = 88
  2568.           Top = 106
  2569.           Width = 57
  2570.           Height = 15
  2571.           Caption = 'Release'
  2572.         end
  2573.         object MIDIDecay2Label: TLabel
  2574.           Left = 88
  2575.           Top = 42
  2576.           Width = 57
  2577.           Height = 15
  2578.           Caption = 'Decay'
  2579.         end
  2580.         object MidiSustain2Label: TLabel
  2581.           Left = 88
  2582.           Top = 74
  2583.           Width = 57
  2584.           Height = 15
  2585.           Caption = 'Sustain'
  2586.         end
  2587.         object MIDIEnvelope2AttackScrollBar: TScrollBar
  2588.           Left = 8
  2589.           Top = 24
  2590.           Width = 289
  2591.           Height = 16
  2592.           Max = 256
  2593.           Position = 10
  2594.           TabOrder = 0
  2595.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2596.         end
  2597.         object MidiEnvelope2ReleaseScrollBar: TScrollBar
  2598.           Left = 8
  2599.           Top = 120
  2600.           Width = 289
  2601.           Height = 16
  2602.           Max = 256
  2603.           Position = 20
  2604.           TabOrder = 1
  2605.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2606.         end
  2607.         object MidiEnvelope2AmplitudeScrollBar: TScrollBar
  2608.           Left = 8
  2609.           Top = 144
  2610.           Width = 289
  2611.           Height = 16
  2612.           Max = 32768
  2613.           Position = 16384
  2614.           TabOrder = 2
  2615.           OnChange = MidiEnvelope1AmplitudeScrollBarChange
  2616.         end
  2617.         object MidiEnvelope2DecayScrollBar: TScrollBar
  2618.           Left = 8
  2619.           Top = 56
  2620.           Width = 289
  2621.           Height = 16
  2622.           Max = 256
  2623.           Position = 20
  2624.           TabOrder = 3
  2625.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2626.         end
  2627.         object MidiEnvelope2SustainScrollBar: TScrollBar
  2628.           Left = 8
  2629.           Top = 88
  2630.           Width = 289
  2631.           Height = 16
  2632.           Max = 127
  2633.           Position = 100
  2634.           TabOrder = 4
  2635.           OnChange = MIDIEnvelope1AttackScrollBarChange
  2636.         end
  2637.       end
  2638.     end
  2639.     object EffectsTabSheet: TTabSheet
  2640.       Caption = 'FX'
  2641.       object FlangerGroupBox: TGroupBox
  2642.         Left = 0
  2643.         Top = 0
  2644.         Width = 305
  2645.         Height = 161
  2646.         Caption = 'Flanger'
  2647.         TabOrder = 0
  2648.         object FlangerMaxDelayLabel: TLabel
  2649.           Left = 112
  2650.           Top = 74
  2651.           Width = 105
  2652.           Height = 15
  2653.           Caption = 'Max delay: 0.45ms'
  2654.         end
  2655.         object FlangerRateLabel: TLabel
  2656.           Left = 112
  2657.           Top = 106
  2658.           Width = 81
  2659.           Height = 15
  2660.           Caption = 'Rate'
  2661.         end
  2662.         object FlangerMinDelayLabel: TLabel
  2663.           Left = 112
  2664.           Top = 42
  2665.           Width = 89
  2666.           Height = 13
  2667.           Caption = 'Min delay: 0.0ms'
  2668.         end
  2669.         object FlangerCrossFadeLabel: TLabel
  2670.           Left = 112
  2671.           Top = 10
  2672.           Width = 89
  2673.           Height = 15
  2674.           Caption = 'Crossfade: 50%'
  2675.         end
  2676.         object FlangerCheckBox: TCheckBox
  2677.           Left = 248
  2678.           Top = 0
  2679.           Width = 49
  2680.           Height = 17
  2681.           Caption = 'Active'
  2682.           TabOrder = 0
  2683.           OnClick = FlangerCheckBoxClick
  2684.         end
  2685.         object FlangerMaxDelayScrollBar: TScrollBar
  2686.           Left = 8
  2687.           Top = 88
  2688.           Width = 289
  2689.           Height = 16
  2690.           Position = 20
  2691.           TabOrder = 1
  2692.           OnChange = FlangerMaxDelayScrollBarChange
  2693.         end
  2694.         object FlangerRateScrollBar: TScrollBar
  2695.           Left = 8
  2696.           Top = 120
  2697.           Width = 289
  2698.           Height = 16
  2699.           Max = 500
  2700.           Position = 50
  2701.           TabOrder = 2
  2702.           OnChange = FlangerRateScrollBarChange
  2703.         end
  2704.         object FlangerInvertCheckBox: TCheckBox
  2705.           Left = 8
  2706.           Top = 138
  2707.           Width = 49
  2708.           Height = 17
  2709.           Caption = 'Invert'
  2710.           TabOrder = 3
  2711.           OnClick = FlangerInvertCheckBoxClick
  2712.         end
  2713.         object FlangerMinDelayScrollBar: TScrollBar
  2714.           Left = 8
  2715.           Top = 56
  2716.           Width = 289
  2717.           Height = 16
  2718.           TabOrder = 4
  2719.           OnChange = FlangerMinDelayScrollBarChange
  2720.         end
  2721.         object FlangerCrossFadeScrollBar: TScrollBar
  2722.           Left = 8
  2723.           Top = 24
  2724.           Width = 289
  2725.           Height = 16
  2726.           Max = 256
  2727.           Position = 128
  2728.           TabOrder = 5
  2729.           OnChange = FlangerCrossFadeScrollBarChange
  2730.         end
  2731.       end
  2732.       object ChorusGroupBox: TGroupBox
  2733.         Left = 312
  2734.         Top = 0
  2735.         Width = 313
  2736.         Height = 161
  2737.         Caption = 'Chorus'
  2738.         TabOrder = 1
  2739.         object ChorusMaxDelayLabel: TLabel
  2740.           Left = 112
  2741.           Top = 74
  2742.           Width = 65
  2743.           Height = 15
  2744.           Caption = 'Max delay'
  2745.         end
  2746.         object ChorusRateLabel: TLabel
  2747.           Left = 112
  2748.           Top = 106
  2749.           Width = 81
  2750.           Height = 15
  2751.           Caption = 'Vibrato rate'
  2752.         end
  2753.         object ChorusVolumeLabel: TLabel
  2754.           Left = 112
  2755.           Top = 10
  2756.           Width = 97
  2757.           Height = 15
  2758.           Caption = 'Volume: 100%'
  2759.         end
  2760.         object ChorusVoicesLabel: TLabel
  2761.           Left = 8
  2762.           Top = 48
  2763.           Width = 35
  2764.           Height = 13
  2765.           Caption = 'Voices:'
  2766.         end
  2767.         object ChorusCheckBox: TCheckBox
  2768.           Left = 256
  2769.           Top = 0
  2770.           Width = 49
  2771.           Height = 17
  2772.           Caption = 'Active'
  2773.           TabOrder = 0
  2774.           OnClick = ChorusCheckBoxClick
  2775.         end
  2776.         object ChorusNumberOfVoicesSpinEdit: TSpinEdit
  2777.           Left = 48
  2778.           Top = 48
  2779.           Width = 49
  2780.           Height = 22
  2781.           MaxValue = 20
  2782.           MinValue = 1
  2783.           TabOrder = 1
  2784.           Value = 1
  2785.           OnChange = ChorusNumberOfVoicesSpinEditChange
  2786.         end
  2787.         object ChorusMaxDelayScrollBar: TScrollBar
  2788.           Left = 8
  2789.           Top = 88
  2790.           Width = 297
  2791.           Height = 16
  2792.           Max = 500
  2793.           Position = 70
  2794.           TabOrder = 2
  2795.           OnChange = ChorusMaxDelayScrollBarChange
  2796.         end
  2797.         object ChorusVibratoRateScrollBar: TScrollBar
  2798.           Left = 8
  2799.           Top = 120
  2800.           Width = 297
  2801.           Height = 16
  2802.           Max = 10000
  2803.           Min = 1
  2804.           Position = 800
  2805.           TabOrder = 3
  2806.           OnChange = ChorusVibratoRateScrollBarChange
  2807.         end
  2808.         object ChorusVolumeScrollBar: TScrollBar
  2809.           Left = 8
  2810.           Top = 24
  2811.           Width = 297
  2812.           Height = 16
  2813.           Max = 1024
  2814.           Min = 256
  2815.           Position = 256
  2816.           TabOrder = 4
  2817.           OnChange = ChorusVolumeScrollBarChange
  2818.         end
  2819.       end
  2820.     end
  2821.   end
  2822.   object SaveButton: TButton
  2823.     Left = 583
  2824.     Top = 388
  2825.     Width = 55
  2826.     Height = 23
  2827.     Caption = 'Save'
  2828.     Font.Charset = DEFAULT_CHARSET
  2829.     Font.Color = clBlack
  2830.     Font.Height = -15
  2831.     Font.Name = 'MS Sans Serif'
  2832.     Font.Style = [fsBold]
  2833.     ParentFont = False
  2834.     TabOrder = 6
  2835.     OnClick = SaveButtonClick
  2836.   end
  2837.   object WaveGraphicBox1: TGroupBox
  2838.     Left = -7
  2839.     Top = 309
  2840.     Width = 579
  2841.     Height = 102
  2842.     TabOrder = 8
  2843.     object DrawWaveRadioButton: TRadioButton
  2844.       Left = 104
  2845.       Top = 7
  2846.       Width = 59
  2847.       Height = 17
  2848.       Caption = 'Zoomed'
  2849.       Checked = True
  2850.       TabOrder = 1
  2851.       TabStop = True
  2852.       OnClick = DrawRadioButtonClick
  2853.     end
  2854.     object DrawEnv1RadioButton: TRadioButton
  2855.       Left = 216
  2856.       Top = 7
  2857.       Width = 43
  2858.       Height = 17
  2859.       Caption = 'Env1'
  2860.       TabOrder = 3
  2861.       OnClick = DrawRadioButtonClick
  2862.     end
  2863.     object DrawEnv2RadioButton: TRadioButton
  2864.       Left = 264
  2865.       Top = 7
  2866.       Width = 45
  2867.       Height = 17
  2868.       Caption = 'Env2'
  2869.       TabOrder = 4
  2870.       OnClick = DrawRadioButtonClick
  2871.     end
  2872.     object DrawLFO1RadioButton: TRadioButton
  2873.       Left = 360
  2874.       Top = 7
  2875.       Width = 43
  2876.       Height = 17
  2877.       Caption = 'LFO1'
  2878.       TabOrder = 6
  2879.       OnClick = DrawRadioButtonClick
  2880.     end
  2881.     object DrawLFO2RadioButton: TRadioButton
  2882.       Left = 408
  2883.       Top = 7
  2884.       Width = 44
  2885.       Height = 17
  2886.       Caption = 'LFO2'
  2887.       TabOrder = 7
  2888.       OnClick = DrawRadioButtonClick
  2889.     end
  2890.     object DrawSeqRadioButton: TRadioButton
  2891.       Left = 464
  2892.       Top = 7
  2893.       Width = 41
  2894.       Height = 17
  2895.       Caption = 'Seq'
  2896.       TabOrder = 8
  2897.       OnClick = DrawRadioButtonClick
  2898.     end
  2899.     object DrawEnv3RadioButton: TRadioButton
  2900.       Left = 314
  2901.       Top = 7
  2902.       Width = 43
  2903.       Height = 17
  2904.       Caption = 'Env3'
  2905.       TabOrder = 5
  2906.       OnClick = DrawRadioButtonClick
  2907.     end
  2908.     object DrawFullWaveRadioButton: TRadioButton
  2909.       Left = 168
  2910.       Top = 7
  2911.       Width = 41
  2912.       Height = 17
  2913.       Caption = 'Full'
  2914.       TabOrder = 2
  2915.       OnClick = DrawRadioButtonClick
  2916.     end
  2917.     object DrawSeqEnvRadioButton: TRadioButton
  2918.       Left = 504
  2919.       Top = 7
  2920.       Width = 57
  2921.       Height = 17
  2922.       Caption = 'SeqEnv'
  2923.       TabOrder = 9
  2924.       OnClick = DrawRadioButtonClick
  2925.     end
  2926.     object ViewTrackBar: TTrackBar
  2927.       Left = 4
  2928.       Top = 7
  2929.       Width = 89
  2930.       Height = 19
  2931.       Max = 256
  2932.       Orientation = trHorizontal
  2933.       Frequency = 32
  2934.       Position = 0
  2935.       SelEnd = 0
  2936.       SelStart = 0
  2937.       TabOrder = 0
  2938.       TickMarks = tmBottomRight
  2939.       TickStyle = tsAuto
  2940.       OnChange = DrawRadioButtonClick
  2941.     end
  2942.     object WaveGraphBox: TGraphBox
  2943.       Left = 5
  2944.       Top = 24
  2945.       Width = 549
  2946.       Height = 76
  2947.       TabOrder = 10
  2948.     end
  2949.     object LevelBox: TLevelBox
  2950.       Left = 556
  2951.       Top = 23
  2952.       Width = 20
  2953.       Height = 77
  2954.       BevelInner = bvLowered
  2955.       TabOrder = 11
  2956.       Level = 0
  2957.     end
  2958.   end
  2959.   object AutoRegenerateCheckBox: TCheckBox
  2960.     Left = 5
  2961.     Top = 296
  2962.     Width = 81
  2963.     Height = 17
  2964.     Caption = 'Auto Render'
  2965.     State = cbChecked
  2966.     TabOrder = 1
  2967.     OnClick = AutoRegenerateCheckBoxClick
  2968.   end
  2969.   object RegenerateButton: TButton
  2970.     Left = 88
  2971.     Top = 296
  2972.     Width = 49
  2973.     Height = 19
  2974.     Caption = 'Render'
  2975.     TabOrder = 2
  2976.     OnClick = RegenerateButtonClick
  2977.   end
  2978.   object PeakCheckButton: TCheckBox
  2979.     Left = 282
  2980.     Top = 296
  2981.     Width = 39
  2982.     Height = 17
  2983.     TabStop = False
  2984.     Caption = 'Clip'
  2985.     DragMode = dmAutomatic
  2986.     TabOrder = 0
  2987.   end
  2988.   object RenderProgressBar: TProgressBar
  2989.     Left = 215
  2990.     Top = 297
  2991.     Width = 63
  2992.     Height = 17
  2993.     Min = 0
  2994.     Max = 6
  2995.     Position = 6
  2996.     TabOrder = 9
  2997.   end
  2998.   object RenderingRadioButton: TLightCheckBox
  2999.     Left = 140
  3000.     Top = 296
  3001.     Width = 72
  3002.     Height = 17
  3003.     Checked = False
  3004.     OnColor = clRed
  3005.     OffColor = clMaroon
  3006.     OnClick = RenderingRadioButtonClick
  3007.     Caption = 'Rendering'
  3008.     Font.Charset = DEFAULT_CHARSET
  3009.     Font.Color = clWindowText
  3010.     Font.Height = -12
  3011.     Font.Name = 'MS Sans Serif'
  3012.     Font.Style = [fsBold]
  3013.     ParentFont = False
  3014.   end
  3015.   object Util1Button: TButton
  3016.     Left = 321
  3017.     Top = 296
  3018.     Width = 47
  3019.     Height = 19
  3020.     Caption = 'Cool'
  3021.     TabOrder = 11
  3022.     OnClick = Util1ButtonClick
  3023.   end
  3024.   object Util2Button: TButton
  3025.     Left = 369
  3026.     Top = 296
  3027.     Width = 47
  3028.     Height = 19
  3029.     Caption = 'AWave'
  3030.     TabOrder = 12
  3031.     OnClick = Util2ButtonClick
  3032.   end
  3033.   object PlayingLightCheck: TLightCheck
  3034.     Left = 418
  3035.     Top = 297
  3036.     Width = 13
  3037.     Height = 13
  3038.     Checked = False
  3039.     OnColor = clYellow
  3040.     OffColor = clMaroon
  3041.     OnClick = PlayingLightCheckClick
  3042.   end
  3043.   object MainMenu: TMainMenu
  3044.     Left = 600
  3045.     object File1: TMenuItem
  3046.       Caption = '&File'
  3047.       object Newpreset1: TMenuItem
  3048.         Caption = 'New preset'
  3049.         OnClick = Newpreset1Click
  3050.       end
  3051.       object OpenPreset1: TMenuItem
  3052.         Caption = 'Open preset...'
  3053.         ShortCut = 114
  3054.         OnClick = OpenPreset1Click
  3055.       end
  3056.       object Savepreset1: TMenuItem
  3057.         Caption = 'Save preset...'
  3058.         ShortCut = 113
  3059.         OnClick = Savepreset1Click
  3060.       end
  3061.       object N6: TMenuItem
  3062.         Caption = '-'
  3063.       end
  3064.       object OpenSample1: TMenuItem
  3065.         Caption = 'Open Sample &1'
  3066.         ShortCut = 122
  3067.         OnClick = OpenSample1Click
  3068.       end
  3069.       object OpenSample2: TMenuItem
  3070.         Caption = 'Open Sample &2'
  3071.         ShortCut = 123
  3072.         OnClick = OpenSample2Click
  3073.       end
  3074.       object N2: TMenuItem
  3075.         Caption = '-'
  3076.       end
  3077.       object Savesample1: TMenuItem
  3078.         Caption = '&Save sample'
  3079.         OnClick = SaveButtonClick
  3080.       end
  3081.       object Savesampleas1: TMenuItem
  3082.         Caption = 'Save sample as...'
  3083.         ShortCut = 16467
  3084.         OnClick = Savesampleas1Click
  3085.       end
  3086.       object RenderMIDI1: TMenuItem
  3087.         Caption = 'Render MIDI'
  3088.         OnClick = RenderMIDI1Click
  3089.       end
  3090.       object N1: TMenuItem
  3091.         Caption = '-'
  3092.       end
  3093.       object Options: TMenuItem
  3094.         Caption = 'Options...'
  3095.         OnClick = OptionsClick
  3096.       end
  3097.       object N4: TMenuItem
  3098.         Caption = '-'
  3099.       end
  3100.       object Exit1: TMenuItem
  3101.         Caption = 'E&xit'
  3102.         OnClick = Exit1Click
  3103.       end
  3104.     end
  3105.     object Timbres1: TMenuItem
  3106.       Caption = 'Timbres'
  3107.       object Timbre11: TMenuItem
  3108.         Caption = 'Timbre 1'
  3109.         Checked = True
  3110.         GroupIndex = 1
  3111.         RadioItem = True
  3112.         ShortCut = 16496
  3113.         OnClick = Timbre11Click
  3114.       end
  3115.       object Timbre21: TMenuItem
  3116.         Caption = 'Timbre 2'
  3117.         GroupIndex = 1
  3118.         RadioItem = True
  3119.         ShortCut = 16497
  3120.         OnClick = Timbre21Click
  3121.       end
  3122.     end
  3123.     object Pla1: TMenuItem
  3124.       Caption = 'Play'
  3125.       object Play1: TMenuItem
  3126.         Caption = 'Play'
  3127.         ShortCut = 116
  3128.         OnClick = PlayClick
  3129.       end
  3130.       object PlayOnce2: TMenuItem
  3131.         Caption = 'Play Once'
  3132.         ShortCut = 117
  3133.         OnClick = PlayOnce1Click
  3134.       end
  3135.       object Stop2: TMenuItem
  3136.         Caption = 'Stop'
  3137.         ShortCut = 119
  3138.         OnClick = StopClick
  3139.       end
  3140.       object Render1: TMenuItem
  3141.         Caption = 'Render'
  3142.         ShortCut = 115
  3143.         OnClick = RenderClick
  3144.       end
  3145.     end
  3146.     object Convert1: TMenuItem
  3147.       Caption = '&Convert'
  3148.       object Byteswapsample1: TMenuItem
  3149.         Caption = 'Byte swap - sample 1'
  3150.         OnClick = Byteswapsample1Click
  3151.       end
  3152.       object Byteswapsample2: TMenuItem
  3153.         Caption = 'Byte swap - sample 2'
  3154.         OnClick = Byteswapsample2Click
  3155.       end
  3156.     end
  3157.     object Tools1: TMenuItem
  3158.       Caption = 'Tools'
  3159.       object Normalize1: TMenuItem
  3160.         Caption = 'Normalize'
  3161.         OnClick = Normalize1Click
  3162.       end
  3163.       object AllmelodicosctoC31: TMenuItem
  3164.         Caption = 'All melodic osc to C-3'
  3165.         OnClick = AllmelodicosctoC31Click
  3166.       end
  3167.       object AllmelodicosctoC41: TMenuItem
  3168.         Caption = 'All melodic osc to C-4'
  3169.         OnClick = AllmelodicosctoC41Click
  3170.       end
  3171.       object AllmelodicnotestoC41: TMenuItem
  3172.         Caption = 'All melodic osc to C-5'
  3173.         OnClick = AllmelodicnotestoC41Click
  3174.       end
  3175.       object AllmelodicosctoC61: TMenuItem
  3176.         Caption = 'All melodic osc to C-6'
  3177.         OnClick = AllmelodicosctoC61Click
  3178.       end
  3179.       object AllmelodicosctoC71: TMenuItem
  3180.         Caption = 'All melodic osc to C-7'
  3181.         OnClick = AllmelodicosctoC71Click
  3182.       end
  3183.       object AllmelodicosctoC81: TMenuItem
  3184.         Caption = 'All melodic osc to C-8'
  3185.         OnClick = AllmelodicosctoC81Click
  3186.       end
  3187.       object Octavedown1: TMenuItem
  3188.         Caption = 'Octave down'
  3189.         OnClick = Octavedown1Click
  3190.       end
  3191.       object Octaveup1: TMenuItem
  3192.         Caption = 'Octave up'
  3193.         OnClick = Octaveup1Click
  3194.       end
  3195.       object N5: TMenuItem
  3196.         Caption = '-'
  3197.       end
  3198.       object Makefatsound1: TMenuItem
  3199.         Caption = 'Make fat sound'
  3200.         OnClick = Makefatsound1Click
  3201.       end
  3202.       object TB303model1: TMenuItem
  3203.         Caption = 'TB-303 model'
  3204.         OnClick = TB303model1Click
  3205.       end
  3206.       object Processsoundfile1: TMenuItem
  3207.         Caption = 'Process sound file'
  3208.         OnClick = Processsoundfile1Click
  3209.       end
  3210.     end
  3211.     object Scale1: TMenuItem
  3212.       Caption = 'Scale'
  3213.       object Tempered1: TMenuItem
  3214.         Caption = 'Tempered'
  3215.         RadioItem = True
  3216.         OnClick = Tempered1Click
  3217.       end
  3218.       object Natural1: TMenuItem
  3219.         Caption = 'Natural #'
  3220.         RadioItem = True
  3221.         OnClick = Natural1Click
  3222.       end
  3223.       object Naturalb1: TMenuItem
  3224.         Caption = 'Natural b'
  3225.         RadioItem = True
  3226.         OnClick = Naturalb1Click
  3227.       end
  3228.     end
  3229.     object Window1: TMenuItem
  3230.       Caption = 'Window'
  3231.       object Mixer1: TMenuItem
  3232.         Caption = 'Mixer'
  3233.         ShortCut = 16461
  3234.         OnClick = Mixer1Click
  3235.       end
  3236.       object Amplifiers1: TMenuItem
  3237.         Caption = 'Amplifiers'
  3238.         ShortCut = 16449
  3239.         OnClick = Amplifiers1Click
  3240.       end
  3241.       object OscillatorsMenu: TMenuItem
  3242.         Caption = 'Oscillators'
  3243.         ShortCut = 16463
  3244.         OnClick = OscillatorsMenuClick
  3245.       end
  3246.       object Waveform: TMenuItem
  3247.         Caption = 'WaveForm'
  3248.         ShortCut = 16471
  3249.         OnClick = WaveformClick
  3250.       end
  3251.       object Envelopes1: TMenuItem
  3252.         Caption = 'Envelopes'
  3253.         ShortCut = 16453
  3254.         OnClick = Envelopes1Click
  3255.       end
  3256.       object Graphicenvelope1: TMenuItem
  3257.         Caption = 'Graphic envelope'
  3258.         ShortCut = 16455
  3259.         OnClick = Graphicenvelope1Click
  3260.       end
  3261.       object LFO1: TMenuItem
  3262.         Caption = 'LFO'
  3263.         ShortCut = 16460
  3264.         OnClick = LFO1Click
  3265.       end
  3266.       object Filters1: TMenuItem
  3267.         Caption = 'Filters'
  3268.         ShortCut = 16454
  3269.         OnClick = Filters1Click
  3270.       end
  3271.       object SequencerMenu: TMenuItem
  3272.         Caption = 'Sequencer'
  3273.         ShortCut = 16467
  3274.         OnClick = SequencerMenuClick
  3275.       end
  3276.       object Options1: TMenuItem
  3277.         Caption = 'Options'
  3278.         ShortCut = 16468
  3279.         OnClick = Options1Click
  3280.       end
  3281.       object RealtimeMenu: TMenuItem
  3282.         Caption = 'Realtime'
  3283.         ShortCut = 16466
  3284.         OnClick = RealtimeMenuClick
  3285.       end
  3286.       object FX1: TMenuItem
  3287.         Caption = 'FX'
  3288.         ShortCut = 16472
  3289.         OnClick = FX1Click
  3290.       end
  3291.     end
  3292.     object Help: TMenuItem
  3293.       Caption = '&Help'
  3294.       object RTFM: TMenuItem
  3295.         Caption = 'RTFM'
  3296.         ShortCut = 112
  3297.         OnClick = RTFMClick
  3298.       end
  3299.       object ContactMenu: TMenuItem
  3300.         Caption = 'Contact'
  3301.         OnClick = ContactMenuClick
  3302.       end
  3303.       object N3: TMenuItem
  3304.         Caption = '-'
  3305.       end
  3306.       object About1: TMenuItem
  3307.         Caption = 'About'
  3308.         OnClick = About1Click
  3309.       end
  3310.     end
  3311.     object RealTime1: TMenuItem
  3312.       Caption = 'Realtime'
  3313.       Checked = True
  3314.       object RealTime2: TMenuItem
  3315.         Caption = 'Realtime'
  3316.         OnClick = RealTime2Click
  3317.       end
  3318.     end
  3319.   end
  3320.   object OpenSampleDialog: TOpenDialog
  3321.     Filter = 
  3322.       'Sample files (*.smp;*.wav;*.pcm;*.iff)|*.smp;*.wav;*.pcm;*.iff|A' +
  3323.       'll files (*.*)|*.*'
  3324.     Title = 'Open sample...'
  3325.     Left = 608
  3326.   end
  3327.   object OpenPresetDialog: TOpenDialog
  3328.     DefaultExt = 'ORP'
  3329.     Filter = 'Orangator presets|*.orp'
  3330.     Title = 'Open preset...'
  3331.     Left = 616
  3332.   end
  3333.   object SavePresetDialog: TSaveDialog
  3334.     DefaultExt = 'ORP'
  3335.     Filter = 'Orangator presets|*.orp'
  3336.     Title = 'Save preset as...'
  3337.     Left = 624
  3338.   end
  3339.   object SaveSampleDialog: TSaveDialog
  3340.     Filter = 
  3341.       'Microsoft WAV|*.WAV|Extended Instrument|*.XI|Motorola raw|*.RAW|' +
  3342.       'Intel raw|*.RAW'
  3343.     FilterIndex = 0
  3344.     Title = 'Save sample as...'
  3345.     Left = 632
  3346.   end
  3347.   object MidiOpenDialog: TOpenDialog
  3348.     DefaultExt = 'MID'
  3349.     Filter = 'Midi files (*.mid)|*.mid'
  3350.     Left = 626
  3351.     Top = 25
  3352.   end
  3353. end
  3354.