chris@531: #N canvas 1707 210 456 633 10;
chris@531: #X obj 95 271 phasor~ 5;
chris@531: #X obj 95 347 rpole~ 1;
chris@531: #X obj 179 304 sig~ 0.1;
chris@531: #X obj 95 552 delwrite~ \$0-vang 1000;
chris@531: #X obj 252 356 vd~ \$0-vang;
chris@531: #X obj 95 119 inlet midinote;
chris@531: #X obj 252 552 outlet~;
chris@531: #X obj 252 400 hip~ 1;
chris@531: #X obj 252 422 hv_tanh;
chris@531: #X obj 95 451 *~;
chris@531: #X obj 110 430 r~ _gain;
chris@531: #X obj 322 275 *~ 0.01;
chris@531: #X obj 322 297 +~ 1;
chris@531: #X obj 252 327 *~;
chris@531: #X obj 322 251 inlet~ harmonicMod;
chris@531: #X obj 95 186 mtof~;
chris@531: #X obj 44 142 r~ fmod;
chris@531: #X obj 95 141 sig~;
chris@531: #X obj 252 216 sig~ 1000;
chris@531: #X obj 252 238 /~;
chris@531: #X obj 95 503 *~;
chris@531: #X obj 110 481 inlet~ gain;
chris@531: #X obj 95 369 *~ 0.0001;
chris@531: #X obj 252 296 *~ 2;
chris@531: #X obj 159 528 lop~ 4000;
chris@531: #X obj 252 444 lop~ 4000;
chris@531: #X obj 95 391 lop~ 1000;
chris@531: #X obj 252 378 *~ 0.98;
chris@531: #X obj 252 274 lop~ 4;
chris@531: #X text 33 23 Single voice for vangelis-inspired synthesiser;
chris@531: #X text 33 37 Combines a pulse-width modulated squarewave;
chris@531: #X text 33 51 with a delay line tuned to the same frequency;
chris@531: #X text 33 64 feeding back into itself. Changing the tuning of;
chris@531: #X text 33 77 the delay line results in nice trumpet-like effects;
chris@531: #X text 353 590 @krighxz 2016;
chris@531: #X obj 140 325 hv_gte~;
chris@531: #X connect 0 0 1 0;
chris@531: #X connect 0 0 35 0;
chris@531: #X connect 1 0 22 0;
chris@531: #X connect 2 0 35 1;
chris@531: #X connect 4 0 27 0;
chris@531: #X connect 5 0 17 0;
chris@531: #X connect 7 0 8 0;
chris@531: #X connect 8 0 25 0;
chris@531: #X connect 9 0 20 0;
chris@531: #X connect 10 0 9 1;
chris@531: #X connect 11 0 12 0;
chris@531: #X connect 12 0 13 1;
chris@531: #X connect 13 0 4 0;
chris@531: #X connect 14 0 11 0;
chris@531: #X connect 15 0 0 0;
chris@531: #X connect 15 0 19 1;
chris@531: #X connect 16 0 15 0;
chris@531: #X connect 17 0 15 0;
chris@531: #X connect 18 0 19 0;
chris@531: #X connect 19 0 28 0;
chris@531: #X connect 20 0 3 0;
chris@531: #X connect 21 0 20 1;
chris@531: #X connect 22 0 26 0;
chris@531: #X connect 23 0 13 0;
chris@531: #X connect 24 0 3 0;
chris@531: #X connect 25 0 6 0;
chris@531: #X connect 26 0 9 0;
chris@531: #X connect 27 0 7 0;
chris@531: #X connect 27 0 24 0;
chris@531: #X connect 28 0 23 0;
chris@531: #X connect 35 0 1 1;