v0.5

- Mod Delay parameters now work

Author: MikeMorenoDSP

lira-8.pd

@@ -12,13 +12,13 @@
 #X obj 11 11 cnv 19 383 675 empty empty LIRA•8 308 195 0 20 -256626
 -1 0;
 #X obj 38 455 vsl 19 128 0 127 0 0 \$0-s-tune-1 \$0-r-tune-1 TUNE -5
--10 0 14 -262144 -1 -1 7189 1;
+-10 0 14 -262144 -1 -1 8600 1;
 #X obj 41 413 hsl 54 19 0 127 0 0 \$0-s-sharp-12 \$0-r-sharp-12 SHARP
 5 -8 0 14 -1 -262144 -1 0 1;
 #X obj 41 373 hsl 54 19 0 127 0 0 \$0-s-mod-12 \$0-r-mod-12 MOD 14
--8 0 14 -1 -262144 -1 2600 1;
+-8 0 14 -1 -262144 -1 900 1;
 #X obj 78 455 vsl 19 128 0 127 0 0 \$0-s-tune-2 \$0-r-tune-2 TUNE -5
--10 0 14 -262144 -1 -1 0 1;
+-10 0 14 -262144 -1 -1 6900 1;
 #X obj 59 604 tgl 17 0 \$0-s-fast-12 \$0-r-fast-12 FAST -3 -7 0 12
 -262144 -1 -1 1 1;
 #X obj 33 626 cnv 19 29 50 empty empty empty 20 12 0 14 -1 -66577 0
@@ -54,41 +54,41 @@
 #X obj 348 650 tgl 19 0 \$0-s-sensor-8 \$0-r-sensor-8 8 5 -10 0 14
 -262144 -1 -262144 0 1;
 #X obj 39 293 hsl 128 19 0 127 0 0 \$0-s-pitch-1234 \$0-r-pitch-1234
-PITCH 40 -8 0 14 -1 -262144 -1 8900 1;
+PITCH 40 -8 0 14 -1 -262144 -1 200 1;
 #X obj 239 293 hsl 128 19 0 127 0 0 \$0-s-pitch-5678 \$0-r-pitch-5678
-PITCH 40 -8 0 14 -1 -262144 -1 500 1;
+PITCH 40 -8 0 14 -1 -262144 -1 0 1;
 #X obj 39 333 hradio 19 1 0 3 \$0-s-source-12 \$0-r-source-12 LFO-CV
 4 -8 0 14 -262144 -1 -1 2;
 #X obj 128 455 vsl 19 128 0 127 0 0 \$0-s-tune-3 \$0-r-tune-3 TUNE
--5 -10 0 14 -262144 -1 -1 4100 1;
+-5 -10 0 14 -262144 -1 -1 8800 1;
 #X obj 168 455 vsl 19 128 0 127 0 0 \$0-s-tune-4 \$0-r-tune-4 TUNE
--5 -10 0 14 -262144 -1 -1 2300 1;
+-5 -10 0 14 -262144 -1 -1 2100 1;
 #X obj 218 455 vsl 19 128 0 127 0 0 \$0-s-tune-5 \$0-r-tune-5 TUNE
--5 -10 0 14 -262144 -1 -1 6400 1;
+-5 -10 0 14 -262144 -1 -1 7400 1;
 #X obj 258 455 vsl 19 128 0 127 0 0 \$0-s-tune-6 \$0-r-tune-6 TUNE
--5 -10 0 14 -262144 -1 -1 6600 1;
+-5 -10 0 14 -262144 -1 -1 4100 1;
 #X obj 308 455 vsl 19 128 0 127 0 0 \$0-s-tune-7 \$0-r-tune-7 TUNE
--5 -10 0 14 -262144 -1 -1 1700 1;
+-5 -10 0 14 -262144 -1 -1 0 1;
 #X obj 348 455 vsl 19 128 0 127 0 0 \$0-s-tune-8 \$0-r-tune-8 TUNE
--5 -10 0 14 -262144 -1 -1 2600 1;
+-5 -10 0 14 -262144 -1 -1 0 1;
 #X obj 131 413 hsl 54 19 0 127 0 0 \$0-s-sharp-34 \$0-r-sharp-34 SHARP
-5 -8 0 14 -1 -262144 -1 3200 1;
+5 -8 0 14 -1 -262144 -1 0 1;
 #X obj 221 413 hsl 54 19 0 127 0 0 \$0-s-sharp-56 \$0-r-sharp-56 SHARP
-5 -8 0 14 -1 -262144 -1 4100 1;
+5 -8 0 14 -1 -262144 -1 0 1;
 #X obj 311 413 hsl 54 19 0 127 0 0 \$0-s-sharp-78 \$0-r-sharp-78 SHARP
 5 -8 0 14 -1 -262144 -1 0 1;
 #X obj 131 373 hsl 54 19 0 127 0 0 \$0-s-mod-34 \$0-r-mod-34 MOD 14
