disco4000000-live.pd 4.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198
  1. #N canvas 192 60 653 484 16;
  2. #X declare -path ../lib;
  3. #X obj 143 448 dac~;
  4. #X obj 32 24 declare -path ../lib;
  5. #X obj 257 11 webcam;
  6. #X obj 147 384 volume~;
  7. #X obj 150 310 channel~;
  8. #X msg 29 401 \; pd dsp \$1;
  9. #X obj 37 361 tgl 30 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
  10. 1;
  11. #N canvas 0 57 1024 543 floaty 0;
  12. #X floatatom 213 331 5 0 0 0 - - -, f 5;
  13. #X obj 401 364 lfo~;
  14. #X floatatom 388 206 5 0 0 0 - - -, f 5;
  15. #X obj 429 269 lfo~;
  16. #X obj 451 313 *~ 10;
  17. #X floatatom 532 216 5 0 0 0 - - -, f 5;
  18. #X obj 124 198 line;
  19. #X msg 139 167 \$1 300;
  20. #X obj 464 212 * 100;
  21. #X obj 153 308 mtof;
  22. #X obj 143 468 outlet~;
  23. #X obj 16 7 inlet;
  24. #X obj 20 47 unpack f f f;
  25. #X obj 213 386 square~;
  26. #X obj 103 241 * 40;
  27. #X obj 139 269 + 60;
  28. #X obj 141 426 *~;
  29. #X obj 19 190 clip 0 1;
  30. #X obj 309 165 * 10;
  31. #X connect 0 0 13 0;
  32. #X connect 1 0 13 1;
  33. #X connect 2 0 3 0;
  34. #X connect 2 0 8 0;
  35. #X connect 3 0 4 0;
  36. #X connect 4 0 1 0;
  37. #X connect 5 0 4 1;
  38. #X connect 6 0 14 0;
  39. #X connect 7 0 6 0;
  40. #X connect 8 0 5 0;
  41. #X connect 9 0 0 0;
  42. #X connect 11 0 12 0;
  43. #X connect 12 0 17 0;
  44. #X connect 12 1 7 0;
  45. #X connect 12 2 18 0;
  46. #X connect 13 0 16 1;
  47. #X connect 14 0 15 0;
  48. #X connect 15 0 9 0;
  49. #X connect 16 0 10 0;
  50. #X connect 17 0 16 0;
  51. #X connect 18 0 2 0;
  52. #X restore 61 223 pd floaty;
  53. #N canvas 0 57 528 455 noisy 1;
  54. #X obj 84 29 inlet;
  55. #X obj 100 412 outlet~;
  56. #X obj 132 95 unpack f f f;
  57. #X obj 258 192 clip 0 1;
  58. #X obj 24 158 noise~;
  59. #X obj 255 156 * 1000;
  60. #X obj 82 304 osc~;
  61. #X obj 44 263 *~ 5000;
  62. #X obj 158 228 clip 0 1;
  63. #X obj 133 345 *~;
  64. #X obj 69 220 bp~;
  65. #X obj 239 295 lfo~;
  66. #X obj 189 356 *~;
  67. #X obj 183 174 * 100;
  68. #X obj 56 119 * 0.2;
  69. #X obj 99 172 * 300;
  70. #X connect 0 0 2 0;
  71. #X connect 2 0 8 0;
  72. #X connect 2 0 14 0;
  73. #X connect 2 1 13 0;
  74. #X connect 2 1 15 0;
  75. #X connect 2 2 5 0;
  76. #X connect 4 0 10 0;
  77. #X connect 5 0 3 0;
  78. #X connect 6 0 9 0;
  79. #X connect 7 0 6 0;
  80. #X connect 8 0 9 1;
  81. #X connect 9 0 12 0;
  82. #X connect 10 0 7 0;
  83. #X connect 11 0 12 1;
  84. #X connect 12 0 1 0;
  85. #X connect 13 0 11 0;
  86. #X connect 14 0 10 2;
  87. #X connect 15 0 10 1;
  88. #X restore 176 221 pd noisy;
  89. #N canvas 415 109 450 300 melodic 0;
  90. #X obj 126 11 inlet;
  91. #X obj 124 50 unpack f f f;
  92. #X obj 89 271 outlet~;
  93. #X obj 63 127 list-ref;
  94. #X obj 89 89 * 12;
  95. #X obj 183 125 scala;
  96. #X obj 178 88 * 12;
  97. #X floatatom 179 203 5 0 0 0 - - -, f 5;
  98. #X floatatom 7 227 5 0 0 0 - - -, f 5;
  99. #X obj 28 159 mtof;
  100. #X obj 111 196 line;
  101. #X obj 163 238 *~ 0.5;
  102. #X obj 69 232 square~;
  103. #X obj 258 114 * 1000;
  104. #X obj 295 169 wrap 0 0.9;
  105. #X msg 32 191 \$1 100;
  106. #X obj 331 224 line;
  107. #X msg 252 219 \$1 100;
  108. #X obj 184 166 octave 6;
  109. #X connect 0 0 1 0;
  110. #X connect 1 0 4 0;
  111. #X connect 1 1 6 0;
  112. #X connect 1 2 13 0;
  113. #X connect 3 0 8 0;
  114. #X connect 3 0 9 0;
  115. #X connect 4 0 3 0;
  116. #X connect 5 0 18 0;
  117. #X connect 6 0 5 0;
  118. #X connect 9 0 15 0;
  119. #X connect 10 0 12 0;
  120. #X connect 11 0 2 0;
  121. #X connect 12 0 11 0;
  122. #X connect 13 0 14 0;
  123. #X connect 14 0 17 0;
  124. #X connect 15 0 10 0;
  125. #X connect 16 0 11 1;
  126. #X connect 16 0 12 1;
  127. #X connect 17 0 16 0;
  128. #X connect 18 0 3 1;
  129. #X connect 18 0 7 0;
  130. #X restore 246 268 pd melodic;
  131. #N canvas 0 57 450 300 ringy 0;
  132. #X obj 47 118 osc~;
  133. #X obj 126 119 osc~;
  134. #X obj 55 178 *~;
  135. #X obj 132 219 *~;
  136. #X obj 32 6 inlet;
  137. #X obj 129 260 outlet~;
  138. #X obj 94 22 unpack f f f;
  139. #X obj 188 142 clip 0 1;
  140. #X obj 125 80 * 500;
  141. #X obj 40 72 * 500;
  142. #X connect 0 0 2 0;
  143. #X connect 1 0 2 1;
  144. #X connect 2 0 3 0;
  145. #X connect 3 0 5 0;
  146. #X connect 4 0 6 0;
  147. #X connect 6 0 7 0;
  148. #X connect 6 0 9 0;
  149. #X connect 6 1 8 0;
  150. #X connect 7 0 3 1;
  151. #X connect 8 0 1 0;
  152. #X connect 9 0 0 0;
  153. #X restore 134 266 pd ringy;
  154. #X floatatom 360 211 5 0 0 0 - - -, f 5;
  155. #X floatatom 443 208 5 0 0 0 - - -, f 5;
  156. #X floatatom 517 187 5 0 0 0 - - -, f 5;
  157. #X obj 140 147 list;
  158. #N canvas 0 57 450 300 no-webcam 0;
  159. #X obj 109 45 inlet;
  160. #X obj 186 42 inlet;
  161. #X obj 269 43 inlet;
  162. #X obj 121 230 outlet;
  163. #X obj 123 177 pack f f f;
  164. #X obj 115 134 wrap 0 1;
  165. #X obj 228 114 wrap 0 1;
  166. #X obj 162 97 wrap 0 1;
  167. #X connect 0 0 5 0;
  168. #X connect 1 0 7 0;
  169. #X connect 2 0 6 0;
  170. #X connect 4 0 3 0;
  171. #X connect 5 0 4 0;
  172. #X connect 6 0 4 2;
  173. #X connect 7 0 4 1;
  174. #X restore 388 267 pd no-webcam;
  175. #X text 260 404 x should be vol \, y should be pitch;
  176. #X text 290 365 needs to be more dynamic volume;
  177. #X text 323 332 z \, maybe something else;
  178. #X text 263 440 make a bass and a hi pitch;
  179. #X text 41 78 make a calibrator;
  180. #X text -4 102 to adjust between 0 and 1;
  181. #X connect 2 0 14 0;
  182. #X connect 3 0 0 0;
  183. #X connect 3 0 0 1;
  184. #X connect 4 0 3 0;
  185. #X connect 6 0 5 0;
  186. #X connect 7 0 4 0;
  187. #X connect 8 0 4 2;
  188. #X connect 9 0 4 3;
  189. #X connect 10 0 4 1;
  190. #X connect 11 0 15 0;
  191. #X connect 12 0 15 1;
  192. #X connect 13 0 15 2;
  193. #X connect 14 0 9 0;
  194. #X connect 14 0 8 0;
  195. #X connect 14 0 10 0;
  196. #X connect 14 0 7 0;
  197. #X connect 15 0 14 0;