AudioAnalysis.pd 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419
  1. #N canvas 353 124 1532 816 10;
  2. #X declare -stdlib aubio;
  3. #X obj 468 50 vsl 15 90 0 1 0 0 empty \$0-env1 empty 0 -9 0 10 -258049
  4. -162280 -257472 0 1;
  5. #X obj 484 50 vsl 15 90 0 1 0 0 empty \$0-env2 empty 0 -9 0 10 -259393
  6. -162280 -257472 0 1;
  7. #X obj 500 50 vsl 15 90 0 1 0 0 empty \$0-env3 empty 0 -9 0 10 -241158
  8. -162280 -257472 0 1;
  9. #X obj 516 50 vsl 15 90 0 1 0 0 empty \$0-env4 empty 0 -9 0 10 -155585
  10. -162280 -257472 0 1;
  11. #X obj 532 50 vsl 15 90 0 1 0 0 empty \$0-env5 empty 0 -9 0 10 -4034
  12. -162280 -1 0 1;
  13. #X obj 548 50 vsl 15 90 0 1 0 0 empty \$0-env6 empty 0 -9 0 10 -4058
  14. -162280 -257472 0 1;
  15. #X obj 564 50 vsl 15 90 0 1 0 0 empty \$0-env7 empty 0 -9 0 10 -2801
  16. -162280 -257472 0 1;
  17. #X obj 580 50 vsl 15 90 0 1 0 0 empty \$0-env8 empty 0 -9 0 10 -1216
  18. -162280 -257472 0 1;
  19. #X obj 420 51 vsl 15 90 0 1 0 0 empty \$0-env-in empty 0 -9 0 10 -1
  20. -4034 -1 0 1;
  21. #X obj 437 51 vsl 8 90 0 100 0 0 \$0-H \$0-H_set empty 0 -9 0 10 -1
  22. -258113 -1 8900 1;
  23. #X obj 19 358 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  24. 1;
  25. #X obj 447 195 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  26. 1;
  27. #X obj 410 51 vsl 8 90 0 100 0 0 \$0-B \$0-B_set empty 0 -9 0 10 -1
  28. -257985 -1 0 1;
  29. #X obj 448 51 vsl 15 90 0 1 0 0 empty \$0-env-main empty 0 -9 0 10
  30. -1 -4034 -1 0 1;
  31. #X msg 584 254 100;
  32. #X msg 537 340 reset;
  33. #X obj 584 362 change;
  34. #X obj 584 383 route 1;
  35. #X obj 584 320 > 200;
  36. #X obj 584 274 makenote 50 35;
  37. #X obj 595 341 < 50;
  38. #X obj 366 234 *~ 1;
  39. #N canvas 1 553 450 300 \$0-gate 0;
  40. #X obj 104 152 *~ 1;
  41. #X obj 123 68 env~ 8192;
  42. #X obj 105 40 inlet~;
  43. #X obj 104 174 outlet~;
  44. #X msg 122 107 1 200;
  45. #X msg 245 108 0 200;
  46. #X obj 123 132 line;
  47. #X obj 122 88 smlib/threshold 30 20 20 20;
  48. #X connect 0 0 3 0;
  49. #X connect 1 0 7 0;
  50. #X connect 2 0 0 0;
  51. #X connect 2 0 1 0;
  52. #X connect 4 0 6 0;
  53. #X connect 5 0 6 0;
  54. #X connect 6 0 0 1;
  55. #X connect 7 0 4 0;
  56. #X connect 7 1 5 0;
  57. #X restore 366 253 pd \$0-gate;
  58. #X obj 27 588 r \$0-scale;
  59. #X obj 366 273 send~ \$0-audio-in;
  60. #X obj 13 488 r~ \$0-audio-in;
  61. #X obj 135 509 r~ \$0-audio-in;
  62. #X obj 275 508 r~ \$0-audio-in;
  63. #X obj 414 508 r~ \$0-audio-in;
  64. #X obj 560 509 r~ \$0-audio-in;
  65. #X obj 706 508 r~ \$0-audio-in;
  66. #X obj 848 508 r~ \$0-audio-in;
  67. #X obj 1001 509 r~ \$0-audio-in;
  68. #X obj 1157 508 r~ \$0-audio-in;
  69. #X obj 1309 508 r~ \$0-audio-in;
  70. #X obj 14 671 s \$0-env-main;
  71. #X obj 27 567 s \$0-env-in;
  72. #X obj 27 548 / 100;
  73. #X obj 136 672 s \$0-env1;
  74. #X obj 275 672 s \$0-env2;
  75. #X obj 414 672 s \$0-env3;
  76. #X obj 559 672 s \$0-env4;
  77. #X obj 705 672 s \$0-env5;
  78. #X obj 847 672 s \$0-env6;
  79. #X obj 1003 672 s \$0-env7;
  80. #X obj 1157 672 s \$0-env8;
  81. #X obj 1311 672 s \$0-env9;
  82. #X obj 596 50 vsl 15 90 0 1 0 0 empty \$0-env9 empty 0 -9 0 10 -122944
  83. -162280 -257472 0 1;
  84. #X obj 115 381 s \$0-scale;
  85. #X obj 27 608 route minmax;
  86. #X obj 147 588 r \$0-scale;
  87. #X obj 147 608 route minmax;
  88. #X obj 282 588 r \$0-scale;
  89. #X obj 282 608 route minmax;
  90. #X obj 425 588 r \$0-scale;
  91. #X obj 425 608 route minmax;
  92. #X obj 566 588 r \$0-scale;
  93. #X obj 566 608 route minmax;
  94. #X obj 716 588 r \$0-scale;
  95. #X obj 716 608 route minmax;
  96. #X obj 856 588 r \$0-scale;
  97. #X obj 856 608 route minmax;
  98. #X obj 1016 588 r \$0-scale;
  99. #X obj 1016 608 route minmax;
  100. #X obj 1166 588 r \$0-scale;
  101. #X obj 1166 608 route minmax;
  102. #X obj 1316 588 r \$0-scale;
  103. #X obj 1316 608 route minmax;
  104. #X msg 145 294 bang \, 1;
  105. #X obj 13 507 /~ 2;
  106. #X msg 188 315 0 \, bang \, minmax load 0 100;
  107. #N canvas 65 615 331 421 \$0-env 1;
  108. #X obj 86 36 r \$0-env-main;
  109. #X obj 101 56 r \$0-env1;
  110. #X obj 116 76 r \$0-env2;
  111. #X obj 132 96 r \$0-env3;
  112. #X obj 147 116 r \$0-env4;
  113. #X obj 162 137 r \$0-env5;
  114. #X obj 178 157 r \$0-env6;
  115. #X obj 193 177 r \$0-env7;
  116. #X obj 208 197 r \$0-env8;
  117. #X obj 224 217 r \$0-env9;
  118. #X obj 86 345 s \$1;
  119. #X obj 86 239 pack f f f f f f f f f f;
  120. #X obj 86 283 list prepend audio-env;
  121. #X obj 86 261 list-abs/list-round 0.01;
  122. #X obj 271 348 stdout;
  123. #X obj 86 304 list prepend \$2;
  124. #X obj 220 322 list trim;
  125. #X connect 0 0 11 0;
  126. #X connect 1 0 11 1;
  127. #X connect 2 0 11 2;
  128. #X connect 3 0 11 3;
  129. #X connect 4 0 11 4;
  130. #X connect 5 0 11 5;
  131. #X connect 6 0 11 6;
  132. #X connect 7 0 11 7;
  133. #X connect 8 0 11 8;
  134. #X connect 9 0 11 9;
  135. #X connect 11 0 13 0;
  136. #X connect 12 0 15 0;
  137. #X connect 12 0 16 0;
  138. #X connect 13 0 12 0;
  139. #X connect 15 0 10 0;
  140. #X connect 16 0 14 0;
  141. #X restore 772 231 pd \$0-env;
  142. #X obj 640 351 pack s f;
  143. #X obj 584 214 r~ \$0-audio-in;
  144. #X obj 560 255 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
  145. -1;
  146. #X obj 719 316 s \$0-beat;
  147. #X obj 595 28 bng 15 250 50 0 empty \$0-beat empty 17 7 0 10 -262144
  148. -1 -1;
  149. #X msg 640 316 beat;
  150. #X obj 145 273 route auto reset scale;
  151. #X msg 189 340 0;
  152. #X msg 234 361 100;
  153. #X msg 231 295 minmaxload \$1 \$2;
  154. #X obj 231 339 unpack f f;
  155. #X obj 145 235 r \$0-scaling;
  156. #X obj 47 204 pack f f;
  157. #X obj 47 159 r \$0-B;
  158. #X obj 93 161 r \$0-H;
  159. #X obj 93 182 t b f;
  160. #X obj 189 436 s \$0-B_set;
  161. #X obj 266 456 s \$0-H_set;
  162. #X obj 47 251 list trim;
  163. #X obj 56 339 print scale;
  164. #X obj 145 254 list trim;
  165. #X obj 136 652 change;
  166. #X obj 275 651 change;
  167. #X obj 414 652 change;
  168. #X obj 559 652 change;
  169. #X obj 705 651 change;
  170. #X obj 847 652 change;
  171. #X obj 1003 652 change;
  172. #X obj 1157 651 change;
  173. #X obj 1311 652 change;
  174. #X obj 444 219 block~ 64;
  175. #N canvas 80 478 450 300 \$0-audiotable 0;
  176. #X obj 129 87 tabsend~ \$0-audio;
  177. #X obj 240 87 table \$0-audio \$3;
  178. #X obj 61 89 block~ \$3;
  179. #X msg 61 69 1;
  180. #X obj 61 49 loadbang;
  181. #X obj 130 49 inlet~;
  182. #X obj 132 135 bang~;
  183. #X obj 132 161 tabdump \$0-audio;
  184. #X obj 132 234 s \$1;
  185. #X obj 132 186 list prepend table;
  186. #X obj 132 212 list prepend \$2;
  187. #X connect 3 0 2 0;
  188. #X connect 4 0 3 0;
  189. #X connect 5 0 0 0;
  190. #X connect 7 0 9 0;
  191. #X connect 9 0 10 0;
  192. #X connect 10 0 8 0;
  193. #X restore 428 297 pd \$0-audiotable;
  194. #X text 170 205 SCALING;
  195. #X text 687 276 BEAT FINDER;
  196. #X text 376 194 INLET;
  197. #X obj 411 27 bng 15 250 50 0 empty auto auto 17 7 0 10 -262144 -1
  198. -1;
  199. #X text 591 11 beat;
  200. #X obj 464 26 bng 15 250 50 0 empty reset reset 17 7 0 10 -262144 -1
  201. -1;
  202. #X msg 278 150 auto;
  203. #X msg 326 151 reset;
  204. #X obj 590 2 bng 10 250 50 0 empty empty empty 17 7 0 10 -258113 -1
  205. -1;
  206. #X obj 702 94 send pd;
  207. #X msg 702 75 audio-dialog 0 0 0 0 2 0 0 0 0 0 0 0 2 0 0 0 44100 50
  208. -1;
  209. #X obj 606 2 bng 10 250 50 0 empty empty empty 17 7 0 10 -4160 -1 -1
  210. ;
  211. #X obj 675 54 t b a;
  212. #X msg 675 113 \; pd-AudioAnalysis.pd menusave;
  213. #X obj 47 228 list prepend minmax load;
  214. #X obj 189 395 list prepend set;
  215. #X obj 266 415 list prepend set;
  216. #X obj 584 234 aubiotempo~ 0.3;
  217. #X obj 100 40 declare -stdlib aubio;
  218. #X obj 584 296 maxlib/beat;
  219. #X obj 14 631 mapping/autoscale;
  220. #X obj 136 632 mapping/autoscale;
  221. #X obj 275 632 mapping/autoscale;
  222. #X obj 414 632 mapping/autoscale;
  223. #X obj 559 632 mapping/autoscale;
  224. #X obj 705 632 mapping/autoscale;
  225. #X obj 847 632 mapping/autoscale;
  226. #X obj 1003 632 mapping/autoscale;
  227. #X obj 1157 632 mapping/autoscale;
  228. #X obj 1311 632 mapping/autoscale;
  229. #X obj 135 529 iemlib/lp4_butt~ 90;
  230. #X obj 675 13 hcs/get-audio-dialog;
  231. #X obj 675 34 list prepend set;
  232. #X obj 366 214 adc~;
  233. #X obj 275 548 iemlib/hp4_butt~ 90;
  234. #X obj 275 528 iemlib/lp4_butt~ 176;
  235. #X obj 414 528 iemlib/lp4_butt~ 353;
  236. #X obj 560 528 iemlib/lp4_butt~ 707;
  237. #X obj 706 528 iemlib/lp4_butt~ 1414;
  238. #X obj 848 528 iemlib/lp4_butt~ 2825;
  239. #X obj 1001 528 iemlib/lp4_butt~ 5650;
  240. #X obj 1157 528 iemlib/lp4_butt~ 11300;
  241. #X obj 414 548 iemlib/hp4_butt~ 176;
  242. #X obj 560 548 iemlib/hp4_butt~ 353;
  243. #X obj 706 548 iemlib/hp4_butt~ 707;
  244. #X obj 848 548 iemlib/hp4_butt~ 1414;
  245. #X obj 1001 548 iemlib/hp4_butt~ 2825;
  246. #X obj 1157 548 iemlib/hp4_butt~ 5650;
  247. #X obj 1310 548 iemlib/hp4_butt~ 11300;
  248. #X obj 14 527 env~ 2048;
  249. #X obj 136 568 env~ 2048;
  250. #X obj 275 568 env~ 2048;
  251. #X obj 414 568 env~ 2048;
  252. #X obj 559 568 env~ 2048;
  253. #X obj 705 568 env~ 2048;
  254. #X obj 847 568 env~ 2048;
  255. #X obj 1003 568 env~ 2048;
  256. #X obj 1157 568 env~ 2048;
  257. #X obj 1311 568 env~ 2048;
  258. #X obj 266 436 list trim;
  259. #X obj 189 416 list trim;
  260. #X obj 417 169 hsl 128 15 0.0001 1 1 0 empty empty empty -2 -8 0 10
  261. -262144 -1 -1 3500 1;
  262. #X obj 952 203 loadbang;
  263. #X msg 952 225 \; pd dsp 1;
  264. #X obj 640 393 stdout;
  265. #X obj 639 370 list trim;
  266. #X connect 10 0 48 0;
  267. #X connect 11 0 102 0;
  268. #X connect 14 0 19 0;
  269. #X connect 15 0 123 0;
  270. #X connect 16 0 17 0;
  271. #X connect 17 0 15 0;
  272. #X connect 18 0 16 0;
  273. #X connect 19 0 123 0;
  274. #X connect 19 1 123 1;
  275. #X connect 20 0 16 0;
  276. #X connect 21 0 22 0;
  277. #X connect 22 0 24 0;
  278. #X connect 23 0 49 0;
  279. #X connect 25 0 69 0;
  280. #X connect 26 0 134 0;
  281. #X connect 27 0 139 0;
  282. #X connect 28 0 140 0;
  283. #X connect 29 0 141 0;
  284. #X connect 30 0 142 0;
  285. #X connect 31 0 143 0;
  286. #X connect 32 0 144 0;
  287. #X connect 33 0 145 0;
  288. #X connect 34 0 152 0;
  289. #X connect 37 0 36 0;
  290. #X connect 49 0 124 0;
  291. #X connect 49 1 124 3;
  292. #X connect 50 0 51 0;
  293. #X connect 51 0 125 0;
  294. #X connect 51 1 125 3;
  295. #X connect 52 0 53 0;
  296. #X connect 53 0 126 0;
  297. #X connect 53 1 126 3;
  298. #X connect 54 0 55 0;
  299. #X connect 55 0 127 0;
  300. #X connect 55 1 127 3;
  301. #X connect 56 0 57 0;
  302. #X connect 57 0 128 0;
  303. #X connect 57 1 128 3;
  304. #X connect 58 0 59 0;
  305. #X connect 59 0 129 0;
  306. #X connect 59 1 129 3;
  307. #X connect 60 0 61 0;
  308. #X connect 61 0 130 0;
  309. #X connect 61 1 130 3;
  310. #X connect 62 0 63 0;
  311. #X connect 63 0 131 0;
  312. #X connect 63 1 131 3;
  313. #X connect 64 0 65 0;
  314. #X connect 65 0 132 0;
  315. #X connect 65 1 132 3;
  316. #X connect 66 0 67 0;
  317. #X connect 67 0 133 0;
  318. #X connect 67 1 133 3;
  319. #X connect 68 0 48 0;
  320. #X connect 69 0 153 0;
  321. #X connect 70 0 48 0;
  322. #X connect 72 0 169 0;
  323. #X connect 77 0 72 0;
  324. #X connect 78 0 68 0;
  325. #X connect 78 0 91 0;
  326. #X connect 78 1 70 0;
  327. #X connect 78 1 79 0;
  328. #X connect 78 1 80 0;
  329. #X connect 78 2 81 0;
  330. #X connect 78 2 82 0;
  331. #X connect 78 3 91 0;
  332. #X connect 79 0 119 0;
  333. #X connect 80 0 120 0;
  334. #X connect 81 0 48 0;
  335. #X connect 82 0 119 0;
  336. #X connect 82 1 120 0;
  337. #X connect 83 0 92 0;
  338. #X connect 84 0 118 0;
  339. #X connect 85 0 84 0;
  340. #X connect 86 0 87 0;
  341. #X connect 87 0 84 0;
  342. #X connect 87 1 84 1;
  343. #X connect 90 0 48 0;
  344. #X connect 92 0 78 0;
  345. #X connect 93 0 38 0;
  346. #X connect 94 0 39 0;
  347. #X connect 95 0 40 0;
  348. #X connect 96 0 41 0;
  349. #X connect 97 0 42 0;
  350. #X connect 98 0 43 0;
  351. #X connect 99 0 44 0;
  352. #X connect 100 0 45 0;
  353. #X connect 101 0 46 0;
  354. #X connect 107 0 110 0;
  355. #X connect 109 0 111 0;
  356. #X connect 110 0 78 0;
  357. #X connect 111 0 78 0;
  358. #X connect 112 0 135 0;
  359. #X connect 114 0 113 0;
  360. #X connect 115 0 114 0;
  361. #X connect 116 0 117 0;
  362. #X connect 116 1 114 0;
  363. #X connect 118 0 90 0;
  364. #X connect 119 0 164 0;
  365. #X connect 120 0 163 0;
  366. #X connect 121 0 74 0;
  367. #X connect 121 0 14 0;
  368. #X connect 123 0 18 0;
  369. #X connect 123 0 20 0;
  370. #X connect 123 0 72 1;
  371. #X connect 123 2 77 0;
  372. #X connect 123 2 75 0;
  373. #X connect 124 0 35 0;
  374. #X connect 125 0 93 0;
  375. #X connect 126 0 94 0;
  376. #X connect 127 0 95 0;
  377. #X connect 128 0 96 0;
  378. #X connect 129 0 97 0;
  379. #X connect 130 0 98 0;
  380. #X connect 131 0 99 0;
  381. #X connect 132 0 100 0;
  382. #X connect 133 0 101 0;
  383. #X connect 134 0 154 0;
  384. #X connect 135 0 136 0;
  385. #X connect 136 0 116 0;
  386. #X connect 137 0 21 0;
  387. #X connect 138 0 155 0;
  388. #X connect 139 0 138 0;
  389. #X connect 140 0 146 0;
  390. #X connect 141 0 147 0;
  391. #X connect 142 0 148 0;
  392. #X connect 143 0 149 0;
  393. #X connect 144 0 150 0;
  394. #X connect 145 0 151 0;
  395. #X connect 146 0 156 0;
  396. #X connect 147 0 157 0;
  397. #X connect 148 0 158 0;
  398. #X connect 149 0 159 0;
  399. #X connect 150 0 160 0;
  400. #X connect 151 0 161 0;
  401. #X connect 152 0 162 0;
  402. #X connect 153 0 37 0;
  403. #X connect 153 0 124 0;
  404. #X connect 154 0 125 0;
  405. #X connect 155 0 126 0;
  406. #X connect 156 0 127 0;
  407. #X connect 157 0 128 0;
  408. #X connect 158 0 129 0;
  409. #X connect 159 0 130 0;
  410. #X connect 160 0 131 0;
  411. #X connect 161 0 132 0;
  412. #X connect 162 0 133 0;
  413. #X connect 163 0 89 0;
  414. #X connect 164 0 88 0;
  415. #X connect 165 0 21 1;
  416. #X connect 166 0 167 0;
  417. #X connect 169 0 168 0;
  418. #X coords 0 -1 1 1 220 150 1 400 0;