--8 0 14 -1 -262144 -1 3200 1;
+-8 0 14 -1 -262144 -1 0 1;
 #X obj 221 373 hsl 54 19 0 127 0 0 \$0-s-mod-56 \$0-r-mod-56 MOD 14
--8 0 14 -1 -262144 -1 2900 1;
+-8 0 14 -1 -262144 -1 600 1;
 #X obj 311 373 hsl 54 19 0 127 0 0 \$0-s-mod-78 \$0-r-mod-78 MOD 14
--8 0 14 -1 -262144 -1 3000 1;
+-8 0 14 -1 -262144 -1 2100 1;
 #X obj 149 604 tgl 17 0 \$0-s-fast-34 \$0-r-fast-34 FAST -3 -7 0 12
--262144 -1 -1 0 1;
+-262144 -1 -1 1 1;
 #X obj 239 604 tgl 17 0 \$0-s-fast-56 \$0-r-fast-56 FAST -3 -7 0 12
--262144 -1 -1 0 1;
+-262144 -1 -1 1 1;
 #X obj 329 604 tgl 17 0 \$0-s-fast-78 \$0-r-fast-78 FAST -3 -7 0 12
--262144 -1 -1 0 1;
+-262144 -1 -1 1 1;
 #X obj 111 425 cnv 3 3 200 empty empty empty 20 12 0 14 -1 -66577 0
 ;
 #X obj 201 385 cnv 3 3 240 empty empty empty 20 12 0 14 -1 -66577 0
@@ -119,9 +119,9 @@ PITCH 40 -8 0 14 -1 -262144 -1 500 1;
 #X obj 239 253 hsl 128 19 0 127 0 0 \$0-s-hold-5678 \$0-r-hold-5678
 HOLD 45 -8 0 14 -1 -262144 -1 0 1;
 #X obj 194 265 tgl 17 0 \$0-s-switch \$0-r-switch SWITCH -10 -7 0 12
--262144 -1 -1 1 1;
+-262144 -1 -1 0 1;
 #X obj 164 220 tgl 17 0 \$0-s-total-fb \$0-r-total-fb TOTAL-FB -20
--7 0 12 -262144 -1 -1 0 1;
+-7 0 12 -262144 -1 -1 1 1;
 #X obj 234 219 tgl 17 0 \$0-s-vibrato \$0-r-vibrato VIBRATO -15 -7
 0 12 -262144 -1 -1 0 1;
 #X msg 421 218 8;
@@ -204,37 +204,37 @@ HOLD 45 -8 0 14 -1 -262144 -1 0 1;
 #X obj 664 425 s \$0-r-source-56;
 #X obj 884 425 s \$0-r-source-78;
 #X obj 39 253 hsl 128 19 0 127 0 0 \$0-s-hold-1234 \$0-r-hold-1234
-HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
+HOLD 45 -8 0 14 -1 -262144 -1 0 1;
 #X obj 421 396 route 1 2 3 4 5 6 7 8;
 #X msg 421 354 receive $\\\$0-tune-\\\$1;
 #X obj 120 147 hradio 19 1 0 2 \$0-s-lfo-wav \$0-r-lfo-wav SQUARE 0
 -8 0 14 -1 -262144 -1 1;
 #X obj 167 110 hsl 116 19 0 127 0 0 \$0-s-feedback \$0-r-feedback FEEDBACK
-25 -8 0 14 -1 -262144 -1 0 1;
-#X obj 120 110 hradio 19 1 0 2 \$0-s-del-mod \$0-r-del-mod SELF 0 -8
-0 14 -1 -262144 -1 0;
+25 -8 0 14 -1 -262144 -1 6000 1;
+#X obj 120 110 hradio 19 1 0 2 \$0-s-del-mod \$0-r-del-mod LFO 0 -8
+0 14 -1 -262144 -1 1;
 #X obj 167 147 hsl 116 19 0 127 0 0 \$0-s-del-mix \$0-r-del-mix MIX
-45 -8 0 14 -1 -262144 -1 11100 1;
+45 -8 0 14 -1 -262144 -1 11500 1;
 #X obj 188 73 hsl 95 19 0 127 0 0 \$0-s-time-2 \$0-r-time-2 TIME-2
-25 -8 0 14 -1 -262144 -1 4600 1;
+25 -8 0 14 -1 -262144 -1 3500 1;
 #X obj 123 73 hsl 54 19 0 127 0 0 \$0-s-mod-2 \$0-r-mod-2 MOD-2 6 -8
-0 14 -1 -262144 -1 3400 1;
+0 14 -1 -262144 -1 0 1;
 #X obj 188 37 hsl 95 19 0 127 0 0 \$0-s-time-1 \$0-r-time-1 TIME-1
