Skip to content

Commit 7b1e373

Browse files
smoothdevelopersmoothdeveloper
committed
missing moved file
1 parent 86814e9 commit 7b1e373

File tree

1 file changed

+318
-0
lines changed

1 file changed

+318
-0
lines changed

‎src/Midinette.Elektron/Elektron.MachineDrum.Parameters.fs

Lines changed: 318 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,318 @@
1+
module Elektron.MachineDrum.Parameters
2+
3+
4+
5+
let effectsParameters =
6+
[|
7+
("AMD", "controls the the modulation depth")
8+
("AMF", "controls the modulation frequency")
9+
("EQF", "controls which center frequency that will be affected by the EQ gain")
10+
("EQG", "controls the EQ gain. If set to a negative value, the volume of the frequency centered around the EQF parameter will be reduced")
11+
("FLTF", "controls the base filter cutoff frequency")
12+
("FLTW", "controls the filter gap width, that is the distance between the highpass and lowpass cutoff frequencies")
13+
("FLTQ", "controls the filter quality Q parameter")
14+
("SRR", "controls the amount of sample rate reduction")
15+
|]
16+
17+
let routingParameters =
18+
[|
19+
("DIST", "parameter controls the signal overload distortion")
20+
("VOL", "controls the volume of the track")
21+
("PAN", "positions the sound in the stereo field")
22+
("DEL", "controls the amount of signal that will be sent to the RHYTHM ECHO delay")
23+
("REV", "controls how much signal will be sent to the Machinedrum GATE BOX reverb")
24+
("LFOS", "controls the speed of the LFO")
25+
("LFOD", "controls the modulation depth of the LFO")
26+
("LFOM", "controls the mix between the two selectable LFO waveforms")
27+
|]
28+
type SynthesisParameterName =
29+
| Pitch
30+
| Decay
31+
| Ramp
32+
| RampDecay
33+
| Start
34+
| Noise
35+
| Harmonics
36+
| Clip
37+
| Hold
38+
| Tick
39+
| Dirt
40+
| Distortion
41+
| Bump
42+
| BumpEnveloppe
43+
| Snap
44+
| Tone
45+
| Tune
46+
| Damp
47+
| DistortionType
48+
| Clappy
49+
| Hard
50+
| Richness
51+
| Rate
52+
| Room
53+
| RoomSize
54+
| RoomTuning
55+
| Enhancement
56+
| Gap
57+
| HighpassFilter
58+
| LowpassFilter
59+
| Metal
60+
| Top
61+
| TopTune
62+
| Size
63+
| Peak
64+
| Attack
65+
| Sustain
66+
| Reverse
67+
| Rattle
68+
| RattleType
69+
| Dual
70+
| Clic
71+
| FMDepth
72+
| FMFrequency
73+
| FMDecay
74+
| FMFeedback
75+
| NoiseDecay
76+
| Snare
77+
| SnarePitch
78+
| SnareDecay
79+
| SnareModulationDepth
80+
| Feedback
81+
| Tremolo
82+
| TremoloFrequency
83+
| SnapLength
84+
| SampleStart
85+
| RetrigCount
86+
| RetrigTime
87+
| PitchBend
88+
| HighPassFilterQ
89+
| Ring
90+
| Bell
91+
| Stop
92+
| Real
93+
| BongoOrCongo
94+
| Slew
95+
| Hammer
96+
| Tension
97+
| Position
98+
| GrainsCount
99+
| GrainDecay
100+
| Closeness
101+
| AG
102+
| AU
103+
| BR
104+
| Close
105+
| Grab
106+
| Up
107+
| Down
108+
| DownValue
109+
| Volume
110+
| GateSensitivity
111+
| Level
112+
| FilterAttack
113+
| FilterHold
114+
| FilterDecay
115+
| FilterModulationDepth
116+
| FilterFrequency
117+
| FilterQ
118+
| Amplitude
119+
| Note
120+
| Note2
121+
| Note3
122+
| Length
123+
| Velocity
124+
| ModulationWheel
125+
| AfterTouch
126+
| BitRateReduction
127+
| End
128+
| Unmapped of byte //<bit3>
129+
130+
type SynthesisParameterDescription = {
131+
Parameter: SynthesisParameterName
132+
Code: string
133+
Description: string
134+
}
135+
136+
let mkDesc p c d = {Parameter = p; Code = c; Description = d}
137+
let mkMdDesc mdMachine parameters = MD mdMachine, parameters
138+
let mkMdUwDesc mdMachine parameters = MDUW mdMachine, parameters
139+
140+
let synthesisParameters =
141+
142+
let romParams = [|
143+
mkDesc Pitch "PTCH" "Adjusts the pitch two octaves up or down. For the first octave up or down, every third parameter step adjusts the pitch one semi-note"
144+
mkDesc Decay "DEC" "The Decay time. If the sample is looped, a setting of 127 will make it loop infinitely"
145+
mkDesc Hold "HOLD" "Hold the amplitude envelope open for the specified time. A value of 127 keeps the envelope open for 1 bar (16 steps). A value of 1 will keep the envelope open for 1/8 of a step"
146+
mkDesc BitRateReduction "BRR" "Bit Rate Reduction. When set to 127 the sample will be of 2-bit quality"
147+
mkDesc Start "STRT" "Controls the start point of the sample. The parameter is exponential, giving a very fine control over the beginning of a sample"
148+
mkDesc End "END" "Controls the end point of the sample. The sample will be reversed if it is set to a lower value than the STRT parameter"
149+
mkDesc RetrigCount "RTRG" "Sets the number of times a sample will retrig. If set to 127 the sample will retrig infinitely"
150+
mkDesc RetrigTime "RTIM" "Defines the time between two retrigs. The time is relative to the tempo. If the value is set to zero the RTRG parameter will not affect anything"
151+
|]
152+
153+
[|
154+
mkMdDesc MDMachine.TRX_BD [|
155+
mkDesc Pitch "PTCH" "Controls the basic pitch of the drum"
156+
mkDesc Decay "DEC" "Controls the decay time"
157+
mkDesc Ramp "RAMP" "Ramps the pitch"
158+
mkDesc RampDecay "RDEC" "Speed of pitch ramp"
159+
mkDesc Start "STRT" "Makes the start harder"
160+
mkDesc Noise "NOIS" "Adds noise to the start of the sound"
161+
mkDesc Harmonics "HARM" "Adds extra harmonics"
162+
mkDesc Clip "CLIP" "A special type of distortion"
163+
|]
164+
mkMdDesc MDMachine.TRX_B2 [|
165+
mkDesc Pitch "PTCH" "Controls the basic pitch of the drum"
166+
mkDesc Decay "DEC" "Controls the decay time"
167+
mkDesc Ramp "RAMP" "Ramps the pitch"
168+
mkDesc Hold "HOLD" "Controls the initial hold time for the volume"
169+
mkDesc Tick "TICK" "Adds a tick to make the start harder"
170+
mkDesc Noise "NOIS" "Adds noise to the start of the sound"
171+
mkDesc Dirt "DIRT" "Controls a bit reduction function for the bassdrum"
172+
mkDesc Distortion "DIST" "A special type of distortion"
173+
|]
174+
mkMdDesc MDMachine.TRX_SD [|
175+
mkDesc Pitch "PTCH" "Controls the basic pitch of the drum"
176+
mkDesc Decay "DEC" "Controls the decay time"
177+
mkDesc Bump "BUMP" "Adds a pitch shift at the start"
178+
mkDesc BumpEnveloppe "BENV" "Controls the envelope of the bump"
179+
mkDesc Snap "SNAP" "Amount of snap"
180+
mkDesc Tone "TONE" "Changes tonal quality"
181+
mkDesc Tune "TUNE" "Detunes the drum"
182+
mkDesc Clip "CLIP" "A special type of distortion"
183+
|]
184+
mkMdDesc MDMachine.TRX_XT [|
185+
mkDesc Pitch "PTCH" "Controls the basic pitch of the drum"
186+
mkDesc Decay "DEC" "Controls the decay time"
187+
mkDesc Ramp "RAMP" "Ramps the pitch"
188+
mkDesc RampDecay "RDEC" "Speed of pitch ramp"
189+
mkDesc Damp "DAMP" "Dampens the decay"
190+
mkDesc Distortion "DIST" "Distortion"
191+
mkDesc DistortionType "DTYP" "Hardness of the distortion"
192+
|]
193+
mkMdDesc MDMachine.TRX_CP [|
194+
mkDesc Clappy "CLPY" "Density of the clap"
195+
mkDesc Tone "TONE" "Changes tonal quality"
196+
mkDesc Hard "HARD" "Harder claps"
197+
mkDesc Richness "RICH" "Enhances the richness of the sound"
198+
mkDesc Rate "RATE" "Rate of the individual claps"
199+
mkDesc Room "ROOM" "Adds a room sound"
200+
mkDesc RoomSize "RSIZ" "Changes the size of the room"
201+
mkDesc RoomTuning "RTUN" "Changes the tonal quality of the room"
202+
|]
203+
mkMdDesc MDMachine.TRX_RS [|
204+
mkDesc Pitch "PTCH" "Controls the basic pitch"
205+
mkDesc Decay "DEC" "Controls the decay time"
206+
mkDesc Distortion "DIST" "Distortion"
207+
|]
208+
mkMdDesc MDMachine.TRX_CB [|
209+
mkDesc Pitch "PTCH" "Controls the basic pitch"
210+
mkDesc Decay "DEC" "Controls the decay time"
211+
mkDesc Enhancement "ENH" "Enhances the body of the sound"
212+
mkDesc Damp "DAMP" "Dampens the decay part"
213+
mkDesc Tone "TONE" "Changes tonal quality"
214+
mkDesc Bump "BUMP" "Adds a pitchshift at the start of the sound"
215+
|]
216+
mkMdDesc MDMachine.TRX_CH [|
217+
mkDesc Gap "GAP" "Changes the hi-hat gap"
218+
mkDesc Decay "DEC" "Controls the decay time"
219+
mkDesc HighpassFilter "HPF" "High pass filters the sound"
220+
mkDesc LowpassFilter "LPF" "Low pass filters the sound"
221+
mkDesc Metal "MTAL" "Adds extra metal character to the sound"
222+
|]
223+
mkMdDesc MDMachine.TRX_OH [|
224+
mkDesc Gap "GAP" "Changes the hi-hat gap"
225+
mkDesc Decay "DEC" "Controls the decay time"
226+
mkDesc HighpassFilter "HPF" "High pass filters the sound"
227+
mkDesc LowpassFilter "LPF" "Low pass filters the sound"
228+
mkDesc Metal "MTAL" "Adds extra metal character to the sound"
229+
|]
230+
mkMdDesc MDMachine.TRX_CY [|
231+
mkDesc Richness "RICH" "Adds extra richness to the sound"
232+
mkDesc Decay "DEC" "Controls the decay time"
233+
mkDesc Top "TOP" "Amount of high frequencies harmonics"
234+
mkDesc TopTune "TTUN" "Tunes the top"
235+
mkDesc Size "SIZE" "Changes the size of the cymbal"
236+
mkDesc Peak "PEAK" "Gives the sound more edge"
237+
|]
238+
mkMdDesc MDMachine.TRX_MA [|
239+
mkDesc Attack "ATT" "Length of the attack"
240+
mkDesc Sustain "SUS" "Length of the sustain"
241+
mkDesc Reverse "REV" "Reverses movement of the maracas"
242+
mkDesc Damp "DAMP" "Dampens the sound to make it more sparse"
243+
mkDesc Rattle "RATL" "Adds extra rattle to the sound"
244+
mkDesc RattleType "RTYP" "Type of rattle"
245+
mkDesc Tone "TONE" "Changes tonal quality"
246+
mkDesc Hard "HARD" "Gives the sound a harder character"
247+
|]
248+
mkMdDesc MDMachine.TRX_CL [|
249+
mkDesc Pitch "PTCH" "Controls the basic pitch"
250+
mkDesc Decay "DEC" "Controls the decay time"
251+
mkDesc Dual "DUAL" "Introduces a dual attack"
252+
mkDesc Enhancement "ENH" "Enhances the tone"
253+
mkDesc Tune "TUNE" "Detunes the sound"
254+
mkDesc Clic "CLIC" "Adds a click at the start"
255+
|]
256+
mkMdDesc MDMachine.TRX_XC [|
257+
mkDesc Pitch "PTCH" "Controls the basic pitch of the drum"
258+
mkDesc Decay "DEC" "Controls the decay time"
259+
mkDesc Ramp "RAMP" "Ramps the pitch"
260+
mkDesc RampDecay "RDEC" "Speed of the pitch ramp"
261+
mkDesc Damp "DAMP" "Dampens the decay part of the sound"
262+
mkDesc Distortion "DIST" "Distortion"
263+
mkDesc DistortionType "DTYP" "Hardness of the distortion"
264+
|]
265+
mkMdUwDesc MDUWMachine.ROM_01 romParams
266+
mkMdUwDesc MDUWMachine.ROM_02 romParams
267+
mkMdUwDesc MDUWMachine.ROM_03 romParams
268+
mkMdUwDesc MDUWMachine.ROM_04 romParams
269+
mkMdUwDesc MDUWMachine.ROM_05 romParams
270+
mkMdUwDesc MDUWMachine.ROM_06 romParams
271+
mkMdUwDesc MDUWMachine.ROM_07 romParams
272+
mkMdUwDesc MDUWMachine.ROM_08 romParams
273+
mkMdUwDesc MDUWMachine.ROM_09 romParams
274+
mkMdUwDesc MDUWMachine.ROM_10 romParams
275+
mkMdUwDesc MDUWMachine.ROM_11 romParams
276+
mkMdUwDesc MDUWMachine.ROM_12 romParams
277+
mkMdUwDesc MDUWMachine.ROM_13 romParams
278+
mkMdUwDesc MDUWMachine.ROM_14 romParams
279+
mkMdUwDesc MDUWMachine.ROM_15 romParams
280+
mkMdUwDesc MDUWMachine.ROM_16 romParams
281+
mkMdUwDesc MDUWMachine.ROM_17 romParams
282+
mkMdUwDesc MDUWMachine.ROM_18 romParams
283+
mkMdUwDesc MDUWMachine.ROM_19 romParams
284+
mkMdUwDesc MDUWMachine.ROM_20 romParams
285+
mkMdUwDesc MDUWMachine.ROM_21 romParams
286+
mkMdUwDesc MDUWMachine.ROM_22 romParams
287+
mkMdUwDesc MDUWMachine.ROM_23 romParams
288+
mkMdUwDesc MDUWMachine.ROM_24 romParams
289+
mkMdUwDesc MDUWMachine.ROM_25 romParams
290+
mkMdUwDesc MDUWMachine.ROM_26 romParams
291+
mkMdUwDesc MDUWMachine.ROM_27 romParams
292+
mkMdUwDesc MDUWMachine.ROM_28 romParams
293+
mkMdUwDesc MDUWMachine.ROM_29 romParams
294+
mkMdUwDesc MDUWMachine.ROM_30 romParams
295+
mkMdUwDesc MDUWMachine.ROM_31 romParams
296+
mkMdUwDesc MDUWMachine.ROM_32 romParams
297+
mkMdUwDesc MDUWMachine.ROM_33 romParams
298+
mkMdUwDesc MDUWMachine.ROM_34 romParams
299+
mkMdUwDesc MDUWMachine.ROM_35 romParams
300+
mkMdUwDesc MDUWMachine.ROM_36 romParams
301+
mkMdUwDesc MDUWMachine.ROM_37 romParams
302+
mkMdUwDesc MDUWMachine.ROM_38 romParams
303+
mkMdUwDesc MDUWMachine.ROM_39 romParams
304+
mkMdUwDesc MDUWMachine.ROM_40 romParams
305+
mkMdUwDesc MDUWMachine.ROM_41 romParams
306+
mkMdUwDesc MDUWMachine.ROM_42 romParams
307+
mkMdUwDesc MDUWMachine.ROM_43 romParams
308+
mkMdUwDesc MDUWMachine.ROM_44 romParams
309+
mkMdUwDesc MDUWMachine.ROM_45 romParams
310+
mkMdUwDesc MDUWMachine.ROM_46 romParams
311+
mkMdUwDesc MDUWMachine.ROM_47 romParams
312+
mkMdUwDesc MDUWMachine.ROM_48 romParams
313+
mkMdUwDesc MDUWMachine.ROM_48 romParams
314+
mkMdUwDesc MDUWMachine.RAM_P1 romParams
315+
mkMdUwDesc MDUWMachine.RAM_P2 romParams
316+
mkMdUwDesc MDUWMachine.RAM_P3 romParams
317+
mkMdUwDesc MDUWMachine.RAM_P4 romParams
318+
|] |> dict

0 commit comments

Comments
 (0)