h1.pd 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100
  1. #N canvas 292 89 798 509 16;
  2. #X declare -path ../lib;
  3. #X obj 10 5 declare -path ../lib;
  4. #X floatatom 30 100 5 0 0 1 - - -, f 5;
  5. #N canvas 48 66 450 300 chords 0;
  6. #X obj 161 13 inlet;
  7. #X obj 166 190 outlet;
  8. #X msg 231 145 0 2 4;
  9. #X msg 168 96 0 1 3;
  10. #X msg 21 121 0 7;
  11. #X msg 71 135 0 1 5 6;
  12. #X obj 51 52 route 1 2 3 4 5 6 7 8;
  13. #X connect 0 0 6 0;
  14. #X connect 2 0 1 0;
  15. #X connect 3 0 1 0;
  16. #X connect 4 0 1 0;
  17. #X connect 5 0 1 0;
  18. #X connect 6 0 4 0;
  19. #X connect 6 1 5 0;
  20. #X connect 6 2 3 0;
  21. #X connect 6 3 2 0;
  22. #X restore 34 272 pd chords;
  23. #X obj 29 54 keymod n;
  24. #X floatatom 35 241 5 0 0 1 - - -, f 5;
  25. #X obj 253 100 note;
  26. #X obj 397 107 * 0.1;
  27. #X obj 182 104 s root;
  28. #X obj 185 188 s mode;
  29. #X obj 253 185 note;
  30. #X obj 404 140 s volume;
  31. #X floatatom 289 258 5 0 0 0 - - -, f 5;
  32. #X floatatom 463 108 5 0 0 0 - - -, f 5;
  33. #X obj 30 130 s note;
  34. #X obj 33 305 s note;
  35. #X obj 193 273 s octave;
  36. #X obj 32 204 keymod c;
  37. #X obj 181 55 keymod r;
  38. #X obj 185 141 keymod m;
  39. #X obj 192 221 keymod o;
  40. #X obj 391 55 keymod v;
  41. #X obj 628 334 harmony;
  42. #X obj 620 382 notes~;
  43. #X obj 623 477 dac~;
  44. #X obj 621 415 volume~;
  45. #X obj 624 245 r root;
  46. #X obj 645 272 r mode;
  47. #X obj 671 299 r octave;
  48. #X obj 692 383 r volume;
  49. #X obj 609 216 r note;
  50. #X obj 365 259 mouse;
  51. #X obj 420 441 harmony;
  52. #X obj 334 404 int;
  53. #X obj 302 375 * 12;
  54. #X obj 242 405 int;
  55. #X obj 231 370 * 12;
  56. #X floatatom 231 432 5 0 0 0 - - -, f 5;
  57. #X floatatom 333 435 5 0 0 0 - - -, f 5;
  58. #X obj 243 336 unpack f f;
  59. #X obj 378 333 route 1;
  60. #X obj 366 369 t b;
  61. #X floatatom 499 379 5 0 0 0 - - -, f 5;
  62. #X connect 1 0 13 0;
  63. #X connect 2 0 14 0;
  64. #X connect 3 0 1 0;
  65. #X connect 4 0 2 0;
  66. #X connect 6 0 10 0;
  67. #X connect 6 0 12 0;
  68. #X connect 16 0 4 0;
  69. #X connect 17 0 7 0;
  70. #X connect 17 0 5 0;
  71. #X connect 18 0 8 0;
  72. #X connect 18 0 9 0;
  73. #X connect 19 0 11 0;
  74. #X connect 19 0 15 0;
  75. #X connect 20 0 6 0;
  76. #X connect 21 0 22 0;
  77. #X connect 22 0 24 0;
  78. #X connect 24 0 23 0;
  79. #X connect 24 0 23 1;
  80. #X connect 25 0 21 1;
  81. #X connect 26 0 21 2;
  82. #X connect 27 0 21 3;
  83. #X connect 28 0 24 1;
  84. #X connect 29 0 21 0;
  85. #X connect 30 0 38 0;
  86. #X connect 30 1 39 0;
  87. #X connect 31 0 22 0;
  88. #X connect 32 0 37 0;
  89. #X connect 33 0 32 1;
  90. #X connect 34 0 36 0;
  91. #X connect 35 0 34 1;
  92. #X connect 36 0 31 1;
  93. #X connect 37 0 31 0;
  94. #X connect 38 0 35 0;
  95. #X connect 38 1 33 0;
  96. #X connect 39 0 40 0;
  97. #X connect 40 0 32 0;
  98. #X connect 40 0 34 0;
  99. #X connect 41 0 31 3;