-25 -8 0 14 -1 -262144 -1 6000 1;
+25 -8 0 14 -1 -262144 -1 1800 1;
 #X obj 123 37 hsl 54 19 0 127 0 0 \$0-s-mod-1 \$0-r-mod-1 MOD-1 6 -8
-0 14 -1 -262144 -1 2600 1;
+0 14 -1 -262144 -1 0 1;
 #X obj 365 35 vsl 19 128 0 127 0 0 \$0-s-vol \$0-r-vol VOL -2 -10 0
-14 -1 -262144 -1 12700 1;
+14 -1 -262144 -1 11000 1;
 #X obj 335 35 vsl 19 128 0 127 0 0 \$0-s-dst-mix \$0-r-dst-mix MIX
--2 -10 0 14 -1 -262144 -1 12700 1;
+-2 -10 0 14 -1 -262144 -1 11700 1;
 #X obj 305 35 vsl 19 128 0 127 0 0 \$0-s-drv \$0-r-drv DRV -2 -10 0
 14 -1 -228856 -1 0 1;
 #X obj 49 34 vsl 19 128 0 127 0 0 \$0-s-f-b \$0-r-f-b F-B -2 -10 0
-14 -1 -262144 -1 5500 1;
+14 -1 -262144 -1 6200 1;
 #X obj 19 34 vsl 19 128 0 127 0 0 \$0-s-f-a \$0-r-f-a F-A -2 -10 0
-14 -1 -228856 -1 12100 1;
-#X obj 79 32 vradio 19 1 0 2 \$0-s-andor \$0-r-andor OR 2 -8 0 14 -1
--262144 -1 1;
+14 -1 -228856 -1 4400 1;
+#X obj 79 32 vradio 19 1 0 2 \$0-s-andor \$0-r-andor AND -2 -8 0 14
+-1 -262144 -1 0;
 #X obj 79 81 bng 19 50 10 0 empty \$0-r-led empty 17 7 0 10 -1 -4034
 -1;
 #X obj 321 213 cnv 15 15 15 empty empty ORGANISMIC 0 8 0 12 -256626
@@ -517,6 +517,9 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X obj 27 244 loadbang;
 #X msg 27 265 1;
 #X obj 12 328 ma.tanh~;
+#X msg 193 352 open ./rec.wav \, start;
+#X obj 193 373 writesf~;
+#X msg 373 385 stop;
 #X connect 0 0 9 0;
 #X connect 1 0 2 0;
 #X connect 2 0 10 0;
@@ -533,6 +536,7 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X connect 10 0 11 0;
 #X connect 11 0 12 1;
 #X connect 12 0 13 0;
+#X connect 12 0 51 0;
 #X connect 13 0 14 0;
 #X connect 13 0 14 1;
 #X connect 15 0 23 0;
@@ -578,6 +582,8 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X connect 47 0 48 0;
 #X connect 48 0 45 0;
 #X connect 49 0 12 0;
+#X connect 50 0 51 0;
+#X connect 52 0 51 0;
 #X restore 494 898 pd master_output;
 #X obj 523 636 lira.voice \$0 3 4;
 #N canvas 1027 619 248 280 prm.hold 0;
@@ -866,7 +872,6 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X restore 584 335 pd hyper-lfo;
 #X obj 517 815 re.plate~;
 #X obj 540 734 loadbang;
-#X msg 540 755 1 0.5 0.5;
 #X obj 540 776 unpack f f f;
 #N canvas 651 414 778 300 delay 0;
 #X obj 58 140 inlet~;
@@ -1013,6 +1018,72 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X restore 157 139 pd prm.del-mix;
 #X obj 57 253 outlet~;
 #X obj 461 167 block~ 4 1 1;
