Commit dac7f843 authored by Roman Haefeli's avatar Roman Haefeli
Browse files

work some more on using converters

parent 4fb631bc
......@@ -1375,8 +1375,8 @@ symbol param;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 7 75 pd pitch->y;
#X msg 7 44 \$3;
#X restore 7 95 pd pitch->y;
#X msg 7 57 \$3;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
......@@ -2008,57 +2008,18 @@ to the note (or prints a 'not found' error);
#X connect 14 0 11 1;
#X connect 15 0 11 0;
#X restore 23 290 pd note.change.duration;
#N canvas 202 202 535 609 note.change.velocity 0;
#N canvas 123 264 421 490 note.change.velocity 0;
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#N canvas 126 411 388 279 resolve.note 0;
#X obj 39 95 r \$0.resolve.note.receive;
#X obj 39 72 s \$0.resolve.note.send;
#X obj 20 224 pointer;
#X obj 20 17 inlet;
#X obj 20 46 t b a b;
#X obj 20 174 f;
#X obj 20 197 sel 1;
#X obj 39 118 t b p;
#X msg 39 142 1;
#X msg 107 141 0;
#X obj 20 247 outlet;
#X connect 0 0 7 0;
#X connect 2 0 10 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 1 0;
#X connect 4 2 9 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 7 1 2 1;
#X connect 8 0 5 1;
#X connect 9 0 5 1;
#X restore 51 169 pd resolve.note;
#X obj 51 197 t p p;
#X obj 156 225 t p p, f 19;
#X obj 6 54 route change;
#X obj 6 100 t a a;
#X msg 6 162 \$3;
#X msg 51 143 \$1 \$2;
#X msg 51 123 \$1 \$2;
#X obj 6 317 pack f f;
#X msg 6 351 \$2 \$1;
#X obj 6 77 route velocity;
#X obj 6 417 s \$0.velocity;
#N canvas 645 450 401 207 get.gid.clr 0;
#X obj 11 15 inlet;
#X obj 30 74 s \$0.gid2lr.get;
#X obj 30 98 r \$0.gid2lr.set;
#X obj 11 42 t b a b;
#X obj 11 131 list append;
#X obj 11 154 outlet;
#X connect 0 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 3 1 1 0;
#X connect 3 2 4 1;
#X connect 4 0 5 0;
#X restore 141 345 pd get.gid.clr;
#N canvas 320 203 446 363 clr.* 0;
#X obj 28 62 t a a a;
#X obj 28 112 div 100;
......@@ -2109,35 +2070,77 @@ to the note (or prints a 'not found' error);
#X connect 21 0 0 0;
#X restore 141 379 pd clr.*;
#X obj 187 318 / 113;
#X obj 51 224 get \$0.note id gid;
#X obj 92 416 set \$0.note vel c;
#X obj 6 261 t a a a;
#X obj 141 317 f;
#X obj 141 291 t b a;
#N canvas 83 99 410 208 step|pitch->id 0;
#X obj 40 63 s \$0.convert.step|pitch->id.get;
#X obj 40 86 r \$0.convert.step|pitch->id;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X connect 1 0 4 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 51 152 pd step|pitch->id;
#X obj 51 175 t a a;
#X obj 156 252 get \$0.note gid;
#N canvas 83 99 410 208 id->pointer 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.id->pointer.get;
#X obj 40 86 r \$0.convert.id->pointer;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 3 0 15 0;
#X connect 3 1 16 2;
#X connect 4 0 10 0;
#X connect 5 0 6 0;
#X connect 5 1 7 0;
#X connect 5 0 2 1;
#X restore 156 201 pd id->pointer;
#N canvas 83 99 410 208 gid->gclr 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.gid->gclr.get;
#X obj 40 86 r \$0.convert.gid->gclr;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 141 347 pd gid->gclr;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 19 0;
#X connect 2 1 13 2;
#X connect 3 0 9 0;
#X connect 4 0 5 0;
#X connect 4 1 6 0;
#X connect 5 0 14 0;
#X connect 6 0 17 0;
#X connect 7 0 2 0;
#X connect 8 0 9 0;
#X connect 9 0 11 0;
#X connect 10 0 5 0;
#X connect 12 0 13 0;
#X connect 13 0 16 1;
#X connect 14 0 13 1;
#X connect 15 0 8 1;
#X connect 15 1 18 1;
#X connect 17 0 8 0;
#X connect 17 1 16 0;
#X connect 17 2 19 0;
#X connect 18 0 12 0;
#X connect 19 0 18 0;
#X connect 19 1 14 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 9 0 4 0;
#X connect 11 0 13 1;
#X connect 12 0 11 1;
#X connect 14 0 7 0;
#X connect 14 1 13 0;
#X connect 14 2 16 0;
#X connect 15 0 21 0;
#X connect 16 0 15 0;
#X connect 16 1 12 0;
#X connect 17 0 18 0;
#X connect 18 0 7 1;
#X connect 18 1 20 0;
#X connect 19 0 15 1;
#X connect 20 0 2 0;
#X connect 21 0 11 0;
#X restore 23 313 pd note.change.velocity;
#N canvas 0 99 406 517 note.change.gid 0;
#X obj 14 19 r \$0.note.send;
......@@ -2182,52 +2185,12 @@ to the note (or prints a 'not found' error);
#N canvas 202 202 381 454 note.change.gid 0;
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#N canvas 126 411 388 279 resolve.note 0;
#X obj 39 95 r \$0.resolve.note.receive;
#X obj 39 72 s \$0.resolve.note.send;
#X obj 20 224 pointer;
#X obj 20 17 inlet;
#X obj 20 46 t b a b;
#X obj 20 174 f;
#X obj 20 197 sel 1;
#X obj 39 118 t b p;
#X msg 39 142 1;
#X msg 107 141 0;
#X obj 20 247 outlet;
#X connect 0 0 7 0;
#X connect 2 0 10 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 1 0;
#X connect 4 2 9 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 7 1 2 1;
#X connect 8 0 5 1;
#X connect 9 0 5 1;
#X restore 51 169 pd resolve.note;
#X obj 51 197 t p p;
#X obj 6 54 route change;
#X obj 6 100 t a a;
#X msg 6 162 \$3;
#X msg 51 143 \$1 \$2;
#X obj 6 317 pack f f;
#X msg 6 351 \$2 \$1;
#N canvas 645 450 401 207 get.gid.clr 0;
#X obj 11 15 inlet;
#X obj 30 74 s \$0.gid2lr.get;
#X obj 30 98 r \$0.gid2lr.set;
#X obj 11 42 t b a b;
#X obj 11 131 list append;
#X obj 11 154 outlet;
#X connect 0 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 3 1 1 0;
#X connect 3 2 4 1;
#X connect 4 0 5 0;
#X restore 141 345 pd get.gid.clr;
#N canvas 320 203 446 363 clr.* 0;
#X obj 28 62 t a a a;
#X obj 28 112 div 100;
......@@ -2282,28 +2245,70 @@ to the note (or prints a 'not found' error);
#X obj 6 77 route gid;
#X obj 6 417 s \$0.gid;
#X obj 92 416 set \$0.note gid c;
#X obj 51 224 get \$0.note id vel;
#N canvas 83 99 410 208 step|pitch->id 0;
#X obj 40 63 s \$0.convert.step|pitch->id.get;
#X obj 40 86 r \$0.convert.step|pitch->id;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X connect 1 0 4 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 51 167 pd step|pitch->id;
#X obj 51 197 t a a;
#N canvas 83 99 410 208 id->pointer 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.id->pointer.get;
#X obj 40 86 r \$0.convert.id->pointer;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 3 0 17 0;
#X connect 3 1 16 2;
#X connect 4 0 14 0;
#X connect 5 0 6 0;
#X connect 5 1 7 0;
#X connect 6 0 13 0;
#X connect 7 0 2 0;
#X connect 8 0 9 0;
#X connect 9 0 15 0;
#X connect 10 0 11 0;
#X connect 11 0 16 1;
#X connect 12 0 11 1;
#X connect 13 0 8 0;
#X connect 13 1 16 0;
#X connect 13 2 10 0;
#X connect 14 0 5 0;
#X connect 17 0 8 1;
#X connect 17 1 12 0;
#X connect 5 0 2 1;
#X restore 78 221 pd id->pointer;
#X obj 78 269 get \$0.note vel;
#X obj 78 244 t p p, f 30;
#N canvas 83 99 410 208 gid->gclr 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.gid->gclr.get;
#X obj 40 86 r \$0.convert.gid->gclr;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 141 351 pd gid->gclr;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 11 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 10 0;
#X connect 5 0 14 0;
#X connect 6 0 7 0;
#X connect 7 0 12 0;
#X connect 8 0 13 1;
#X connect 9 0 8 1;
#X connect 10 0 6 0;
#X connect 10 2 19 0;
#X connect 11 0 3 0;
#X connect 14 0 15 0;
#X connect 15 0 6 1;
#X connect 15 1 16 0;
#X connect 16 0 18 0;
#X connect 17 0 9 0;
#X connect 18 0 17 0;
#X connect 18 1 13 2;
#X connect 19 0 8 0;
#X restore 23 336 pd note.change.gid;
#X obj 285 430 text define \$0.sequence;
#N canvas 402 158 545 360 sequencer 0;
......@@ -2917,16 +2922,16 @@ to the note (or prints a 'not found' error);
#X obj 49 93 r \$0.stepvisheight;
#X obj 48 127 r \$0.canvastopmargin;
#X obj 15 66 -;
#X msg 15 41 83 \$3;
#X obj 15 17 r \$0.convert.pitch->y.get;
#X obj 15 157 s \$0.convert.pitch->y;
#X msg 15 41 83 \$1;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 1 0 6 0;
#X connect 2 0 0 1;
#X connect 3 0 1 1;
#X connect 4 0 0 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 5 0 7 0;
#X connect 7 0 4 0;
#X restore 285 48 pd pitch->y;
#N canvas 0 99 405 189 step->x 0;
#X obj 13 14 inlet;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment