Clarinet physical model.
in RTcmix/insts/stk
MCLAR(outsk, dur, AMP, FREQ, NOISEAMP, maxpressure, REEDSTIFF[, PAN, BREATHENV])
CAPITALIZED parameters are pfield-enabled for table or dynamic control (see the maketable or makeconnection scorefile commands). Parameters after the [bracket] are optional and default to 0 unless otherwise noted.
| Param Field | Parameter | Units | Dynamic | Optional | Notes |
|---|---|---|---|---|---|
| p0 | output start time | seconds | no | no | |
| p1 | duration | seconds | no | no | |
| p2 | amplitude | absolute, for 16-bit soundfiles: 0-32768 | yes | no | |
| p3 | frequency | Hz | yes | no | |
| p4 | noise gain | 0.0-1.0 | yes | no | |
| p5 | max pressure | 0.0-1.0 | no | no | |
| p6 | reed stiffness | 0.0-1.0 | yes | no | |
| p7 | pan | 0-1 stereo; 0.5 is middle | yes | yes | default: 0.5 |
| p8 | breath pressure envelope | reference to a pfield table-handle | yes | yes | if 0, value defaults to 1.0 |
Parameters labled as Dynamic can receive dynamic updates from a table or real-time control source.
Author: Brad Garton, based on code from the Synthesis ToolKit
MCLAR is the “Clarinet” physical model in Perry Cook and Gary Scavone’s STK, the Synthesis ToolKit.
MCLAR implements a clarinet physical model. It seems highly similar to the earlier CLAR physical model, but this has better control parameters. Also check out MBLOWHOLE for a clarinet-like model with a tonehole and register vent included.
It was originally adapted from Perry Cook and Gary Scavone’s STK, for doing amazing physical model stuff.
This is from the orginal STK source code for “Clarinet”:
Be aware that some combinations of parameters will yield no sound. The ‘physics’ have to work correctly!
The optional ‘breath pressure table’ (p8, “BREATHENV”) functions independently of an amplitude-control envelope used in p2 (“AMP”). This allows you to design sharp attacks, etc.
MCLAR can produce other mono or stereo output.
very basic:
rtsetparams(44100, 2)
load("MCLAR")
breathenv = maketable("line", 1000, 0,1, 2,0)
MCLAR(0, 3.5, 30000.0, 314.0, 0.2, 0.7, 0.5, 0.5, breathenv)
MCLAR(4, 3.5, 30000.0, 149.0, 0.2, 0.7, 0.5, 0.5, breathenv)
slightly more advanced:
rtsetparams(44100, 2)
load("MCLAR")
amp = maketable("line", 1000, 0,0, 1,1, 2,1, 3,0)
freq = maketable("line", "nonorm", 1000, 0, 349, 1, 207)
MCLAR(0, 3.5, amp*20000.0, freq, 0.2, 0.7, 0.5)
bamp = maketable("line", 1000, 0,1, 2,1, 3,0)
noise = makeLFO("sine", 7.0, 0.0, 1.0)
reedstiff = maketable("line", 1000, 0,0, 1,1, 2,0)
pan = maketable("line", 1000, 0,1, 1,0, 1.5,1, 2,0)
MCLAR(4, 3.5, 15000.0, 149.0, noise, 0.7, reedstiff, pan, bamp)
maketable, CLAR, MLOWBOTL, MBLOWHOLE, MBOWED, MBRASS, METAFLUTE, MSAXOFONY