From 878ee3f2844f1c2cdbf14e3f9b9acbd43bdd9edf Mon Sep 17 00:00:00 2001 From: Ed Kelly Date: Sat, 15 Sep 2012 13:29:19 +0000 Subject: gemnotes 0.2.3 svn path=/trunk/externals/ekext/; revision=16237 --- gemnotes_0.2.3/makevoice.pd | 873 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 873 insertions(+) create mode 100755 gemnotes_0.2.3/makevoice.pd (limited to 'gemnotes_0.2.3/makevoice.pd') diff --git a/gemnotes_0.2.3/makevoice.pd b/gemnotes_0.2.3/makevoice.pd new file mode 100755 index 0000000..8cb1cc3 --- /dev/null +++ b/gemnotes_0.2.3/makevoice.pd @@ -0,0 +1,873 @@ +#N canvas 717 270 531 399 10; +#N canvas 95 222 450 300 \$0-voicecanvas 0; +#X obj 92 36 inlet; +#X obj 244 30 inlet; +#X obj 158 231 outlet; +#N canvas 11 341 1253 328 \$0-voice 0; +#X obj 10 10 inlet; +#X obj 100 10 inlet; +#X obj 10 300 outlet; +#X restore 119 143 pd \$0-voice; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 3 0 2 0; +#X restore 37 338 pd \$0-voicecanvas; +#N canvas 0 22 591 300 initcanvas 0; +#X msg 225 149 clear; +#X obj 186 81 t b b b; +#X msg 205 130 obj 10 10 inlet \, obj 100 10 inlet \, obj 10 300 outlet +; +#X msg 186 188 connect 0 0 3 0 \, connect 1 0 3 1 \, connect 3 0 2 +0; +#X obj 225 168 s pd-\$0-voice; +#X obj 186 207 s pd-\$0-voicecanvas; +#X obj 186 62 inlet; +#X connect 0 0 4 0; +#X connect 1 0 3 0; +#X connect 1 1 2 0; +#X connect 1 2 0 0; +#X connect 2 0 4 0; +#X connect 3 0 5 0; +#X connect 6 0 1 0; +#X restore 372 127 pd initcanvas; +#N canvas 0 22 450 300 initmakevoice 0; +#X obj 79 181 s \$0-hdsq; +#X obj 152 181 s \$0-stem; +#X obj 79 105 \$1; +#X obj 152 105 \$2; +#X obj 79 124 moses 1e-07; +#X obj 152 162 0.5; +#X obj 79 162 0.15; +#X obj 79 143 t b; +#X obj 152 124 moses 1e-07; +#X obj 152 143 t b; +#X obj 104 49 loadbang; +#X obj 225 124 s \$0-reset; +#X obj 251 66 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X msg 277 182 0; +#X obj 279 215 s \$0-bt; +#X obj 275 156 loadbang; +#X connect 2 0 4 0; +#X connect 3 0 8 0; +#X connect 4 0 7 0; +#X connect 4 1 6 0; +#X connect 5 0 1 0; +#X connect 6 0 0 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 8 1 5 0; +#X connect 9 0 5 0; +#X connect 10 0 2 0; +#X connect 10 0 3 0; +#X connect 10 0 11 0; +#X connect 12 0 3 0; +#X connect 12 0 2 0; +#X connect 13 0 14 0; +#X connect 15 0 13 0; +#X restore 387 217 pd initmakevoice; +#X msg 77 141 vis 1; +#X obj 37 38 inlet; +#X text 37 24 stave; +#X obj 77 38 inlet; +#X obj 74 307 s pd-\$0-voice; +#N canvas 87 88 1193 663 gemnotes_format 0; +#X obj 34 8 inlet; +#X obj 34 47 route note; +#X obj 34 83 route . +; +#X obj 166 312 r \$0-stem; +#X text 121 382 p; +#X text 147 384 bt; +#X text 171 374 tail; +#X text 170 363 beam/; +#X text 202 384 acc; +#X obj 191 344 * 1; +#X text 215 364 flat/; +#X text 213 375 sharp; +#X obj 501 366 f; +#X obj 520 347 t b f; +#X text 680 389 bt; +#X text 65 523 bt = orientation (bottom / top) of stems \, beams and +tails; +#X text 650 387 p; +#X text 614 388 xoff; +#X text 638 420 chord note; +#X obj 627 375 f; +#X obj 95 467 outlet; +#X text 101 47 reset \, bar \, group; +#X msg 110 185 step \$1; +#X obj 118 152 t b f; +#X text 687 365 flat/; +#X text 685 376 sharp; +#X obj 22 149 t b f; +#X msg 22 169 chord; +#X msg 172 184 step \$1; +#X obj 455 396 pack; +#X text 406 194 args: numerator \, denominator \, firstobject \, x-offset +; +#X obj 554 277 loadbang; +#X obj 507 239 route reset; +#X obj 346 394 pack f f f f; +#X obj 244 323 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X text 732 386 n_obj; +#X obj 95 417 prepend note; +#X obj 258 419 prepend rest; +#X obj 408 419 prepend barline; +#X obj 523 434 prepend tsig; +#X obj 629 438 prepend chord; +#X text 653 373 proot; +#X msg 536 526 xoff p proot bt shfl rhy dur n_obj; +#X text 702 421 rhy dur tie; +#X obj 629 404 pack f f f f f f f f f; +#X obj 336 360 - 0.05; +#X text 643 147 hdsq; +#X obj 34 27 route //; +#X floatatom 269 324 5 0 0 0 - - -; +#X msg 60 492 xoff rhythm pitch dur bt stem beam tie acc shfl grouptotal +objnum groupcount beamset rootobj tail tuple; +#X text 82 222 off rhy dur grp gc tie bm_ rof rd bar cho num den; +#X obj 488 77 route hdsq; +#X obj 455 360 + 0.08; +#X obj 523 403 pack f f f f f; +#X msg 625 308 0; +#X obj 554 324 t b; +#X msg 598 326 0.8; +#X obj 501 384 - 0.2; +#X text 839 273 tempo mark; +#X obj 762 436 prepend tempo; +#X obj 774 403 pack f f f f; +#X msg 397 13 debug; +#X obj 509 3 r \$0-debug; +#X obj 440 10 route bang; +#X floatatom 384 132 5 0 0 0 - - -; +#X text 383 222 tail tuple tempo gob nob; +#X obj 275 348 moses 2; +#X msg 304 377 0; +#X msg 706 276 \$1 tail 1; +#X obj 705 300 s \$0-sendback; +#X obj 666 256 print tail; +#X obj 145 330 r \$0-bt; +#X obj 920 424 outlet; +#X floatatom 609 239 5 0 0 0 - - -; +#X obj 879 60 route tempo; +#X obj 763 61 route reset tempo; +#X obj 829 102 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 754 116 cup; +#X msg 752 90 1; +#X msg 788 91 0; +#X floatatom 754 148 5 0 0 0 - - -; +#X obj 834 288 unpack f f f; +#X msg 525 300 0.6; +#X obj 609 259 > 0; +#X obj 614 280 sel 0 1; +#X floatatom 901 377 5 0 0 0 - - -; +#X text 886 392 should work...; +#X text 885 401 ...but doesn't!; +#X obj 804 337 == 0; +#X obj 773 357 spigot; +#X obj 734 336 spigot; +#X msg 668 310 1; +#X obj 796 307 t b; +#X obj 734 356 f; +#X text 819 358 <---nasty kludge; +#X obj 768 380 + 0.9; +#X obj 488 96 * 0.5; +#X obj 998 378 pack f f f f f f; +#X obj 994 324 unpack f f f f f; +#X msg 1034 303 0; +#X obj 1077 351 == 0; +#X obj 990 282 t a b; +#X msg 985 452 dyn \$1 \$2 \$3 \$4 \$5 \$6; +#X obj 80 395 pack f f f f f f 1 f 1 f f f f f f f f f f; +#X obj 830 242 print dyncount; +#X obj 395 157 print objects; +#X obj 1075 293 r \$0-bt; +#X floatatom 462 488 5 0 0 0 - - -; +#X msg 229 184 articulation \$1; +#X obj 236 129 unpack f f f f f f; +#X obj 128 129 unpack f f f f f; +#X obj 22 129 unpack f f f f f; +#X obj 105 26 route list; +#X obj 92 238 gemnotes_counter 4 4 3 1.1 ----------------------------- +; +#X connect 0 0 47 0; +#X connect 1 0 2 0; +#X connect 1 1 32 0; +#X connect 1 1 51 0; +#X connect 1 1 113 0; +#X connect 2 0 111 0; +#X connect 2 1 110 0; +#X connect 2 2 109 0; +#X connect 3 0 103 5; +#X connect 9 0 103 7; +#X connect 12 0 57 0; +#X connect 13 0 12 0; +#X connect 13 1 53 1; +#X connect 19 0 44 0; +#X connect 22 0 113 0; +#X connect 23 0 113 0; +#X connect 23 1 44 2; +#X connect 23 1 103 2; +#X connect 26 0 27 0; +#X connect 26 1 44 1; +#X connect 27 0 113 0; +#X connect 28 0 113 0; +#X connect 29 0 38 0; +#X connect 31 0 82 0; +#X connect 31 0 54 0; +#X connect 32 0 82 0; +#X connect 32 0 54 0; +#X connect 32 0 91 0; +#X connect 33 0 37 0; +#X connect 36 0 20 0; +#X connect 37 0 20 0; +#X connect 38 0 20 0; +#X connect 39 0 20 0; +#X connect 40 0 20 0; +#X connect 44 0 40 0; +#X connect 45 0 33 0; +#X connect 47 1 1 0; +#X connect 47 1 75 0; +#X connect 47 1 112 0; +#X connect 51 0 96 0; +#X connect 52 0 29 0; +#X connect 52 0 12 1; +#X connect 53 0 39 0; +#X connect 53 0 55 0; +#X connect 54 0 53 4; +#X connect 55 0 56 0; +#X connect 56 0 53 4; +#X connect 57 0 53 0; +#X connect 59 0 20 0; +#X connect 60 0 59 0; +#X connect 61 0 113 0; +#X connect 62 0 63 0; +#X connect 63 0 61 0; +#X connect 64 0 105 0; +#X connect 66 0 103 15; +#X connect 66 1 67 0; +#X connect 66 1 68 0; +#X connect 66 1 70 0; +#X connect 67 0 103 15; +#X connect 68 0 69 0; +#X connect 71 0 103 4; +#X connect 73 0 83 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 1 76 0; +#X connect 76 0 77 0; +#X connect 77 0 80 0; +#X connect 78 0 77 0; +#X connect 79 0 80 0; +#X connect 81 0 85 0; +#X connect 81 0 89 0; +#X connect 81 0 92 0; +#X connect 81 1 60 1; +#X connect 81 2 60 2; +#X connect 82 0 12 1; +#X connect 83 0 84 0; +#X connect 83 0 88 0; +#X connect 83 0 90 1; +#X connect 84 0 54 0; +#X connect 84 1 56 0; +#X connect 88 0 89 1; +#X connect 89 0 60 0; +#X connect 90 0 93 0; +#X connect 92 0 90 0; +#X connect 93 0 95 0; +#X connect 95 0 60 0; +#X connect 96 0 52 1; +#X connect 97 0 102 0; +#X connect 98 0 97 0; +#X connect 98 1 97 1; +#X connect 98 2 97 2; +#X connect 98 3 97 3; +#X connect 99 0 97 2; +#X connect 100 0 97 4; +#X connect 101 0 98 0; +#X connect 101 1 99 0; +#X connect 102 0 20 0; +#X connect 103 0 36 0; +#X connect 106 0 100 0; +#X connect 108 0 113 0; +#X connect 109 0 113 0; +#X connect 109 1 44 2; +#X connect 109 1 103 2; +#X connect 109 2 28 0; +#X connect 109 3 103 9; +#X connect 109 5 108 0; +#X connect 110 0 23 0; +#X connect 110 1 22 0; +#X connect 110 2 103 9; +#X connect 110 4 108 0; +#X connect 111 0 26 0; +#X connect 111 1 44 4; +#X connect 111 4 108 0; +#X connect 112 0 1 0; +#X connect 113 0 19 1; +#X connect 113 0 93 1; +#X connect 113 0 103 0; +#X connect 113 1 44 5; +#X connect 113 1 103 1; +#X connect 113 2 33 2; +#X connect 113 2 44 6; +#X connect 113 2 103 3; +#X connect 113 3 103 10; +#X connect 113 4 103 13; +#X connect 113 5 9 0; +#X connect 113 5 34 0; +#X connect 113 5 44 7; +#X connect 113 6 48 0; +#X connect 113 6 103 12; +#X connect 113 7 45 0; +#X connect 113 8 33 1; +#X connect 113 9 52 0; +#X connect 113 10 19 0; +#X connect 113 11 13 0; +#X connect 113 12 53 2; +#X connect 113 13 66 0; +#X connect 113 14 103 16; +#X connect 113 15 81 0; +#X connect 113 16 103 14; +#X connect 113 17 44 8; +#X connect 113 17 53 3; +#X connect 113 17 29 1; +#X connect 113 17 33 3; +#X connect 113 17 60 3; +#X connect 113 17 64 0; +#X connect 113 17 103 11; +#X connect 113 17 97 5; +#X connect 113 18 72 0; +#X connect 113 18 73 0; +#X connect 113 19 103 17; +#X connect 113 20 103 18; +#X connect 113 20 107 0; +#X connect 113 21 101 0; +#X connect 113 21 104 0; +#X restore 170 90 pd gemnotes_format; +#N canvas 395 22 904 511 make_note 0; +#X obj 35 309 f; +#X obj 45 36 inlet; +#X obj 41 59 t b a b; +#X obj 32 238 spigot 1; +#X obj 77 219 == 0; +#X obj 53 265 t b; +#X obj 73 287 f; +#X obj 472 339 f; +#X obj 402 183 spigot; +#X text 553 346 \$14 - thisobj \, \$15 - prevobj \, \$16 - rootobj +; +#X obj 363 238 f; +#X obj 445 339 f; +#X obj 402 202 t b b b; +#X obj 227 490 outlet; +#X msg 491 54 xobj connectfirst connectprev thisobj; +#X obj 363 257 + 275; +#X obj 90 59 s \$0-get_x_obj; +#X obj 61 309 r \$0-x_obj; +#X obj 389 238 r \$0-x_obj; +#X obj 363 276 s \$0-set_x_obj; +#X obj 35 347 s \$0-set_x_obj; +#X text 40 107 x r p d bt stem bm tie acc shfl grp obroute bmconn gc +rootob; +#X obj 417 42 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 534 144 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 625 144 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 628 168 s bangscore; +#X obj 536 167 s resetscore; +#X obj 500 339 f; +#X floatatom 332 31 5 0 0 0 - - -; +#X floatatom 465 176 5 0 0 0 - - -; +#X floatatom 607 364 5 0 0 0 - - -; +#X obj 82 423 print note_1; +#X obj 407 423 print note_234; +#X obj 82 404 spigot; +#X obj 407 404 spigot; +#X obj 456 384 r \$0-debug; +#X obj 115 385 r \$0-debug; +#X obj 286 43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 198 52 sel 1; +#X obj 198 77 bng 15 550 50 0 empty empty empty 17 7 0 10 -262144 -258113 +-1; +#X obj 198 30 > 0; +#X obj 317 152 makefilename group_%d; +#X obj 35 328 + 315; +#X obj 563 261 f; +#X obj 561 194 change; +#X obj 592 261 f; +#N canvas 0 22 450 300 \$0-reclock 0; +#X obj 92 69 inlet; +#N canvas 0 22 450 300 \$0-reclocker 0; +#X restore 96 128 pd \$0-reclocker; +#X restore 735 152 pd \$0-reclock; +#X obj 745 256 s pd-\$0-reclocker; +#X msg 742 221 clear \, obj 10 10 inlet; +#X obj 561 215 t f b b b; +#X obj 643 245 s pd-\$0-reclock; +#X msg 643 221 connect 0 0 1 0; +#X obj 736 102 r \$0-reclock; +#X msg 735 126 reclock; +#X obj 683 275 makefilename group_%d; +#X msg 683 294 obj 10 80 send \$1 \, connect 0 0 1 0; +#X obj 543 297 makefilename group_%d; +#X msg 556 100 0; +#X msg 591 99 1; +#X obj 645 105 inlet; +#X msg 581 134 set -1; +#X msg 543 316 obj 110 80 send \$1 \, connect 0 0 2 0; +#X msg 518 98 2; +#X msg 671 142 clear; +#X msg 36 441 obj \$1 150 noteobject \$2 \$3 \$4 \$5 \$6 \$7 \$8 \$9 +\$10 \$11 \$12 \$13 \$15 \$16 \$17 \$18 \$19 \, connect 0 0 \$14 0 +\, connect 1 0 \$14 1; +#X msg 401 441 obj \$1 150 noteobject \$2 \$3 \$4 \$5 \$6 \$7 \$8 \$9 +\$10 \$11 \$12 \$13 \$17 \$18 \$19 \$20 \$21 \, connect 0 0 \$14 0 +\, connect 1 0 \$14 1 \, connect \$14 0 \$15 3 \, connect \$16 1 \$14 +2; +#X obj 307 366 pack f f f f f f f f f f f f f f f f f f f s f; +#X obj 47 367 pack f f f f f f f f f f f f f f f f f s f; +#X obj 49 124 unpack f f f f f f f f f f f f f f f f f f f; +#X connect 0 0 42 0; +#X connect 0 0 67 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 2 0 8 0; +#X connect 2 1 68 0; +#X connect 2 2 16 0; +#X connect 3 0 5 0; +#X connect 3 0 0 0; +#X connect 4 0 3 1; +#X connect 5 0 6 0; +#X connect 6 0 7 1; +#X connect 6 0 27 1; +#X connect 7 0 30 0; +#X connect 7 0 66 14; +#X connect 8 0 12 0; +#X connect 10 0 15 0; +#X connect 10 0 66 0; +#X connect 11 0 7 1; +#X connect 11 0 66 13; +#X connect 12 0 10 0; +#X connect 12 1 11 0; +#X connect 12 2 7 0; +#X connect 12 2 27 0; +#X connect 15 0 19 0; +#X connect 17 0 0 1; +#X connect 18 0 10 1; +#X connect 23 0 26 0; +#X connect 24 0 25 0; +#X connect 27 0 66 15; +#X connect 33 0 31 0; +#X connect 34 0 32 0; +#X connect 35 0 34 1; +#X connect 36 0 33 1; +#X connect 38 0 39 0; +#X connect 40 0 38 0; +#X connect 41 0 66 19; +#X connect 41 0 67 17; +#X connect 42 0 20 0; +#X connect 43 0 45 1; +#X connect 43 0 56 0; +#X connect 44 0 49 0; +#X connect 45 0 54 0; +#X connect 48 0 47 0; +#X connect 49 0 43 0; +#X connect 49 1 45 0; +#X connect 49 2 51 0; +#X connect 49 3 48 0; +#X connect 51 0 50 0; +#X connect 52 0 53 0; +#X connect 53 0 46 0; +#X connect 54 0 55 0; +#X connect 55 0 47 0; +#X connect 56 0 61 0; +#X connect 57 0 44 0; +#X connect 58 0 44 0; +#X connect 59 0 60 0; +#X connect 59 0 63 0; +#X connect 60 0 44 0; +#X connect 61 0 47 0; +#X connect 62 0 44 0; +#X connect 63 0 47 0; +#X connect 64 0 13 0; +#X connect 65 0 13 0; +#X connect 66 0 65 0; +#X connect 66 0 34 0; +#X connect 67 0 64 0; +#X connect 67 0 33 0; +#X connect 68 0 66 1; +#X connect 68 0 67 1; +#X connect 68 1 66 2; +#X connect 68 1 67 2; +#X connect 68 2 66 3; +#X connect 68 2 67 3; +#X connect 68 3 66 4; +#X connect 68 3 67 4; +#X connect 68 4 66 5; +#X connect 68 4 67 5; +#X connect 68 5 66 6; +#X connect 68 5 67 6; +#X connect 68 6 66 7; +#X connect 68 6 67 7; +#X connect 68 7 40 0; +#X connect 68 7 66 8; +#X connect 68 7 67 8; +#X connect 68 8 66 9; +#X connect 68 8 67 9; +#X connect 68 9 66 10; +#X connect 68 9 67 10; +#X connect 68 10 66 11; +#X connect 68 10 67 11; +#X connect 68 11 11 1; +#X connect 68 11 6 1; +#X connect 68 11 29 0; +#X connect 68 11 66 12; +#X connect 68 11 67 12; +#X connect 68 11 67 13; +#X connect 68 12 4 0; +#X connect 68 12 8 1; +#X connect 68 12 22 0; +#X connect 68 13 66 16; +#X connect 68 13 67 14; +#X connect 68 14 28 0; +#X connect 68 15 66 17; +#X connect 68 15 67 15; +#X connect 68 16 66 18; +#X connect 68 16 67 16; +#X connect 68 17 41 0; +#X connect 68 17 44 0; +#X connect 68 18 67 18; +#X connect 68 18 66 20; +#X restore 108 273 pd make_note; +#N canvas 812 45 450 378 make_tsig 0; +#X obj 136 16 inlet; +#X obj 120 124 f; +#X obj 60 324 outlet; +#X obj 188 202 prepend tsig; +#X obj 97 151 + 90; +#X obj 188 232 prepend; +#X obj 188 264 s \$0-collate; +#X obj 32 171 s \$0-set_x_obj; +#X obj 176 66 s \$0-get_x_obj; +#X obj 136 35 t b a b; +#X obj 178 92 r \$0-x_obj; +#X msg 60 291 obj \$1 100 tsig \$2 \$3 \$4 \$6 \, connect 0 0 \$5 0 +\, connect 1 0 \$5 1; +#X obj 163 124 unpack f f f f f; +#X obj 140 181 pack f f f f f f; +#X connect 0 0 9 0; +#X connect 1 0 4 0; +#X connect 1 0 13 0; +#X connect 3 0 5 0; +#X connect 4 0 7 0; +#X connect 5 0 6 0; +#X connect 9 0 1 0; +#X connect 9 1 12 0; +#X connect 9 2 8 0; +#X connect 10 0 1 1; +#X connect 11 0 2 0; +#X connect 12 0 13 1; +#X connect 12 1 13 2; +#X connect 12 2 13 3; +#X connect 12 3 5 1; +#X connect 12 3 13 4; +#X connect 12 4 13 5; +#X connect 13 0 11 0; +#X connect 13 0 3 0; +#X restore 224 280 pd make_tsig; +#X text 77 24 score commands; +#N canvas 0 22 450 300 make_barline 0; +#X obj 131 27 inlet; +#X obj 115 122 f; +#X obj 92 149 + 90; +#X obj 183 220 prepend; +#X obj 183 240 s \$0-collate; +#X obj 27 169 s \$0-set_x_obj; +#X obj 165 101 r \$0-x_obj; +#X obj 183 200 prepend barline; +#X obj 158 122 unpack f f; +#X obj 130 175 pack f f f; +#X obj 68 279 outlet; +#X obj 131 50 t b a b; +#X obj 171 82 s \$0-get_x_obj; +#X msg 68 260 obj \$1 100 barline \$2 \, connect 0 0 \$3 0 \, connect +1 0 \$3 1; +#X obj 150 279 outlet; +#X obj 133 219 packel 2; +#X connect 0 0 11 0; +#X connect 1 0 2 0; +#X connect 1 0 9 0; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 6 0 1 1; +#X connect 7 0 3 0; +#X connect 8 0 9 1; +#X connect 8 1 9 2; +#X connect 8 1 3 1; +#X connect 9 0 7 0; +#X connect 9 0 13 0; +#X connect 9 0 15 0; +#X connect 11 0 1 0; +#X connect 11 1 8 0; +#X connect 11 2 12 0; +#X connect 13 0 10 0; +#X connect 15 0 14 0; +#X restore 198 260 pd make_barline; +#N canvas 0 22 450 300 make_rest 0; +#X obj 111 50 t b a b; +#X obj 150 70 s \$0-get_x_obj; +#X obj 111 31 inlet; +#X obj 126 90 r \$0-x_obj; +#X obj 44 128 + 73; +#X obj 111 109 f; +#X obj 19 169 s \$0-set_x_obj; +#X obj 111 169 pack f f f f f; +#X obj 131 128 unpack f f f f; +#X obj 62 265 outlet; +#X obj 330 216 print rest; +#X obj 330 197 spigot; +#X obj 363 178 r \$0-debug; +#X msg 62 234 obj \$1 100 rest \$2 \$3 \$4 \$5 \, connect 0 0 \$5 0 +\, connect 1 0 \$5 1; +#X connect 0 0 5 0; +#X connect 0 1 8 0; +#X connect 0 2 1 0; +#X connect 2 0 0 0; +#X connect 3 0 5 1; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X connect 5 0 7 0; +#X connect 7 0 13 0; +#X connect 7 0 11 0; +#X connect 8 0 7 1; +#X connect 8 1 7 2; +#X connect 8 2 7 3; +#X connect 8 3 7 4; +#X connect 11 0 10 0; +#X connect 12 0 11 1; +#X connect 13 0 9 0; +#X restore 166 237 pd make_rest; +#X obj 90 94 s \$0-debug; +#N canvas 0 22 464 422 make_chord 0; +#X msg 48 382 slavenote xoff rhythm pitch dur bt tie acc shfl proot +route; +#X text 113 367 1 2 3 4 5 6 7 8 9 10; +#X obj 89 67 inlet; +#X msg 116 119 xoff p proot bt shfl rhy dur tie n_obj; +#X obj 35 111 cup; +#X obj 35 130 * 30; +#X obj 35 149 + 180; +#X obj 89 86 t b a b; +#X obj 23 191 f; +#X obj 140 86 s \$0-get_x_obj; +#X obj 38 171 r \$0-x_obj; +#X msg 35 92 0; +#X obj 35 73 t b; +#X obj 35 54 inlet; +#X obj 67 293 outlet; +#X obj 94 142 unpack f f f f f f f f f f; +#X obj 67 243 pack f f f f f f f f 1 f f f s; +#X obj 246 177 makefilename g%d; +#X msg 67 262 obj \$1 \$2 slavenote \$3 \$4 \$5 \$6 \$7 \$8 \$9 \$10 +\$11 \$12 \$13 \, connect 0 0 \$12 0 \, connect 1 0 \$12 1; +#X connect 2 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 16 1; +#X connect 7 0 8 0; +#X connect 7 1 15 0; +#X connect 7 2 9 0; +#X connect 7 2 4 0; +#X connect 8 0 16 0; +#X connect 10 0 8 1; +#X connect 11 0 4 0; +#X connect 12 0 11 0; +#X connect 13 0 12 0; +#X connect 15 0 16 2; +#X connect 15 1 16 4; +#X connect 15 2 16 10; +#X connect 15 3 16 6; +#X connect 15 4 16 9; +#X connect 15 5 16 3; +#X connect 15 6 16 5; +#X connect 15 7 16 7; +#X connect 15 8 16 11; +#X connect 15 9 17 0; +#X connect 16 0 18 0; +#X connect 17 0 16 12; +#X connect 18 0 14 0; +#X restore 150 216 pd make_chord; +#N canvas 0 22 450 300 dynobj_positions 0; +#X text 32 26 This object keeps track of the number of abstractions +created in [pd \$0-voice].; +#X obj 246 128 f; +#X obj 246 153 s \$0-x_obj; +#X obj 246 65 r \$0-get_x_obj; +#X obj 278 92 r \$0-set_x_obj; +#X msg 147 74 10; +#X obj 38 69 inlet; +#X connect 1 0 2 0; +#X connect 3 0 1 0; +#X connect 4 0 1 1; +#X connect 5 0 1 1; +#X connect 6 0 5 0; +#X restore 382 63 pd dynobj_positions; +#N canvas 0 22 462 368 make_tempo 0; +#X obj 136 16 inlet; +#X obj 120 124 f; +#X obj 60 324 outlet; +#X obj 97 151 + 90; +#X obj 188 232 prepend; +#X obj 188 264 s \$0-collate; +#X obj 32 171 s \$0-set_x_obj; +#X obj 176 66 s \$0-get_x_obj; +#X obj 136 35 t b a b; +#X obj 178 92 r \$0-x_obj; +#X obj 163 124 unpack f f f f; +#X obj 140 181 pack f f f f f; +#X obj 188 202 prepend tempo; +#X msg 60 291 obj \$1 100 tempo \$2 \$3 \$4 \$5 \, connect 0 0 \$5 +0 \, connect 1 0 \$5 1; +#X connect 0 0 8 0; +#X connect 1 0 3 0; +#X connect 1 0 11 0; +#X connect 3 0 6 0; +#X connect 4 0 5 0; +#X connect 8 0 1 0; +#X connect 8 1 10 0; +#X connect 8 2 7 0; +#X connect 9 0 1 1; +#X connect 10 0 11 1; +#X connect 10 1 11 2; +#X connect 10 2 11 3; +#X connect 10 3 4 1; +#X connect 10 3 11 4; +#X connect 11 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 13 0 2 0; +#X restore 258 223 pd make_tempo; +#X obj 304 308 r \$0-debug; +#X obj 269 331 spigot; +#X obj 215 304 r pd-\$0-voice; +#X obj 268 350 print; +#X obj 147 338 r \$0-sendback; +#X obj 379 107 s \$0-bt; +#N canvas 206 149 450 300 debug 0; +#X obj 63 38 inlet; +#X obj 61 118 gemhead; +#X obj 155 57 inlet; +#X obj 154 83 unpack f f f; +#X obj 18 61 inlet; +#X msg 64 96 0; +#X obj 70 66 loadbang; +#X floatatom 192 120 5 0 0 0 - - -; +#X floatatom 21 116 5 0 0 0 - - -; +#X obj 71 183 translateXYZ 0 0 -1.2; +#X floatatom 15 85 5 0 0 0 - - -; +#X obj 71 203 rectangle 0.05 0.1; +#X obj 95 153 - 10; +#X obj 135 126 - 1.63; +#X connect 0 0 8 0; +#X connect 0 0 12 0; +#X connect 1 0 9 0; +#X connect 2 0 3 0; +#X connect 3 1 7 0; +#X connect 3 1 13 0; +#X connect 4 0 1 0; +#X connect 4 0 10 0; +#X connect 5 0 1 0; +#X connect 6 0 5 0; +#X connect 9 0 11 0; +#X connect 12 0 9 1; +#X connect 13 0 9 2; +#X restore 255 118 pd debug; +#X obj 324 351 outlet; +#X obj 429 106 s \$0-stem; +#X obj 376 175 outlet; +#X obj 77 60 route vis debug info reclock; +#X obj 312 87 route reset bt stem; +#X obj 118 154 s \$0-reclock; +#X obj 168 113 t b a; +#N canvas 0 22 546 426 make_dynamics 0; +#X obj 146 26 inlet; +#X obj 130 134 f; +#X obj 70 335 outlet; +#X obj 107 161 + 90; +#X obj 198 274 s \$0-collate; +#X obj 42 181 s \$0-set_x_obj; +#X obj 186 76 s \$0-get_x_obj; +#X obj 146 45 t b a b; +#X obj 188 102 r \$0-x_obj; +#X obj 172 150 unpack f f f f f f; +#X obj 150 191 pack f f f f f f f; +#X msg 70 301 obj \$1 100 dynamic \$2 \$3 \$4 \$5 \$6 \$7 \, connect +0 0 \$7 0 \, connect 1 0 \$7 1; +#X msg 199 246 \$7 dynamic \$1 \$2 \$3 \$4 \$5 \$6; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 1 0 10 0; +#X connect 3 0 5 0; +#X connect 7 0 1 0; +#X connect 7 1 9 0; +#X connect 7 2 6 0; +#X connect 8 0 1 1; +#X connect 9 0 10 1; +#X connect 9 1 10 2; +#X connect 9 2 10 3; +#X connect 9 3 10 4; +#X connect 9 4 10 5; +#X connect 9 5 10 6; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 2 0; +#X connect 12 0 4 0; +#X restore 313 258 pd make_dynamics; +#X obj 118 194 route note rest barline tsig chord tempo dyn; +#X connect 3 0 7 0; +#X connect 4 0 0 0; +#X connect 4 0 24 2; +#X connect 6 0 28 0; +#X connect 8 0 31 0; +#X connect 8 0 27 0; +#X connect 8 1 24 1; +#X connect 9 0 7 0; +#X connect 10 0 7 0; +#X connect 12 0 7 0; +#X connect 12 1 25 0; +#X connect 13 0 7 0; +#X connect 15 0 7 0; +#X connect 17 0 7 0; +#X connect 18 0 19 1; +#X connect 19 0 21 0; +#X connect 20 0 19 0; +#X connect 22 0 0 1; +#X connect 28 0 3 0; +#X connect 28 1 14 0; +#X connect 28 1 24 0; +#X connect 28 3 30 0; +#X connect 28 4 8 0; +#X connect 28 4 29 0; +#X connect 29 0 1 0; +#X connect 29 0 16 0; +#X connect 29 0 9 1; +#X connect 29 1 23 0; +#X connect 29 2 26 0; +#X connect 29 3 0 1; +#X connect 31 0 30 0; +#X connect 31 1 33 0; +#X connect 32 0 7 0; +#X connect 33 0 9 0; +#X connect 33 0 15 0; +#X connect 33 1 13 0; +#X connect 33 2 12 0; +#X connect 33 3 10 0; +#X connect 33 4 15 1; +#X connect 33 5 17 0; +#X connect 33 6 32 0; -- cgit v1.2.1