home *** CD-ROM | disk | FTP | other *** search
/ Chip 2005 June / CHIP_CD_2005-06.iso / test / fruity / flstudio502_install.exe / Sytrus.dll / 0 / RCDATA / TSYNTHEDITORFORM / TSYNTHEDITORFORM.txt
Text File  |  2005-01-25  |  80KB  |  2,985 lines

  1. object SynthEditorForm: TSynthEditorForm
  2.   Left = 198
  3.   Top = 198
  4.   BorderIcons = []
  5.   BorderStyle = bsSingle
  6.   Caption = 'SynthForm'
  7.   ClientHeight = 423
  8.   ClientWidth = 587
  9.   Color = clBlack
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = True
  16.   Position = poDefault
  17.   Scaled = False
  18.   OnCreate = FormCreate
  19.   OnDestroy = FormDestroy
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object SynthPanel: TWPControl
  23.     Left = 0
  24.     Top = 0
  25.     Width = 587
  26.     Height = 423
  27.     Align = alClient
  28.     Color = 5452845
  29.     ParentColor = False
  30.     ParentShowHint = True
  31.     OnResize = SynthPanelResize
  32.     object MatrixBox: TQuickPaintBox
  33.       Left = 380
  34.       Top = 101
  35.       Width = 199
  36.       Height = 199
  37.       Cursor = crHandPoint
  38.       OnPaint = MatrixBoxPaint
  39.       OnMouseDown = MatrixBoxMouseDown
  40.       OnMouseMove = MatrixBoxMouseMove
  41.     end
  42.     object MatrixWheel: TWAVWheel
  43.       Tag = -1
  44.       Left = 384
  45.       Top = 78
  46.       Width = 13
  47.       Height = 13
  48.       Cursor = crHandPoint
  49.       Options = [wwPause]
  50.       SlowMotionDiv = 4
  51.       Min = -256
  52.       Max = 256
  53.       DefaultValue = 0
  54.       OnChange = MatrixWheelChange
  55.       OnRelease = MatrixWheelRelease
  56.       MouseButton = mbLeft
  57.       OnMouseUp = MatrixWheelMouseUp
  58.       Visible = False
  59.       BmpList = SynthResModule.MatrixWheelIL
  60.     end
  61.     object RFSelect: TSelector
  62.       Tag = -1
  63.       Left = 380
  64.       Top = 301
  65.       Width = 60
  66.       Height = 17
  67.       Cursor = crHandPoint
  68.       Hint = '|Switch frequency / ring modulation levels'
  69.       Options = [seCanSlide]
  70.       NumCols = 2
  71.       NumRows = 1
  72.       DefaultValue = 0
  73.       OnChange = RFSelectChange
  74.     end
  75.     object EnvSelect: TSelector
  76.       Tag = -1
  77.       Left = 8
  78.       Top = 123
  79.       Width = 352
  80.       Height = 15
  81.       Cursor = crHandPoint
  82.       Hint = '|Articulator part'
  83.       Hints.Strings = (
  84.         'envelope'
  85.         'LFO'
  86.         'keyboard mapping'
  87.         'velocity mapping'
  88.         'modulation X mapping'
  89.         'modulation Y mapping'
  90.         'random mapping'
  91.         'unison mapping')
  92.       Options = [seCanSlide]
  93.       NumCols = 8
  94.       NumRows = 1
  95.       DefaultValue = 0
  96.       OnChange = EnvSelectChange
  97.     end
  98.     object TabSelect: TSelector
  99.       Tag = -1
  100.       Left = 8
  101.       Top = 8
  102.       Width = 572
  103.       Height = 16
  104.       Cursor = crHandPoint
  105.       Hints.Strings = (
  106.         'Main settings'
  107.         'Operator 1'
  108.         'Operator 2'
  109.         'Operator 3'
  110.         'Operator 4'
  111.         'Operator 5'
  112.         'Operator 6'
  113.         'Filter 1'
  114.         'Filter 2'
  115.         'Filter 3'
  116.         'Effects')
  117.       Options = [seCanSlide]
  118.       NumCols = 11
  119.       NumRows = 1
  120.       DefaultValue = 0
  121.       OnChange = TabSelectChange
  122.     end
  123.     object EnvTargetSelect: TSelector
  124.       Tag = -1
  125.       Left = 8
  126.       Top = 101
  127.       Width = 352
  128.       Height = 15
  129.       Cursor = crHandPoint
  130.       Hint = '|Editor target'
  131.       Options = [seCanSlide]
  132.       NumCols = 9
  133.       NumRows = 1
  134.       DefaultValue = 0
  135.       OnChange = EnvTargetSelectChange
  136.     end
  137.     object InfoBtn: TQuickBtn
  138.       Left = 522
  139.       Top = 72
  140.       Width = 16
  141.       Height = 22
  142.       Cursor = crHandPoint
  143.       Hint = '|Show info'
  144.       ParentColor = True
  145.       Options = [tbHasOnOverGlyph, tbTrashGlyph, tbAutoSize]
  146.       AccelKey = 0
  147.       FXType = FX_Blend
  148.       FXWhen = FX_OnOver
  149.       FXAttack = 192
  150.       FXRelease = 32
  151.       FXBlink = FX_BlinkOnOver
  152.       Glyph.ILCount = 8
  153.       BmpList = SynthResModule.MenuBtnIL
  154.       ILIndex = 2
  155.       OnClick = InfoBtnClick
  156.       StayDown = False
  157.     end
  158.     object MenuBtn: TQuickBtn
  159.       Left = 506
  160.       Top = 72
  161.       Width = 16
  162.       Height = 22
  163.       Cursor = crHandPoint
  164.       Hint = '|Options'
  165.       ParentColor = True
  166.       PopupMenu = SynthResModule.OptionsMenu
  167.       Options = [tbHasOnOverGlyph, tbTrashGlyph, tbAutoSize]
  168.       AccelKey = 0
  169.       FXType = FX_Blend
  170.       FXWhen = FX_OnOver
  171.       FXAttack = 192
  172.       FXRelease = 32
  173.       FXBlink = FX_BlinkOnOver
  174.       Glyph.ILCount = 8
  175.       BmpList = SynthResModule.MenuBtnIL
  176.       StayDown = False
  177.       PopupAlign = Popup_Bottom
  178.       PopupButton = mbLeft
  179.       BeforePopup = MenuBtnBeforePopup
  180.     end
  181.     object KbBtn: TQuickBtn
  182.       Left = 554
  183.       Top = 72
  184.       Width = 16
  185.       Height = 22
  186.       Cursor = crHandPoint
  187.       Hint = '|Show / hide testing keyboard'
  188.       ParentColor = True
  189.       Options = [tbHasOnOverGlyph, tbTrashGlyph, tbAutoSize]
  190.       AccelKey = 0
  191.       FXType = FX_Blend
  192.       FXWhen = FX_OnOver
  193.       FXAttack = 192
  194.       FXRelease = 32
  195.       FXBlink = FX_BlinkOnOver
  196.       Glyph.ILCount = 8
  197.       BmpList = SynthResModule.MenuBtnIL
  198.       ILIndex = 6
  199.       OnClick = KbBtnClick
  200.       StayDown = False
  201.     end
  202.     object SmallLogoBtn: TQuickBtn
  203.       Tag = -1
  204.       Left = 450
  205.       Top = 34
  206.       Width = 130
  207.       Height = 34
  208.       Enabled = False
  209.       ParentFont = False
  210.       ParentColor = False
  211.       Color = 6709335
  212.       Font.Charset = ANSI_CHARSET
  213.       Font.Color = 13025463
  214.       Font.Height = -9
  215.       Font.Name = 'Fruity fonts'
  216.       Font.Style = []
  217.       Options = [tbDirectClick, tbHasOnOverGlyph, tbAutoSize, tbHiddenAnim]
  218.       AccelKey = 0
  219.       FXType = FX_Blend
  220.       FXWhen = FX_OnDemand
  221.       FXAttack = 256
  222.       FXRelease = 16
  223.       Glyph.ILCount = 2
  224.       BmpList = SynthResModule.SmallLogoIL
  225.       Down = True
  226.       StayDown = False
  227.     end
  228.     object DiagramBtn: TQuickBtn
  229.       Tag = 1
  230.       Left = 538
  231.       Top = 72
  232.       Width = 16
  233.       Height = 22
  234.       Cursor = crHandPoint
  235.       Hint = '|Show block diagram'
  236.       ParentColor = True
  237.       Options = [tbHasOnOverGlyph, tbTrashGlyph, tbAutoSize]
  238.       AccelKey = 0
  239.       FXType = FX_Blend
  240.       FXWhen = FX_OnOver
  241.       FXAttack = 192
  242.       FXRelease = 32
  243.       FXBlink = FX_BlinkOnOver
  244.       Glyph.ILCount = 8
  245.       BmpList = SynthResModule.MenuBtnIL
  246.       ILIndex = 4
  247.       OnClick = InfoBtnClick
  248.       StayDown = False
  249.     end
  250.     object FilterPanel: TWPControl
  251.       Left = 8
  252.       Top = 33
  253.       Width = 361
  254.       Height = 59
  255.       Color = 4144182
  256.       ParentColor = False
  257.       ParentShowHint = True
  258.       object LBHCache: TQuickBmpList
  259.         Left = 187
  260.         Top = 3
  261.         Width = 37
  262.         Height = 54
  263.         ILIndex = 0
  264.         Visible = False
  265.       end
  266.       object ToNextFCache: TQuickBmpList
  267.         Left = 326
  268.         Top = 4
  269.         Width = 31
  270.         Height = 35
  271.         ILIndex = 0
  272.         Visible = False
  273.       end
  274.       object FEnvWheel: TWAVWheel
  275.         Tag = 1
  276.         Left = 87
  277.         Top = 11
  278.         Width = 23
  279.         Height = 23
  280.         Hint = '|^b^aCutoff envelope / LFO amount'
  281.         Options = []
  282.         MoveSpeed = 16
  283.         SlowMotionDiv = 4
  284.         Max = 256
  285.         Value = 128
  286.         DefaultValue = 128
  287.         OnChange = VolWheelChange
  288.         MouseButton = mbLeft
  289.         HotSideX = 6
  290.         HotSideY = 8
  291.         PopupMenu = SynthResModule.WheelMenu
  292.         BmpList = SynthResModule.MainWheelIL
  293.       end
  294.       object FResWheel: TWAVWheel
  295.         Tag = 3
  296.         Left = 155
  297.         Top = 11
  298.         Width = 23
  299.         Height = 23
  300.         Hint = '|^b^aResonance / bandwidth'
  301.         Options = []
  302.         MoveSpeed = 16
  303.         SlowMotionDiv = 4
  304.         Max = 256
  305.         DefaultValue = 128
  306.         OnChange = VolWheelChange
  307.         MouseButton = mbLeft
  308.         HotSideX = 6
  309.         HotSideY = 8
  310.         PopupMenu = SynthResModule.WheelMenu
  311.         BmpList = SynthResModule.MainWheelIL
  312.       end
  313.       object FCutWheel: TWAVWheel
  314.         Tag = 2
  315.         Left = 121
  316.         Top = 11
  317.         Width = 23
  318.         Height = 23
  319.         Hint = '|^b^aCutoff frequency'
  320.         Options = []
  321.         MoveSpeed = 16
  322.         SlowMotionDiv = 4
  323.         Max = 256
  324.         Value = 128
  325.         DefaultValue = 128
  326.         OnChange = VolWheelChange
  327.         MouseButton = mbLeft
  328.         HotSideX = 6
  329.         HotSideY = 8
  330.         PopupMenu = SynthResModule.WheelMenu
  331.         BmpList = SynthResModule.MainWheelIL
  332.       end
  333.       object ToNextFWheel: TWAVWheel
  334.         Tag = 9
  335.         Left = 332
  336.         Top = 11
  337.         Width = 23
  338.         Height = 23
  339.         Hint = '|^b^aTo next filter'
  340.         Options = [wwPause]
  341.         SlowMotionDiv = 4
  342.         Min = -256
  343.         Max = 256
  344.         DefaultValue = 0
  345.         OnChange = VolWheelChange
  346.         MouseButton = mbLeft
  347.         HotSideX = 6
  348.         HotSideY = 8
  349.         PopupMenu = SynthResModule.WheelMenu
  350.         BmpList = SynthResModule.MainWheelIL
  351.       end
  352.       object WSPreAmpWheel: TWAVWheel
  353.         Tag = 7
  354.         Left = 256
  355.         Top = 11
  356.         Width = 23
  357.         Height = 23
  358.         Hint = '|^b^aWaveshaper pre amp'
  359.         Options = [wwPause]
  360.         MoveSpeed = 8
  361.         SlowMotionDiv = 4
  362.         Min = 64
  363.         Max = 192
  364.         Value = 128
  365.         DefaultValue = 128
  366.         OnChange = VolWheelChange
  367.         MouseButton = mbLeft
  368.         HotSideX = 6
  369.         HotSideY = 8
  370.         PopupMenu = SynthResModule.WheelMenu
  371.         BmpList = SynthResModule.MainWheelIL
  372.       end
  373.       object WSMixWheel: TWAVWheel
  374.         Tag = 8
  375.         Left = 290
  376.         Top = 11
  377.         Width = 23
  378.         Height = 23
  379.         Hint = '|^b^aWaveshaper mix'
  380.         Options = [wwPause]
  381.         MoveSpeed = 8
  382.         SlowMotionDiv = 4
  383.         Max = 128
  384.         Value = 128
  385.         DefaultValue = 0
  386.         OnChange = VolWheelChange
  387.         MouseButton = mbLeft
  388.         HotSideX = 6
  389.         HotSideY = 8
  390.         PopupMenu = SynthResModule.WheelMenu
  391.         BmpList = SynthResModule.MainWheelIL
  392.       end
  393.       object WSEnableBtn: TQuickBtn
  394.         Tag = -1
  395.         Left = 269
  396.         Top = 42
  397.         Width = 41
  398.         Height = 15
  399.         Cursor = crHandPoint
  400.         Hint = '|Enable waveshaper'
  401.         ParentFont = False
  402.         ParentColor = True
  403.         Font.Charset = DEFAULT_CHARSET
  404.         Font.Color = clSilver
  405.         Font.Height = -11
  406.         Font.Name = 'MS Sans Serif'
  407.         Font.Style = []
  408.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  409.         Style = FS_Transparent
  410.         Spacing = 4
  411.         TextAlign = ttaRight
  412.         AccelKey = 0
  413.         FXType = FX_Blend
  414.         BmpList = SynthResModule.LEDIL
  415.         OnClick = WSEnableBtnClick
  416.         PopupAlign = Popup_Normal
  417.       end
  418.       object FOrderSelect: TSelector
  419.         Left = 66
  420.         Top = 6
  421.         Width = 7
  422.         Height = 48
  423.         Cursor = crHandPoint
  424.         Hint = '|^b^aFilter mode'
  425.         Hints.Strings = (
  426.           'off'
  427.           '12dB'
  428.           '24dB'
  429.           '36dB'
  430.           'alternate 24dB'
  431.           'alternate 36dB')
  432.         NumCols = 1
  433.         NumRows = 6
  434.         Value = 1
  435.         DefaultValue = 1
  436.         OnChange = VolWheelChange
  437.         PopupMenu = SynthResModule.WheelMenu
  438.       end
  439.       object FQualityBtn: TQuickBtn
  440.         Tag = -1
  441.         Left = 5
  442.         Top = 42
  443.         Width = 32
  444.         Height = 12
  445.         Cursor = crHandPoint
  446.         Hint = '|Oversample when required'
  447.         ParentFont = False
  448.         ParentColor = True
  449.         Font.Charset = DEFAULT_CHARSET
  450.         Font.Color = clSilver
  451.         Font.Height = -11
  452.         Font.Name = 'MS Sans Serif'
  453.         Font.Style = []
  454.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  455.         Style = FS_Transparent
  456.         Spacing = 4
  457.         TextAlign = ttaRight
  458.         AccelKey = 0
  459.         FXType = FX_Blend
  460.         BmpList = SynthResModule.LEDIL
  461.         OnClick = FEnvWheelChange
  462.         PopupAlign = Popup_Normal
  463.       end
  464.       object FFlatBtn: TQuickBtn
  465.         Tag = -1
  466.         Left = 5
  467.         Top = 30
  468.         Width = 32
  469.         Height = 12
  470.         Cursor = crHandPoint
  471.         Hint = '|Alternate resonance / bandwidth'
  472.         ParentFont = False
  473.         ParentColor = True
  474.         Font.Charset = DEFAULT_CHARSET
  475.         Font.Color = clSilver
  476.         Font.Height = -11
  477.         Font.Name = 'MS Sans Serif'
  478.         Font.Style = []
  479.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  480.         Style = FS_Transparent
  481.         Spacing = 4
  482.         TextAlign = ttaRight
  483.         AccelKey = 0
  484.         FXType = FX_Blend
  485.         BmpList = SynthResModule.LEDIL
  486.         OnClick = FEnvWheelChange
  487.         PopupAlign = Popup_Normal
  488.       end
  489.       object FLowWheel: TQuickSlider
  490.         Tag = 4
  491.         Left = 189
  492.         Top = 12
  493.         Width = 8
  494.         Height = 43
  495.         Cursor = crHandPoint
  496.         Hint = '|^b^aLowpass level'
  497.         Options = []
  498.         MoveSpeed = 16
  499.         SlowMotionDiv = 4
  500.         Max = 128
  501.         Value = 128
  502.         DefaultValue = 0
  503.         OnChange = VolWheelChange
  504.         MouseButton = mbLeft
  505.         HotSideX = 2
  506.         HotSideY = 8
  507.         PopupMenu = SynthResModule.WheelMenu
  508.         BmpList = SynthResModule.VSlider2IL
  509.       end
  510.       object FBandWheel: TQuickSlider
  511.         Tag = 5
  512.         Left = 201
  513.         Top = 12
  514.         Width = 8
  515.         Height = 43
  516.         Cursor = crHandPoint
  517.         Hint = '|^b^aBandpass level'
  518.         Options = []
  519.         MoveSpeed = 16
  520.         SlowMotionDiv = 4
  521.         Max = 128
  522.         DefaultValue = 0
  523.         OnChange = VolWheelChange
  524.         MouseButton = mbLeft
  525.         HotSideX = 2
  526.         HotSideY = 8
  527.         PopupMenu = SynthResModule.WheelMenu
  528.         BmpList = SynthResModule.VSlider2IL
  529.       end
  530.       object FHighWheel: TQuickSlider
  531.         Tag = 6
  532.         Left = 213
  533.         Top = 12
  534.         Width = 8
  535.         Height = 43
  536.         Cursor = crHandPoint
  537.         Hint = '|^b^aHighpass level'
  538.         Options = []
  539.         MoveSpeed = 16
  540.         SlowMotionDiv = 4
  541.         Max = 128
  542.         DefaultValue = 0
  543.         OnChange = VolWheelChange
  544.         MouseButton = mbLeft
  545.         HotSideX = 2
  546.         HotSideY = 8
  547.         PopupMenu = SynthResModule.WheelMenu
  548.         BmpList = SynthResModule.VSlider2IL
  549.       end
  550.       object FTypeSelect: TWAVWheel
  551.         Tag = -1
  552.         Left = 10
  553.         Top = 12
  554.         Width = 25
  555.         Height = 9
  556.         Cursor = crSizeNS
  557.         Hint = '|Filter type'
  558.         MoveSpeed = 2
  559.         SlowMotionDiv = 4
  560.         Max = 7
  561.         Value = 1
  562.         DefaultValue = 1
  563.         OnChange = FTypeSelectChange
  564.         MouseButton = mbLeft
  565.         HotSideX = 5
  566.         HotSideY = 9
  567.         BmpList = SynthResModule.FTypeIL
  568.       end
  569.       object WSBipolarBtn: TQuickBtn
  570.         Left = 237
  571.         Top = 11
  572.         Width = 11
  573.         Height = 19
  574.         Cursor = crHandPoint
  575.         Hint = '|Unipolar / bipolar mode'
  576.         ParentColor = True
  577.         Options = [tbDirectClick, tbHasOnOverGlyph, tbTrashGlyph, tbAutoSize]
  578.         AccelKey = 0
  579.         FXType = FX_Blend
  580.         FXAttack = 96
  581.         FXRelease = 96
  582.         Glyph.ILCount = 8
  583.         BmpList = SynthResModule.WSBipolarIL
  584.         OnClick = WSBipolarBtnClick
  585.         PopupAlign = Popup_Bottom
  586.         BeforePopup = MenuBtnBeforePopup
  587.       end
  588.     end
  589.     object FXPanel: TWPControl
  590.       Left = 8
  591.       Top = 33
  592.       Width = 361
  593.       Height = 59
  594.       Color = 8388672
  595.       ParentColor = False
  596.       ParentShowHint = True
  597.       object DelModeSelect: TSelector
  598.         Tag = 13
  599.         Left = 347
  600.         Top = 7
  601.         Width = 7
  602.         Height = 24
  603.         Cursor = crHandPoint
  604.         Hint = '|^b^aDelay feedback mode'
  605.         Hints.Strings = (
  606.           'normal'
  607.           'inverted'
  608.           'ping-pong')
  609.         NumCols = 1
  610.         NumRows = 3
  611.         DefaultValue = 0
  612.         OnChange = VolWheelChange
  613.         PopupMenu = SynthResModule.WheelMenu
  614.       end
  615.       object DelEnableBtn: TQuickBtn
  616.         Tag = -1
  617.         Left = 230
  618.         Top = 44
  619.         Width = 39
  620.         Height = 12
  621.         Cursor = crHandPoint
  622.         Hint = '|Enable delay'
  623.         ParentFont = False
  624.         ParentColor = True
  625.         Font.Charset = DEFAULT_CHARSET
  626.         Font.Color = clSilver
  627.         Font.Height = -11
  628.         Font.Name = 'MS Sans Serif'
  629.         Font.Style = []
  630.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  631.         Style = FS_Transparent
  632.         Spacing = 4
  633.         TextAlign = ttaRight
  634.         AccelKey = 0
  635.         FXType = FX_Blend
  636.         BmpList = SynthResModule.LEDIL
  637.         OnClick = DelEnableBtnClick
  638.         PopupAlign = Popup_Normal
  639.       end
  640.       object DelNumSelect: TSelector
  641.         Left = 207
  642.         Top = 4
  643.         Width = 22
  644.         Height = 52
  645.         Cursor = crHandPoint
  646.         Hint = '|Effect'
  647.         Hints.Strings = (
  648.           'delay unit 1'
  649.           'delay unit 2'
  650.           'delay unit 3'
  651.           'reverb unit')
  652.         Options = [seCanSlide]
  653.         NumCols = 1
  654.         NumRows = 4
  655.         DefaultValue = 0
  656.         OnChange = DelNumSelectChange
  657.       end
  658.       object FXPanWheel: TWAVWheel
  659.         Left = 10
  660.         Top = 11
  661.         Width = 23
  662.         Height = 23
  663.         Hint = '|^b^aPanning'
  664.         Options = [wwPause]
  665.         MoveSpeed = 16
  666.         SlowMotionDiv = 4
  667.         Min = -128
  668.         Max = 128
  669.         DefaultValue = 0
  670.         OnChange = VolWheelChange
  671.         MouseButton = mbLeft
  672.         HotSideX = 2
  673.         HotSideY = 8
  674.         PopupMenu = SynthResModule.WheelMenu
  675.         BmpList = SynthResModule.MainWheelIL
  676.       end
  677.       object DelSerialBtn: TQuickBtn
  678.         Tag = -1
  679.         Left = 230
  680.         Top = 20
  681.         Width = 39
  682.         Height = 12
  683.         Cursor = crHandPoint
  684.         Hint = '|Parallel / serial process'
  685.         ParentFont = False
  686.         ParentColor = True
  687.         Font.Charset = DEFAULT_CHARSET
  688.         Font.Color = clSilver
  689.         Font.Height = -11
  690.         Font.Name = 'MS Sans Serif'
  691.         Font.Style = []
  692.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  693.         Style = FS_Transparent
  694.         Spacing = 4
  695.         TextAlign = ttaRight
  696.         AccelKey = 0
  697.         FXType = FX_Blend
  698.         BmpList = SynthResModule.LEDIL
  699.         OnClick = DelSerialBtnClick
  700.         PopupAlign = Popup_Normal
  701.       end
  702.       object ChOrderSelect: TWAVWheel
  703.         Tag = 1
  704.         Left = 46
  705.         Top = 17
  706.         Width = 15
  707.         Height = 14
  708.         Cursor = crSizeNS
  709.         Hint = '|^b^aChorus order'
  710.         MoveSpeed = 2
  711.         SlowMotionDiv = 4
  712.         Max = 9
  713.         Value = 4
  714.         DefaultValue = 4
  715.         OnChange = VolWheelChange
  716.         MouseButton = mbLeft
  717.         HotSideX = 5
  718.         HotSideY = 8
  719.         PopupMenu = SynthResModule.WheelMenu
  720.         BmpList = SynthResModule.ChOrderSelIL
  721.       end
  722.       object FXSendSelect: TDigiWheel
  723.         Tag = -2
  724.         Left = 149
  725.         Top = 12
  726.         Width = 22
  727.         Height = 17
  728.         Cursor = crSizeNS
  729.         Hint = '|Send to effect track number'
  730.         Options = [wwAutoSize, wwIncMode]
  731.         MoveSpeed = 2
  732.         SlowMotionDiv = 4
  733.         Max = 0
  734.         DefaultValue = 0
  735.         OnChange = FXSendSelectChange
  736.         MouseButton = mbLeft
  737.         HotSideX = 2
  738.         HotSideY = 6
  739.         Color = clNone
  740.         Font.Charset = ANSI_CHARSET
  741.         Font.Color = 13025463
  742.         Font.Height = -11
  743.         Font.Name = 'Arial'
  744.         Font.Style = []
  745.         BmpList = SynthResModule.Digits12IL
  746.         NumDigits = 2
  747.         NullValue = 0
  748.       end
  749.       object FXSendVolWheel: TWAVWheel
  750.         Tag = 8
  751.         Left = 177
  752.         Top = 11
  753.         Width = 23
  754.         Height = 23
  755.         Hint = '|^b^aSend level'
  756.         Options = []
  757.         MoveSpeed = 8
  758.         SlowMotionDiv = 4
  759.         Max = 128
  760.         Value = 128
  761.         DefaultValue = 128
  762.         OnChange = VolWheelChange
  763.         MouseButton = mbLeft
  764.         HotSideX = 8
  765.         HotSideY = 8
  766.         PopupMenu = SynthResModule.WheelMenu
  767.         BmpList = SynthResModule.MainWheelIL
  768.       end
  769.       object DelTempoBtn: TQuickBtn
  770.         Tag = -1
  771.         Left = 230
  772.         Top = 32
  773.         Width = 39
  774.         Height = 12
  775.         Cursor = crHandPoint
  776.         Hint = '|Tempo-based time'
  777.         ParentFont = False
  778.         ParentColor = True
  779.         Font.Charset = DEFAULT_CHARSET
  780.         Font.Color = clSilver
  781.         Font.Height = -11
  782.         Font.Name = 'MS Sans Serif'
  783.         Font.Style = []
  784.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  785.         Style = FS_Transparent
  786.         Spacing = 4
  787.         TextAlign = ttaRight
  788.         AccelKey = 0
  789.         FXType = FX_Blend
  790.         BmpList = SynthResModule.LEDIL
  791.         OnClick = DelEnableBtnClick
  792.         Down = True
  793.         PopupAlign = Popup_Normal
  794.       end
  795.       object ChDepthWheel: TQuickSlider
  796.         Tag = 2
  797.         Left = 68
  798.         Top = 12
  799.         Width = 8
  800.         Height = 43
  801.         Cursor = crHandPoint
  802.         Hint = '|^b^aChorus depth'
  803.         Options = []
  804.         MoveSpeed = 64
  805.         SlowMotionDiv = 4
  806.         Max = 1024
  807.         Value = 512
  808.         DefaultValue = 512
  809.         OnChange = VolWheelChange
  810.         MouseButton = mbLeft
  811.         HotSideX = 2
  812.         HotSideY = 8
  813.         PopupMenu = SynthResModule.WheelMenu
  814.         BmpList = SynthResModule.VSlider2IL
  815.       end
  816.       object ChSpeedWheel: TQuickSlider
  817.         Tag = 3
  818.         Left = 80
  819.         Top = 12
  820.         Width = 8
  821.         Height = 43
  822.         Cursor = crHandPoint
  823.         Hint = '|^b^aChorus speed'
  824.         Options = []
  825.         MoveSpeed = 64
  826.         SlowMotionDiv = 4
  827.         Max = 1024
  828.         Value = 768
  829.         DefaultValue = 768
  830.         OnChange = VolWheelChange
  831.         MouseButton = mbLeft
  832.         HotSideX = 2
  833.         HotSideY = 8
  834.         PopupMenu = SynthResModule.WheelMenu
  835.         BmpList = SynthResModule.VSlider2IL
  836.       end
  837.       object ChDelayWheel: TQuickSlider
  838.         Tag = 4
  839.         Left = 92
  840.         Top = 12
  841.         Width = 8
  842.         Height = 43
  843.         Cursor = crHandPoint
  844.         Hint = '|^b^aChorus delay'
  845.         Options = []
  846.         MoveSpeed = 16
  847.         SlowMotionDiv = 4
  848.         Max = 128
  849.         Value = 8
  850.         DefaultValue = 8
  851.         OnChange = VolWheelChange
  852.         MouseButton = mbLeft
  853.         HotSideX = 2
  854.         HotSideY = 8
  855.         PopupMenu = SynthResModule.WheelMenu
  856.         BmpList = SynthResModule.VSlider2IL
  857.       end
  858.       object ChSpreadWheel: TQuickSlider
  859.         Tag = 5
  860.         Left = 104
  861.         Top = 12
  862.         Width = 8
  863.         Height = 43
  864.         Cursor = crHandPoint
  865.         Hint = '|^b^aChorus spread'
  866.         Options = []
  867.         MoveSpeed = 16
  868.         SlowMotionDiv = 4
  869.         Max = 128
  870.         Value = 128
  871.         DefaultValue = 128
  872.         OnChange = VolWheelChange
  873.         MouseButton = mbLeft
  874.         HotSideX = 2
  875.         HotSideY = 8
  876.         PopupMenu = SynthResModule.WheelMenu
  877.         BmpList = SynthResModule.VSlider2IL
  878.       end
  879.       object ChCrossWheel: TQuickSlider
  880.         Tag = 6
  881.         Left = 116
  882.         Top = 12
  883.         Width = 8
  884.         Height = 43
  885.         Cursor = crHandPoint
  886.         Hint = '|^b^aChorus cross'
  887.         Options = []
  888.         SlowMotionDiv = 4
  889.         Min = -128
  890.         Max = 128
  891.         Value = -32
  892.         DefaultValue = -32
  893.         OnChange = VolWheelChange
  894.         MouseButton = mbLeft
  895.         HotSideX = 2
  896.         HotSideY = 8
  897.         PopupMenu = SynthResModule.WheelMenu
  898.         BmpList = SynthResModule.VSlider2IL
  899.       end
  900.       object ChVolWheel: TQuickSlider
  901.         Tag = 7
  902.         Left = 128
  903.         Top = 12
  904.         Width = 8
  905.         Height = 43
  906.         Cursor = crHandPoint
  907.         Hint = '|^b^aChorus volume'
  908.         Options = []
  909.         SlowMotionDiv = 4
  910.         Min = -128
  911.         Max = 128
  912.         Value = 128
  913.         DefaultValue = 128
  914.         OnChange = VolWheelChange
  915.         MouseButton = mbLeft
  916.         HotSideX = 2
  917.         HotSideY = 8
  918.         PopupMenu = SynthResModule.WheelMenu
  919.         BmpList = SynthResModule.VSlider2IL
  920.       end
  921.       object DelFBWheel: TQuickSlider
  922.         Tag = 9
  923.         Left = 269
  924.         Top = 12
  925.         Width = 8
  926.         Height = 43
  927.         Cursor = crHandPoint
  928.         Hint = '|^b^aDelay feedback level'
  929.         Options = []
  930.         MoveSpeed = 16
  931.         SlowMotionDiv = 4
  932.         Max = 127
  933.         Value = 64
  934.         DefaultValue = 64
  935.         OnChange = VolWheelChange
  936.         MouseButton = mbLeft
  937.         HotSideX = 2
  938.         HotSideY = 8
  939.         PopupMenu = SynthResModule.WheelMenu
  940.         BmpList = SynthResModule.VSlider2IL
  941.       end
  942.       object DelTimeWheel: TQuickSlider
  943.         Tag = 10
  944.         Left = 281
  945.         Top = 12
  946.         Width = 8
  947.         Height = 43
  948.         Cursor = crHandPoint
  949.         Hint = '|^b^aDelay time'
  950.         Options = []
  951.         SlowMotionDiv = 4
  952.         Max = 384
  953.         Value = 144
  954.         DefaultValue = 144
  955.         OnChange = VolWheelChange
  956.         MouseButton = mbLeft
  957.         HotSideX = 2
  958.         HotSideY = 8
  959.         PopupMenu = SynthResModule.WheelMenu
  960.         BmpList = SynthResModule.VSlider2IL
  961.       end
  962.       object DelTimeOfsWheel: TQuickSlider
  963.         Tag = 11
  964.         Left = 293
  965.         Top = 12
  966.         Width = 8
  967.         Height = 43
  968.         Cursor = crHandPoint
  969.         Hint = '|^b^aDelay time stereo offset'
  970.         Options = [wwPause]
  971.         MoveSpeed = 64
  972.         SlowMotionDiv = 8
  973.         Min = -512
  974.         Max = 512
  975.         DefaultValue = 0
  976.         OnChange = VolWheelChange
  977.         MouseButton = mbLeft
  978.         HotSideX = 2
  979.         HotSideY = 8
  980.         PopupMenu = SynthResModule.WheelMenu
  981.         BmpList = SynthResModule.VSlider2IL
  982.       end
  983.       object DelVolWheel: TQuickSlider
  984.         Tag = 12
  985.         Left = 305
  986.         Top = 12
  987.         Width = 8
  988.         Height = 43
  989.         Cursor = crHandPoint
  990.         Hint = '|^b^aDelay volume'
  991.         Options = []
  992.         SlowMotionDiv = 4
  993.         Min = -128
  994.         Max = 128
  995.         Value = 64
  996.         DefaultValue = 64
  997.         OnChange = VolWheelChange
  998.         MouseButton = mbLeft
  999.         HotSideX = 2
  1000.         HotSideY = 8
  1001.         PopupMenu = SynthResModule.WheelMenu
  1002.         BmpList = SynthResModule.VSlider2IL
  1003.       end
  1004.       object ReverbPanel: TWPControl
  1005.         Left = 229
  1006.         Top = 0
  1007.         Width = 129
  1008.         Height = 59
  1009.         Color = clTeal
  1010.         ParentColor = False
  1011.         ShowHint = True
  1012.         Visible = False
  1013.         object RevEnableBtn: TQuickBtn
  1014.           Tag = -10
  1015.           Left = 1
  1016.           Top = 44
  1017.           Width = 37
  1018.           Height = 12
  1019.           Cursor = crHandPoint
  1020.           Hint = '|Enable reverb'
  1021.           ParentFont = False
  1022.           ParentColor = True
  1023.           Font.Charset = DEFAULT_CHARSET
  1024.           Font.Color = clSilver
  1025.           Font.Height = -11
  1026.           Font.Name = 'MS Sans Serif'
  1027.           Font.Style = []
  1028.           Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1029.           Style = FS_Transparent
  1030.           Spacing = 4
  1031.           TextAlign = ttaRight
  1032.           AccelKey = 0
  1033.           FXType = FX_Blend
  1034.           BmpList = SynthResModule.LEDIL
  1035.           OnClick = RevTempoBtnClick
  1036.           PopupAlign = Popup_Normal
  1037.         end
  1038.         object RevVolWheel: TQuickSlider
  1039.           Tag = -9
  1040.           Left = 117
  1041.           Top = 12
  1042.           Width = 8
  1043.           Height = 43
  1044.           Cursor = crHandPoint
  1045.           Hint = '|Reverb wet volume'
  1046.           Options = []
  1047.           SlowMotionDiv = 4
  1048.           Min = -128
  1049.           Max = 128
  1050.           Value = 25
  1051.           DefaultValue = 25
  1052.           OnChange = RevVolWheelChange
  1053.           MouseButton = mbLeft
  1054.           HotSideX = 2
  1055.           HotSideY = 8
  1056.           BmpList = SynthResModule.VSlider2IL
  1057.         end
  1058.         object RevHDWheel: TQuickSlider
  1059.           Tag = -7
  1060.           Left = 106
  1061.           Top = 12
  1062.           Width = 8
  1063.           Height = 43
  1064.           Cursor = crHandPoint
  1065.           Hint = '|Reverb high damping'
  1066.           Options = []
  1067.           SlowMotionDiv = 4
  1068.           Min = 5
  1069.           Max = 221
  1070.           Value = 40
  1071.           DefaultValue = 40
  1072.           OnChange = RevLCWheelChange
  1073.           MouseButton = mbLeft
  1074.           HotSideX = 2
  1075.           HotSideY = 8
  1076.           BmpList = SynthResModule.VSlider2IL
  1077.         end
  1078.         object RevDecWheel: TQuickSlider
  1079.           Tag = -6
  1080.           Left = 95
  1081.           Top = 12
  1082.           Width = 8
  1083.           Height = 43
  1084.           Cursor = crHandPoint
  1085.           Hint = '|Reverb decay'
  1086.           Options = []
  1087.           SlowMotionDiv = 4
  1088.           Min = 1
  1089.           Max = 200
  1090.           Value = 15
  1091.           DefaultValue = 15
  1092.           OnChange = RevLCWheelChange
  1093.           MouseButton = mbLeft
  1094.           HotSideX = 2
  1095.           HotSideY = 8
  1096.           BmpList = SynthResModule.VSlider2IL
  1097.         end
  1098.         object RevDiffWheel: TQuickSlider
  1099.           Tag = -5
  1100.           Left = 84
  1101.           Top = 12
  1102.           Width = 8
  1103.           Height = 43
  1104.           Cursor = crHandPoint
  1105.           Hint = '|Reverb diffusion'
  1106.           Options = []
  1107.           MoveSpeed = 16
  1108.           SlowMotionDiv = 4
  1109.           Max = 100
  1110.           Value = 100
  1111.           DefaultValue = 100
  1112.           OnChange = RevLCWheelChange
  1113.           MouseButton = mbLeft
  1114.           HotSideX = 2
  1115.           HotSideY = 8
  1116.           BmpList = SynthResModule.VSlider2IL
  1117.         end
  1118.         object RevRoomWheel: TQuickSlider
  1119.           Tag = -4
  1120.           Left = 73
  1121.           Top = 12
  1122.           Width = 8
  1123.           Height = 43
  1124.           Cursor = crHandPoint
  1125.           Hint = '|Reverb room size'
  1126.           Options = []
  1127.           MoveSpeed = 16
  1128.           SlowMotionDiv = 4
  1129.           Min = 1
  1130.           Max = 100
  1131.           Value = 40
  1132.           DefaultValue = 40
  1133.           OnChange = RevLCWheelChange
  1134.           MouseButton = mbLeft
  1135.           HotSideX = 2
  1136.           HotSideY = 8
  1137.           BmpList = SynthResModule.VSlider2IL
  1138.         end
  1139.         object RevDelWheel: TQuickSlider
  1140.           Tag = -3
  1141.           Left = 62
  1142.           Top = 12
  1143.           Width = 8
  1144.           Height = 43
  1145.           Cursor = crHandPoint
  1146.           Hint = '|Reverb predelay'
  1147.           Options = []
  1148.           SlowMotionDiv = 4
  1149.           Max = 384
  1150.           Value = 144
  1151.           DefaultValue = 144
  1152.           OnChange = RevLCWheelChange
  1153.           MouseButton = mbLeft
  1154.           HotSideX = 2
  1155.           HotSideY = 8
  1156.           BmpList = SynthResModule.VSlider2IL
  1157.         end
  1158.         object RevHCWheel: TQuickSlider
  1159.           Tag = -2
  1160.           Left = 51
  1161.           Top = 12
  1162.           Width = 8
  1163.           Height = 43
  1164.           Cursor = crHandPoint
  1165.           Hint = '|Reverb highcut'
  1166.           Options = []
  1167.           SlowMotionDiv = 4
  1168.           Min = 5
  1169.           Max = 221
  1170.           Value = 40
  1171.           DefaultValue = 40
  1172.           OnChange = RevLCWheelChange
  1173.           MouseButton = mbLeft
  1174.           HotSideX = 2
  1175.           HotSideY = 8
  1176.           BmpList = SynthResModule.VSlider2IL
  1177.         end
  1178.         object RevLCWheel: TQuickSlider
  1179.           Tag = -1
  1180.           Left = 40
  1181.           Top = 12
  1182.           Width = 8
  1183.           Height = 43
  1184.           Cursor = crHandPoint
  1185.           Hint = '|Reverb lowcut'
  1186.           Options = []
  1187.           MoveSpeed = 256
  1188.           SlowMotionDiv = 4
  1189.           Min = 19
  1190.           Max = 3000
  1191.           Value = 75
  1192.           DefaultValue = 75
  1193.           OnChange = RevLCWheelChange
  1194.           MouseButton = mbLeft
  1195.           HotSideX = 2
  1196.           HotSideY = 8
  1197.           BmpList = SynthResModule.VSlider2IL
  1198.         end
  1199.         object RevColWheel: TWAVWheel
  1200.           Tag = -8
  1201.           Left = 13
  1202.           Top = 13
  1203.           Width = 17
  1204.           Height = 7
  1205.           Cursor = crSizeNS
  1206.           Hint = '|Reverb color'
  1207.           MoveSpeed = 1
  1208.           SlowMotionDiv = 4
  1209.           Max = 4
  1210.           Value = 2
  1211.           DefaultValue = 2
  1212.           OnChange = RevLCWheelChange
  1213.           MouseButton = mbLeft
  1214.           HotSideX = 6
  1215.           HotSideY = 6
  1216.           BmpList = SynthResModule.RevColIL
  1217.         end
  1218.         object RevTempoBtn: TQuickBtn
  1219.           Tag = -1
  1220.           Left = 1
  1221.           Top = 32
  1222.           Width = 37
  1223.           Height = 12
  1224.           Cursor = crHandPoint
  1225.           Hint = '|Tempo-based predelay'
  1226.           ParentFont = False
  1227.           ParentColor = True
  1228.           Font.Charset = DEFAULT_CHARSET
  1229.           Font.Color = clSilver
  1230.           Font.Height = -11
  1231.           Font.Name = 'MS Sans Serif'
  1232.           Font.Style = []
  1233.           Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1234.           Style = FS_Transparent
  1235.           Spacing = 4
  1236.           TextAlign = ttaRight
  1237.           AccelKey = 0
  1238.           FXType = FX_Blend
  1239.           BmpList = SynthResModule.LEDIL
  1240.           OnClick = RevTempoBtnClick
  1241.           Down = True
  1242.           PopupAlign = Popup_Normal
  1243.         end
  1244.       end
  1245.     end
  1246.     object OpPanel: TWPControl
  1247.       Left = 8
  1248.       Top = 33
  1249.       Width = 361
  1250.       Height = 59
  1251.       Color = 8404992
  1252.       ParentColor = False
  1253.       ParentShowHint = True
  1254.       object BandLimitBtn: TQuickBtn
  1255.         Tag = -1
  1256.         Left = 130
  1257.         Top = 25
  1258.         Width = 40
  1259.         Height = 13
  1260.         Cursor = crHandPoint
  1261.         Hint = '|Band-limit waveform'
  1262.         ParentFont = False
  1263.         ParentColor = True
  1264.         Font.Charset = DEFAULT_CHARSET
  1265.         Font.Color = clSilver
  1266.         Font.Height = -11
  1267.         Font.Name = 'MS Sans Serif'
  1268.         Font.Style = []
  1269.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1270.         Style = FS_Transparent
  1271.         Spacing = 4
  1272.         TextAlign = ttaRight
  1273.         AccelKey = 0
  1274.         FXType = FX_Blend
  1275.         BmpList = SynthResModule.LEDIL
  1276.         OnClick = CenterBtnClick
  1277.         PopupAlign = Popup_Normal
  1278.       end
  1279.       object DeClickBtn: TQuickBtn
  1280.         Tag = -1
  1281.         Left = 130
  1282.         Top = 13
  1283.         Width = 40
  1284.         Height = 13
  1285.         Cursor = crHandPoint
  1286.         Hint = '|Attack click removal'
  1287.         ParentFont = False
  1288.         ParentColor = True
  1289.         Font.Charset = DEFAULT_CHARSET
  1290.         Font.Color = clSilver
  1291.         Font.Height = -11
  1292.         Font.Name = 'MS Sans Serif'
  1293.         Font.Style = []
  1294.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1295.         Style = FS_Transparent
  1296.         Spacing = 4
  1297.         TextAlign = ttaRight
  1298.         AccelKey = 0
  1299.         FXType = FX_Blend
  1300.         BmpList = SynthResModule.LEDIL
  1301.         OnClick = CenterBtnClick
  1302.         PopupAlign = Popup_Normal
  1303.       end
  1304.       object WAVScope: THQWAVScope
  1305.         Left = 1
  1306.         Top = 14
  1307.         Width = 50
  1308.         Height = 43
  1309.         Cursor = crHandPoint
  1310.         Hint = '|^dWaveform'
  1311.         BackColor = clBlack
  1312.         CenterColor = clGray
  1313.         LineColor = 15853283
  1314.         LineColor_Right = 15853283
  1315.         OnMouseDown = WAVScopeMouseDown
  1316.         OnMouseUp = WAVScopeMouseUp
  1317.       end
  1318.       object ShapeHalfBtn: TQuickBtn
  1319.         Tag = -1
  1320.         Left = 1
  1321.         Top = 1
  1322.         Width = 17
  1323.         Height = 10
  1324.         Cursor = crHandPoint
  1325.         Hint = '|Half'
  1326.         ParentFont = False
  1327.         ParentColor = False
  1328.         Color = 16744576
  1329.         Font.Charset = DEFAULT_CHARSET
  1330.         Font.Color = clSilver
  1331.         Font.Height = -11
  1332.         Font.Name = 'MS Sans Serif'
  1333.         Font.Style = []
  1334.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph]
  1335.         Spacing = 0
  1336.         TextAlign = ttaRight
  1337.         AccelKey = 0
  1338.         FXType = FX_Blend
  1339.         FXAttack = 64
  1340.         BmpList = SynthResModule.ShapeBtnsIL
  1341.         OnClick = ShapeTensionWheelChange
  1342.         PopupAlign = Popup_Normal
  1343.       end
  1344.       object ShapeHalfSilentBtn: TQuickBtn
  1345.         Tag = -1
  1346.         Left = 18
  1347.         Top = 1
  1348.         Width = 17
  1349.         Height = 10
  1350.         Cursor = crHandPoint
  1351.         Hint = '|Even'
  1352.         ParentFont = False
  1353.         ParentColor = False
  1354.         Color = 16744576
  1355.         Font.Charset = DEFAULT_CHARSET
  1356.         Font.Color = clSilver
  1357.         Font.Height = -11
  1358.         Font.Name = 'MS Sans Serif'
  1359.         Font.Style = []
  1360.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph]
  1361.         Spacing = 0
  1362.         TextAlign = ttaRight
  1363.         AccelKey = 0
  1364.         FXType = FX_Blend
  1365.         FXAttack = 64
  1366.         BmpList = SynthResModule.ShapeBtnsIL
  1367.         ILIndex = 2
  1368.         OnClick = ShapeTensionWheelChange
  1369.         PopupAlign = Popup_Normal
  1370.       end
  1371.       object ShapeAbsBtn: TQuickBtn
  1372.         Tag = -1
  1373.         Left = 35
  1374.         Top = 1
  1375.         Width = 17
  1376.         Height = 10
  1377.         Cursor = crHandPoint
  1378.         Hint = '|Absolute'
  1379.         ParentFont = False
  1380.         ParentColor = False
  1381.         Color = 16744576
  1382.         Font.Charset = DEFAULT_CHARSET
  1383.         Font.Color = clSilver
  1384.         Font.Height = -11
  1385.         Font.Name = 'MS Sans Serif'
  1386.         Font.Style = []
  1387.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph]
  1388.         Spacing = 0
  1389.         TextAlign = ttaRight
  1390.         AccelKey = 0
  1391.         FXType = FX_Blend
  1392.         FXAttack = 64
  1393.         BmpList = SynthResModule.ShapeBtnsIL
  1394.         ILIndex = 4
  1395.         OnClick = ShapeTensionWheelChange
  1396.         PopupAlign = Popup_Normal
  1397.       end
  1398.       object RatioSelect: TMultiDigiWheel
  1399.         Left = 279
  1400.         Top = 5
  1401.         Width = 77
  1402.         Height = 21
  1403.         Cursor = crSizeNS
  1404.         Hint = '|Freq ratio'
  1405.         Options = [wwAutoSize, wwBorder, wwIncMode]
  1406.         MoveSpeed = 2
  1407.         SlowMotionDiv = 4
  1408.         Max = 640000
  1409.         Value = 20000
  1410.         DefaultValue = 20000
  1411.         OnChange = PhaseWheelChange
  1412.         MouseButton = mbLeft
  1413.         HotSideX = 2
  1414.         HotSideY = 2
  1415.         Color = clNone
  1416.         Font.Charset = ANSI_CHARSET
  1417.         Font.Color = 13025463
  1418.         Font.Height = -11
  1419.         Font.Name = 'Arial'
  1420.         Font.Style = []
  1421.         BmpList = SynthResModule.Digits16IL
  1422.         NumDigits = 6
  1423.         NullValue = 2147483647
  1424.         OnGetIncrement = RatioSelectGetIncrement
  1425.         OnPaint = RatioSelectPaint
  1426.       end
  1427.       object FreqSelect: TMultiDigiWheel
  1428.         Tag = 1
  1429.         Left = 174
  1430.         Top = 5
  1431.         Width = 99
  1432.         Height = 21
  1433.         Cursor = crSizeNS
  1434.         Hint = '|Freq offset (Hz)'
  1435.         Options = [wwAutoSize, wwBorder, wwIncMode]
  1436.         MoveSpeed = 2
  1437.         SlowMotionDiv = 4
  1438.         Min = -999999
  1439.         Max = 999999
  1440.         DefaultValue = 0
  1441.         OnChange = PhaseWheelChange
  1442.         MouseButton = mbLeft
  1443.         HotSideX = 2
  1444.         HotSideY = 2
  1445.         Color = clNone
  1446.         Font.Charset = ANSI_CHARSET
  1447.         Font.Color = 13025463
  1448.         Font.Height = -11
  1449.         Font.Name = 'Arial'
  1450.         Font.Style = []
  1451.         BmpList = SynthResModule.Digits16IL
  1452.         NumDigits = 7
  1453.         NullValue = 2147483647
  1454.         OnGetIncrement = RatioSelectGetIncrement
  1455.         OnPaint = RatioSelectPaint
  1456.       end
  1457.       object ShapeNoiseWheel: TQuickSlider
  1458.         Tag = -1
  1459.         Left = 116
  1460.         Top = 10
  1461.         Width = 10
  1462.         Height = 47
  1463.         Cursor = crHandPoint
  1464.         Hint = '|Noise'
  1465.         Options = []
  1466.         MoveSpeed = 16
  1467.         SlowMotionDiv = 4
  1468.         Max = 128
  1469.         DefaultValue = 0
  1470.         OnChange = ShapeTensionWheelChange
  1471.         OnRelease = ShapeTensionWheelRelease
  1472.         MouseButton = mbLeft
  1473.         HotSideX = 1
  1474.         HotSideY = 8
  1475.         BmpList = SynthResModule.VSliderIL
  1476.       end
  1477.       object ShapeSineWheel: TQuickSlider
  1478.         Tag = -1
  1479.         Left = 92
  1480.         Top = 10
  1481.         Width = 10
  1482.         Height = 47
  1483.         Cursor = crHandPoint
  1484.         Hint = '|Sine shaper'
  1485.         Options = []
  1486.         MoveSpeed = 16
  1487.         SlowMotionDiv = 4
  1488.         Max = 128
  1489.         DefaultValue = 0
  1490.         OnChange = ShapeTensionWheelChange
  1491.         OnRelease = ShapeTensionWheelRelease
  1492.         MouseButton = mbLeft
  1493.         HotSideX = 1
  1494.         HotSideY = 8
  1495.         BmpList = SynthResModule.VSliderIL
  1496.       end
  1497.       object ShapeSkewWheel: TQuickSlider
  1498.         Tag = -1
  1499.         Left = 80
  1500.         Top = 10
  1501.         Width = 10
  1502.         Height = 47
  1503.         Cursor = crHandPoint
  1504.         Hint = '|Skew'
  1505.         Options = []
  1506.         MoveSpeed = 16
  1507.         SlowMotionDiv = 4
  1508.         Max = 128
  1509.         DefaultValue = 0
  1510.         OnChange = ShapeTensionWheelChange
  1511.         OnRelease = ShapeTensionWheelRelease
  1512.         MouseButton = mbLeft
  1513.         HotSideX = 1
  1514.         HotSideY = 8
  1515.         BmpList = SynthResModule.VSliderIL
  1516.       end
  1517.       object ShapeTensionWheel: TQuickSlider
  1518.         Tag = -1
  1519.         Left = 68
  1520.         Top = 10
  1521.         Width = 10
  1522.         Height = 47
  1523.         Cursor = crHandPoint
  1524.         Hint = '|Tension'
  1525.         Options = [wwPause]
  1526.         SlowMotionDiv = 4
  1527.         Min = -128
  1528.         Max = 128
  1529.         DefaultValue = 0
  1530.         OnChange = ShapeTensionWheelChange
  1531.         OnRelease = ShapeTensionWheelRelease
  1532.         MouseButton = mbLeft
  1533.         HotSideX = 1
  1534.         HotSideY = 8
  1535.         BmpList = SynthResModule.VSliderIL
  1536.       end
  1537.       object ShapeShapeWheel: TQuickSlider
  1538.         Tag = -1
  1539.         Left = 56
  1540.         Top = 10
  1541.         Width = 10
  1542.         Height = 47
  1543.         Cursor = crHandPoint
  1544.         Hint = '|Shape'
  1545.         Options = []
  1546.         SlowMotionDiv = 16
  1547.         Max = 512
  1548.         DefaultValue = 0
  1549.         OnChange = ShapeTensionWheelChange
  1550.         OnRelease = ShapeTensionWheelRelease
  1551.         MouseButton = mbLeft
  1552.         HotSideX = 1
  1553.         HotSideY = 8
  1554.         OnMouseUp = ShapeShapeWheelMouseUp
  1555.         BmpList = SynthResModule.VSliderIL
  1556.       end
  1557.       object ShapeFilterWheel: TQuickSlider
  1558.         Tag = -1
  1559.         Left = 104
  1560.         Top = 10
  1561.         Width = 10
  1562.         Height = 47
  1563.         Cursor = crHandPoint
  1564.         Hint = '|Pre-filter'
  1565.         Options = []
  1566.         MoveSpeed = 16
  1567.         SlowMotionDiv = 4
  1568.         Max = 128
  1569.         Value = 128
  1570.         DefaultValue = 128
  1571.         OnChange = ShapeTensionWheelChange
  1572.         OnRelease = ShapeTensionWheelRelease
  1573.         MouseButton = mbLeft
  1574.         HotSideX = 1
  1575.         HotSideY = 8
  1576.         BmpList = SynthResModule.VSliderIL
  1577.       end
  1578.       object FreeRunBtn: TQuickBtn
  1579.         Tag = -1
  1580.         Left = 199
  1581.         Top = 32
  1582.         Width = 40
  1583.         Height = 13
  1584.         Cursor = crHandPoint
  1585.         Hint = '|Global / retriggered phase'
  1586.         ParentFont = False
  1587.         ParentColor = True
  1588.         Font.Charset = DEFAULT_CHARSET
  1589.         Font.Color = clSilver
  1590.         Font.Height = -11
  1591.         Font.Name = 'MS Sans Serif'
  1592.         Font.Style = []
  1593.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1594.         Style = FS_Transparent
  1595.         Spacing = 4
  1596.         TextAlign = ttaRight
  1597.         AccelKey = 0
  1598.         FXType = FX_Blend
  1599.         BmpList = SynthResModule.LEDIL
  1600.         OnClick = FreeRunBtnClick
  1601.         PopupAlign = Popup_Normal
  1602.       end
  1603.       object PluckModeBtn: TQuickBtn
  1604.         Tag = -1
  1605.         Left = 130
  1606.         Top = 45
  1607.         Width = 40
  1608.         Height = 13
  1609.         Cursor = crHandPoint
  1610.         Hint = '|Plucked mode'
  1611.         ParentFont = False
  1612.         ParentColor = True
  1613.         Font.Charset = DEFAULT_CHARSET
  1614.         Font.Color = clSilver
  1615.         Font.Height = -11
  1616.         Font.Name = 'MS Sans Serif'
  1617.         Font.Style = []
  1618.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1619.         Style = FS_Transparent
  1620.         Spacing = 4
  1621.         TextAlign = ttaRight
  1622.         AccelKey = 0
  1623.         FXType = FX_Blend
  1624.         BmpList = SynthResModule.LEDIL
  1625.         OnClick = PluckModeBtnClick
  1626.         PopupAlign = Popup_Normal
  1627.       end
  1628.       object CenterBtn: TQuickBtn
  1629.         Tag = -1
  1630.         Left = 130
  1631.         Top = 1
  1632.         Width = 40
  1633.         Height = 13
  1634.         Cursor = crHandPoint
  1635.         Hint = '|DC offset removal'
  1636.         ParentFont = False
  1637.         ParentColor = True
  1638.         Font.Charset = DEFAULT_CHARSET
  1639.         Font.Color = clSilver
  1640.         Font.Height = -11
  1641.         Font.Name = 'MS Sans Serif'
  1642.         Font.Style = []
  1643.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1644.         Style = FS_Transparent
  1645.         Spacing = 4
  1646.         TextAlign = ttaRight
  1647.         AccelKey = 0
  1648.         FXType = FX_Blend
  1649.         BmpList = SynthResModule.LEDIL
  1650.         OnClick = CenterBtnClick
  1651.         PopupAlign = Popup_Normal
  1652.       end
  1653.       object PhaseWheel: TWAVWheel
  1654.         Left = 172
  1655.         Top = 29
  1656.         Width = 23
  1657.         Height = 23
  1658.         Hint = '|^b^aStarting phase'
  1659.         Options = []
  1660.         MoveSpeed = 16
  1661.         SlowMotionDiv = 4
  1662.         Max = 256
  1663.         DefaultValue = 0
  1664.         OnChange = VolWheelChange
  1665.         MouseButton = mbLeft
  1666.         HotSideX = 2
  1667.         HotSideY = 4
  1668.         PopupMenu = SynthResModule.WheelMenu
  1669.         BmpList = SynthResModule.MainWheelIL
  1670.       end
  1671.       object PEnvRangeWheel: TWAVWheel
  1672.         Tag = 2
  1673.         Left = 338
  1674.         Top = 29
  1675.         Width = 23
  1676.         Height = 23
  1677.         Hint = '|^b^aPitch envelope/LFO amount'
  1678.         Options = []
  1679.         MoveSpeed = 160
  1680.         SlowMotionDiv = 20
  1681.         Max = 4800
  1682.         Value = 1200
  1683.         DefaultValue = 1200
  1684.         OnChange = VolWheelChange
  1685.         MouseButton = mbLeft
  1686.         HotSideX = 2
  1687.         HotSideY = 4
  1688.         PopupMenu = SynthResModule.WheelMenu
  1689.         BmpList = SynthResModule.MainWheelIL
  1690.       end
  1691.       object VolWheel: TWAVWheel
  1692.         Tag = 1
  1693.         Left = 312
  1694.         Top = 29
  1695.         Width = 23
  1696.         Height = 23
  1697.         Hint = '|^b^aVolume'
  1698.         Options = []
  1699.         SlowMotionDiv = 4
  1700.         Min = -256
  1701.         Max = 256
  1702.         Value = 256
  1703.         DefaultValue = 256
  1704.         OnChange = VolWheelChange
  1705.         MouseButton = mbLeft
  1706.         HotSideX = 2
  1707.         HotSideY = 4
  1708.         PopupMenu = SynthResModule.WheelMenu
  1709.         BmpList = SynthResModule.MainWheelIL
  1710.       end
  1711.     end
  1712.     object KbPanel: TWPControl
  1713.       Left = 0
  1714.       Top = 341
  1715.       Width = 587
  1716.       Height = 82
  1717.       Align = alBottom
  1718.       Color = clGreen
  1719.       ParentColor = False
  1720.       ShowHint = True
  1721.       object MIDIKb: TQuickMIDIKb
  1722.         Tag = -1
  1723.         Left = 56
  1724.         Top = 15
  1725.         Width = 476
  1726.         Height = 66
  1727.         Cursor = crHandPoint
  1728.         KbBmpList = SynthResModule.TestKbIL
  1729.         MinKey = 36
  1730.         MaxKey = 83
  1731.         OnNoteOn = MIDIKbNoteOn
  1732.         OnNoteOff = MIDIKbNoteOff
  1733.       end
  1734.     end
  1735.     inline MEnvEditor: TMEnvEditor
  1736.       Left = 8
  1737.       Top = 139
  1738.       Width = 361
  1739.       Height = 179
  1740.       TabOrder = 4
  1741.       Visible = False
  1742.       inherited TimeZoomSelect: TWAVWheel
  1743.         Left = 342
  1744.         Top = 145
  1745.       end
  1746.       inherited EnvVisual: TQuickPaintBox
  1747.         Width = 361
  1748.         Height = 145
  1749.       end
  1750.       inherited MapPanel: TQuickBmpList
  1751.         Top = 146
  1752.         Width = 361
  1753.       end
  1754.       inherited EnvPanel: TQuickPanel
  1755.         Top = 146
  1756.         inherited EnvAttWheel: TWAVWheel
  1757.           OnChange = MEnvEditorEnvAttWheelChange
  1758.         end
  1759.         inherited EnvDecWheel: TWAVWheel
  1760.           OnChange = MEnvEditorEnvAttWheelChange
  1761.         end
  1762.         inherited EnvSusWheel: TWAVWheel
  1763.           OnChange = MEnvEditorEnvAttWheelChange
  1764.         end
  1765.         inherited EnvRelWheel: TWAVWheel
  1766.           OnChange = MEnvEditorEnvAttWheelChange
  1767.         end
  1768.       end
  1769.       inherited TimeScroller: TNumBar
  1770.         Top = 145
  1771.         Width = 190
  1772.       end
  1773.       inherited LFOPanel: TQuickPanel
  1774.         Top = 146
  1775.         inherited LFOSpeedWheel: TWAVWheel
  1776.           OnChange = MEnvEditorLFOSpeedWheelChange
  1777.         end
  1778.         inherited LFOTensionWheel: TWAVWheel
  1779.           OnChange = MEnvEditorLFOSpeedWheelChange
  1780.         end
  1781.         inherited LFOSkewWheel: TWAVWheel
  1782.           OnChange = MEnvEditorLFOSpeedWheelChange
  1783.         end
  1784.         inherited LFOPWWheel: TWAVWheel
  1785.           OnChange = MEnvEditorLFOSpeedWheelChange
  1786.         end
  1787.       end
  1788.       inherited GlobalPanel: TQuickPanel
  1789.         Top = 162
  1790.         Width = 208
  1791.         inherited SlideBtn: TQuickCheckBox
  1792.           Left = 176
  1793.         end
  1794.         inherited FreezeBtn: TQuickCheckBox
  1795.           Left = 63
  1796.         end
  1797.         inherited SnapBtn: TQuickCheckBox
  1798.           Left = 141
  1799.         end
  1800.         inherited StepBtn: TQuickCheckBox
  1801.           Left = 106
  1802.         end
  1803.       end
  1804.     end
  1805.     object InfoPanel: TWPControl
  1806.       Left = 0
  1807.       Top = 0
  1808.       Width = 4
  1809.       Height = 339
  1810.       Cursor = crHandPoint
  1811.       Color = clMaroon
  1812.       ParentColor = False
  1813.       ShowHint = True
  1814.       Visible = False
  1815.       OnClick = InfoPanelClick
  1816.       object BigLogoBtn: TQuickBtn
  1817.         Tag = -1
  1818.         Left = 15
  1819.         Top = 15
  1820.         Width = 300
  1821.         Height = 79
  1822.         Enabled = False
  1823.         ParentFont = False
  1824.         ParentColor = False
  1825.         Color = 6709335
  1826.         Font.Charset = ANSI_CHARSET
  1827.         Font.Color = 13025463
  1828.         Font.Height = -9
  1829.         Font.Name = 'Fruity fonts'
  1830.         Font.Style = []
  1831.         Options = [tbDirectClick, tbHasOnOverGlyph, tbAutoSize, tbHiddenAnim]
  1832.         AccelKey = 0
  1833.         FXType = FX_Blend
  1834.         FXWhen = FX_OnDemand
  1835.         FXAttack = 256
  1836.         FXRelease = 16
  1837.         Glyph.ILCount = 2
  1838.         Down = True
  1839.         StayDown = False
  1840.       end
  1841.       object FruitClickBox: TPaintBox
  1842.         Left = 229
  1843.         Top = 30
  1844.         Width = 78
  1845.         Height = 56
  1846.         OnClick = FruitClickBoxClick
  1847.       end
  1848.     end
  1849.     object HarmPanel: TWPControl
  1850.       Left = 7
  1851.       Top = 122
  1852.       Width = 363
  1853.       Height = 197
  1854.       Color = clBlack
  1855.       ParentColor = False
  1856.       ShowHint = True
  1857.       Visible = False
  1858.       OnPaint = HarmPanelPaint
  1859.       object HarmVVisual: TQuickPaintBox
  1860.         Left = 2
  1861.         Top = 54
  1862.         Width = 359
  1863.         Height = 73
  1864.         Cursor = crHandPoint
  1865.         OnPaint = HarmVVisualPaint
  1866.         OnMouseDown = HarmVVisualMouseDown
  1867.         OnMouseMove = HarmVVisualMouseMove
  1868.         OnMouseUp = HarmVVisualMouseUp
  1869.       end
  1870.       object HarmPVisual: TQuickPaintBox
  1871.         Tag = 1
  1872.         Left = 2
  1873.         Top = 129
  1874.         Width = 359
  1875.         Height = 48
  1876.         Cursor = crHandPoint
  1877.         OnPaint = HarmVVisualPaint
  1878.         OnMouseDown = HarmVVisualMouseDown
  1879.         OnMouseMove = HarmVVisualMouseMove
  1880.         OnMouseUp = HarmVVisualMouseUp
  1881.       end
  1882.       object BigWAVScope: THQWAVScope
  1883.         Left = 1
  1884.         Top = 2
  1885.         Width = 361
  1886.         Height = 49
  1887.         Hint = '|Waveform'
  1888.         BackColor = clBlack
  1889.         CenterColor = clGray
  1890.         LineColor = 15853283
  1891.         LineColor_Right = 15853283
  1892.       end
  1893.       object HarmZoomSelect: TWAVWheel
  1894.         Left = 345
  1895.         Top = 178
  1896.         Width = 18
  1897.         Height = 19
  1898.         Cursor = crSizeNS
  1899.         MoveSpeed = 4
  1900.         SlowMotionDiv = 1
  1901.         Max = 4
  1902.         Value = 1
  1903.         DefaultValue = 1
  1904.         OnChange = HarmZoomSelectChange
  1905.         MouseButton = mbLeft
  1906.         Anchors = [akRight, akBottom]
  1907.         BmpList = SynthResModule.HarmZoomIL
  1908.       end
  1909.       object HarmBottomPanel: TQuickPanel
  1910.         Left = 1
  1911.         Top = 179
  1912.         Width = 151
  1913.         Height = 17
  1914.         BorderStyle = bsNone
  1915.         BevelDepth = 200
  1916.         Style = psFlat
  1917.         Color = 4336682
  1918.         Font.Charset = ANSI_CHARSET
  1919.         Font.Color = 11380895
  1920.         Font.Height = -9
  1921.         Font.Name = 'Fruity fonts'
  1922.         Font.Style = [fsBold]
  1923.         ParentColor = False
  1924.         ParentFont = False
  1925.         TabOrder = 0
  1926.         Anchors = [akLeft, akBottom]
  1927.         object HarmMenuBtn: TQuickBtn
  1928.           Left = 3
  1929.           Top = 2
  1930.           Width = 13
  1931.           Height = 13
  1932.           Cursor = crHandPoint
  1933.           Hint = '|Options'
  1934.           ParentColor = False
  1935.           Color = 16512
  1936.           PopupMenu = SynthResModule.HarmOptionsMenu
  1937.           Options = [tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  1938.           Spacing = 0
  1939.           TextAlign = ttaBitmapRight
  1940.           AccelKey = 0
  1941.           FXType = FX_Blend
  1942.           FXAttack = 64
  1943.           Glyph.ILCount = 2
  1944.           BmpList = MEnvEditor.BtnsIL
  1945.           ILIndex = 2
  1946.           PopupButton = mbLeft
  1947.         end
  1948.         object HarmLockSelect: TSelector
  1949.           Tag = 13
  1950.           Left = 78
  1951.           Top = 3
  1952.           Width = 69
  1953.           Height = 11
  1954.           Cursor = crHandPoint
  1955.           Hint = '|Work on'
  1956.           Hints.Strings = (
  1957.             'all harmonics'
  1958.             'odd harmonics'
  1959.             'even harmonics')
  1960.           Options = [seCanSlide]
  1961.           NumCols = 3
  1962.           NumRows = 1
  1963.           Glyph.Data = {
  1964.             280000008A000000F5FFFFFF0100040000000000180300000000000000000000
  1965.             0000000000000000422C2A00503A38005D4745005F494700624C4A006D575500
  1966.             786260007C666400826C6A0098828000B49E9C00000000000000000000000000
  1967.             0000000000000000000000000000000000000000000000000000000000000000
  1968.             0000000000000000000000000000000000000000000000000000000000000000
  1969.             0000000000000000000000000000000000000000000000000000000000000000
  1970.             0000000000000000000000000000000000000000AA0000000000000AA00000AA
  1971.             000000000000000AA00AA0000000000000000000AA0000000000000000000000
  1972.             00000000000000000000000000000000000000000000000000000000AA000000
  1973.             0000000AA00000AA000000000000000AA00AA0000000000000000000AA000000
  1974.             0000000474070070000000000000047407740774000000000077707170777077
  1975.             50000000AA008A80A00A000AA00000AA008A80AA80AA800AA00AA00AAA0A3A0A
  1976.             AA0AA900AA000000000000070707007000000000000007070707070700000000
  1977.             007000727070007070000000AA00A0A0A00A000AA00000AA00A0A0A0A0A0A00A
  1978.             A00AA00A000A6A0A000A0A00AA00000000000007770700700000000000000707
  1979.             0707070700000000007750555077507070000000AA00AAA0A00A000AA00000AA
  1980.             00A0A0A0A0A0A00AA00AA00AA909990AA90A0A00AA0000000000000707070070
  1981.             00000000000007070707070700000000007000272070007070000000AA00A0A0
  1982.             A00A000AA00000AA00A0A0A0A0A0A00AA00AA00A0006A60A000A0A00AA000000
  1983.             0000000707077077000000000000047707740774000000000077701710777070
  1984.             70000000AA00A0A0AA0AA00AA00000AA008AA0AA80AA800AA00AA00AAA03A30A
  1985.             AA0A0A00AA000000000000000000000000000000000000000000000000000000
  1986.             000000000000000000000000AA0000000000000AA00000AA000000000000000A
  1987.             A00AA0000000000000000000AA00000000000000000000000000000000000000
  1988.             0000000000000000000000000000000000000000AA0000000000000AA00000AA
  1989.             000000000000000AA00AA0000000000000000000AA0000000000000000000000
  1990.             0000000000000000000000000000000000000000000000000000000000000000
  1991.             000000000000000000000000000000000000000000000000000000000000BB0B}
  1992.           DefaultValue = 0
  1993.           OnChange = HarmLockSelectChange
  1994.         end
  1995.         object HarmSmoothBtn: TQuickBtn
  1996.           Left = 32
  1997.           Top = 2
  1998.           Width = 31
  1999.           Height = 13
  2000.           Cursor = crHandPoint
  2001.           Hint = '|Smooth up harmonics'
  2002.           ParentColor = False
  2003.           Color = 16512
  2004.           Options = [tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2005.           Spacing = 0
  2006.           TextAlign = ttaBitmapRight
  2007.           AccelKey = 0
  2008.           FXType = FX_Blend
  2009.           FXAttack = 256
  2010.           Glyph.ILCount = 2
  2011.           BmpList = SynthResModule.HarmToolsIL
  2012.           OnClick = HarmSmoothBtnClick
  2013.           StayDown = False
  2014.           PopupButton = mbLeft
  2015.         end
  2016.       end
  2017.       object HarmScroller: TNumBar
  2018.         Left = 152
  2019.         Top = 178
  2020.         Width = 193
  2021.         Height = 19
  2022.         BorderStyle = bsNone
  2023.         ParentColor = False
  2024.         TabOrder = 1
  2025.         Font.Charset = DEFAULT_CHARSET
  2026.         Font.Color = clWindowText
  2027.         Font.Height = -11
  2028.         Font.Name = 'MS Sans Serif'
  2029.         Font.Style = [fsBold]
  2030.         Color = 5849921
  2031.         Anchors = [akLeft, akRight, akBottom]
  2032.         LineSize = 1
  2033.         PageSize = 16
  2034.         Min = 0
  2035.         Max = 68
  2036.         MoveMin = 0
  2037.         MoveMax = 68
  2038.         Position = 0
  2039.         MoveSpeed = 256
  2040.         Orientation = trHorizontal
  2041.         Options = [nbSlideKnob]
  2042.         ArrowsWidth = 18
  2043.         OnChange = HarmScrollerChange
  2044.       end
  2045.     end
  2046.     object MainPanel: TWPControl
  2047.       Left = 6
  2048.       Top = 31
  2049.       Width = 365
  2050.       Height = 287
  2051.       Color = 4210688
  2052.       ParentColor = False
  2053.       ParentShowHint = True
  2054.       object FatPitchWheel: TQuickSlider
  2055.         Tag = 14
  2056.         Left = 307
  2057.         Top = 14
  2058.         Width = 8
  2059.         Height = 43
  2060.         Cursor = crHandPoint
  2061.         Hint = '|^b^aUnison pitch'
  2062.         Options = []
  2063.         SlowMotionDiv = 4
  2064.         Max = 256
  2065.         Value = 128
  2066.         DefaultValue = 128
  2067.         OnChange = VolWheelChange
  2068.         MouseButton = mbLeft
  2069.         HotSideX = 3
  2070.         HotSideY = 8
  2071.         PopupMenu = SynthResModule.WheelMenu
  2072.         BmpList = SynthResModule.VSlider2IL
  2073.       end
  2074.       object FRelWheel: TQuickSlider
  2075.         Tag = 10
  2076.         Left = 209
  2077.         Top = 14
  2078.         Width = 8
  2079.         Height = 43
  2080.         Cursor = crHandPoint
  2081.         Hint = '|^b^aFilter release'
  2082.         Options = [wwPause]
  2083.         MoveSpeed = 16
  2084.         SlowMotionDiv = 4
  2085.         Max = 256
  2086.         Value = 128
  2087.         DefaultValue = 128
  2088.         OnChange = VolWheelChange
  2089.         MouseButton = mbLeft
  2090.         HotSideX = 3
  2091.         HotSideY = 8
  2092.         PopupMenu = SynthResModule.WheelMenu
  2093.         BmpList = SynthResModule.VSlider2IL
  2094.       end
  2095.       object ModXWheel: TWAVWheel
  2096.         Tag = 18
  2097.         Left = 95
  2098.         Top = 111
  2099.         Width = 23
  2100.         Height = 23
  2101.         Hint = '|^b^aModulation X'
  2102.         Options = []
  2103.         SlowMotionDiv = 4
  2104.         Max = 512
  2105.         Value = 256
  2106.         DefaultValue = 256
  2107.         OnChange = ModXWheelChange
  2108.         MouseButton = mbLeft
  2109.         HotSideX = 4
  2110.         HotSideY = 4
  2111.         PopupMenu = SynthResModule.WheelMenu
  2112.         BmpList = SynthResModule.MainWheelIL
  2113.       end
  2114.       object DQOverSelect: TWAVWheel
  2115.         Tag = -2
  2116.         Left = 298
  2117.         Top = 124
  2118.         Width = 17
  2119.         Height = 7
  2120.         Cursor = crSizeNS
  2121.         Hint = '|Oversampling factor (draft)'
  2122.         MoveSpeed = 1
  2123.         SlowMotionDiv = 4
  2124.         Max = 6
  2125.         DefaultValue = 0
  2126.         OnChange = DQOverSelectChange
  2127.         MouseButton = mbLeft
  2128.         HotSideX = 6
  2129.         HotSideY = 6
  2130.         BmpList = SynthResModule.OversampleIL
  2131.       end
  2132.       object RQOverSelect: TWAVWheel
  2133.         Tag = -2
  2134.         Left = 332
  2135.         Top = 124
  2136.         Width = 17
  2137.         Height = 7
  2138.         Cursor = crSizeNS
  2139.         Hint = '|Oversampling factor (rendering)'
  2140.         MoveSpeed = 1
  2141.         SlowMotionDiv = 4
  2142.         Max = 6
  2143.         Value = 3
  2144.         DefaultValue = 3
  2145.         OnChange = DQOverSelectChange
  2146.         MouseButton = mbLeft
  2147.         HotSideX = 6
  2148.         HotSideY = 6
  2149.         BmpList = SynthResModule.OversampleIL
  2150.       end
  2151.       object RandBtn: TQuickBtn
  2152.         Tag = -1
  2153.         Left = 9
  2154.         Top = 198
  2155.         Width = 41
  2156.         Height = 13
  2157.         Cursor = crHandPoint
  2158.         Hint = '|Enable randomness'
  2159.         ParentFont = False
  2160.         ParentColor = True
  2161.         Font.Charset = DEFAULT_CHARSET
  2162.         Font.Color = clSilver
  2163.         Font.Height = -11
  2164.         Font.Name = 'MS Sans Serif'
  2165.         Font.Style = []
  2166.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2167.         Style = FS_Transparent
  2168.         Spacing = 4
  2169.         TextAlign = ttaRight
  2170.         AccelKey = 0
  2171.         FXType = FX_Blend
  2172.         BmpList = SynthResModule.LEDIL
  2173.         OnClick = RandBtnClick
  2174.         Down = True
  2175.         PopupAlign = Popup_Normal
  2176.       end
  2177.       object ModYWheel: TWAVWheel
  2178.         Tag = 19
  2179.         Left = 95
  2180.         Top = 145
  2181.         Width = 23
  2182.         Height = 23
  2183.         Hint = '|^b^aModulation Y'
  2184.         Options = []
  2185.         SlowMotionDiv = 4
  2186.         Max = 512
  2187.         Value = 256
  2188.         DefaultValue = 256
  2189.         OnChange = ModXWheelChange
  2190.         MouseButton = mbLeft
  2191.         HotSideX = 4
  2192.         HotSideY = 4
  2193.         PopupMenu = SynthResModule.WheelMenu
  2194.         OnMouseUp = ModYWheelMouseUp
  2195.         BmpList = SynthResModule.MainWheelIL
  2196.       end
  2197.       object ModVisual: TQuickPaintBox
  2198.         Left = 16
  2199.         Top = 103
  2200.         Width = 69
  2201.         Height = 69
  2202.         Cursor = crCross
  2203.         Hint = '|X / Y modulation'
  2204.         OnPaint = ModVisualPaint
  2205.         OnMouseDown = ModVisualMouseDown
  2206.       end
  2207.       object ModSmoothBtn: TQuickBtn
  2208.         Tag = -1
  2209.         Left = 9
  2210.         Top = 177
  2211.         Width = 42
  2212.         Height = 13
  2213.         Cursor = crHandPoint
  2214.         Hint = '|Smooth up modulation'
  2215.         ParentFont = False
  2216.         ParentColor = True
  2217.         Font.Charset = DEFAULT_CHARSET
  2218.         Font.Color = clSilver
  2219.         Font.Height = -11
  2220.         Font.Name = 'MS Sans Serif'
  2221.         Font.Style = []
  2222.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2223.         Style = FS_Transparent
  2224.         Spacing = 4
  2225.         TextAlign = ttaRight
  2226.         AccelKey = 0
  2227.         FXType = FX_Blend
  2228.         BmpList = SynthResModule.LEDIL
  2229.         OnClick = RandBtnClick
  2230.         Down = True
  2231.         PopupAlign = Popup_Normal
  2232.       end
  2233.       object DQEnvBtn: TQuickBtn
  2234.         Tag = -1
  2235.         Left = 293
  2236.         Top = 101
  2237.         Width = 27
  2238.         Height = 13
  2239.         Cursor = crHandPoint
  2240.         Hint = '|Extra high envelope accuracy (draft)'
  2241.         ParentFont = False
  2242.         ParentColor = True
  2243.         Font.Charset = DEFAULT_CHARSET
  2244.         Font.Color = clSilver
  2245.         Font.Height = -11
  2246.         Font.Name = 'MS Sans Serif'
  2247.         Font.Style = []
  2248.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2249.         Style = FS_Transparent
  2250.         Spacing = 4
  2251.         AccelKey = 0
  2252.         FXType = FX_Blend
  2253.         BmpList = SynthResModule.LEDIL
  2254.         OnClick = DQOverSelectChange
  2255.         PopupAlign = Popup_Normal
  2256.       end
  2257.       object RQEnvBtn: TQuickBtn
  2258.         Tag = -1
  2259.         Left = 327
  2260.         Top = 101
  2261.         Width = 27
  2262.         Height = 13
  2263.         Cursor = crHandPoint
  2264.         Hint = '|Extra high envelope accuracy (rendering)'
  2265.         ParentFont = False
  2266.         ParentColor = True
  2267.         Font.Charset = DEFAULT_CHARSET
  2268.         Font.Color = clSilver
  2269.         Font.Height = -11
  2270.         Font.Name = 'MS Sans Serif'
  2271.         Font.Style = []
  2272.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2273.         Style = FS_Transparent
  2274.         Spacing = 4
  2275.         AccelKey = 0
  2276.         FXType = FX_Blend
  2277.         BmpList = SynthResModule.LEDIL
  2278.         OnClick = DQOverSelectChange
  2279.         Down = True
  2280.         PopupAlign = Popup_Normal
  2281.       end
  2282.       object MainPitchSlider: TQuickSlider
  2283.         Tag = 2
  2284.         Left = 52
  2285.         Top = 15
  2286.         Width = 18
  2287.         Height = 58
  2288.         Cursor = crHandPoint
  2289.         Hint = '|^b^aMaster pitch'
  2290.         Options = []
  2291.         MoveSpeed = 4
  2292.         SlowMotionDiv = 4
  2293.         Min = -24
  2294.         Max = 24
  2295.         DefaultValue = 0
  2296.         OnChange = VolWheelChange
  2297.         MouseButton = mbLeft
  2298.         HotSideX = 2
  2299.         HotSideY = 8
  2300.         PopupMenu = SynthResModule.WheelMenu
  2301.         BmpList = SynthResModule.VSlider3IL
  2302.       end
  2303.       object MainLFOVolSlider: TQuickSlider
  2304.         Tag = 1
  2305.         Left = 31
  2306.         Top = 15
  2307.         Width = 18
  2308.         Height = 58
  2309.         Cursor = crHandPoint
  2310.         Hint = '|^b^aMaster LFO level'
  2311.         Options = [wwPause]
  2312.         MoveSpeed = 16
  2313.         SlowMotionDiv = 4
  2314.         Min = -128
  2315.         Max = 128
  2316.         Value = 128
  2317.         DefaultValue = 0
  2318.         OnChange = VolWheelChange
  2319.         MouseButton = mbLeft
  2320.         HotSideX = 2
  2321.         HotSideY = 8
  2322.         PopupMenu = SynthResModule.WheelMenu
  2323.         BmpList = SynthResModule.VSlider3IL
  2324.       end
  2325.       object MainVolSlider: TQuickSlider
  2326.         Left = 10
  2327.         Top = 15
  2328.         Width = 18
  2329.         Height = 58
  2330.         Cursor = crHandPoint
  2331.         Hint = '|^b^aMaster level'
  2332.         Options = []
  2333.         MoveSpeed = 16
  2334.         SlowMotionDiv = 4
  2335.         Max = 160
  2336.         Value = 128
  2337.         DefaultValue = 128
  2338.         OnChange = VolWheelChange
  2339.         MouseButton = mbLeft
  2340.         HotSideX = 2
  2341.         HotSideY = 8
  2342.         PopupMenu = SynthResModule.WheelMenu
  2343.         BmpList = SynthResModule.VSlider3IL
  2344.       end
  2345.       object FatOrderSelect: TWAVWheel
  2346.         Tag = 11
  2347.         Left = 259
  2348.         Top = 19
  2349.         Width = 15
  2350.         Height = 14
  2351.         Cursor = crSizeNS
  2352.         Hint = '|^b^aUnison order'
  2353.         MoveSpeed = 2
  2354.         SlowMotionDiv = 4
  2355.         Min = 1
  2356.         Max = 9
  2357.         Value = 1
  2358.         DefaultValue = 1
  2359.         OnChange = VolWheelChange
  2360.         MouseButton = mbLeft
  2361.         HotSideX = 5
  2362.         HotSideY = 8
  2363.         PopupMenu = SynthResModule.WheelMenu
  2364.         BmpList = SynthResModule.FatOrderSelIL
  2365.       end
  2366.       object VolAttWheel: TQuickSlider
  2367.         Tag = 3
  2368.         Left = 108
  2369.         Top = 14
  2370.         Width = 8
  2371.         Height = 43
  2372.         Cursor = crHandPoint
  2373.         Hint = '|^b^aVolume attack'
  2374.         Options = [wwPause]
  2375.         MoveSpeed = 16
  2376.         SlowMotionDiv = 4
  2377.         Max = 256
  2378.         Value = 128
  2379.         DefaultValue = 128
  2380.         OnChange = VolWheelChange
  2381.         MouseButton = mbLeft
  2382.         HotSideX = 3
  2383.         HotSideY = 8
  2384.         PopupMenu = SynthResModule.WheelMenu
  2385.         BmpList = SynthResModule.VSlider2IL
  2386.       end
  2387.       object VolDecWheel: TQuickSlider
  2388.         Tag = 4
  2389.         Left = 121
  2390.         Top = 14
  2391.         Width = 8
  2392.         Height = 43
  2393.         Cursor = crHandPoint
  2394.         Hint = '|^b^aVolume decay'
  2395.         Options = [wwPause]
  2396.         MoveSpeed = 16
  2397.         SlowMotionDiv = 4
  2398.         Max = 256
  2399.         Value = 128
  2400.         DefaultValue = 128
  2401.         OnChange = VolWheelChange
  2402.         MouseButton = mbLeft
  2403.         HotSideX = 3
  2404.         HotSideY = 8
  2405.         PopupMenu = SynthResModule.WheelMenu
  2406.         BmpList = SynthResModule.VSlider2IL
  2407.       end
  2408.       object VolSusWheel: TQuickSlider
  2409.         Tag = 5
  2410.         Left = 134
  2411.         Top = 14
  2412.         Width = 8
  2413.         Height = 43
  2414.         Cursor = crHandPoint
  2415.         Hint = '|^b^aVolume sustain'
  2416.         Options = [wwPause]
  2417.         MoveSpeed = 16
  2418.         SlowMotionDiv = 4
  2419.         Min = -128
  2420.         Max = 128
  2421.         DefaultValue = 0
  2422.         OnChange = VolWheelChange
  2423.         MouseButton = mbLeft
  2424.         HotSideX = 3
  2425.         HotSideY = 8
  2426.         PopupMenu = SynthResModule.WheelMenu
  2427.         BmpList = SynthResModule.VSlider2IL
  2428.       end
  2429.       object VolRelWheel: TQuickSlider
  2430.         Tag = 6
  2431.         Left = 147
  2432.         Top = 14
  2433.         Width = 8
  2434.         Height = 43
  2435.         Cursor = crHandPoint
  2436.         Hint = '|^b^aVolume release'
  2437.         Options = [wwPause]
  2438.         MoveSpeed = 16
  2439.         SlowMotionDiv = 4
  2440.         Max = 256
  2441.         Value = 128
  2442.         DefaultValue = 128
  2443.         OnChange = VolWheelChange
  2444.         MouseButton = mbLeft
  2445.         HotSideX = 3
  2446.         HotSideY = 8
  2447.         PopupMenu = SynthResModule.WheelMenu
  2448.         BmpList = SynthResModule.VSlider2IL
  2449.       end
  2450.       object FAttWheel: TQuickSlider
  2451.         Tag = 7
  2452.         Left = 170
  2453.         Top = 14
  2454.         Width = 8
  2455.         Height = 43
  2456.         Cursor = crHandPoint
  2457.         Hint = '|^b^aFilter attack'
  2458.         Options = [wwPause]
  2459.         MoveSpeed = 16
  2460.         SlowMotionDiv = 4
  2461.         Max = 256
  2462.         Value = 128
  2463.         DefaultValue = 128
  2464.         OnChange = VolWheelChange
  2465.         MouseButton = mbLeft
  2466.         HotSideX = 3
  2467.         HotSideY = 8
  2468.         PopupMenu = SynthResModule.WheelMenu
  2469.         BmpList = SynthResModule.VSlider2IL
  2470.       end
  2471.       object FDecWheel: TQuickSlider
  2472.         Tag = 8
  2473.         Left = 183
  2474.         Top = 14
  2475.         Width = 8
  2476.         Height = 43
  2477.         Cursor = crHandPoint
  2478.         Hint = '|^b^aFilter decay'
  2479.         Options = [wwPause]
  2480.         MoveSpeed = 16
  2481.         SlowMotionDiv = 4
  2482.         Max = 256
  2483.         Value = 128
  2484.         DefaultValue = 128
  2485.         OnChange = VolWheelChange
  2486.         MouseButton = mbLeft
  2487.         HotSideX = 3
  2488.         HotSideY = 8
  2489.         PopupMenu = SynthResModule.WheelMenu
  2490.         BmpList = SynthResModule.VSlider2IL
  2491.       end
  2492.       object FSusWheel: TQuickSlider
  2493.         Tag = 9
  2494.         Left = 196
  2495.         Top = 14
  2496.         Width = 8
  2497.         Height = 43
  2498.         Cursor = crHandPoint
  2499.         Hint = '|^b^aFilter sustain'
  2500.         Options = [wwPause]
  2501.         MoveSpeed = 16
  2502.         SlowMotionDiv = 4
  2503.         Min = -128
  2504.         Max = 128
  2505.         DefaultValue = 0
  2506.         OnChange = VolWheelChange
  2507.         MouseButton = mbLeft
  2508.         HotSideX = 3
  2509.         HotSideY = 8
  2510.         PopupMenu = SynthResModule.WheelMenu
  2511.         BmpList = SynthResModule.VSlider2IL
  2512.       end
  2513.       object FatPanWheel: TQuickSlider
  2514.         Tag = 12
  2515.         Left = 281
  2516.         Top = 14
  2517.         Width = 8
  2518.         Height = 43
  2519.         Cursor = crHandPoint
  2520.         Hint = '|^b^aUnison panning'
  2521.         Options = []
  2522.         MoveSpeed = 16
  2523.         SlowMotionDiv = 4
  2524.         Max = 128
  2525.         Value = 128
  2526.         DefaultValue = 128
  2527.         OnChange = VolWheelChange
  2528.         MouseButton = mbLeft
  2529.         HotSideX = 3
  2530.         HotSideY = 8
  2531.         PopupMenu = SynthResModule.WheelMenu
  2532.         BmpList = SynthResModule.VSlider2IL
  2533.       end
  2534.       object FatVolWheel: TQuickSlider
  2535.         Tag = 13
  2536.         Left = 294
  2537.         Top = 14
  2538.         Width = 8
  2539.         Height = 43
  2540.         Cursor = crHandPoint
  2541.         Hint = '|^b^aUnison volume'
  2542.         Options = []
  2543.         MoveSpeed = 16
  2544.         SlowMotionDiv = 4
  2545.         Min = 16
  2546.         Max = 128
  2547.         Value = 100
  2548.         DefaultValue = 100
  2549.         OnChange = VolWheelChange
  2550.         MouseButton = mbLeft
  2551.         HotSideX = 3
  2552.         HotSideY = 8
  2553.         PopupMenu = SynthResModule.WheelMenu
  2554.         BmpList = SynthResModule.VSlider2IL
  2555.       end
  2556.       object FatSubWheel: TQuickSlider
  2557.         Tag = 15
  2558.         Left = 320
  2559.         Top = 14
  2560.         Width = 8
  2561.         Height = 43
  2562.         Cursor = crHandPoint
  2563.         Hint = '|^b^aUnison sub level'
  2564.         Options = []
  2565.         MoveSpeed = 12
  2566.         SlowMotionDiv = 4
  2567.         Max = 96
  2568.         DefaultValue = 0
  2569.         OnChange = VolWheelChange
  2570.         MouseButton = mbLeft
  2571.         HotSideX = 3
  2572.         HotSideY = 8
  2573.         PopupMenu = SynthResModule.WheelMenu
  2574.         BmpList = SynthResModule.VSlider2IL
  2575.       end
  2576.       object FatPhaseWheel: TQuickSlider
  2577.         Tag = 16
  2578.         Left = 333
  2579.         Top = 14
  2580.         Width = 8
  2581.         Height = 43
  2582.         Cursor = crHandPoint
  2583.         Hint = '|^b^aUnison phase'
  2584.         Options = []
  2585.         MoveSpeed = 16
  2586.         SlowMotionDiv = 4
  2587.         Max = 128
  2588.         Value = 16
  2589.         DefaultValue = 16
  2590.         OnChange = VolWheelChange
  2591.         MouseButton = mbLeft
  2592.         HotSideX = 3
  2593.         HotSideY = 8
  2594.         PopupMenu = SynthResModule.WheelMenu
  2595.         BmpList = SynthResModule.VSlider2IL
  2596.       end
  2597.       object FatEnvWheel: TQuickSlider
  2598.         Tag = 17
  2599.         Left = 346
  2600.         Top = 14
  2601.         Width = 8
  2602.         Height = 43
  2603.         Cursor = crHandPoint
  2604.         Hint = '|^b^aUnison envelope variation'
  2605.         Options = []
  2606.         MoveSpeed = 24
  2607.         SlowMotionDiv = 4
  2608.         Max = 192
  2609.         DefaultValue = 0
  2610.         OnChange = VolWheelChange
  2611.         MouseButton = mbLeft
  2612.         HotSideX = 3
  2613.         HotSideY = 8
  2614.         PopupMenu = SynthResModule.WheelMenu
  2615.         BmpList = SynthResModule.VSlider2IL
  2616.       end
  2617.       object GlobalPitchBtn: TQuickBtn
  2618.         Tag = -1
  2619.         Left = 145
  2620.         Top = 198
  2621.         Width = 60
  2622.         Height = 13
  2623.         Cursor = crHandPoint
  2624.         Hint = '|Operator 1 pitch articulator = global'
  2625.         ParentFont = False
  2626.         ParentColor = True
  2627.         Font.Charset = DEFAULT_CHARSET
  2628.         Font.Color = clSilver
  2629.         Font.Height = -11
  2630.         Font.Name = 'MS Sans Serif'
  2631.         Font.Style = []
  2632.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2633.         Style = FS_Transparent
  2634.         Spacing = 4
  2635.         TextAlign = ttaRight
  2636.         AccelKey = 0
  2637.         FXType = FX_Blend
  2638.         BmpList = SynthResModule.LEDIL
  2639.         OnClick = RandBtnClick
  2640.         PopupAlign = Popup_Normal
  2641.       end
  2642.       object MonoKeyBtn: TQuickBtn
  2643.         Tag = -1
  2644.         Left = 50
  2645.         Top = 198
  2646.         Width = 44
  2647.         Height = 13
  2648.         Cursor = crHandPoint
  2649.         Hint = '|Limit to 1 voice per key'
  2650.         ParentFont = False
  2651.         ParentColor = True
  2652.         Font.Charset = DEFAULT_CHARSET
  2653.         Font.Color = clSilver
  2654.         Font.Height = -11
  2655.         Font.Name = 'MS Sans Serif'
  2656.         Font.Style = []
  2657.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2658.         Style = FS_Transparent
  2659.         Spacing = 4
  2660.         TextAlign = ttaRight
  2661.         AccelKey = 0
  2662.         FXType = FX_Blend
  2663.         BmpList = SynthResModule.LEDIL
  2664.         OnClick = RandBtnClick
  2665.         PopupAlign = Popup_Normal
  2666.       end
  2667.       object MixEQLevel3Slider: TQuickSlider
  2668.         Tag = 42
  2669.         Left = 205
  2670.         Top = 102
  2671.         Width = 8
  2672.         Height = 47
  2673.         Cursor = crHandPoint
  2674.         Hint = '|^b^aEQ band 3 (high shelf) level'
  2675.         Options = [wwAutoSize, wwPause]
  2676.         MoveSpeed = 320
  2677.         SlowMotionDiv = 8
  2678.         Min = -1800
  2679.         Max = 1800
  2680.         DefaultValue = 0
  2681.         OnChange = MixEQLevel1SliderChange
  2682.         MouseButton = mbLeft
  2683.         HotSideX = 6
  2684.         HotSideY = 3
  2685.         PopupMenu = SynthResModule.WheelMenu
  2686.         BmpList = SynthResModule.VSlider2IL
  2687.       end
  2688.       object MixEQLevel2Slider: TQuickSlider
  2689.         Tag = 41
  2690.         Left = 186
  2691.         Top = 102
  2692.         Width = 8
  2693.         Height = 47
  2694.         Cursor = crHandPoint
  2695.         Hint = '|^b^aEQ band 2 (peaking) level'
  2696.         Options = [wwAutoSize, wwPause]
  2697.         MoveSpeed = 320
  2698.         SlowMotionDiv = 8
  2699.         Min = -1800
  2700.         Max = 1800
  2701.         DefaultValue = 0
  2702.         OnChange = MixEQLevel1SliderChange
  2703.         MouseButton = mbLeft
  2704.         HotSideX = 6
  2705.         HotSideY = 3
  2706.         PopupMenu = SynthResModule.WheelMenu
  2707.         BmpList = SynthResModule.VSlider2IL
  2708.       end
  2709.       object MixEQLevel1Slider: TQuickSlider
  2710.         Tag = 40
  2711.         Left = 167
  2712.         Top = 102
  2713.         Width = 8
  2714.         Height = 47
  2715.         Cursor = crHandPoint
  2716.         Hint = '|^b^aEQ band 1 (low shelf) level'
  2717.         Options = [wwAutoSize, wwPause]
  2718.         MoveSpeed = 320
  2719.         SlowMotionDiv = 8
  2720.         Min = -1800
  2721.         Max = 1800
  2722.         DefaultValue = 0
  2723.         OnChange = MixEQLevel1SliderChange
  2724.         MouseButton = mbLeft
  2725.         HotSideX = 6
  2726.         HotSideY = 3
  2727.         PopupMenu = SynthResModule.WheelMenu
  2728.         BmpList = SynthResModule.VSlider2IL
  2729.       end
  2730.       object EQModeSelect: TSelector
  2731.         Left = 128
  2732.         Top = 102
  2733.         Width = 13
  2734.         Height = 36
  2735.         Cursor = crHandPoint
  2736.         Hint = '|Equalizer target'
  2737.         Hints.Strings = (
  2738.           'none'
  2739.           'out+effects'
  2740.           'out only'
  2741.           'effects only')
  2742.         NumCols = 1
  2743.         NumRows = 4
  2744.         Value = 1
  2745.         DefaultValue = 0
  2746.         OnChange = EQModeSelectChange
  2747.       end
  2748.       object MixEQFreq1Wheel: TWAVWheel
  2749.         Tag = 43
  2750.         Left = 165
  2751.         Top = 154
  2752.         Width = 15
  2753.         Height = 15
  2754.         Hint = '|^b^aEQ band 1 (low shelf) freq'
  2755.         MoveSpeed = 4096
  2756.         SlowMotionDiv = 256
  2757.         Max = 65536
  2758.         Value = 8950
  2759.         DefaultValue = 8950
  2760.         OnChange = MixEQLevel1SliderChange
  2761.         MouseButton = mbLeft
  2762.         HotSideX = 2
  2763.         HotSideY = 2
  2764.         PopupMenu = SynthResModule.WheelMenu
  2765.         BmpList = SynthResModule.TinyWheel
  2766.       end
  2767.       object MixEQFreq2Wheel: TWAVWheel
  2768.         Tag = 44
  2769.         Left = 184
  2770.         Top = 154
  2771.         Width = 15
  2772.         Height = 15
  2773.         Hint = '|^b^aEQ band 2 (peaking) freq'
  2774.         MoveSpeed = 4096
  2775.         SlowMotionDiv = 256
  2776.         Max = 65536
  2777.         Value = 33145
  2778.         DefaultValue = 33145
  2779.         OnChange = MixEQLevel1SliderChange
  2780.         MouseButton = mbLeft
  2781.         HotSideX = 2
  2782.         HotSideY = 2
  2783.         PopupMenu = SynthResModule.WheelMenu
  2784.         BmpList = SynthResModule.TinyWheel
  2785.       end
  2786.       object MixEQFreq3Wheel: TWAVWheel
  2787.         Tag = 45
  2788.         Left = 203
  2789.         Top = 154
  2790.         Width = 15
  2791.         Height = 15
  2792.         Hint = '|^b^aEQ band 3 (high shelf) freq'
  2793.         MoveSpeed = 4096
  2794.         SlowMotionDiv = 256
  2795.         Max = 65536
  2796.         Value = 49305
  2797.         DefaultValue = 49305
  2798.         OnChange = MixEQLevel1SliderChange
  2799.         MouseButton = mbLeft
  2800.         HotSideX = 2
  2801.         HotSideY = 2
  2802.         PopupMenu = SynthResModule.WheelMenu
  2803.         BmpList = SynthResModule.TinyWheel
  2804.       end
  2805.       object MixEQBW1Wheel: TWAVWheel
  2806.         Tag = 46
  2807.         Left = 165
  2808.         Top = 173
  2809.         Width = 15
  2810.         Height = 15
  2811.         Hint = '|^b^aEQ band 1 (low shelf) width'
  2812.         MoveSpeed = 4096
  2813.         SlowMotionDiv = 256
  2814.         Max = 65536
  2815.         Value = 17500
  2816.         DefaultValue = 17500
  2817.         OnChange = MixEQLevel1SliderChange
  2818.         MouseButton = mbLeft
  2819.         HotSideX = 2
  2820.         HotSideY = 2
  2821.         PopupMenu = SynthResModule.WheelMenu
  2822.         BmpList = SynthResModule.TinyWheel
  2823.       end
  2824.       object MixEQBW2Wheel: TWAVWheel
  2825.         Tag = 47
  2826.         Left = 184
  2827.         Top = 173
  2828.         Width = 15
  2829.         Height = 15
  2830.         Hint = '|^b^aEQ band 2 (peaking) width'
  2831.         MoveSpeed = 4096
  2832.         SlowMotionDiv = 256
  2833.         Max = 65536
  2834.         Value = 17500
  2835.         DefaultValue = 17500
  2836.         OnChange = MixEQLevel1SliderChange
  2837.         MouseButton = mbLeft
  2838.         HotSideX = 2
  2839.         HotSideY = 2
  2840.         PopupMenu = SynthResModule.WheelMenu
  2841.         BmpList = SynthResModule.TinyWheel
  2842.       end
  2843.       object MixEQBW3Wheel: TWAVWheel
  2844.         Tag = 48
  2845.         Left = 203
  2846.         Top = 173
  2847.         Width = 15
  2848.         Height = 15
  2849.         Hint = '|^b^aEQ band 3 (high shelf) width'
  2850.         MoveSpeed = 4096
  2851.         SlowMotionDiv = 256
  2852.         Max = 65536
  2853.         Value = 17500
  2854.         DefaultValue = 17500
  2855.         OnChange = MixEQLevel1SliderChange
  2856.         MouseButton = mbLeft
  2857.         HotSideX = 2
  2858.         HotSideY = 2
  2859.         PopupMenu = SynthResModule.WheelMenu
  2860.         BmpList = SynthResModule.TinyWheel
  2861.       end
  2862.       object SoftenWheel: TWAVWheel
  2863.         Tag = 48
  2864.         Left = 101
  2865.         Top = 198
  2866.         Width = 15
  2867.         Height = 15
  2868.         Hint = '|Soften attack of lower-velocity voices'
  2869.         MoveSpeed = 8
  2870.         SlowMotionDiv = 4
  2871.         Max = 128
  2872.         DefaultValue = 0
  2873.         OnChange = SoftenWheelChange
  2874.         MouseButton = mbLeft
  2875.         HotSideX = 7
  2876.         HotSideY = 3
  2877.         BmpList = SynthResModule.TinyWheel
  2878.       end
  2879.       object OscUnisonBtn: TQuickBtn
  2880.         Tag = -1
  2881.         Left = 258
  2882.         Top = 41
  2883.         Width = 17
  2884.         Height = 23
  2885.         Cursor = crHandPoint
  2886.         Hint = '|Unison for oscillators only'
  2887.         ParentFont = False
  2888.         ParentColor = True
  2889.         Font.Charset = DEFAULT_CHARSET
  2890.         Font.Color = clSilver
  2891.         Font.Height = -11
  2892.         Font.Name = 'MS Sans Serif'
  2893.         Font.Style = []
  2894.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2895.         Style = FS_Transparent
  2896.         Spacing = 6
  2897.         TextAlign = ttaBottom
  2898.         AccelKey = 0
  2899.         FXType = FX_Blend
  2900.         BmpList = SynthResModule.LEDIL
  2901.         OnClick = OscUnisonBtnClick
  2902.         PopupAlign = Popup_Normal
  2903.       end
  2904.       object GlobalCenterBtn: TQuickBtn
  2905.         Tag = -1
  2906.         Left = 205
  2907.         Top = 198
  2908.         Width = 41
  2909.         Height = 13
  2910.         Cursor = crHandPoint
  2911.         Hint = '|Global DC offset removal'
  2912.         ParentFont = False
  2913.         ParentColor = True
  2914.         Font.Charset = DEFAULT_CHARSET
  2915.         Font.Color = clSilver
  2916.         Font.Height = -11
  2917.         Font.Name = 'MS Sans Serif'
  2918.         Font.Style = []
  2919.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2920.         Style = FS_Transparent
  2921.         Spacing = 4
  2922.         TextAlign = ttaRight
  2923.         AccelKey = 0
  2924.         FXType = FX_Blend
  2925.         BmpList = SynthResModule.LEDIL
  2926.         OnClick = GlobalCenterBtnClick
  2927.         PopupAlign = Popup_Normal
  2928.       end
  2929.       object GlobalShapeGPRBtn: TQuickBtn
  2930.         Tag = -1
  2931.         Left = 246
  2932.         Top = 198
  2933.         Width = 50
  2934.         Height = 13
  2935.         Cursor = crHandPoint
  2936.         Hint = '|Attenuate Gibbs phenomenon'
  2937.         ParentFont = False
  2938.         ParentColor = True
  2939.         Font.Charset = DEFAULT_CHARSET
  2940.         Font.Color = clSilver
  2941.         Font.Height = -11
  2942.         Font.Name = 'MS Sans Serif'
  2943.         Font.Style = []
  2944.         Options = [tbDirectClick, tbHasDownGlyph, tbTrashGlyph, tbTransparent]
  2945.         Style = FS_Transparent
  2946.         Spacing = 4
  2947.         TextAlign = ttaRight
  2948.         AccelKey = 0
  2949.         FXType = FX_Blend
  2950.         BmpList = SynthResModule.LEDIL
  2951.         OnClick = GlobalShapeGPRBtnClick
  2952.         PopupAlign = Popup_Normal
  2953.       end
  2954.       object InfoEdit: TQuickRichEdit
  2955.         Left = 76
  2956.         Top = 226
  2957.         Width = 276
  2958.         Height = 48
  2959.         Hint = '|Info / comments'
  2960.         TabStop = False
  2961.         BorderStyle = bsNone
  2962.         Color = 3746601
  2963.         Ctl3D = True
  2964.         Font.Charset = DEFAULT_CHARSET
  2965.         Font.Color = 13878980
  2966.         Font.Height = -11
  2967.         Font.Name = 'Arial'
  2968.         Font.Style = [fsBold]
  2969.         ParentCtl3D = False
  2970.         ParentFont = False
  2971.         TabOrder = 0
  2972.         OnKeyDown = InfoEditKeyDown
  2973.       end
  2974.     end
  2975.   end
  2976.   object AnimTimer: TQuickTimer
  2977.     Interval = 25
  2978.     NoOverflow = True
  2979.     OnTimer = AnimTimerTimer
  2980.     Enabled = False
  2981.     Left = 376
  2982.     Top = 32
  2983.   end
  2984. end
  2985.