/cobaiadatecnocracia.pd

http://github.com/glerm/conSerto · Unknown · 81 lines · 81 code · 0 blank · 0 comment · 0 complexity · bf327079ac4fabe07656a9d29813a230 MD5 · raw file 

    

  1. #N canvas 1 101 1011 626 10;
    2. 

  2. #X obj 299 522 vsl 8 64 0 1 0 1 empty empty empty 0 -8 0 8 -260818
    3. 

  3. -1 -1 4400 1;
    4. 

  4. #X obj 265 587 *~;
    5. 

  5. #X msg 346 506 read -resize ../../sound/voice.wav sample;
    6. 

  6. #X obj 346 526 soundfiler;
    7. 

  7. #X obj 346 547 s length;
    8. 

  8. #X obj 346 485 loadbang;
    9. 

  9. #X obj 77 172 hsl 560 15 0 1 0 0 empty empty time-position -2 -6 0
    10. 

  10. 8 -233017 -1 -1 50060 1;
    11. 

  11. #X obj 212 216 vsl 15 128 0.5 2 1 0 empty empty tom 0 -8 0 8 -258113
    12. 

  12. -1 -1 7500 1;
    13. 

  13. #X msg 143 218 1;
    14. 

  14. #X floatatom 214 356 5 0 0 0 - - -;
    15. 

  15. #X obj 74 532 line~;
    16. 

  16. #X msg 74 510 \$1 200;
    17. 

  17. #X obj 74 488 *;
    18. 

  18. #X obj 90 423 r length;
    19. 

  19. #X obj 226 551 lop~ 10;
    20. 

  20. #X msg 99 447 setarray sample;
    21. 

  21. #X obj 226 531 sig~ 1;
    22. 

  22. #X msg 125 281 1;
    23. 

  23. #X msg 125 301 2;
    24. 

  24. #X msg 125 341 4;
    25. 

  25. #X obj 125 399 * 100000;
    26. 

  26. #X msg 125 321 3;
    27. 

  27. #X obj 99 571 pvoc~ sample 2048 4;
    28. 

  28. #N canvas 0 0 450 300 (subpatch) 0;
    29. 

  29. #X array words2 162650 float 0;
    30. 

  30. #X coords 0 1 162649 -1 100 70 1;
    31. 

  31. #X restore 1306 251 graph;
    32. 

  32. #X msg 381 743 bang;
    33. 

  33. #X obj 265 611 ezdac~;
    34. 

  34. #X obj 78 54 cnv 15 560 100 empty empty empty 20 12 0 14 -232576 -66577
    35. 

  35. 0;
    36. 

  36. #N canvas 0 0 450 300 (subpatch) 0;
    37. 

  37. #X array sample 172284 float 0;
    38. 

  38. #X coords 0 1 172283 -1 560 100 1;
    39. 

  39. #X restore 78 53 graph;
    40. 

  40. #X msg 114 481 0 \, 4.8e+06 \$1;
    41. 

  41. #X msg 125 254 0.5;
    42. 

  42. #X msg 281 448 read -resize RiffCobaia.wav sample;
    43. 

  43. #X obj 409 305 r cima1;
    44. 

  44. #X floatatom 416 340 5 0 0 0 - - -;
    45. 

  45. #X obj 489 353 autoscale 0 1;
    46. 

  46. #X obj 527 280 r cima 2;
    47. 

  47. #X floatatom 283 347 5 0 0 0 - - -;
    48. 

  48. #X obj 527 315 autoscale 0.5 2;
    49. 

  49. #X connect 0 0 1 1;
    50. 

  50. #X connect 1 0 25 0;
    51. 

  51. #X connect 1 0 25 1;
    52. 

  52. #X connect 2 0 3 0;
    53. 

  53. #X connect 3 0 4 0;
    54. 

  54. #X connect 5 0 2 0;
    55. 

  55. #X connect 6 0 12 0;
    56. 

  56. #X connect 7 0 9 0;
    57. 

  57. #X connect 7 0 35 0;
    58. 

  58. #X connect 8 0 7 0;
    59. 

  59. #X connect 9 0 16 0;
    60. 

  60. #X connect 10 0 22 0;
    61. 

  61. #X connect 11 0 10 0;
    62. 

  62. #X connect 12 0 11 0;
    63. 

  63. #X connect 13 0 12 1;
    64. 

  64. #X connect 13 0 15 0;
    65. 

  65. #X connect 14 0 22 1;
    66. 

  66. #X connect 15 0 22 0;
    67. 

  67. #X connect 16 0 14 0;
    68. 

  68. #X connect 17 0 20 0;
    69. 

  69. #X connect 18 0 20 0;
    70. 

  70. #X connect 19 0 20 0;
    71. 

  71. #X connect 20 0 28 0;
    72. 

  72. #X connect 21 0 20 0;
    73. 

  73. #X connect 22 0 1 0;
    74. 

  74. #X connect 28 0 10 0;
    75. 

  75. #X connect 29 0 17 0;
    76. 

  76. #X connect 30 0 3 0;
    77. 

  77. #X connect 31 0 32 0;
    78. 

  78. #X connect 31 0 33 0;
    79. 

  79. #X connect 33 0 6 0;
    80. 

  80. #X connect 34 0 36 0;
    81. 

  81. #X connect 36 0 7 0;
    82.