array for real

master
ultrageranium 7 years ago
parent 7c3e70813e
commit 9942543cc5

@ -0,0 +1,61 @@
#N struct template float x float y array sequence template-element
;
#N struct template-element float y;
#N canvas 369 85 612 631 10;
#N canvas 11 43 1005 306 score 1;
#X scalar template 100 100 \; 0 \; 0 \; -3 \; -4 \; -4 \; -5 \; -6
\; -9 \; -10 \; -13 \; -15 \; -19 \; -23 \; -26 \; -29 \; -35 \; -42
\; -50 \; -58 \; -69 \; -83 \; -97 \; -110 \; -124 \; -138 \; -148
\; -160 \; -169 \; -185 \; -194 \; -187 \; -150 \; -106 \; -69 \; -33
\; -16 \; -12 \; -10 \; -8 \; -3 \; 2 \; 4 \; 7 \; 7 \; 6 \; 5 \; 3
\; 1 \; 0 \; -5 \; -13 \; -19 \; -25 \; -26 \; -25 \; 6 \; 3 \; 2.5
\; 2 \; 0 \; -1 \; -2 \; -2.5 \; -3 \; -3 \; -3 \; -4 \; -5 \; -5 \;
-5 \; -5 \; -5 \; -6 \; -7 \; -7 \; -6 \; -11 \; 0 \; 0 \; 0 \; 0 \;
0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0 \; 0
\; 0 \; 0 \; 0 \; 0 \; 0 \; \;;
#X restore 48 22 pd score;
#X text 115 21 <- click to open;
#X text 377 150 <- 1;
#X text 11 187 2 ->;
#N canvas 47 389 418 151 template 1;
#X text 66 11 now with an array;
#X obj 39 45 struct template float x float y array sequence template-element
;
#X obj 38 83 plot sequence 333 2 10 100 10;
#X restore 52 86 pd template;
#N canvas 494 645 352 105 template-element 1;
#X obj 48 27 struct template-element float y;
#X restore 52 108 pd template-element;
#N canvas 110 149 426 507 init 1;
#X obj 94 18 inlet;
#X msg 195 27 \; pd-score clear;
#X obj 94 38 t b b b;
#X obj 224 102 pointer;
#X msg 224 82 traverse pd-score \, bang;
#X msg 94 106 100 100;
#X obj 94 128 append template x y;
#X obj 94 154 t b b p;
#X obj 125 239 setsize template sequence;
#X obj 63 365 set template element y;
#X obj 191 339 element template sequence;
#X obj 63 312 unpack;
#X msg 125 217 100;
#X msg 63 284 0 10 \, 10 -20 \, 25 100 \, 30 50 \, 100 0;
#X connect 0 0 2 0;
#X connect 2 0 5 0;
#X connect 2 1 4 0;
#X connect 2 2 1 0;
#X connect 3 0 6 2;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 13 0;
#X connect 7 1 12 0;
#X connect 7 2 8 1;
#X connect 7 2 10 1;
#X connect 10 0 9 2;
#X connect 11 0 9 0;
#X connect 11 1 10 0;
#X connect 12 0 8 0;
#X connect 13 0 11 0;
#X restore 123 490 pd init;
Loading…
Cancel
Save