[PD] scores with datastructure

Sun Mar 26 15:42:13 CEST 2006

Hallo,
tristan chambers hat gesagt: // tristan chambers wrote:

> Hey Patco your patch sounds cool. I tried starting it though and every
> time I try loading score-template.pd before or after I load
> score-lib.pd Pd crashes (just exits unannounced). It did this in both
> Pd 0.39-0 and 0.38.4-extended. Am I loading it the wrong way or
> missing an external?

No, I get this, too, it's my fault. I think, it's because there is an
array definition ("staffs") in [struct beatgrid] that references
non-extisting structs ("staff"). Deleting that will fix the crash. You
can load Pd with "-noloadbang" to circumvent the crashing.

I attached an updated version, which now also lets you move the
bar-lines with the mouse. There is a strange bug as well in newer Pds:
The notes created after pressing the green bang will all be displayed
at position (0,0) on top of each other. However once you do a "Select
all" (Ctl-A) you will see the blue borders indicate the real position
of the notes and you will be able to fix the display by closing and
reopening [pd display]. I would love to see where this comes from? 

Ciao
-- 
 Frank Barknecht                 _ ______footils.org_ __goto10.org__
-------------- next part --------------
#N canvas 402 308 562 412 10;
#X text 29 82 notes;
#N canvas 11 344 557 364 bar 0;
#N canvas 346 286 470 320 beat 0;
#X obj 110 99 drawpolygon 0 1 0 0 0 28;
#X obj 109 49 struct beat float x;
#X restore 18 48 pd beat;
#N canvas 550 444 478 328 beatgrid 0;
#X text 79 154 invisible grid spaced "spacing" px apart;
#X obj 75 126 plot grid 0 0 0 0 0;
#X obj 75 62 struct beatgrid float x float y array grid beat;
#X restore 17 77 pd beatgrid;
#X restore 104 33 pd bar;
#N canvas 0 0 498 333 high_notes 0;
#N canvas 493 315 498 348 noire 0;
#X obj 85 8 struct noire-h float x float y;
#X obj 134 249 drawcurve 0 1 0 0 0 20;
#X obj 89 67 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X restore 6 154 pd noire;
#N canvas 21 316 498 348 blanche 0;
#X obj 85 8 struct blanche-h float x float y;
#X obj 115 120 drawcurve 0 1 0 0 0 20;
#X obj 90 73 filledcurve 999 0 1 0 0 4 -3 8 0 4 3;
#X restore 7 189 pd blanche;
#N canvas 94 383 494 344 croche 0;
#X obj 85 8 struct croche-h float x float y;
#X obj 134 249 drawcurve 0 1 0 0 0 20;
#X obj 89 67 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 105 117 filledcurve 0 1 1 0 21 0 18 -7 14;
#X restore 6 121 pd croche;
#N canvas 479 269 498 348 double-croche 0;
#X obj 85 8 struct double-croche-h float x float y;
#X obj 134 249 drawcurve 0 1 0 0 0 20;
#X obj 89 67 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 105 117 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 106 149 filledcurve 0 1 1 0 17 0 14 -7 10;
#X restore 6 88 pd double-croche;
#N canvas 427 217 522 372 triple-croche 0;
#X obj 85 8 struct triple-croche-h float x float y;
#X obj 134 249 drawcurve 0 1 0 0 0 20;
#X obj 89 67 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 105 117 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 106 149 filledcurve 0 1 1 0 17 0 14 -7 10;
#X obj 99 177 filledcurve 0 1 1 0 13 0 10 -7 6;
#X restore 5 60 pd triple-croche;
#N canvas 94 383 502 352 triple-croche-pointe 0;
#X obj 85 7 struct triple-croche-pointe-h float x float y;
#X obj 131 230 drawcurve 0 1 0 0 0 20;
#X obj 89 67 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 105 117 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 106 149 filledcurve 0 1 1 0 17 0 14 -7 10;
#X obj 99 177 filledcurve 0 1 1 0 13 0 10 -7 6;
#X obj 77 265 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 118 61 pd triple-croche-pointe;
#N canvas 94 383 498 348 double-croche-pointe 0;
#X obj 85 8 struct double-croche-pointe-h float x float y;
#X obj 128 215 drawcurve 0 1 0 0 0 20;
#X obj 86 52 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 102 102 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 103 134 filledcurve 0 1 1 0 17 0 14 -7 10;
#X obj 74 250 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 119 89 pd double-croche-pointe;
#N canvas 255 263 498 348 croche-pointe 0;
#X obj 85 8 struct croche-pointe-h float x float y;
#X obj 128 215 drawcurve 0 1 0 0 0 20;
#X obj 86 52 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 102 102 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 74 250 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 119 122 pd croche-pointe;
#N canvas 14 314 498 348 noire-pointe 0;
#X obj 85 8 struct noire-pointe-h float x float y;
#X obj 128 215 drawcurve 0 1 0 0 0 20;
#X obj 86 52 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 74 250 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 119 155 pd noire-pointe;
#N canvas 21 316 514 348 blanche-pointe 0;
#X obj 85 8 struct blanche-pointe-h float x float y;
#X obj 145 115 drawcurve 0 1 0 0 0 20;
#X obj 120 68 filledcurve 999 0 1 0 0 4 -3 8 0 4 3;
#X obj 79 165 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 120 190 pd blanche-pointe;
#N canvas 94 383 514 364 triple-croche-double-point 0;
#X obj 131 230 drawcurve 0 1 0 0 0 20;
#X obj 89 67 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 105 117 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 106 149 filledcurve 0 1 1 0 17 0 14 -7 10;
#X obj 99 177 filledcurve 0 1 1 0 13 0 10 -7 6;
#X obj 67 256 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X obj 67 281 filledcurve 0 0 1 15 0 16 -1 17 0 16 2;
#X obj 85 7 struct triple-croche-double-point-h float x float y;
#X restore 273 60 pd triple-croche-double-point;
#N canvas 94 383 502 352 double-croche-double-point 0;
#X obj 128 215 drawcurve 0 1 0 0 0 20;
#X obj 86 52 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 102 102 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 103 134 filledcurve 0 1 1 0 17 0 14 -7 10;
#X obj 74 250 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X obj 67 281 filledcurve 0 0 1 15 0 16 -1 17 0 16 2;
#X obj 85 8 struct double-croche-double-point-h float x float y;
#X restore 275 88 pd double-croche-double-point;
#N canvas 255 263 502 352 croche-double-point 0;
#X obj 128 215 drawcurve 0 1 0 0 0 20;
#X obj 86 52 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 102 102 filledcurve 0 1 1 0 21 0 18 -7 14;
#X obj 74 250 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X obj 67 281 filledcurve 0 0 1 15 0 16 -1 17 0 16 2;
#X obj 85 8 struct croche-double-point-h float x float y;
#X restore 273 121 pd croche-double-point;
#N canvas 14 314 502 352 noire-double-point 0;
#X obj 128 215 drawcurve 0 1 0 0 0 20;
#X obj 86 52 filledcurve 0 1 3 0 0 3 -3 6 0 4 2;
#X obj 74 250 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X obj 67 281 filledcurve 0 0 1 15 0 16 -1 17 0 16 2;
#X obj 85 8 struct noire-double-point-h float x float y;
#X restore 275 154 pd noire-double-point;
#N canvas 21 316 518 352 blanche-double-point 0;
#X obj 145 115 drawcurve 0 1 0 0 0 20;
#X obj 120 68 filledcurve 999 0 1 0 0 4 -3 8 0 4 3;
#X obj 79 165 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X obj 67 281 filledcurve 0 0 1 15 0 16 -1 17 0 16 2;
#X obj 85 8 struct blanche-double-point-h float x float y;
#X restore 276 189 pd blanche-double-point;
#X restore 24 119 pd high_notes;
#N canvas 0 0 530 380 low_notes 0;
#N canvas 493 315 490 340 noire 0;
#X obj 85 8 struct noire float x float y;
#X obj 134 248 drawcurve 0 1 0 0 0 -23;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X restore 30 198 pd noire;
#N canvas 21 316 551 340 blanche 0;
#X obj 85 8 struct blanche float x float y;
#X obj 77 141 drawcurve 0 1 0 0 0 -23;
#X obj 84 104 filledcurve 999 0 1 0 0 -4 -3 -8 0 -4 3;
#X restore 31 233 pd blanche;
#N canvas 94 383 494 344 croche 0;
#X obj 85 8 struct croche float x float y;
#X obj 134 248 drawcurve 0 1 0 0 0 -23;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X restore 30 165 pd croche;
#N canvas 472 224 502 352 double-croche 0;
#X obj 85 8 struct double-croche float x float y;
#X obj 134 248 drawcurve 0 1 0 0 0 -23;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 95 143 filledcurve 0 1 1 0 -19 0 -16 7 -12;
#X restore 30 132 pd double-croche;
#N canvas 461 270 534 384 triple-croche 0;
#X obj 85 8 struct triple-croche float x float y;
#X obj 134 248 drawcurve 0 1 0 0 0 -23;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 95 143 filledcurve 0 1 1 0 -19 0 -16 7 -12;
#X obj 84 172 filledcurve 0 1 1 0 -15 0 -12 7 -8;
#X restore 29 104 pd triple-croche;
#N canvas 94 383 506 356 triple-croche-pointe 0;
#X obj 85 8 struct triple-croche-pointe float x float y;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 95 143 filledcurve 0 1 1 0 -19 0 -16 7 -12;
#X obj 84 172 filledcurve 0 1 1 0 -15 0 -12 7 -8;
#X obj 124 209 drawcurve 0 1 0 0 0 -23;
#X obj 72 247 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X restore 166 103 pd triple-croche-pointe;
#N canvas 308 302 506 356 double-croche-pointe 0;
#X obj 85 8 struct double-croche-pointe float x float y;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 95 143 filledcurve 0 1 1 0 -19 0 -16 7 -12;
#X obj 124 209 drawcurve 0 1 0 0 0 -23;
#X obj 72 247 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X restore 167 131 pd double-croche-pointe;
#N canvas 480 326 498 348 croche-pointe 0;
#X obj 85 8 struct croche-pointe float x float y;
#X obj 105 62 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 96 109 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 135 204 drawcurve 0 1 0 0 0 -23;
#X obj 83 242 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X restore 167 164 pd croche-pointe;
#N canvas 36 319 494 344 noire-pointe 0;
#X obj 85 8 struct noire-pointe float x float y;
#X obj 105 62 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 135 204 drawcurve 0 1 0 0 0 -23;
#X obj 83 242 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X restore 167 197 pd noire-pointe;
#N canvas 21 316 514 364 blanche-pointe 0;
#X obj 85 8 struct blanche-pointe float x float y;
#X obj 83 110 drawcurve 0 1 0 0 0 -23;
#X obj 90 73 filledcurve 999 0 1 0 0 -4 -3 -8 0 -4 3;
#X obj 72 142 filledcurve 0 0 1 2 0 4 -1 5 0 4 2;
#X restore 168 232 pd blanche-pointe;
#N canvas 21 316 498 348 ronde 0;
#X obj 85 8 struct ronde float x float y;
#X obj 65 79 filledcurve 999 0 1 0 0 -4 -3 -8 0 -4 3;
#X restore 26 266 pd ronde;
#N canvas 20 336 506 356 ronde-pointe 0;
#X obj 82 8 struct ronde-pointe float x float y;
#X obj 65 79 filledcurve 999 0 1 0 0 -4 -3 -8 0 -4 3;
#X obj 72 188 filledcurve 0 0 1 2 0 4 -1 5 0 4 2;
#X restore 163 264 pd ronde-pointe;
#N canvas 94 383 514 364 triple-croche-double-point 0;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 95 143 filledcurve 0 1 1 0 -19 0 -16 7 -12;
#X obj 84 172 filledcurve 0 1 1 0 -15 0 -12 7 -8;
#X obj 124 209 drawcurve 0 1 0 0 0 -23;
#X obj 72 247 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X obj 85 8 struct triple-croche-double-point float x float y;
#X obj 67 281 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 328 98 pd triple-croche-double-point;
#N canvas 480 326 510 360 croche-double-point 0;
#X obj 105 62 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 96 109 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 135 204 drawcurve 0 1 0 0 0 -23;
#X obj 83 242 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X obj 85 8 struct croche-double-point float x float y;
#X obj 67 277 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 329 159 pd croche-double-point;
#N canvas 308 302 518 368 double-croche-double-point 0;
#X obj 94 67 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 85 114 filledcurve 0 1 1 0 -23 0 -20 7 -16;
#X obj 95 143 filledcurve 0 1 1 0 -19 0 -16 7 -12;
#X obj 124 209 drawcurve 0 1 0 0 0 -23;
#X obj 72 247 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X obj 85 8 struct double-croche-double-point float x float y;
#X obj 68 302 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 329 126 pd double-croche-double-point;
#N canvas 36 319 510 360 noire-double-point 0;
#X obj 105 62 filledcurve 0 1 3 0 0 -3 -3 -6 0 -4 2;
#X obj 135 204 drawcurve 0 1 0 0 0 -23;
#X obj 83 242 filledcurve 0 0 1 3 0 4 -1 5 0 4 2;
#X obj 85 8 struct noire-double-point float x float y;
#X obj 79 316 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 329 192 pd noire-double-point;
#N canvas 21 316 522 372 blanche-double-point 0;
#X obj 83 110 drawcurve 0 1 0 0 0 -23;
#X obj 90 73 filledcurve 999 0 1 0 0 -4 -3 -8 0 -4 3;
#X obj 72 142 filledcurve 0 0 1 2 0 4 -1 5 0 4 2;
#X obj 85 8 struct blanche-double-point float x float y;
#X obj 53 193 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 330 227 pd blanche-double-point;
#N canvas 20 336 514 364 ronde-double-point 0;
#X obj 65 79 filledcurve 999 0 1 0 0 -4 -3 -8 0 -4 3;
#X obj 72 188 filledcurve 0 0 1 2 0 4 -1 5 0 4 2;
#X obj 82 8 struct ronde-double-point float x float y;
#X obj 59 230 filledcurve 0 0 1 9 0 10 -1 11 0 10 2;
#X restore 325 259 pd ronde-double-point;
#X restore 24 149 pd low_notes;
#N canvas 0 0 466 316 keys 0;
#N canvas 0 0 552 316 g-key 0;
#X obj 52 24 struct g-key float x float y;
#X obj 7 82 drawcurve 0 2 0 0 -1 -2 5 -5 5 5 -5 5 0 -8 5 -15 0 -25
-2 -5 3 0 3 20 -7 15 -3 10;
#X text 72 152 feel free to make a better drawing!;
#X restore 77 65 pd g-key;
#X restore 170 34 pd keys;
#N canvas 0 0 462 312 silences 0;
#X obj 91 61 struct demi-soupir float x float y;
#X obj 99 116 drawcurve 0 2 0 0 3 2 15 0 3 7 3 20;
#X restore 163 118 pd silences;
#X text 29 7 staff;
#N canvas 0 0 478 328 staff 0;
#X obj 70 33 struct lines float x float y float length;
#X obj 75 76 drawcurve 0 1 0 0 length 0;
#X obj 74 104 drawcurve 0 1 0 7 length 7;
#X obj 72 136 drawcurve 0 1 0 14 length 14;
#X obj 73 168 drawcurve 0 1 0 21 length 21;
#X obj 75 200 drawcurve 0 1 0 28 length 28;
#X restore 27 33 pd staff;
-------------- next part --------------
#N canvas 0 0 467 398 10;
#N canvas 468 15 560 344 display 1;
#X restore 323 310 pd display;
#X obj 179 5 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
;
#X obj 227 310 score-lib;
#X msg 221 20 clear;
#X obj 224 45 s pd-display;
#N canvas 59 125 912 526 draw-notes 0;
#X obj 252 6 inlet;
#N canvas 0 0 969 554 low-notes 0;
#X obj 109 10 inlet;
#X msg 570 323 traverse pd-display \, bang;
#X obj 575 350 pointer;
#X obj 493 382 append noire x y;
#X msg 650 226 traverse pd-display \, bang;
#X obj 655 253 pointer;
#X obj 573 285 append blanche x y;
#X msg 376 214 traverse pd-display \, bang;
#X obj 381 241 pointer;
#X obj 299 273 append croche x y;
#X msg 239 312 traverse pd-display \, bang;
#X obj 244 339 pointer;
#X obj 162 371 append double-croche x y;
#X msg 128 147 traverse pd-display \, bang;
#X obj 133 174 pointer;
#X obj 51 206 append triple-croche x y;
#X msg 51 147 10;
#X msg 718 116 traverse pd-display \, bang;
#X obj 723 143 pointer;
#X obj 641 175 append ronde x y;
#X obj 253 34 t a;
#X obj 650 81 t b a b;
#X obj 582 191 t b a b;
#X obj 498 285 t b a b;
#X obj 306 184 t b a b;
#X obj 169 282 t b a b;
#X obj 58 117 t b a b;
#X msg 162 312 40;
#X msg 298 214 70;
#X msg 492 323 100;
#X msg 573 226 130;
#X msg 641 116 160;
#X connect 0 0 20 0;
#X connect 1 0 2 0;
#X connect 2 0 3 2;
#X connect 4 0 5 0;
#X connect 5 0 6 2;
#X connect 7 0 8 0;
#X connect 8 0 9 2;
#X connect 10 0 11 0;
#X connect 11 0 12 2;
#X connect 13 0 14 0;
#X connect 14 0 15 2;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 2;
#X connect 20 0 21 0;
#X connect 20 0 22 0;
#X connect 20 0 23 0;
#X connect 20 0 24 0;
#X connect 20 0 25 0;
#X connect 20 0 26 0;
#X connect 21 0 31 0;
#X connect 21 1 19 1;
#X connect 21 2 17 0;
#X connect 22 0 30 0;
#X connect 22 1 6 1;
#X connect 22 2 4 0;
#X connect 23 0 29 0;
#X connect 23 1 3 1;
#X connect 23 2 1 0;
#X connect 24 0 28 0;
#X connect 24 1 9 1;
#X connect 24 2 7 0;
#X connect 25 0 27 0;
#X connect 25 1 12 1;
#X connect 25 2 10 0;
#X connect 26 0 16 0;
#X connect 26 1 15 1;
#X connect 26 2 13 0;
#X connect 27 0 12 0;
#X connect 28 0 9 0;
#X connect 29 0 3 0;
#X connect 30 0 6 0;
#X connect 31 0 19 0;
#X restore 142 179 pd low-notes;
#N canvas 0 0 885 524 high-notes 0;
#X obj 109 10 inlet;
#X msg 570 323 traverse pd-display \, bang;
#X obj 575 350 pointer;
#X msg 650 226 traverse pd-display \, bang;
#X obj 655 253 pointer;
#X msg 376 214 traverse pd-display \, bang;
#X obj 381 241 pointer;
#X msg 239 312 traverse pd-display \, bang;
#X obj 244 339 pointer;
#X msg 128 147 traverse pd-display \, bang;
#X obj 133 174 pointer;
#X msg 51 147 10;
#X obj 51 206 append triple-croche-h x y;
#X obj 299 273 append croche-h x y;
#X obj 162 371 append double-croche-h x y;
#X obj 573 285 append blanche-h x y;
#X obj 493 382 append noire-h x y;
#X obj 582 191 t b a b;
#X obj 498 285 t b a b;
#X obj 306 184 t b a b;
#X obj 169 282 t b a b;
#X obj 58 118 t b a b;
#X obj 253 34 t a;
#X msg 162 312 40;
#X msg 299 214 70;
#X msg 492 323 100;
#X msg 573 226 130;
#X connect 0 0 22 0;
#X connect 1 0 2 0;
#X connect 2 0 16 2;
#X connect 3 0 4 0;
#X connect 4 0 15 2;
#X connect 5 0 6 0;
#X connect 6 0 13 2;
#X connect 7 0 8 0;
#X connect 8 0 14 2;
#X connect 9 0 10 0;
#X connect 10 0 12 2;
#X connect 11 0 12 0;
#X connect 17 0 26 0;
#X connect 17 1 15 1;
#X connect 17 2 3 0;
#X connect 18 0 25 0;
#X connect 18 1 16 1;
#X connect 18 2 1 0;
#X connect 19 0 24 0;
#X connect 19 1 13 1;
#X connect 19 2 5 0;
#X connect 20 0 23 0;
#X connect 20 1 14 1;
#X connect 20 2 7 0;
#X connect 21 0 11 0;
#X connect 21 1 12 1;
#X connect 21 2 9 0;
#X connect 22 0 17 0;
#X connect 22 0 18 0;
#X connect 22 0 19 0;
#X connect 22 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 14 0;
#X connect 24 0 13 0;
#X connect 25 0 16 0;
#X connect 26 0 15 0;
#X restore 193 277 pd high-notes;
#N canvas 59 125 884 498 low-notes-pointe 0;
#X obj 252 6 inlet;
#X msg 570 323 traverse pd-display \, bang;
#X obj 575 350 pointer;
#X msg 650 226 traverse pd-display \, bang;
#X obj 655 253 pointer;
#X msg 376 214 traverse pd-display \, bang;
#X obj 381 241 pointer;
#X msg 239 312 traverse pd-display \, bang;
#X obj 244 339 pointer;
#X msg 128 147 traverse pd-display \, bang;
#X obj 133 174 pointer;
#X msg 51 147 10;
#X obj 51 206 append triple-croche-pointe x y;
#X obj 161 371 append double-croche-pointe x y;
#X obj 299 273 append croche-pointe x y;
#X obj 572 285 append blanche-pointe x y;
#X obj 493 382 append noire-pointe x y;
#X msg 654 89 traverse pd-display \, bang;
#X obj 659 116 pointer;
#X obj 576 148 append ronde-pointe x y;
#X obj 253 34 t a;
#X obj 580 40 t b a b;
#X obj 582 191 t b a b;
#X obj 498 285 t b a b;
#X obj 169 282 t b a b;
#X obj 306 184 t b a b;
#X obj 58 117 t b a b;
#X msg 162 312 40;
#X msg 299 214 70;
#X msg 493 323 100;
#X msg 573 226 130;
#X msg 577 89 160;
#X connect 0 0 20 0;
#X connect 1 0 2 0;
#X connect 2 0 16 2;
#X connect 3 0 4 0;
#X connect 4 0 15 2;
#X connect 5 0 6 0;
#X connect 6 0 14 2;
#X connect 7 0 8 0;
#X connect 8 0 13 2;
#X connect 9 0 10 0;
#X connect 10 0 12 2;
#X connect 11 0 12 0;
#X connect 17 0 18 0;
#X connect 18 0 19 2;
#X connect 20 0 21 0;
#X connect 20 0 22 0;
#X connect 20 0 23 0;
#X connect 20 0 24 0;
#X connect 20 0 25 0;
#X connect 20 0 26 0;
#X connect 21 0 31 0;
#X connect 21 1 19 1;
#X connect 21 2 17 0;
#X connect 22 0 30 0;
#X connect 22 1 15 1;
#X connect 22 2 3 0;
#X connect 23 0 29 0;
#X connect 23 1 16 1;
#X connect 23 2 1 0;
#X connect 24 0 27 0;
#X connect 24 1 13 1;
#X connect 24 2 7 0;
#X connect 25 0 28 0;
#X connect 25 1 14 1;
#X connect 25 2 5 0;
#X connect 26 0 11 0;
#X connect 26 1 12 1;
#X connect 26 2 9 0;
#X connect 27 0 13 0;
#X connect 28 0 14 0;
#X connect 29 0 16 0;
#X connect 30 0 15 0;
#X connect 31 0 19 0;
#X restore 235 238 pd low-notes-pointe;
#N canvas 59 125 892 506 high-notes-pointe 0;
#X obj 252 6 inlet;
#X msg 570 323 traverse pd-display \, bang;
#X obj 575 350 pointer;
#X msg 650 226 traverse pd-display \, bang;
#X obj 655 253 pointer;
#X msg 376 214 traverse pd-display \, bang;
#X obj 381 241 pointer;
#X msg 239 312 traverse pd-display \, bang;
#X obj 244 339 pointer;
#X msg 128 147 traverse pd-display \, bang;
#X obj 133 174 pointer;
#X msg 51 147 10;
#X obj 48 206 append triple-croche-pointe-h x y;
#X obj 299 273 append croche-pointe-h x y;
#X obj 161 371 append double-croche-pointe-h x y;
#X obj 493 382 append noire-pointe-h x y;
#X obj 572 285 append blanche-pointe-h x y;
#X obj 582 191 t b a b;
#X obj 253 34 t a;
#X obj 498 285 t b a b;
#X obj 306 184 t b a b;
#X obj 169 282 t b a b;
#X obj 58 115 t b a b;
#X msg 162 312 40;
#X msg 299 214 70;
#X msg 493 323 100;
#X msg 573 226 130;
#X connect 0 0 18 0;
#X connect 1 0 2 0;
#X connect 2 0 15 2;
#X connect 3 0 4 0;
#X connect 4 0 16 2;
#X connect 5 0 6 0;
#X connect 6 0 13 2;
#X connect 7 0 8 0;
#X connect 8 0 14 2;
#X connect 9 0 10 0;
#X connect 10 0 12 2;
#X connect 11 0 12 0;
#X connect 17 0 26 0;
#X connect 17 1 16 1;
#X connect 17 2 3 0;
#X connect 18 0 17 0;
#X connect 18 0 19 0;
#X connect 18 0 20 0;
#X connect 18 0 21 0;
#X connect 18 0 22 0;
#X connect 19 0 25 0;
#X connect 19 1 15 1;
#X connect 19 2 1 0;
#X connect 20 0 24 0;
#X connect 20 1 13 1;
#X connect 20 2 5 0;
#X connect 21 0 23 0;
#X connect 21 1 14 1;
#X connect 21 2 7 0;
#X connect 22 0 11 0;
#X connect 22 1 12 1;
#X connect 22 2 9 0;
#X connect 23 0 14 0;
#X connect 24 0 13 0;
#X connect 25 0 15 0;
#X connect 26 0 16 0;
#X restore 258 210 pd high-notes-pointe;
#X msg 176 154 100;
#X msg 226 214 200;
#X msg 196 251 120;
#X msg 258 183 220;
#N canvas 59 125 896 510 low-notes-pointe 0;
#X obj 252 6 inlet;
#X msg 570 323 traverse pd-display \, bang;
#X obj 575 350 pointer;
#X msg 650 226 traverse pd-display \, bang;
#X obj 655 253 pointer;
#X msg 376 214 traverse pd-display \, bang;
#X obj 381 241 pointer;
#X msg 239 312 traverse pd-display \, bang;
#X obj 244 339 pointer;
#X msg 128 147 traverse pd-display \, bang;
#X obj 133 174 pointer;
#X msg 51 147 10;
#X msg 654 89 traverse pd-display \, bang;
#X obj 659 116 pointer;
#X obj 253 34 t a;
#X obj 580 40 t b a b;
#X obj 582 191 t b a b;
#X obj 498 285 t b a b;
#X obj 169 282 t b a b;
#X obj 306 184 t b a b;
#X obj 58 117 t b a b;
#X obj 51 206 append triple-croche-double-point x y;
#X obj 161 371 append double-croche-double-point x y;
#X obj 299 273 append croche-double-point x y;
#X obj 493 382 append noire-double-point x y;
#X obj 572 285 append blanche-double-point x y;
#X obj 576 148 append ronde-double-point x y;
#X msg 162 312 40;
#X msg 298 214 70;
#X msg 493 323 100;
#X msg 573 226 130;
#X msg 577 89 160;
#X connect 0 0 14 0;
#X connect 1 0 2 0;
#X connect 2 0 24 2;
#X connect 3 0 4 0;
#X connect 4 0 25 2;
#X connect 5 0 6 0;
#X connect 6 0 23 2;
#X connect 7 0 8 0;
#X connect 8 0 22 2;
#X connect 9 0 10 0;
#X connect 10 0 21 2;
#X connect 11 0 21 0;
#X connect 12 0 13 0;
#X connect 13 0 26 2;
#X connect 14 0 15 0;
#X connect 14 0 16 0;
#X connect 14 0 17 0;
#X connect 14 0 18 0;
#X connect 14 0 19 0;
#X connect 14 0 20 0;
#X connect 15 0 31 0;
#X connect 15 1 26 1;
#X connect 15 2 12 0;
#X connect 16 0 30 0;
#X connect 16 1 25 1;
#X connect 16 2 3 0;
#X connect 17 0 29 0;
#X connect 17 1 24 1;
#X connect 17 2 1 0;
#X connect 18 0 27 0;
#X connect 18 1 22 1;
#X connect 18 2 7 0;
#X connect 19 0 28 0;
#X connect 19 1 23 1;
#X connect 19 2 5 0;
#X connect 20 0 11 0;
#X connect 20 1 21 1;
#X connect 20 2 9 0;
#X connect 27 0 22 0;
#X connect 28 0 23 0;
#X connect 29 0 24 0;
#X connect 30 0 25 0;
#X connect 31 0 26 0;
#X restore 290 180 pd low-notes-pointe;
#N canvas 59 125 908 522 high-notes-pointe 0;
#X obj 252 6 inlet;
#X msg 570 323 traverse pd-display \, bang;
#X obj 575 350 pointer;
#X msg 650 226 traverse pd-display \, bang;
#X obj 655 253 pointer;
#X msg 376 214 traverse pd-display \, bang;
#X obj 381 241 pointer;
#X msg 239 312 traverse pd-display \, bang;
#X obj 244 339 pointer;
#X msg 128 147 traverse pd-display \, bang;
#X obj 133 174 pointer;
#X msg 51 147 10;
#X obj 582 191 t b a b;
#X obj 253 34 t a;
#X obj 498 285 t b a b;
#X obj 306 184 t b a b;
#X obj 169 282 t b a b;
#X obj 58 115 t b a b;
#X obj 48 206 append triple-croche-double-point-h x y;
#X obj 161 371 append double-croche-double-point-h x y;
#X obj 299 273 append croche-double-point-h x y;
#X obj 493 382 append noire-double-point-h x y;
#X obj 572 285 append blanche-double-point-h x y;
#X msg 158 312 40;
#X msg 299 214 70;
#X msg 493 323 100;
#X msg 573 224 130;
#X connect 0 0 13 0;
#X connect 1 0 2 0;
#X connect 2 0 21 2;
#X connect 3 0 4 0;
#X connect 4 0 22 2;
#X connect 5 0 6 0;
#X connect 6 0 20 2;
#X connect 7 0 8 0;
#X connect 8 0 19 2;
#X connect 9 0 10 0;
#X connect 10 0 18 2;
#X connect 11 0 18 0;
#X connect 12 0 26 0;
#X connect 12 1 22 1;
#X connect 12 2 3 0;
#X connect 13 0 12 0;
#X connect 13 0 14 0;
#X connect 13 0 15 0;
#X connect 13 0 16 0;
#X connect 13 0 17 0;
#X connect 14 0 25 0;
#X connect 14 1 21 1;
#X connect 14 2 1 0;
#X connect 15 0 24 0;
#X connect 15 1 20 1;
#X connect 15 2 5 0;
#X connect 16 0 23 0;
#X connect 16 1 19 1;
#X connect 16 2 7 0;
#X connect 17 0 11 0;
#X connect 17 1 18 1;
#X connect 17 2 9 0;
#X connect 23 0 19 0;
#X connect 24 0 20 0;
#X connect 25 0 21 0;
#X connect 26 0 22 0;
#X restore 318 130 pd high-notes-pointe;
#X msg 292 153 300;
#X msg 318 103 320;
#X obj 251 33 t b b b b b b;
#X connect 0 0 13 0;
#X connect 5 0 1 0;
#X connect 6 0 3 0;
#X connect 7 0 2 0;
#X connect 8 0 4 0;
#X connect 11 0 9 0;
#X connect 12 0 10 0;
#X connect 13 0 5 0;
#X connect 13 1 7 0;
#X connect 13 2 6 0;
#X connect 13 3 8 0;
#X connect 13 4 11 0;
#X connect 13 5 12 0;
#X restore 140 69 pd draw-notes;
#N canvas 59 125 900 514 draw-key 0;
#X obj 252 6 inlet;
#X msg 315 79 traverse pd-display \, bang;
#X obj 320 106 pointer;
#X obj 246 46 t b b b;
#X obj 238 136 append g-key x y;
#X msg 249 79 20;
#X msg 281 80 31;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 4 2;
#X connect 3 0 5 0;
#X connect 3 1 6 0;
#X connect 3 2 1 0;
#X connect 5 0 4 0;
#X connect 6 0 4 1;
#X restore 104 91 pd draw-key;
#N canvas 133 162 944 558 draw-staff 0;
#X obj 252 6 inlet;
#X msg 655 188 traverse pd-display \, bang;
#X obj 655 211 pointer;
#X obj 414 257 pointer;
#X obj 129 338 setsize beatgrid grid;
#X floatatom 113 290 5 0 0 0 - - -;
#X msg 359 204 traverse pd-display \, bang;
#X obj 564 247 append lines x y length;
#X text 64 194 draw the bar lines;
#X text 631 127 draw the staff lines;
#X obj 266 66 t a a;
#X msg 566 159 10 10 \$1;
#X obj 566 126 t a b;
#X obj 234 129 t a a b b;
#X msg 156 228 \$2;
#X obj 211 234 /;
#X obj 112 265 + 1;
#X obj 233 298 append beatgrid x y;
#X msg 232 277 10 10;
#X obj 127 479 element beatgrid grid;
#X obj 61 508 set beat x;
#X obj 50 386 f 0;
#X obj 75 385 + 1;
#X obj 62 311 t a b a;
#X msg 72 360 0;
#X obj 39 346 until;
#X obj 58 469 *;
#X obj 55 442 t f f;
#X text 291 263 x y pos;
#X connect 0 0 10 0;
#X connect 1 0 2 0;
#X connect 2 0 7 3;
#X connect 3 0 17 2;
#X connect 6 0 3 0;
#X connect 10 0 13 0;
#X connect 10 1 12 0;
#X connect 11 0 7 0;
#X connect 12 0 11 0;
#X connect 12 1 1 0;
#X connect 13 0 14 0;
#X connect 13 1 15 0;
#X connect 13 2 18 0;
#X connect 13 3 6 0;
#X connect 14 0 16 0;
#X connect 15 0 26 1;
#X connect 16 0 5 0;
#X connect 16 0 23 0;
#X connect 17 0 4 1;
#X connect 17 0 19 1;
#X connect 18 0 17 0;
#X connect 19 0 20 1;
#X connect 21 0 22 0;
#X connect 21 0 27 0;
#X connect 22 0 21 1;
#X connect 23 0 25 0;
#X connect 23 1 24 0;
#X connect 23 2 4 0;
#X connect 24 0 21 1;
#X connect 25 0 21 0;
#X connect 26 0 20 0;
#X connect 27 0 26 0;
#X connect 27 1 19 0;
#X restore 55 169 pd draw-staff;
#X text 47 273 megalegoland at yahoo.fr;
#X text 33 319 thank in advance.;
#X text 69 331 Patco.;
#X obj 108 4 loadbang;
#X msg 52 137 500 4;
#X text 105 138 staff length \, nbr of bars;
#X text 22 229 if you have some draws to share or tricks for editing
scores with datastructures \, please do:;
#X obj 109 27 t b b b b b;
#X connect 1 0 15 0;
#X connect 3 0 4 0;
#X connect 11 0 15 0;
#X connect 12 0 7 0;
#X connect 15 1 6 0;
#X connect 15 2 5 0;
#X connect 15 3 12 0;
#X connect 15 4 3 0;