#N canvas 160 4 502 292 10; #X text 109 18 http://local.wasp.uwa.edu.au/~pbourke/surfaces_curves/chladni/index.html ; #N canvas 338 215 478 328 gemwin 0; #X obj 132 136 gemwin; #X obj 67 89 outlet; #X obj 67 10 inlet; #X msg 67 70 set destroy; #X msg 132 112 create \, 1; #X msg 198 112 destroy; #X obj 67 41 route create+DSP; #X msg 102 163 \; pd dsp 1; #X msg 274 109 dimen 128 128; #X obj 369 79 loadbang; #X msg 156 71 set create+DSP; #X connect 2 0 6 0; #X connect 3 0 1 0; #X connect 4 0 0 0; #X connect 5 0 0 0; #X connect 6 0 3 0; #X connect 6 0 4 0; #X connect 6 0 7 0; #X connect 6 1 5 0; #X connect 6 1 10 0; #X connect 8 0 0 0; #X connect 9 0 8 0; #X connect 10 0 1 0; #X restore 9 29 pd gemwin; #X msg 9 10 create+DSP; #N canvas 124 211 763 593 gem 0; #X obj 81 369 gemhead; #X obj 81 460 pix_texture; #X obj 283 27 bang~; #X obj 283 74 timer; #X obj 243 337 -~; #X obj 275 321 *~; #X msg 13 429 repeat 0; #X obj 194 291 cos~; #X obj 195 321 *~; #X obj 234 291 cos~; #X obj 274 291 cos~; #X obj 314 291 cos~; #X obj 283 123 vline~; #X msg 283 102 0 \, 1 \$1; #X obj 315 263 *~; #X obj 275 263 *~; #X obj 235 263 *~; #X obj 195 263 *~; #X obj 405 133 sig~ 5; #X obj 451 134 sig~ 3; #X obj 13 391 loadbang; #X obj 116 398 +~; #X obj 81 482 square 4; #X obj 194 139 *~ 128; #X obj 81 426 pix_sig2pix~ 128 128; #X obj 82 74 block~ 16384; #X obj 283 51 t b b b; #X obj 405 77 inlet; #X obj 451 76 inlet; #X obj 392 103 f; #X obj 441 103 f; #X connect 0 0 24 0; #X connect 1 0 22 0; #X connect 2 0 26 0; #X connect 3 0 13 0; #X connect 4 0 21 0; #X connect 5 0 4 1; #X connect 6 0 1 0; #X connect 7 0 8 0; #X connect 8 0 4 0; #X connect 9 0 8 1; #X connect 10 0 5 0; #X connect 11 0 5 1; #X connect 12 0 14 0; #X connect 12 0 16 0; #X connect 12 0 23 0; #X connect 13 0 12 0; #X connect 14 0 11 0; #X connect 15 0 10 0; #X connect 16 0 9 0; #X connect 17 0 7 0; #X connect 18 0 17 1; #X connect 18 0 14 1; #X connect 19 0 16 1; #X connect 19 0 15 1; #X connect 20 0 6 0; #X connect 21 0 24 0; #X connect 21 0 24 1; #X connect 23 0 17 0; #X connect 23 0 15 0; #X connect 24 0 1 0; #X connect 26 0 3 0; #X connect 26 1 3 1; #X connect 26 2 29 0; #X connect 26 2 30 0; #X connect 27 0 29 1; #X connect 28 0 30 1; #X connect 29 0 18 0; #X connect 30 0 19 0; #X restore 148 125 pd gem; #X floatatom 148 101 5 0 0 0 - - -; #X floatatom 186 101 5 0 0 0 - - -; #X text 151 80 m; #X text 189 80 n; #X obj 101 79 vradio 15 1 0 8 preset_select empty empty 0 -8 0 10 -262131 -123526 -1 0; #X text 177 201 5-6-7 are not working. Why?; #X text 51 75 presets; #X text 175 179 presets 0-4 are OK; #N canvas 628 177 462 312 presets 0; #X obj 174 265 outlet; #X obj 224 265 outlet; #X obj 174 232 unpack; #X obj 182 58 select 0 1 2 3 4 5 6 7; #X msg 20 91 0 1; #X msg 53 91 5 1; #X msg 83 90 3 2; #X msg 113 90 4 3; #X msg 145 90 5 8; #X msg 175 90 0 9; #X msg 209 90 4 9; #X msg 247 89 16 9; #X obj 182 29 r preset_select; #X connect 2 0 0 0; #X connect 2 1 1 0; #X connect 3 0 4 0; #X connect 3 1 5 0; #X connect 3 2 6 0; #X connect 3 3 7 0; #X connect 3 4 8 0; #X connect 3 5 9 0; #X connect 3 6 10 0; #X connect 3 7 11 0; #X connect 4 0 2 0; #X connect 5 0 2 0; #X connect 6 0 2 0; #X connect 7 0 2 0; #X connect 8 0 2 0; #X connect 9 0 2 0; #X connect 10 0 2 0; #X connect 11 0 2 0; #X connect 12 0 3 0; #X restore 255 84 pd presets; #X connect 1 0 2 0; #X connect 2 0 1 0; #X connect 4 0 3 0; #X connect 5 0 3 1; #X connect 12 0 4 0; #X connect 12 1 5 0;