+#X obj 621 74 delread4~ \$0-mod-delay;
+#X obj 423 39 inlet~;
+#X obj 423 60 *~;
+#X obj 468 45 r \$0-s-del-mod;
+#X obj 423 121 *~;
+#X obj 164 76 *~;
+#N canvas 1004 696 297 282 prm.mod-1 0;
+#X obj 117 59 t f f;
+#X obj 144 91 t f b;
+#X obj 144 112 i;
+#X obj 117 133 -;
+#X obj 117 154 abs;
+#X obj 12 33 t f f;
+#X obj 12 197 pack f f;
+#X obj 12 218 line~;
+#X obj 12 239 outlet~;
+#X obj 12 78 / 127;
+#X obj 117 175 * 1;
+#X obj 12 98 * 20;
+#X obj 12 12 r \$0-s-mod-1;
+#X connect 0 0 3 0;
+#X connect 0 1 1 0;
+#X connect 1 0 2 1;
+#X connect 1 1 2 0;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 10 0;
+#X connect 5 0 9 0;
+#X connect 5 1 0 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 9 0 11 0;
+#X connect 10 0 6 1;
+#X connect 11 0 6 0;
+#X connect 12 0 5 0;
+#X restore 197 43 pd prm.mod-1;
+#N canvas 1004 696 297 282 prm.mod-1 0;
+#X obj 117 59 t f f;
+#X obj 144 91 t f b;
+#X obj 144 112 i;
+#X obj 117 133 -;
+#X obj 117 154 abs;
+#X obj 12 33 t f f;
+#X obj 12 197 pack f f;
+#X obj 12 218 line~;
+#X obj 12 239 outlet~;
+#X obj 12 78 / 127;
+#X obj 117 175 * 1;
+#X obj 12 98 * 20;
+#X obj 12 12 r \$0-s-mod-1;
+#X connect 0 0 3 0;
+#X connect 0 1 1 0;
+#X connect 1 0 2 1;
+#X connect 1 1 2 0;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 10 0;
+#X connect 5 0 9 0;
+#X connect 5 1 0 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 9 0 11 0;
+#X connect 10 0 6 1;
+#X connect 11 0 6 0;
+#X connect 12 0 5 0;
+#X restore 456 88 pd prm.mod-1;
 #X connect 0 0 1 0;
 #X connect 0 0 7 0;
 #X connect 2 0 4 0;
@@ -1026,10 +1097,19 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X connect 9 0 3 0;
 #X connect 10 0 2 0;
 #X connect 11 0 6 1;
+#X connect 15 0 16 0;
+#X connect 16 0 18 0;
+#X connect 16 0 19 0;
+#X connect 17 0 16 1;
+#X connect 18 0 3 0;
+#X connect 19 0 2 0;
+#X connect 20 0 19 1;
+#X connect 21 0 18 1;
 #X restore 348 764 pd delay;
 #X obj 703 888 delwrite~ \$0-total-feedback;
 #X obj 753 749 delread~ \$0-mod-delay;
 #X obj 700 767 /~ 1.5;
+#X msg 540 755 1 0.5 0.9;
 #X connect 2 0 7 0;
 #X connect 2 0 17 0;
 #X connect 2 1 15 0;
@@ -1040,7 +1120,7 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X connect 5 0 4 2;
 #X connect 6 0 2 1;
 #X connect 6 0 4 1;
-#X connect 7 0 29 0;
+#X connect 7 0 28 0;
 #X connect 8 0 9 2;
 #X connect 8 0 10 2;
 #X connect 9 0 7 0;
@@ -1055,7 +1135,7 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X connect 14 0 10 0;
 #X connect 15 0 16 1;
 #X connect 16 0 17 1;
-#X connect 17 0 32 0;
+#X connect 17 0 31 0;
 #X connect 18 0 19 0;
 #X connect 19 0 16 0;
 #X connect 20 0 9 1;
@@ -1066,14 +1146,15 @@ HOLD 45 -8 0 14 -1 -262144 -1 12700 1;
 #X connect 24 0 12 0;
 #X connect 24 0 13 0;
 #X connect 24 0 14 0;
+#X connect 24 0 28 1;
 #X connect 25 0 3 0;
 #X connect 25 1 3 0;
-#X connect 26 0 27 0;
-#X connect 27 0 28 0;
-#X connect 28 0 25 1;
-#X connect 28 1 25 2;
-#X connect 28 2 25 3;
-#X connect 29 0 3 0;
-#X connect 29 0 25 0;
-#X connect 31 0 32 0;
-#X connect 32 0 30 0;
+#X connect 26 0 32 0;
+#X connect 27 0 25 1;
+#X connect 27 1 25 2;
+#X connect 27 2 25 3;
+#X connect 28 0 3 0;
+#X connect 28 0 25 0;
+#X connect 30 0 31 0;
+#X connect 31 0 29 0;
+#X connect 32 0 27 0;

lira-test.mp3

@@ -1,46 +1,46 @@
-71.8868;
-0;
+86;
+69;
+88;
+21;
+74;
 41;
-23;
-64;
-66;
-17;
-26;
+0;
+0;
+1;
+1;
+1;
 1;
 0;
 0;
 0;
 0;
-76.6792;
-98.2453;
+21.566;
 0;
-62.3019;
-76.6792;
-69.4906;
-71.8868;
+14.3774;
+50.3208;
+2;
 2;
 2;
 2;
 2;
-89;
-5;
-127;
 0;
-1;
 0;
 0;
 0;
-127;
-127;
-121;
-55;
 1;
 0;
-81.0638;
-62.1489;
 0;
-122.583;
-62.3019;
-81.4717;
+117;
+110;
+44;
+62;
+0;
 0;
+24.3191;
+47.2872;
+66.2609;
+127;
+0;
+0;
+1;
 1;