Synclavier Voice implemented in Moselle Software Synthesizer (Michael Jackson "Beat It" Gong)

video upload by Lantertronics - Aaron Lanterman

Moselle Modular Synthesizer: http://moselle-synth.com

0:00 -- Musical introduction
0:44 -- Main introduction
1:32 -- The patch
1:45 -- Synclavier voice architecture
3:28 -- Moselle code
7:40 -- Envelopes
12:17 -- Scope
12:56 -- Decay scaling
16:15 -- User variables?
17:05 -- Listening to partials
21:48 -- Try it yourself!

Moselle code:

# "Phased Gong" Synclavier Patch Approximation

[SWO1]
Waveform = None
Harm1 = 1
Harm2 = 0.5
Harm3 = 0.25
Harm4 = 0.12
Harm5 = 0.06
Harm6 = 0.03
Harm7 = 0.02
Harm8 = 0.01
PhaseIn = 1.6*Osc(3.496 * Pitch, Sine):Control
* (ADSREnv(147 ms, 1.44^(-(Note:NoteNumber - 69) / 12) * 4224 ms,
0, 1.44^(-(Note:NoteNumber - 69) / 12) * 7707 ms):Output ^ 2)

[SWO2]
Frequency = Pitch * (441.1 / 440)
Waveform = None
Harm1 = 1
Harm2 = 0.503
Harm3 = 0.246
Harm4 = 0.109
PhaseIn = 1.6*Osc(3.503 * Pitch, Sine):Control
* (ADSREnv(147 ms, 1.44^(-(Note:NoteNumber - 69) / 12) * 4224 ms,
0, 1.44^(-(Note:NoteNumber - 69) / 12) * 7422 ms):Output ^ 2)

[SWO3]
Frequency = Pitch * (220.7 / 440)
Waveform = None
Harm1 = 0.599
Harm2 = 0.174
Harm3 = 0.003
Harm4 = 0.018
Harm5 = 0.051
Harm6 = 0.127
Harm7 = 0.004
Harm8 = 0.024
Harm9 = 0.009
Harm10 = 0.010
Harm11 = 0.011
PhaseIn = 1.6*Osc(3.483 * Pitch * (220.7/440), Sine):Control
* (ADSREnv(0 ms, 8376 ms, 0, 581 ms):Output ^ 2)

[SWO4]
Frequency = Pitch * (224.6 / 440)
Waveform = None
Harm1 = 1
Harm2 = 0.526
Harm3 = 0.164
Harm4 = 0.068
Harm5 = 0.136
Harm6 = 0.111
PhaseIn = 1.6*Osc(3.493 * Pitch * (224.6/440), Sine):Control
* (ADSREnv(0 ms, 7839 ms, 0, 581 ms):Output ^ 2)

[Env1A]
Attack = 0 ms
Decay = 1.44^(-(Note:NoteNumber - 69) / 12) * 38 ms
Sustain = 1
Release = 1.44^(-(Note:NoteNumber - 69) / 12) * 1504 ms

[Env2A]
Attack = 0 ms
Decay = 1.44^(-(Note:NoteNumber - 69) / 12) * 89 ms
Sustain = 0
Release = 1.44^(-(Note:NoteNumber - 69) / 12) * 1504 ms

[Env3A]
Attack = 0 ms
Decay = 762 ms
Sustain = 0
Release = 1033 ms

[Env4A]
Attack = 0 ms
Decay = 592 ms
Sustain = 0
Release = 873 ms


[Voice]
Result = (BreathCtrl * SWO1:Control * (Env1A:Output ^ 2)
+ CN3 * SWO2:Control * (Env2A:Output ^ 2)
+ FootCtrl * SWO3:Control * (Env3A:Output ^ 2) * 0.655
+ Balance * SWO4:Control * (Env3A:Output ^ 2)) * 0.25
Finished = and(Env1A:Finished,Env2A:Finished,Env3A:Finished,Env4A:Finished)

[Osc]
Frequency = Pitch / 2

[Scope]
SyncIn = Osc:SyncOut
FreqHint = Osc:Frequency
Probe1 = Voice:Result