max v2;
#N vpatcher 253 260 1024 667;
#P window setfont "Sans Serif" 9.;
#P number 75 51 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 8;
#P comment 115 49 52 196617 Multiply control input by 5 to get delay time (increase for longer delay);
#P window linecount 1;
#P newex 75 74 27 196617 * 5;
#P message 47 167 28 196617 0.87;
#P newex 47 144 44 196617 loadbang;
#P message 77 167 21 196617 0.5;
#P newex 17 312 81 196617 s delayfeedback;
#P newex 17 286 52 196617 r feedback;
#P newex 73 286 40 196617 / 141.;
#P window linecount 2;
#P comment 640 244 56 196617 Mix with dry signal;
#P comment 502 244 56 196617 Mix with dry signal;
#P comment 366 243 56 196617 Mix with dry signal;
#P comment 230 243 56 196617 Mix with dry signal;
#P window linecount 4;
#P comment 180 280 541 196617 INFO: Module for delay effect. Tapin~ and tapout~ objects output copy of signal at a later time. Delayed copy is mixed with dry signal and sent to module's audio outputs \, and also fed back into delay line at a lower volume \, producing multiple decaying feedback echoes. User can control both delay time and feedback amount. Four discrete channels \, each with different delay times \, process the audio slightly differently for interesting quadraphonic effects.;
#P window linecount 1;
#P comment 611 79 52 196617 R Delay;
#P comment 471 79 52 196617 CR Delay;
#P comment 334 79 52 196617 CL Delay;
#P comment 200 79 43 196617 L Delay;
#P window linecount 5;
#P comment 678 147 44 196617 Delay fed into itself for feedback;
#P comment 540 147 44 196617 Delay fed into itself for feedback;
#P comment 402 147 45 196617 Delay fed into itself for feedback;
#P comment 267 147 45 196617 Delay fed into itself for feedback;
#P outlet 624 252 15 0;
#P outlet 485 252 15 0;
#P outlet 350 252 15 0;
#P outlet 214 252 15 0;
#P inlet 588 77 15 0;
#P inlet 449 78 15 0;
#P inlet 312 79 15 0;
#P inlet 178 80 15 0;
#P window linecount 1;
#P newex 18 232 40 196617 line 1.;
#P message 18 212 37 196617 \$1 50;
#P newex 107 176 40 196617 line 0.;
#P message 107 156 37 196617 \$1 50;
#P newex 52 97 54 196617 split 0 16;
#P newex 18 189 24 196617 sqrt;
#P message 18 147 16 196617 1.;
#P newex 18 123 92 196617 expr pow($f1\\\,2);
#P newex 18 166 27 196617 - 1.;
#P newex 18 98 34 196617 / 32.;
#P newex 449 251 32 196617 *~ 1.;
#P newex 516 223 59 196617 r wetdelay;
#P newex 467 198 58 196617 r drydelay;
#P newex 449 223 35 196617 *~ 1.;
#P newex 480 223 32 196617 *~ 0.;
#P newex 457 97 81 196617 r delayfeedback;
#P message 533 97 43 196617 \$1 100;
#P newex 482 126 41 196617 *~ 0.5;
#P newex 533 126 27 196617 line~;
#P newex 533 75 40 196617 / 0.66;
#P newex 482 173 44 196617 tapout~;
#P newex 482 150 65 196617 tapin~ 3000;
#P newex 312 251 32 196617 *~ 1.;
#P newex 178 249 32 196617 *~ 1.;
#P newex 18 51 62 196617 r delaytime;
#P newex 379 223 59 196617 r wetdelay;
#P newex 330 198 58 196617 r drydelay;
#P newex 312 223 35 196617 *~ 1.;
#P newex 343 223 32 196617 *~ 0.;
#P newex 245 221 59 196617 r wetdelay;
#P newex 196 196 58 196617 r drydelay;
#P newex 18 257 58 196617 s drydelay;
#P newex 107 201 59 196617 s wetdelay;
#P newex 178 221 35 196617 *~ 1.;
#P newex 185 97 81 196617 r delayfeedback;
#P newex 320 97 81 196617 r delayfeedback;
#P window setfont "Sans Serif" 20.;
#P comment 356 33 175 196628 DELAY SETTINGS;
#P window setfont "Sans Serif" 9.;
#P message 396 97 43 196617 \$1 100;
#P message 261 98 43 196617 \$1 100;
#P newex 210 124 41 196617 *~ 0.5;
#P newex 345 126 41 196617 *~ 0.5;
#P newex 209 221 32 196617 *~ 0.;
#P newex 261 124 27 196617 line~;
#P newex 396 126 27 196617 line~;
#P newex 396 75 34 196617 / 1.5;
#P number 175 50 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 345 173 44 196617 tapout~;
#P newex 345 150 65 196617 tapin~ 3000;
#P newex 210 171 53 196617 tapout~ 0;
#P newex 210 148 65 196617 tapin~ 3000;
#P window linecount 3;
#P comment 63 201 40 196617 Dry/Wet mix-;
#P window linecount 4;
#P comment 89 222 83 196617 Controller values 0-16 fade in wet signal and fade out dry slightly;
#P user panel 15 48 150 229;
#X brgb 214 214 214;
#X frgb 157 157 157;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 177 76 132 195;
#X brgb 214 214 214;
#X frgb 157 157 157;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 311 75 133 195;
#X brgb 214 214 214;
#X frgb 157 157 157;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 448 75 135 195;
#X brgb 214 214 214;
#X frgb 157 157 157;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P window linecount 1;
#P newex 588 251 32 196617 *~ 1.;
#P newex 655 223 59 196617 r wetdelay;
#P newex 606 198 58 196617 r drydelay;
#P newex 588 223 35 196617 *~ 1.;
#P newex 619 223 32 196617 *~ 0.;
#P newex 596 97 81 196617 r delayfeedback;
#P message 672 97 43 196617 \$1 100;
#P newex 621 126 41 196617 *~ 0.5;
#P newex 672 126 27 196617 line~;
#P newex 672 75 27 196617 / 2;
#P newex 621 173 44 196617 tapout~;
#P newex 621 150 65 196617 tapin~ 3000;
#P user panel 586 74 135 197;
#X brgb 214 214 214;
#X frgb 157 157 157;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P window linecount 3;
#P comment 104 286 77 196617 Adjust feedback control input to proper range;
#P user panel 15 281 161 52;
#X brgb 214 214 214;
#X frgb 157 157 157;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P fasten 92 0 94 0 78 309 22 309;
#P fasten 66 0 61 0 57 118 48 118 48 95 23 95;
#P connect 61 0 63 0;
#P connect 63 0 64 0;
#P connect 64 0 62 0;
#P connect 62 0 65 0;
#P connect 65 0 69 0;
#P connect 69 0 70 0;
#P fasten 97 0 39 0 52 229 60 229 60 254 23 254;
#P connect 70 0 39 0;
#P fasten 63 0 62 1 23 144 40 144;
#P connect 96 0 97 0;
#P fasten 46 0 66 0 23 92 57 92;
#P fasten 93 0 92 0 22 307 70 307 70 283 78 283;
#P fasten 46 0 98 0 23 72 80 72;
#P fasten 96 0 95 0 52 165 82 165;
#P fasten 100 0 98 1 80 70 97 70;
#P fasten 61 0 67 0 23 120 112 120;
#P connect 67 0 68 0;
#P connect 68 0 38 0;
#P fasten 95 0 38 0 82 198 112 198;
#P fasten 98 0 25 0 80 95 112 95 112 45 180 45;
#P connect 71 0 37 0;
#P connect 37 0 47 0;
#P fasten 29 0 47 0 214 242 183 242;
#P connect 40 0 37 1;
#P fasten 22 0 29 0 215 193 249 193 249 216 214 216;
#P fasten 22 0 31 0 215 193 205 193 205 120 215 120;
#P fasten 71 0 21 0 183 145 215 145;
#P connect 31 0 21 0;
#P fasten 28 0 22 0 266 168 215 168;
#P connect 21 0 22 0;
#P fasten 47 0 75 0 183 272 211 272 211 248 219 248;
#P fasten 41 0 29 1 250 242 242 242 242 219 236 219;
#P fasten 36 0 31 1 190 117 246 117;
#P fasten 25 0 32 0 180 73 266 73;
#P connect 32 0 28 0;
#P connect 72 0 43 0;
#P connect 43 0 48 0;
#P fasten 42 0 48 0 348 245 317 245;
#P connect 44 0 43 1;
#P fasten 24 0 42 0 350 194 383 194 383 218 348 218;
#P fasten 24 0 30 0 350 194 341 194 341 122 350 122;
#P fasten 72 0 23 0 317 147 350 147;
#P connect 30 0 23 0;
#P fasten 27 0 24 0 401 170 350 170;
#P connect 23 0 24 0;
#P fasten 48 0 76 0 317 272 346 272 346 249 355 249;
#P fasten 45 0 42 1 384 244 376 244 376 221 370 221;
#P fasten 35 0 30 1 325 118 381 118;
#P fasten 25 0 26 0 180 71 401 71;
#P connect 26 0 33 0;
#P connect 33 0 27 0;
#P connect 73 0 57 0;
#P connect 57 0 60 0;
#P fasten 56 0 60 0 485 244 454 244;
#P connect 58 0 57 1;
#P fasten 50 0 56 0 487 194 519 194 519 218 485 218;
#P fasten 50 0 53 0 487 194 478 194 478 122 487 122;
#P fasten 73 0 49 0 454 147 487 147;
#P connect 53 0 49 0;
#P fasten 52 0 50 0 538 170 487 170;
#P connect 49 0 50 0;
#P fasten 60 0 77 0 454 272 482 272 482 248 490 248;
#P fasten 59 0 56 1 521 244 513 244 513 221 507 221;
#P fasten 55 0 53 1 462 118 518 118;
#P fasten 25 0 51 0 180 69 538 69;
#P connect 51 0 54 0;
#P connect 54 0 52 0;
#P connect 74 0 11 0;
#P connect 11 0 14 0;
#P fasten 10 0 14 0 624 244 593 244;
#P connect 12 0 11 1;
#P fasten 4 0 10 0 626 194 658 194 658 218 624 218;
#P fasten 4 0 7 0 626 194 617 194 617 122 626 122;
#P fasten 74 0 3 0 593 147 626 147;
#P connect 7 0 3 0;
#P fasten 6 0 4 0 677 170 626 170;
#P connect 3 0 4 0;
#P fasten 14 0 78 0 593 271 621 271 621 248 629 248;
#P fasten 13 0 10 1 660 244 652 244 652 221 646 221;
#P fasten 9 0 7 1 601 118 657 118;
#P fasten 25 0 5 0 180 67 677 67;
#P connect 5 0 8 0;
#P connect 8 0 6 0;
#P pop;
