max v2;
#N vpatcher 410 44 893 680;
#P origin 0 -18;
#P button 101 428 15 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P hidden newex 87 478 72 196617 loadmess 120;
#P comment 15 81 234 196617 (DAAD-Edgard-Varese-Gastprofessor 2007);
#P window setfont "Sans Serif" 12.;
#P comment 15 17 214 196620 FTM meets the Wiimote (in Berlin);
#P window setfont "Sans Serif" 9.;
#P comment 15 68 156 196617 Norbert Schnell at the TU-Berlin;
#P window setfont "Sans Serif" 24.;
#P comment 15 34 120 196632 handy tilt;
#P user hslider 304 235 15 128 50 1 1 0;
#P window setfont "Sans Serif" 9.;
#N vpatcher 385 196 841 737;
#P user ftm.mess 268 125 129 15 3 9 255 255 255 0 0 0 1 2 0 1 --> 1;
#T _#ftm version 2 2;
#T _#scope begin;
#T _#absargs $0_ $1_ $2_ $3_ $4_ $5_ $6_ $7_ $8_ $9_;
#T _#line "_($buf import rainstick.aif)";
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#N ftm.copy fmat --> 1;
#P newobj 54 302 74 196617 ftm.copy fmat;
#P user ftm.mess 268 105 71 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_($buf import)";
#P inlet 268 59 15 0;
#P flonum 175 135 60 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user ftm.mess 175 302 69 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_(cent2lin $1)";
#N gbr.resample 1 --> 1;
#P newobj 54 354 131 196617 gbr.resample 1;
#N gbr.wind= --> 1;
#P newobj 54 331 55 196617 gbr.wind=;
#P flonum 54 135 60 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user ftm.object 268 173 127 18 3 9 --> 1;
#T _#def 0 "_(0.001 * $FTM.audio.sr)" ksr local;
#P window linecount 2;
#N gbr.fire~ (120. / 8) @mode period --> 1;
#P newobj 54 170 116 196617 gbr.fire~ (120. / 8) @mode period;
#P user ftm.object 268 146 36 18 3 9 --> 1;
#T _#obj 1 fmat;
#T _#def 0 _fmat buf local;
#P window linecount 1;
#N gbr.ola~ 2 200 --> 1;
#P newobj 54 392 160 196617 gbr.ola~ 2 200;
#P user ftm.mess 54 231 272 39 3 9 255 255 255 0 0 0 3 2 0 0 --> 1;
#T _#line "_($buf colref 0";
#T _#line "_($2 * ($buf rows) + (random ($ksr * 10.)) - ($ksr * 5.))";
#T _#line "_(($ksr * 120.)) mul 0.06125)";
#N vpatcher 10 59 610 459;
#P window setfont "Sans Serif" 9.;
#P newex 316 155 99 196617 scale -0.1 -1 0. -1.;
#P newex 255 128 71 196617 split 0. 1.;
#P newex 255 180 93 196617 scale 0.1 1 0. 1.;
#P newex 194 97 71 196617 split -0.1 0.1;
#P newex 73 135 50 196617 + 1.;
#P newex 73 97 69 196617 split -1. 0.;
#P outlet 73 334 15 0;
#P outlet 194 334 15 0;
#P inlet 73 45 15 0;
#P inlet 194 45 15 0;
#P newex 194 212 63 196617 * 2400.;
#P newex 194 135 24 196617 t 0.;
#P connect 3 0 6 0;
#P connect 6 0 7 0;
#P connect 7 0 5 0;
#P connect 2 0 8 0;
#P connect 8 0 0 0;
#P connect 0 0 1 0;
#P connect 11 0 1 0;
#P connect 9 0 1 0;
#P connect 1 0 4 0;
#P connect 8 1 10 0;
#P connect 10 0 9 0;
#P connect 10 1 11 0;
#P pop;
#P newobj 54 105 131 196617 p mapping;
#P outlet 54 483 15 0;
#P outlet 204 483 15 0;
#P inlet 54 59 15 0;
#P inlet 175 59 15 0;
#P connect 1 0 4 0;
#P connect 4 0 10 0;
#P connect 8 0 5 0;
#P connect 5 0 17 0;
#P connect 17 0 11 0;
#P connect 11 0 12 0;
#P connect 12 0 6 0;
#P connect 6 0 3 0;
#P connect 0 0 4 1;
#P connect 4 1 14 0;
#P connect 14 0 13 0;
#P connect 13 0 12 1;
#P connect 6 1 2 0;
#P connect 15 0 16 0;
#P connect 10 0 5 1;
#P pop;
#P newobj 43 427 56 196617 p granular;
#P comment 77 119 57 196617 disconnect;
#P hidden newex 108 133 50 196617 closebang;
#P button 82 133 24 0;
#P button 43 133 24 0;
#P toggle 134 164 15 0;
#N vpatcher 140 44 730 655;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 179 460 50 196617 ftm.list;
#P message 124 92 14 196617 0;
#P user ftm.object 405 373 54 18 3 9 --> 1;
#T _#obj 2 fmat;
#T _#def 0 "_fmat 3 1" xyz local;
#P inlet 101 51 15 0;
#P outlet 244 505 15 0;
#P message 101 147 57 196617 disconnect;
#P outlet 404 505 15 0;
#P newex 404 465 62 196617 prepend set;
#P inlet 179 51 15 0;
#P toggle 179 146 30 0;
#P window linecount 1;
#P newex 266 274 71 196617 route connect;
#P newex 194 114 31 196617 == 1;
#P outlet 179 505 15 0;
#P inlet 53 51 15 0;
#P newex 279 249 63 196617 print status;
#P newex 179 337 111 196617 route motion buttons;
#P newex 179 310 69 196617 route remote;
#P message 266 193 58 196617 getbattery;
#N vpatcher 10 59 651 300;
#P outlet 50 174 15 0;
#P outlet 99 174 15 0;
#P outlet 148 174 15 0;
#P outlet 197 174 15 0;
#P outlet 246 174 15 0;
#P outlet 295 174 15 0;
#P outlet 344 174 15 0;
#P outlet 393 174 15 0;
#P outlet 442 174 15 0;
#P outlet 491 174 15 0;
#P outlet 540 174 15 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 50 51 45 196617 & 8095;
#P window linecount 1;
#P newex 50 77 40 196617 change;
#P toggle 540 140 15 0;
#P newex 540 106 45 196617 & 4096;
#P comment 555 140 29 196617 Plus;
#P toggle 491 140 15 0;
#P newex 491 106 45 196617 & 2048;
#P comment 506 140 19 196617 Up;
#P toggle 442 140 15 0;
#P newex 442 106 45 196617 & 1024;
#P comment 457 140 34 196617 Down;
#P toggle 393 140 15 0;
#P newex 393 106 39 196617 & 512;
#P comment 408 140 33 196617 Right;
#P toggle 344 140 15 0;
#P newex 344 106 39 196617 & 256;
#P comment 359 140 26 196617 Left;
#P toggle 295 140 15 0;
#P newex 295 106 39 196617 & 128;
#P comment 310 140 34 196617 Home;
#P toggle 246 140 15 0;
#P newex 246 106 33 196617 & 16;
#P comment 261 140 36 196617 Minus;
#P toggle 197 140 15 0;
#P newex 197 106 27 196617 & 8;
#P comment 212 140 15 196617 A;
#P toggle 148 140 15 0;
#P newex 148 106 27 196617 & 4;
#P comment 163 140 14 196617 B;
#P toggle 99 140 15 0;
#P newex 99 106 27 196617 & 2;
#P comment 114 140 14 196617 1;
#P toggle 50 140 15 0;
#P newex 50 106 27 196617 & 1;
#P comment 65 140 14 196617 2;
#P inlet 50 25 15 0;
#P connect 0 0 35 0;
#P connect 35 0 34 0;
#P fasten 34 0 2 0 55 100 55 100;
#P connect 2 0 3 0;
#P connect 3 0 46 0;
#P fasten 34 0 5 0 55 100 104 100;
#P connect 5 0 6 0;
#P connect 6 0 45 0;
#P fasten 34 0 8 0 55 100 153 100;
#P connect 8 0 9 0;
#P connect 9 0 44 0;
#P fasten 34 0 11 0 55 100 202 100;
#P connect 11 0 12 0;
#P connect 12 0 43 0;
#P fasten 34 0 14 0 55 100 251 100;
#P connect 14 0 15 0;
#P connect 15 0 42 0;
#P fasten 34 0 17 0 55 100 300 100;
#P connect 17 0 18 0;
#P connect 18 0 41 0;
#P fasten 34 0 20 0 55 100 349 100;
#P connect 20 0 21 0;
#P connect 21 0 40 0;
#P fasten 34 0 23 0 55 100 398 100;
#P connect 23 0 24 0;
#P connect 24 0 39 0;
#P fasten 34 0 26 0 55 100 447 100;
#P connect 26 0 27 0;
#P connect 27 0 38 0;
#P fasten 34 0 29 0 55 100 496 100;
#P connect 29 0 30 0;
#P connect 30 0 37 0;
#P fasten 34 0 32 0 55 100 545 100;
#P connect 32 0 33 0;
#P connect 33 0 36 0;
#P pop;
#P newobj 229 364 66 196617 p buttons;
#P message 53 148 44 196617 connect;
#P newex 179 196 58 196617 metro 20;
#P newex 179 249 97 196617 aka.wiiremote;
#B color 5;
#P user ftm.mess 179 420 311 15 3 9 255 255 255 0 0 0 1 3 0 0 --> 1;
#T _#line "_(($xyz set 0 0 ($1 - 132.5) (130.5 - $3) ($2 - 131)) div 217.15)";
#P connect 9 0 3 0;
#P connect 19 0 17 0;
#P connect 19 0 21 0;
#P connect 14 0 13 0;
#P connect 11 0 13 0;
#P connect 21 0 13 0;
#P connect 13 0 2 0;
#P connect 5 0 1 0;
#P connect 3 0 1 0;
#P connect 17 0 1 0;
#P connect 2 0 1 0;
#P connect 1 0 6 0;
#P connect 6 0 7 0;
#P connect 7 0 0 0;
#P connect 0 0 22 0;
#P connect 22 0 10 0;
#P connect 12 0 11 0;
#P connect 7 1 4 0;
#P connect 7 0 18 0;
#P connect 1 1 12 0;
#P connect 1 1 8 0;
#P connect 13 0 15 0;
#P connect 15 0 16 0;
#P pop;
#P newobj 43 163 89 196617 p wii input;
#P comment 151 164 43 196617 running;
#P comment 38 119 44 196617 connect;
#P user gain~ 65 477 19 72 158 0 1.071519 7.94321 10.;
#N vpatcher 10 59 342 544;
#P user ftm.mess 75 373 83 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#init "_0 12";
#T _#line "_(($1 sum) / $2)";
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 203 138 27 196617 - 1;
#P user ftm.mess 189 280 50 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_rows $1";
#P user ftm.object 75 326 60 18 3 9 --> 1;
#T _#obj 3 fmat;
#T _#def 0 "_fmat 12 1" unnamed local;
#P window linecount 1;
#P newex 75 153 50 196617 t f b;
#N counter 0 11;
#X flags 0 0;
#P newobj 115 192 101 196617 counter 0 11;
#P user ftm.mess 75 240 90 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#init "_0 0 11";
#T _#line "_set $2 0 $1\, bang";
#P inlet 148 59 15 0;
#P outlet 75 425 15 0;
#P inlet 75 59 15 0;
#P connect 0 0 5 0;
#P connect 5 0 3 0;
#P connect 3 0 6 0;
#P connect 7 0 6 0;
#P connect 6 0 9 0;
#P connect 9 0 1 0;
#P connect 5 1 4 0;
#P connect 2 0 9 1;
#P connect 4 0 3 1;
#P connect 2 0 7 0;
#P connect 2 0 8 0;
#P connect 8 0 4 4;
#P pop;
#P newobj 207 234 57 196617 p mvavrg;
#P number 267 235 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#N vpatcher 10 59 342 544;
#P user ftm.mess 75 373 83 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#init "_0 12";
#T _#line "_(($1 sum) / $2)";
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 203 138 27 196617 - 1;
#P user ftm.mess 189 280 50 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_rows $1";
#P user ftm.object 75 326 60 18 3 9 --> 1;
#T _#obj 4 fmat;
#T _#def 0 "_fmat 12 1" unnamed local;
#P window linecount 1;
#P newex 75 153 50 196617 t f b;
#N counter 0 11;
#X flags 0 0;
#P newobj 115 192 101 196617 counter 0 11;
#P user ftm.mess 75 240 90 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#init "_0 0 11";
#T _#line "_set $2 0 $1\, bang";
#P inlet 148 59 15 0;
#P outlet 75 425 15 0;
#P inlet 75 59 15 0;
#P connect 0 0 5 0;
#P connect 5 0 3 0;
#P connect 3 0 6 0;
#P connect 7 0 6 0;
#P connect 6 0 9 0;
#P connect 9 0 1 0;
#P connect 5 1 4 0;
#P connect 2 0 9 1;
#P connect 4 0 3 1;
#P connect 2 0 7 0;
#P connect 2 0 8 0;
#P connect 8 0 4 4;
#P pop;
#P newobj 43 234 57 196617 p mvavrg;
#N vpatcher 10 59 342 544;
#P user ftm.mess 75 373 83 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#init "_0 12";
#T _#line "_(($1 sum) / $2)";
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 203 138 27 196617 - 1;
#P user ftm.mess 189 280 50 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_rows $1";
#P user ftm.object 75 326 60 18 3 9 --> 1;
#T _#obj 5 fmat;
#T _#def 0 "_fmat 12 1" unnamed local;
#P window linecount 1;
#P newex 75 153 50 196617 t f b;
#N counter 0 11;
#X flags 0 0;
#P newobj 115 192 101 196617 counter 0 11;
#P user ftm.mess 75 240 90 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#init "_0 0 11";
#T _#line "_set $2 0 $1\, bang";
#P inlet 148 59 15 0;
#P outlet 75 425 15 0;
#P inlet 75 59 15 0;
#P connect 0 0 5 0;
#P connect 5 0 3 0;
#P connect 3 0 6 0;
#P connect 7 0 6 0;
#P connect 6 0 9 0;
#P connect 9 0 1 0;
#P connect 5 1 4 0;
#P connect 2 0 9 1;
#P connect 4 0 3 1;
#P connect 2 0 7 0;
#P connect 2 0 8 0;
#P connect 8 0 4 4;
#P pop;
#P newobj 125 234 57 196617 p mvavrg;
#N vpatcher 309 304 819 691;
#P outlet 106 247 15 0;
#P outlet 285 247 15 0;
#P inlet 106 63 15 0;
#P inlet 285 63 15 0;
#P user ftm.mess 285 117 148 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_((i (270. -  $1 * 90.)) % 360)";
#P window setfont "Sans Serif" 9.;
#P number 285 161 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user ftm.mess 106 117 155 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_((i (270. +  $1 * 180.)) % 360)";
#P number 106 161 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P connect 5 0 1 0;
#P connect 1 0 0 0;
#P connect 0 0 7 0;
#P connect 4 0 3 0;
#P connect 3 0 2 0;
#P connect 2 0 6 0;
#P pop;
#P newobj 43 304 92 196617 p display;
#P flonum 125 279 62 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 207 215 57 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#N vpatcher 80 44 675 566;
#P outlet 384 364 15 0;
#P user ftm.mess 209 208 273 39 3 9 255 255 255 0 0 0 3 3 0 0 --> 1;
#T _#init "_0\, x = 0\, y = 0";
#T _#line "_($x = (abs $1))\;";
#T _#line "_($y = (abs $2))\;";
#T _#line "_((arg (case (($x < $y) + 1) $x $y) $3) * -2. / 3.141593)";
#P user ftm.mess 68 208 128 15 3 9 255 255 255 0 0 0 1 2 0 0 --> 1;
#T _#line "_((arg $1 $2) / 3.141593)";
#T _#scope end;
#P outlet 68 364 15 0;
#P outlet 209 364 15 0;
#P inlet 68 72 15 0;
#P inlet 149 72 15 0;
#P inlet 247 72 15 0;
#P connect 2 0 5 0;
#P connect 5 0 4 0;
#P connect 1 0 5 1;
#P connect 2 0 6 0;
#P connect 6 0 3 0;
#P connect 1 0 6 1;
#P connect 0 0 6 2;
#P pop;
#P newobj 43 255 175 196617 p tilt;
#P user dial 125 331 84 84 360 1 0 0 170 359 1 1. 255 255 255 221 221 221 120 120 120 0 0 0 0 0 0 0 0 0;
#P flonum 43 279 62 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user dial 43 331 84 84 360 1 0 0 170 359 1 1. 255 255 255 221 221 221 120 120 120 0 0 0 0 0 0 0 0 0;
#P newex 43 584 32 196617 dac~;
#P user gain~ 43 477 19 72 158 0 1.071519 7.94321 120.;
#P message 144 585 27 196617 stop;
#P message 77 585 65 196617 startwindow;
#P newex 43 190 174 196617 unpack 0. 0. 0.;
#P flonum 125 215 57 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 43 215 57 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 116 429 86 196617 import sound file;
#P connect 24 0 22 0;
#P connect 22 0 3 0;
#P connect 3 0 1 0;
#P connect 1 0 16 0;
#P connect 16 0 11 0;
#P connect 11 0 9 0;
#P connect 9 0 14 0;
#P connect 14 0 8 0;
#P hidden connect 9 0 28 0;
#P hidden connect 34 0 6 0;
#P connect 28 0 6 0;
#P connect 6 0 7 0;
#P hidden connect 4 0 7 0;
#P hidden connect 5 0 7 0;
#P hidden connect 34 0 19 0;
#P fasten 28 1 19 0 94 456 70 456;
#P hidden connect 6 1 19 0;
#P connect 19 0 7 1;
#P hidden connect 13 0 28 1;
#P hidden connect 26 0 25 0;
#P connect 25 0 22 1;
#P hidden connect 35 0 28 2;
#P hidden connect 17 0 16 1;
#P hidden connect 23 0 22 2;
#P connect 3 1 2 0;
#P connect 2 0 15 0;
#P connect 15 0 11 1;
#P connect 11 1 13 0;
#P connect 13 0 14 1;
#P connect 14 1 10 0;
#P hidden connect 22 2 23 0;
#P hidden connect 17 0 15 1;
#P connect 3 2 12 0;
#P connect 12 0 18 0;
#P connect 18 0 11 2;
#P hidden connect 17 0 18 1;
#P hidden connect 29 0 17 0;
#P pop;