VCVRack
/
AudibleInstruments
mirror of https://github.com/VCVRack/AudibleInstruments.git
1
0
Fork 0
Code Issues 0 Releases 8 Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
149 Commits
4 Branches
40MB
Tree: ab5837a155
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'ab5837a155'
${ noResults }
AudibleInstruments/src/Elements.cpp

343 lines
14KB
Raw Blame History 

  1. #include "AudibleInstruments.hpp"

  2. #include "elements/dsp/part.h"

  3. 

  4. 

  5. struct Elements : Module {

  6. 	enum ParamIds {

  7. 		CONTOUR_PARAM,

  8. 		BOW_PARAM,

  9. 		BLOW_PARAM,

  10. 		STRIKE_PARAM,

  11. 		COARSE_PARAM,

  12. 		FINE_PARAM,

  13. 		FM_PARAM,

  14. 

  15. 		FLOW_PARAM,

  16. 		MALLET_PARAM,

  17. 		GEOMETRY_PARAM,

  18. 		BRIGHTNESS_PARAM,

  19. 

  20. 		BOW_TIMBRE_PARAM,

  21. 		BLOW_TIMBRE_PARAM,

  22. 		STRIKE_TIMBRE_PARAM,

  23. 		DAMPING_PARAM,

  24. 		POSITION_PARAM,

  25. 		SPACE_PARAM,

  26. 

  27. 		BOW_TIMBRE_MOD_PARAM,

  28. 		FLOW_MOD_PARAM,

  29. 		BLOW_TIMBRE_MOD_PARAM,

  30. 		MALLET_MOD_PARAM,

  31. 		STRIKE_TIMBRE_MOD_PARAM,

  32. 		DAMPING_MOD_PARAM,

  33. 		GEOMETRY_MOD_PARAM,

  34. 		POSITION_MOD_PARAM,

  35. 		BRIGHTNESS_MOD_PARAM,

  36. 		SPACE_MOD_PARAM,

  37. 

  38. 		PLAY_PARAM,

  39. 		NUM_PARAMS

  40. 	};

  41. 	enum InputIds {

  42. 		NOTE_INPUT,

  43. 		FM_INPUT,

  44. 		GATE_INPUT,

  45. 		STRENGTH_INPUT,

  46. 		BLOW_INPUT,

  47. 		STRIKE_INPUT,

  48. 

  49. 		BOW_TIMBRE_MOD_INPUT,

  50. 		FLOW_MOD_INPUT,

  51. 		BLOW_TIMBRE_MOD_INPUT,

  52. 		MALLET_MOD_INPUT,

  53. 		STRIKE_TIMBRE_MOD_INPUT,

  54. 		DAMPING_MOD_INPUT,

  55. 		GEOMETRY_MOD_INPUT,

  56. 		POSITION_MOD_INPUT,

  57. 		BRIGHTNESS_MOD_INPUT,

  58. 		SPACE_MOD_INPUT,

  59. 		NUM_INPUTS

  60. 	};

  61. 	enum OutputIds {

  62. 		AUX_OUTPUT,

  63. 		MAIN_OUTPUT,

  64. 		NUM_OUTPUTS

  65. 	};

  66. 	enum LightIds {

  67. 		GATE_LIGHT,

  68. 		EXCITER_LIGHT,

  69. 		RESONATOR_LIGHT,

  70. 		NUM_LIGHTS

  71. 	};

  72. 

  73. 	dsp::SampleRateConverter<2> inputSrc;

  74. 	dsp::SampleRateConverter<2> outputSrc;

  75. 	dsp::DoubleRingBuffer<dsp::Frame<2>, 256> inputBuffer;

  76. 	dsp::DoubleRingBuffer<dsp::Frame<2>, 256> outputBuffer;

  77. 

  78. 	uint16_t reverb_buffer[32768] = {};

  79. 	elements::Part *part;

  80. 

  81. 	Elements() {

  82. 		config(NUM_PARAMS, NUM_INPUTS, NUM_OUTPUTS, NUM_LIGHTS);

  83. 		configParam(CONTOUR_PARAM, 0.0, 1.0, 1.0, "Envelope contour");

  84. 		configParam(BOW_PARAM, 0.0, 1.0, 0.0, "Bow exciter");

  85. 		configParam(BLOW_PARAM, 0.0, 1.0, 0.0, "Blow exciter");

  86. 		configParam(STRIKE_PARAM, 0.0, 1.0, 0.5, "Percussive noise amount");

  87. 		configParam(COARSE_PARAM, -30.0, 30.0, 0.0, "Coarse frequency adjustment");

  88. 		configParam(FINE_PARAM, -2.0, 2.0, 0.0, "Fine frequency adjustment");

  89. 		configParam(FM_PARAM, -1.0, 1.0, 0.0, "FM input attenuverter");

  90. 		configParam(FLOW_PARAM, 0.0, 1.0, 0.5, "Air flow noise color");

  91. 		configParam(MALLET_PARAM, 0.0, 1.0, 0.5, "Percussive noise type");

  92. 		configParam(GEOMETRY_PARAM, 0.0, 1.0, 0.5, "Resonator geometry");

  93. 		configParam(BRIGHTNESS_PARAM, 0.0, 1.0, 0.5, "Brightness");

  94. 		configParam(BOW_TIMBRE_PARAM, 0.0, 1.0, 0.5, "Bow timbre");

  95. 		configParam(BLOW_TIMBRE_PARAM, 0.0, 1.0, 0.5, "Blow timbre");

  96. 		configParam(STRIKE_TIMBRE_PARAM, 0.0, 1.0, 0.5, "Strike timbre");

  97. 		configParam(DAMPING_PARAM, 0.0, 1.0, 0.5, "Energy dissipation speed");

  98. 		configParam(POSITION_PARAM, 0.0, 1.0, 0.5, "Excitation position");

  99. 		configParam(SPACE_PARAM, 0.0, 2.0, 0.0, "Reverb space");

  100. 		configParam(BOW_TIMBRE_MOD_PARAM, -1.0, 1.0, 0.0, "Bow timbre attenuverter");

  101. 		configParam(FLOW_MOD_PARAM, -1.0, 1.0, 0.0, "Air flow noise attenuverter");

  102. 		configParam(BLOW_TIMBRE_MOD_PARAM, -1.0, 1.0, 0.0, "Blow timbre attenuverter");

  103. 		configParam(MALLET_MOD_PARAM, -1.0, 1.0, 0.0, "Percussive noise attenuverter");

  104. 		configParam(STRIKE_TIMBRE_MOD_PARAM, -1.0, 1.0, 0.0, "Strike timbre attenuverter");

  105. 		configParam(DAMPING_MOD_PARAM, -1.0, 1.0, 0.0, "Energy dissipation speed attenuverter");

  106. 		configParam(GEOMETRY_MOD_PARAM, -1.0, 1.0, 0.0, "Resonator geometry attenuverter");

  107. 		configParam(POSITION_MOD_PARAM, -1.0, 1.0, 0.0, "Excitation position attenuverter");

  108. 		configParam(BRIGHTNESS_MOD_PARAM, -1.0, 1.0, 0.0, "Brightness attenuverter");

  109. 		configParam(SPACE_MOD_PARAM, -2.0, 2.0, 0.0, "Reverb space attenuverter");

  110. 		configParam(PLAY_PARAM, 0.0, 1.0, 0.0, "Play");

  111. 

  112. 		part = new elements::Part();

  113. 		// In the Mutable Instruments code, Part doesn't initialize itself, so zero it here.

  114. 		memset(part, 0, sizeof(*part));

  115. 		part->Init(reverb_buffer);

  116. 		// Just some random numbers

  117. 		uint32_t seed[3] = {1, 2, 3};

  118. 		part->Seed(seed, 3);

  119. 	}

  120. 

  121. 	~Elements() {

  122. 		delete part;

  123. 	}

  124. 

  125. 	void process(const ProcessArgs &args) override {

  126. 		// Get input

  127. 		if (!inputBuffer.full()) {

  128. 			dsp::Frame<2> inputFrame;

  129. 			inputFrame.samples[0] = inputs[BLOW_INPUT].getVoltage() / 5.0;

  130. 			inputFrame.samples[1] = inputs[STRIKE_INPUT].getVoltage() / 5.0;

  131. 			inputBuffer.push(inputFrame);

  132. 		}

  133. 

  134. 		// Render frames

  135. 		if (outputBuffer.empty()) {

  136. 			float blow[16] = {};

  137. 			float strike[16] = {};

  138. 			float main[16];

  139. 			float aux[16];

  140. 

  141. 			// Convert input buffer

  142. 			{

  143. 				inputSrc.setRates(args.sampleRate, 32000);

  144. 				dsp::Frame<2> inputFrames[16];

  145. 				int inLen = inputBuffer.size();

  146. 				int outLen = 16;

  147. 				inputSrc.process(inputBuffer.startData(), &inLen, inputFrames, &outLen);

  148. 				inputBuffer.startIncr(inLen);

  149. 

  150. 				for (int i = 0; i < outLen; i++) {

  151. 					blow[i] = inputFrames[i].samples[0];

  152. 					strike[i] = inputFrames[i].samples[1];

  153. 				}

  154. 			}

  155. 

  156. 			// Set patch from parameters

  157. 			elements::Patch* p = part->mutable_patch();

  158. 			p->exciter_envelope_shape = params[CONTOUR_PARAM].getValue();

  159. 			p->exciter_bow_level = params[BOW_PARAM].getValue();

  160. 			p->exciter_blow_level = params[BLOW_PARAM].getValue();

  161. 			p->exciter_strike_level = params[STRIKE_PARAM].getValue();

  162. 

  163. #define BIND(_p, _m, _i) clamp(params[_p].getValue() + 3.3f*dsp::quadraticBipolar(params[_m].getValue())*inputs[_i].getVoltage()/5.0f, 0.0f, 0.9995f)

  164. 

  165. 			p->exciter_bow_timbre = BIND(BOW_TIMBRE_PARAM, BOW_TIMBRE_MOD_PARAM, BOW_TIMBRE_MOD_INPUT);

  166. 			p->exciter_blow_meta = BIND(FLOW_PARAM, FLOW_MOD_PARAM, FLOW_MOD_INPUT);

  167. 			p->exciter_blow_timbre = BIND(BLOW_TIMBRE_PARAM, BLOW_TIMBRE_MOD_PARAM, BLOW_TIMBRE_MOD_INPUT);

  168. 			p->exciter_strike_meta = BIND(MALLET_PARAM, MALLET_MOD_PARAM, MALLET_MOD_INPUT);

  169. 			p->exciter_strike_timbre = BIND(STRIKE_TIMBRE_PARAM, STRIKE_TIMBRE_MOD_PARAM, STRIKE_TIMBRE_MOD_INPUT);

  170. 			p->resonator_geometry = BIND(GEOMETRY_PARAM, GEOMETRY_MOD_PARAM, GEOMETRY_MOD_INPUT);

  171. 			p->resonator_brightness = BIND(BRIGHTNESS_PARAM, BRIGHTNESS_MOD_PARAM, BRIGHTNESS_MOD_INPUT);

  172. 			p->resonator_damping = BIND(DAMPING_PARAM, DAMPING_MOD_PARAM, DAMPING_MOD_INPUT);

  173. 			p->resonator_position = BIND(POSITION_PARAM, POSITION_MOD_PARAM, POSITION_MOD_INPUT);

  174. 			p->space = clamp(params[SPACE_PARAM].getValue() + params[SPACE_MOD_PARAM].getValue()*inputs[SPACE_MOD_INPUT].getVoltage()/5.0f, 0.0f, 2.0f);

  175. 

  176. 			// Get performance inputs

  177. 			elements::PerformanceState performance;

  178. 			performance.note = 12.0*inputs[NOTE_INPUT].getVoltage() + roundf(params[COARSE_PARAM].getValue()) + params[FINE_PARAM].getValue() + 69.0;

  179. 			performance.modulation = 3.3*dsp::quarticBipolar(params[FM_PARAM].getValue()) * 49.5 * inputs[FM_INPUT].getVoltage()/5.0;

  180. 			performance.gate = params[PLAY_PARAM].getValue() >= 1.0 || inputs[GATE_INPUT].getVoltage() >= 1.0;

  181. 			performance.strength = clamp(1.0 - inputs[STRENGTH_INPUT].getVoltage()/5.0f, 0.0f, 1.0f);

  182. 

  183. 			// Generate audio

  184. 			part->Process(performance, blow, strike, main, aux, 16);

  185. 

  186. 			// Convert output buffer

  187. 			{

  188. 				dsp::Frame<2> outputFrames[16];

  189. 				for (int i = 0; i < 16; i++) {

  190. 					outputFrames[i].samples[0] = main[i];

  191. 					outputFrames[i].samples[1] = aux[i];

  192. 				}

  193. 

  194. 				outputSrc.setRates(32000, args.sampleRate);

  195. 				int inLen = 16;

  196. 				int outLen = outputBuffer.capacity();

  197. 				outputSrc.process(outputFrames, &inLen, outputBuffer.endData(), &outLen);

  198. 				outputBuffer.endIncr(outLen);

  199. 			}

  200. 

  201. 			// Set lights

  202. 			lights[GATE_LIGHT].setBrightness(performance.gate ? 0.75 : 0.0);

  203. 			lights[EXCITER_LIGHT].setBrightness(part->exciter_level());

  204. 			lights[RESONATOR_LIGHT].setBrightness(part->resonator_level());

  205. 		}

  206. 

  207. 		// Set output

  208. 		if (!outputBuffer.empty()) {

  209. 			dsp::Frame<2> outputFrame = outputBuffer.shift();

  210. 			outputs[AUX_OUTPUT].setVoltage(5.0 * outputFrame.samples[0]);

  211. 			outputs[MAIN_OUTPUT].setVoltage(5.0 * outputFrame.samples[1]);

  212. 		}

  213. 	}

  214. 

  215. 	json_t *dataToJson() override {

  216. 		json_t *rootJ = json_object();

  217. 		json_object_set_new(rootJ, "model", json_integer(getModel()));

  218. 		return rootJ;

  219. 	}

  220. 

  221. 	void dataFromJson(json_t *rootJ) override {

  222. 		json_t *modelJ = json_object_get(rootJ, "model");

  223. 		if (modelJ) {

  224. 			setModel(json_integer_value(modelJ));

  225. 		}

  226. 	}

  227. 

  228. 	int getModel() {

  229. 		return (int)part->resonator_model();

  230. 	}

  231. 

  232. 	void setModel(int model) {

  233. 		part->set_resonator_model((elements::ResonatorModel)model);

  234. 	}

  235. };

  236. 

  237. 

  238. struct ElementsModalItem : MenuItem {

  239. 	Elements *elements;

  240. 	int model;

  241. 	void onAction(const event::Action &e) override {

  242. 		elements->setModel(model);

  243. 	}

  244. 	void step() override {

  245. 		rightText = CHECKMARK(elements->getModel() == model);

  246. 		MenuItem::step();

  247. 	}

  248. };

  249. 

  250. 

  251. struct ElementsWidget : ModuleWidget {

  252. 	ElementsWidget(Elements *module) {

  253. 		setModule(module);

  254. 		setPanel(APP->window->loadSvg(asset::plugin(pluginInstance, "res/Elements.svg")));

  255. 

  256. 		addChild(createWidget<ScrewSilver>(Vec(15, 0)));

  257. 		addChild(createWidget<ScrewSilver>(Vec(480, 0)));

  258. 		addChild(createWidget<ScrewSilver>(Vec(15, 365)));

  259. 		addChild(createWidget<ScrewSilver>(Vec(480, 365)));

  260. 

  261. 		addParam(createParam<Rogan1PSWhite>(Vec(28, 42), module, Elements::CONTOUR_PARAM));

  262. 		addParam(createParam<Rogan1PSWhite>(Vec(99, 42), module, Elements::BOW_PARAM));

  263. 		addParam(createParam<Rogan1PSRed>(Vec(169, 42), module, Elements::BLOW_PARAM));

  264. 		addParam(createParam<Rogan1PSGreen>(Vec(239, 42), module, Elements::STRIKE_PARAM));

  265. 		addParam(createParam<Rogan1PSWhite>(Vec(310, 42), module, Elements::COARSE_PARAM));

  266. 		addParam(createParam<Rogan1PSWhite>(Vec(381, 42), module, Elements::FINE_PARAM));

  267. 		addParam(createParam<Rogan1PSWhite>(Vec(451, 42), module, Elements::FM_PARAM));

  268. 

  269. 		addParam(createParam<Rogan3PSRed>(Vec(115, 116), module, Elements::FLOW_PARAM));

  270. 		addParam(createParam<Rogan3PSGreen>(Vec(212, 116), module, Elements::MALLET_PARAM));

  271. 		addParam(createParam<Rogan3PSWhite>(Vec(326, 116), module, Elements::GEOMETRY_PARAM));

  272. 		addParam(createParam<Rogan3PSWhite>(Vec(423, 116), module, Elements::BRIGHTNESS_PARAM));

  273. 

  274. 		addParam(createParam<Rogan1PSWhite>(Vec(99, 202), module, Elements::BOW_TIMBRE_PARAM));

  275. 		addParam(createParam<Rogan1PSRed>(Vec(170, 202), module, Elements::BLOW_TIMBRE_PARAM));

  276. 		addParam(createParam<Rogan1PSGreen>(Vec(239, 202), module, Elements::STRIKE_TIMBRE_PARAM));

  277. 		addParam(createParam<Rogan1PSWhite>(Vec(310, 202), module, Elements::DAMPING_PARAM));

  278. 		addParam(createParam<Rogan1PSWhite>(Vec(380, 202), module, Elements::POSITION_PARAM));

  279. 		addParam(createParam<Rogan1PSWhite>(Vec(451, 202), module, Elements::SPACE_PARAM));

  280. 

  281. 		addParam(createParam<Trimpot>(Vec(104.5, 273), module, Elements::BOW_TIMBRE_MOD_PARAM));

  282. 		addParam(createParam<Trimpot>(Vec(142.5, 273), module, Elements::FLOW_MOD_PARAM));

  283. 		addParam(createParam<Trimpot>(Vec(181.5, 273), module, Elements::BLOW_TIMBRE_MOD_PARAM));

  284. 		addParam(createParam<Trimpot>(Vec(219.5, 273), module, Elements::MALLET_MOD_PARAM));

  285. 		addParam(createParam<Trimpot>(Vec(257.5, 273), module, Elements::STRIKE_TIMBRE_MOD_PARAM));

  286. 		addParam(createParam<Trimpot>(Vec(315.5, 273), module, Elements::DAMPING_MOD_PARAM));

  287. 		addParam(createParam<Trimpot>(Vec(354.5, 273), module, Elements::GEOMETRY_MOD_PARAM));

  288. 		addParam(createParam<Trimpot>(Vec(392.5, 273), module, Elements::POSITION_MOD_PARAM));

  289. 		addParam(createParam<Trimpot>(Vec(430.5, 273), module, Elements::BRIGHTNESS_MOD_PARAM));

  290. 		addParam(createParam<Trimpot>(Vec(469.5, 273), module, Elements::SPACE_MOD_PARAM));

  291. 

  292. 		addInput(createInput<PJ301MPort>(Vec(20, 178), module, Elements::NOTE_INPUT));

  293. 		addInput(createInput<PJ301MPort>(Vec(55, 178), module, Elements::FM_INPUT));

  294. 

  295. 		addInput(createInput<PJ301MPort>(Vec(20, 224), module, Elements::GATE_INPUT));

  296. 		addInput(createInput<PJ301MPort>(Vec(55, 224), module, Elements::STRENGTH_INPUT));

  297. 

  298. 		addInput(createInput<PJ301MPort>(Vec(20, 270), module, Elements::BLOW_INPUT));

  299. 		addInput(createInput<PJ301MPort>(Vec(55, 270), module, Elements::STRIKE_INPUT));

  300. 

  301. 		addOutput(createOutput<PJ301MPort>(Vec(20, 316), module, Elements::AUX_OUTPUT));

  302. 		addOutput(createOutput<PJ301MPort>(Vec(55, 316), module, Elements::MAIN_OUTPUT));

  303. 

  304. 		addInput(createInput<PJ301MPort>(Vec(101, 316), module, Elements::BOW_TIMBRE_MOD_INPUT));

  305. 		addInput(createInput<PJ301MPort>(Vec(139, 316), module, Elements::FLOW_MOD_INPUT));

  306. 		addInput(createInput<PJ301MPort>(Vec(178, 316), module, Elements::BLOW_TIMBRE_MOD_INPUT));

  307. 		addInput(createInput<PJ301MPort>(Vec(216, 316), module, Elements::MALLET_MOD_INPUT));

  308. 		addInput(createInput<PJ301MPort>(Vec(254, 316), module, Elements::STRIKE_TIMBRE_MOD_INPUT));

  309. 		addInput(createInput<PJ301MPort>(Vec(312, 316), module, Elements::DAMPING_MOD_INPUT));

  310. 		addInput(createInput<PJ301MPort>(Vec(350, 316), module, Elements::GEOMETRY_MOD_INPUT));

  311. 		addInput(createInput<PJ301MPort>(Vec(389, 316), module, Elements::POSITION_MOD_INPUT));

  312. 		addInput(createInput<PJ301MPort>(Vec(427, 316), module, Elements::BRIGHTNESS_MOD_INPUT));

  313. 		addInput(createInput<PJ301MPort>(Vec(466, 316), module, Elements::SPACE_MOD_INPUT));

  314. 

  315. 		addParam(createParam<CKD6>(Vec(36, 116), module, Elements::PLAY_PARAM));

  316. 

  317. 		struct GateLight : YellowLight {

  318. 			GateLight() {

  319. 				box.size = Vec(28-6, 28-6);

  320. 				bgColor = color::BLACK_TRANSPARENT;

  321. 			}

  322. 		};

  323. 

  324. 		addChild(createLight<GateLight>(Vec(36+3, 116+3), module, Elements::GATE_LIGHT));

  325. 		addChild(createLight<MediumLight<GreenLight>>(Vec(184, 165), module, Elements::EXCITER_LIGHT));

  326. 		addChild(createLight<MediumLight<RedLight>>(Vec(395, 165), module, Elements::RESONATOR_LIGHT));

  327. 	}

  328. 

  329. 	void appendContextMenu(Menu *menu) override {

  330. 		Elements *elements = dynamic_cast<Elements*>(module);

  331. 		assert(elements);

  332. 

  333. 		menu->addChild(construct<MenuLabel>());

  334. 		menu->addChild(construct<MenuLabel>(&MenuLabel::text, "Alternative models"));

  335. 		menu->addChild(construct<ElementsModalItem>(&MenuItem::text, "Original", &ElementsModalItem::elements, elements, &ElementsModalItem::model, 0));

  336. 		menu->addChild(construct<ElementsModalItem>(&MenuItem::text, "Non-linear string", &ElementsModalItem::elements, elements, &ElementsModalItem::model, 1));

  337. 		menu->addChild(construct<ElementsModalItem>(&MenuItem::text, "Chords", &ElementsModalItem::elements, elements, &ElementsModalItem::model, 2));

  338. 	}

  339. };

  340. 

  341. 

  342. Model *modelElements = createModel<Elements, ElementsWidget>("Elements");