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.

317 lines
12KB

  1. #include "AudibleInstruments.hpp"
  2. #include "elements/dsp/part.h"
  3. struct Elements : Module {
  4. enum ParamIds {
  5. CONTOUR_PARAM,
  6. BOW_PARAM,
  7. BLOW_PARAM,
  8. STRIKE_PARAM,
  9. COARSE_PARAM,
  10. FINE_PARAM,
  11. FM_PARAM,
  12. FLOW_PARAM,
  13. MALLET_PARAM,
  14. GEOMETRY_PARAM,
  15. BRIGHTNESS_PARAM,
  16. BOW_TIMBRE_PARAM,
  17. BLOW_TIMBRE_PARAM,
  18. STRIKE_TIMBRE_PARAM,
  19. DAMPING_PARAM,
  20. POSITION_PARAM,
  21. SPACE_PARAM,
  22. BOW_TIMBRE_MOD_PARAM,
  23. FLOW_MOD_PARAM,
  24. BLOW_TIMBRE_MOD_PARAM,
  25. MALLET_MOD_PARAM,
  26. STRIKE_TIMBRE_MOD_PARAM,
  27. DAMPING_MOD_PARAM,
  28. GEOMETRY_MOD_PARAM,
  29. POSITION_MOD_PARAM,
  30. BRIGHTNESS_MOD_PARAM,
  31. SPACE_MOD_PARAM,
  32. PLAY_PARAM,
  33. NUM_PARAMS
  34. };
  35. enum InputIds {
  36. NOTE_INPUT,
  37. FM_INPUT,
  38. GATE_INPUT,
  39. STRENGTH_INPUT,
  40. BLOW_INPUT,
  41. STRIKE_INPUT,
  42. BOW_TIMBRE_MOD_INPUT,
  43. FLOW_MOD_INPUT,
  44. BLOW_TIMBRE_MOD_INPUT,
  45. MALLET_MOD_INPUT,
  46. STRIKE_TIMBRE_MOD_INPUT,
  47. DAMPING_MOD_INPUT,
  48. GEOMETRY_MOD_INPUT,
  49. POSITION_MOD_INPUT,
  50. BRIGHTNESS_MOD_INPUT,
  51. SPACE_MOD_INPUT,
  52. NUM_INPUTS
  53. };
  54. enum OutputIds {
  55. AUX_OUTPUT,
  56. MAIN_OUTPUT,
  57. NUM_OUTPUTS
  58. };
  59. enum LightIds {
  60. GATE_LIGHT,
  61. EXCITER_LIGHT,
  62. RESONATOR_LIGHT,
  63. NUM_LIGHTS
  64. };
  65. SampleRateConverter<2> inputSrc;
  66. SampleRateConverter<2> outputSrc;
  67. DoubleRingBuffer<Frame<2>, 256> inputBuffer;
  68. DoubleRingBuffer<Frame<2>, 256> outputBuffer;
  69. uint16_t reverb_buffer[32768] = {};
  70. elements::Part *part;
  71. Elements();
  72. ~Elements();
  73. void step() override;
  74. json_t *dataToJson() override {
  75. json_t *rootJ = json_object();
  76. json_object_set_new(rootJ, "model", json_integer(getModel()));
  77. return rootJ;
  78. }
  79. void dataFromJson(json_t *rootJ) override {
  80. json_t *modelJ = json_object_get(rootJ, "model");
  81. if (modelJ) {
  82. setModel(json_integer_value(modelJ));
  83. }
  84. }
  85. int getModel() {
  86. return (int)part->resonator_model();
  87. }
  88. void setModel(int model) {
  89. part->set_resonator_model((elements::ResonatorModel)model);
  90. }
  91. };
  92. Elements::Elements() : Module(NUM_PARAMS, NUM_INPUTS, NUM_OUTPUTS, NUM_LIGHTS) {
  93. part = new elements::Part();
  94. // In the Mutable Instruments code, Part doesn't initialize itself, so zero it here.
  95. memset(part, 0, sizeof(*part));
  96. part->Init(reverb_buffer);
  97. // Just some random numbers
  98. uint32_t seed[3] = {1, 2, 3};
  99. part->Seed(seed, 3);
  100. }
  101. Elements::~Elements() {
  102. delete part;
  103. }
  104. void Elements::step() {
  105. // Get input
  106. if (!inputBuffer.full()) {
  107. Frame<2> inputFrame;
  108. inputFrame.samples[0] = inputs[BLOW_INPUT].value / 5.0;
  109. inputFrame.samples[1] = inputs[STRIKE_INPUT].value / 5.0;
  110. inputBuffer.push(inputFrame);
  111. }
  112. // Render frames
  113. if (outputBuffer.empty()) {
  114. float blow[16] = {};
  115. float strike[16] = {};
  116. float main[16];
  117. float aux[16];
  118. // Convert input buffer
  119. {
  120. inputSrc.setRates(engineGetSampleRate(), 32000);
  121. Frame<2> inputFrames[16];
  122. int inLen = inputBuffer.size();
  123. int outLen = 16;
  124. inputSrc.process(inputBuffer.startData(), &inLen, inputFrames, &outLen);
  125. inputBuffer.startIncr(inLen);
  126. for (int i = 0; i < outLen; i++) {
  127. blow[i] = inputFrames[i].samples[0];
  128. strike[i] = inputFrames[i].samples[1];
  129. }
  130. }
  131. // Set patch from parameters
  132. elements::Patch* p = part->mutable_patch();
  133. p->exciter_envelope_shape = params[CONTOUR_PARAM].value;
  134. p->exciter_bow_level = params[BOW_PARAM].value;
  135. p->exciter_blow_level = params[BLOW_PARAM].value;
  136. p->exciter_strike_level = params[STRIKE_PARAM].value;
  137. #define BIND(_p, _m, _i) clamp(params[_p].value + 3.3f*quadraticBipolar(params[_m].value)*inputs[_i].value/5.0f, 0.0f, 0.9995f)
  138. p->exciter_bow_timbre = BIND(BOW_TIMBRE_PARAM, BOW_TIMBRE_MOD_PARAM, BOW_TIMBRE_MOD_INPUT);
  139. p->exciter_blow_meta = BIND(FLOW_PARAM, FLOW_MOD_PARAM, FLOW_MOD_INPUT);
  140. p->exciter_blow_timbre = BIND(BLOW_TIMBRE_PARAM, BLOW_TIMBRE_MOD_PARAM, BLOW_TIMBRE_MOD_INPUT);
  141. p->exciter_strike_meta = BIND(MALLET_PARAM, MALLET_MOD_PARAM, MALLET_MOD_INPUT);
  142. p->exciter_strike_timbre = BIND(STRIKE_TIMBRE_PARAM, STRIKE_TIMBRE_MOD_PARAM, STRIKE_TIMBRE_MOD_INPUT);
  143. p->resonator_geometry = BIND(GEOMETRY_PARAM, GEOMETRY_MOD_PARAM, GEOMETRY_MOD_INPUT);
  144. p->resonator_brightness = BIND(BRIGHTNESS_PARAM, BRIGHTNESS_MOD_PARAM, BRIGHTNESS_MOD_INPUT);
  145. p->resonator_damping = BIND(DAMPING_PARAM, DAMPING_MOD_PARAM, DAMPING_MOD_INPUT);
  146. p->resonator_position = BIND(POSITION_PARAM, POSITION_MOD_PARAM, POSITION_MOD_INPUT);
  147. p->space = clamp(params[SPACE_PARAM].value + params[SPACE_MOD_PARAM].value*inputs[SPACE_MOD_INPUT].value/5.0f, 0.0f, 2.0f);
  148. // Get performance inputs
  149. elements::PerformanceState performance;
  150. performance.note = 12.0*inputs[NOTE_INPUT].value + roundf(params[COARSE_PARAM].value) + params[FINE_PARAM].value + 69.0;
  151. performance.modulation = 3.3*quarticBipolar(params[FM_PARAM].value) * 49.5 * inputs[FM_INPUT].value/5.0;
  152. performance.gate = params[PLAY_PARAM].value >= 1.0 || inputs[GATE_INPUT].value >= 1.0;
  153. performance.strength = clamp(1.0 - inputs[STRENGTH_INPUT].value/5.0f, 0.0f, 1.0f);
  154. // Generate audio
  155. part->Process(performance, blow, strike, main, aux, 16);
  156. // Convert output buffer
  157. {
  158. Frame<2> outputFrames[16];
  159. for (int i = 0; i < 16; i++) {
  160. outputFrames[i].samples[0] = main[i];
  161. outputFrames[i].samples[1] = aux[i];
  162. }
  163. outputSrc.setRates(32000, engineGetSampleRate());
  164. int inLen = 16;
  165. int outLen = outputBuffer.capacity();
  166. outputSrc.process(outputFrames, &inLen, outputBuffer.endData(), &outLen);
  167. outputBuffer.endIncr(outLen);
  168. }
  169. // Set lights
  170. lights[GATE_LIGHT].setBrightness(performance.gate ? 0.75 : 0.0);
  171. lights[EXCITER_LIGHT].setBrightness(part->exciter_level());
  172. lights[RESONATOR_LIGHT].setBrightness(part->resonator_level());
  173. }
  174. // Set output
  175. if (!outputBuffer.empty()) {
  176. Frame<2> outputFrame = outputBuffer.shift();
  177. outputs[AUX_OUTPUT].value = 5.0 * outputFrame.samples[0];
  178. outputs[MAIN_OUTPUT].value = 5.0 * outputFrame.samples[1];
  179. }
  180. }
  181. struct ElementsModalItem : MenuItem {
  182. Elements *elements;
  183. int model;
  184. void onAction(const event::Action &e) override {
  185. elements->setModel(model);
  186. }
  187. void step() override {
  188. rightText = CHECKMARK(elements->getModel() == model);
  189. MenuItem::step();
  190. }
  191. };
  192. struct ElementsWidget : ModuleWidget {
  193. ElementsWidget(Elements *module) : ModuleWidget(module) {
  194. setPanel(SVG::load(assetPlugin(pluginInstance, "res/Elements.svg")));
  195. addChild(createWidget<ScrewSilver>(Vec(15, 0)));
  196. addChild(createWidget<ScrewSilver>(Vec(480, 0)));
  197. addChild(createWidget<ScrewSilver>(Vec(15, 365)));
  198. addChild(createWidget<ScrewSilver>(Vec(480, 365)));
  199. addParam(createParam<Rogan1PSWhite>(Vec(28, 42), module, Elements::CONTOUR_PARAM, 0.0, 1.0, 1.0));
  200. addParam(createParam<Rogan1PSWhite>(Vec(99, 42), module, Elements::BOW_PARAM, 0.0, 1.0, 0.0));
  201. addParam(createParam<Rogan1PSRed>(Vec(169, 42), module, Elements::BLOW_PARAM, 0.0, 1.0, 0.0));
  202. addParam(createParam<Rogan1PSGreen>(Vec(239, 42), module, Elements::STRIKE_PARAM, 0.0, 1.0, 0.5));
  203. addParam(createParam<Rogan1PSWhite>(Vec(310, 42), module, Elements::COARSE_PARAM, -30.0, 30.0, 0.0));
  204. addParam(createParam<Rogan1PSWhite>(Vec(381, 42), module, Elements::FINE_PARAM, -2.0, 2.0, 0.0));
  205. addParam(createParam<Rogan1PSWhite>(Vec(451, 42), module, Elements::FM_PARAM, -1.0, 1.0, 0.0));
  206. addParam(createParam<Rogan3PSRed>(Vec(115, 116), module, Elements::FLOW_PARAM, 0.0, 1.0, 0.5));
  207. addParam(createParam<Rogan3PSGreen>(Vec(212, 116), module, Elements::MALLET_PARAM, 0.0, 1.0, 0.5));
  208. addParam(createParam<Rogan3PSWhite>(Vec(326, 116), module, Elements::GEOMETRY_PARAM, 0.0, 1.0, 0.5));
  209. addParam(createParam<Rogan3PSWhite>(Vec(423, 116), module, Elements::BRIGHTNESS_PARAM, 0.0, 1.0, 0.5));
  210. addParam(createParam<Rogan1PSWhite>(Vec(99, 202), module, Elements::BOW_TIMBRE_PARAM, 0.0, 1.0, 0.5));
  211. addParam(createParam<Rogan1PSRed>(Vec(170, 202), module, Elements::BLOW_TIMBRE_PARAM, 0.0, 1.0, 0.5));
  212. addParam(createParam<Rogan1PSGreen>(Vec(239, 202), module, Elements::STRIKE_TIMBRE_PARAM, 0.0, 1.0, 0.5));
  213. addParam(createParam<Rogan1PSWhite>(Vec(310, 202), module, Elements::DAMPING_PARAM, 0.0, 1.0, 0.5));
  214. addParam(createParam<Rogan1PSWhite>(Vec(380, 202), module, Elements::POSITION_PARAM, 0.0, 1.0, 0.5));
  215. addParam(createParam<Rogan1PSWhite>(Vec(451, 202), module, Elements::SPACE_PARAM, 0.0, 2.0, 0.0));
  216. addParam(createParam<Trimpot>(Vec(104.5, 273), module, Elements::BOW_TIMBRE_MOD_PARAM, -1.0, 1.0, 0.0));
  217. addParam(createParam<Trimpot>(Vec(142.5, 273), module, Elements::FLOW_MOD_PARAM, -1.0, 1.0, 0.0));
  218. addParam(createParam<Trimpot>(Vec(181.5, 273), module, Elements::BLOW_TIMBRE_MOD_PARAM, -1.0, 1.0, 0.0));
  219. addParam(createParam<Trimpot>(Vec(219.5, 273), module, Elements::MALLET_MOD_PARAM, -1.0, 1.0, 0.0));
  220. addParam(createParam<Trimpot>(Vec(257.5, 273), module, Elements::STRIKE_TIMBRE_MOD_PARAM, -1.0, 1.0, 0.0));
  221. addParam(createParam<Trimpot>(Vec(315.5, 273), module, Elements::DAMPING_MOD_PARAM, -1.0, 1.0, 0.0));
  222. addParam(createParam<Trimpot>(Vec(354.5, 273), module, Elements::GEOMETRY_MOD_PARAM, -1.0, 1.0, 0.0));
  223. addParam(createParam<Trimpot>(Vec(392.5, 273), module, Elements::POSITION_MOD_PARAM, -1.0, 1.0, 0.0));
  224. addParam(createParam<Trimpot>(Vec(430.5, 273), module, Elements::BRIGHTNESS_MOD_PARAM, -1.0, 1.0, 0.0));
  225. addParam(createParam<Trimpot>(Vec(469.5, 273), module, Elements::SPACE_MOD_PARAM, -2.0, 2.0, 0.0));
  226. addInput(createPort<PJ301MPort>(Vec(20, 178), PortWidget::INPUT, module, Elements::NOTE_INPUT));
  227. addInput(createPort<PJ301MPort>(Vec(55, 178), PortWidget::INPUT, module, Elements::FM_INPUT));
  228. addInput(createPort<PJ301MPort>(Vec(20, 224), PortWidget::INPUT, module, Elements::GATE_INPUT));
  229. addInput(createPort<PJ301MPort>(Vec(55, 224), PortWidget::INPUT, module, Elements::STRENGTH_INPUT));
  230. addInput(createPort<PJ301MPort>(Vec(20, 270), PortWidget::INPUT, module, Elements::BLOW_INPUT));
  231. addInput(createPort<PJ301MPort>(Vec(55, 270), PortWidget::INPUT, module, Elements::STRIKE_INPUT));
  232. addOutput(createPort<PJ301MPort>(Vec(20, 316), PortWidget::OUTPUT, module, Elements::AUX_OUTPUT));
  233. addOutput(createPort<PJ301MPort>(Vec(55, 316), PortWidget::OUTPUT, module, Elements::MAIN_OUTPUT));
  234. addInput(createPort<PJ301MPort>(Vec(101, 316), PortWidget::INPUT, module, Elements::BOW_TIMBRE_MOD_INPUT));
  235. addInput(createPort<PJ301MPort>(Vec(139, 316), PortWidget::INPUT, module, Elements::FLOW_MOD_INPUT));
  236. addInput(createPort<PJ301MPort>(Vec(178, 316), PortWidget::INPUT, module, Elements::BLOW_TIMBRE_MOD_INPUT));
  237. addInput(createPort<PJ301MPort>(Vec(216, 316), PortWidget::INPUT, module, Elements::MALLET_MOD_INPUT));
  238. addInput(createPort<PJ301MPort>(Vec(254, 316), PortWidget::INPUT, module, Elements::STRIKE_TIMBRE_MOD_INPUT));
  239. addInput(createPort<PJ301MPort>(Vec(312, 316), PortWidget::INPUT, module, Elements::DAMPING_MOD_INPUT));
  240. addInput(createPort<PJ301MPort>(Vec(350, 316), PortWidget::INPUT, module, Elements::GEOMETRY_MOD_INPUT));
  241. addInput(createPort<PJ301MPort>(Vec(389, 316), PortWidget::INPUT, module, Elements::POSITION_MOD_INPUT));
  242. addInput(createPort<PJ301MPort>(Vec(427, 316), PortWidget::INPUT, module, Elements::BRIGHTNESS_MOD_INPUT));
  243. addInput(createPort<PJ301MPort>(Vec(466, 316), PortWidget::INPUT, module, Elements::SPACE_MOD_INPUT));
  244. addParam(createParam<CKD6>(Vec(36, 116), module, Elements::PLAY_PARAM, 0.0, 1.0, 0.0));
  245. struct GateLight : YellowLight {
  246. GateLight() {
  247. box.size = Vec(28-6, 28-6);
  248. bgColor = COLOR_BLACK_TRANSPARENT;
  249. }
  250. };
  251. addChild(createLight<GateLight>(Vec(36+3, 116+3), module, Elements::GATE_LIGHT));
  252. addChild(createLight<MediumLight<GreenLight>>(Vec(184, 165), module, Elements::EXCITER_LIGHT));
  253. addChild(createLight<MediumLight<RedLight>>(Vec(395, 165), module, Elements::RESONATOR_LIGHT));
  254. }
  255. void appendContextMenu(Menu *menu) override {
  256. Elements *elements = dynamic_cast<Elements*>(module);
  257. assert(elements);
  258. menu->addChild(construct<MenuLabel>());
  259. menu->addChild(construct<MenuLabel>(&MenuLabel::text, "Alternative models"));
  260. menu->addChild(construct<ElementsModalItem>(&MenuItem::text, "Original", &ElementsModalItem::elements, elements, &ElementsModalItem::model, 0));
  261. menu->addChild(construct<ElementsModalItem>(&MenuItem::text, "Non-linear string", &ElementsModalItem::elements, elements, &ElementsModalItem::model, 1));
  262. menu->addChild(construct<ElementsModalItem>(&MenuItem::text, "Chords", &ElementsModalItem::elements, elements, &ElementsModalItem::model, 2));
  263. }
  264. };
  265. Model *modelElements = createModel<Elements, ElementsWidget>("Elements");