lunes, 26 de febrero de 2007

Conseguir un wiimote, quien se apunta?

Si alguien sabe donde conseguir un wiimote, que nos lo haga saber,

De momento solo Jordi Puig consigió uno y ahora no me acuerdo donde,... yo quiero uno, si alguien mas quiere, o sabe donde comprarlo que lo diga, nos organizamos y pedimos los q necesitemos, como lo veis?

Max ToolBox

Para aquellos que quieran ahorrar tiempo a la hora de ordenar y conectar sus patches existe Max ToolBox, (lo podeis descargar en los links de este blog----->Max ToolBox b8)

es útil a la hora de conectar 14 objetos de max a uno, o uno a 14, o de 14 objetos al inlet 3 de 14 otros, con solo apretar una tecla, o para mandar mensajes a los objetos sin tener q hacer la conexion, en fin, facilidades varias...

hecharle una ojeada, os puede interesar.

Trace / Enable / Ctrl+T

Para aquellos que no lo saben, es posible seguir las señales y el orden de operaciones en max a traves de las lineas que conectan los objetos de max (patch cords) y asi enterarse del orden de operaciones que realiza tu patch en cada momento.
Para ello debemos activar en el menu de max --->Trace / Enable
una vez activado trace, ir clickando Ctrl+T para seguir la señal, (veremos parpadear el patch cord en cada conexion)

Mas Patches en OpenGL desde Japon

Estar al loro de los nuevos patches de Masato TsuTsui, que inspiran, son divertidos, y pueden servir para aprender de una forma divertida los objetos GL de jitter (jit.gl)

http://adsr.jp/download/

domingo, 18 de febrero de 2007

Proxima sesion : Lunes 19 de Febrero de 2007. 17.00

pues eso.

saludos

josé manuel

El patch de la clase del 12 de febrero

voilà

#P button 200 188 15 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 264 182 22 196617 r Q;
#P newex 234 91 41 196617 r ffund;
#P newex 202 141 46 196617 r harmo;
#P newex 16 141 36 196617 r font;
#P number 53 275 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user scope~ 27 295 130 397 10 3 128 -1. 1. 0 0. 0 0. 102 255 51 135 135 135 0;
#P flonum 380 164 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 352 100 71 196617 route connect;
#P number 16 186 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 56 186 39 196617 noise~;
#P newex 16 214 90 196617 selector~ 2;
#P newex 416 163 63 196617 pack 0. 300;
#P newex 289 163 63 196617 pack 0. 300;
#P newex 416 141 145 196617 expr 1. - abs(128 - $i1)/ 26.;
#P newex 289 141 104 196617 expr ($i1 - 103 )/ 3;
#P newex 416 183 40 196617 line 1.;
#P number 289 215 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 289 183 40 196617 line 1.;
#P newex 289 122 265 196617 unpack 0 0 0;
#P toggle 342 38 15 0;
#P newex 342 57 58 196617 metro 100;
#P message 289 38 44 196617 connect;
#P newex 289 80 74 196617 aka.wiiremote;
#P newex 221 234 41 196617 * 100.;
#P newex 124 214 27 196617 - 1;
#P newex 221 214 27 196617 + 1;
#P number 221 186 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 124 234 41 196617 * 100.;
#P user spectroscope~ 25 509 300 100 20 0 0 0 1 1 0 0 0 0 0 0;
#X frgb 224 224 224;
#X brgb 255 255 255;
#X rgb2 0 0 0;
#X rgb3 243 204 204;
#X rgb4 255 0 0;
#X rgb5 184 184 184;
#X rgb6 0 0 0;
#X rgb7 0 0 0;
#X rgb8 255 255 255;
#X rgb9 255 0 0;
#X rgb10 255 191 0;
#X rgb11 0 191 127;
#X rgb12 127 0 127;
#X rgb13 0 0 0;
#X range 0. 1.2;
#X domain 0. 5100.;
#X done;
#P newex 187 276 79 196617 svf~ 100 0.89;
#P user spectroscope~ 22 612 300 100 20 0 0 0 1 1 0 0 0 0 0 0;
#X frgb 224 224 224;
#X brgb 255 255 255;
#X rgb2 0 0 0;
#X rgb3 243 204 204;
#X rgb4 255 0 0;
#X rgb5 184 184 184;
#X rgb6 0 0 0;
#X rgb7 0 0 0;
#X rgb8 255 255 255;
#X rgb9 255 0 0;
#X rgb10 255 191 0;
#X rgb11 0 191 127;
#X rgb12 127 0 127;
#X rgb13 0 0 0;
#X range 0. 1.2;
#X domain 0. 22050.;
#X done;
#P flonum 264 235 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 91 276 76 196617 svf~ 100 0.89;
#P number 252 141 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user gain~ 368 305 13 68 158 0 1.071519 7.94321 10.;
#P user ezdac~ 453 434 497 467 0;
#P user spectroscope~ 25 399 300 100 100 0 1 0 0 1 0 0 0 0 0 0;
#X frgb 114 217 197;
#X brgb 255 255 255;
#X rgb2 241 210 105;
#X rgb3 243 204 204;
#X rgb4 255 0 0;
#X rgb5 184 184 184;
#X rgb6 0 0 0;
#X rgb7 0 0 0;
#X rgb8 255 255 255;
#X rgb9 255 0 0;
#X rgb10 255 191 0;
#X rgb11 0 191 127;
#X rgb12 127 0 127;
#X rgb13 0 0 0;
#X range 0. 1.2;
#X domain 0. 5000.;
#X done;
#P newex 96 186 55 196617 saw~ 100;
#P fasten 3 0 1 0 373 398 30 398;
#P fasten 3 0 9 0 373 506 30 506;
#P fasten 3 0 2 0 373 401 458 401;
#P fasten 3 0 2 1 373 400 492 400;
#P connect 26 0 22 0;
#P fasten 24 0 31 0 421 161 385 161;
#P connect 24 0 26 0;
#P connect 19 1 24 0;
#P fasten 8 2 3 0 238 298 373 298;
#P fasten 5 2 3 0 140 301 373 301;
#P connect 15 3 30 0;
#P connect 18 0 17 0;
#P fasten 30 0 18 0 357 119 425 119 425 35 347 35;
#P fasten 20 0 13 0 294 210 129 210;
#P fasten 20 0 12 0 294 212 226 212;
#P connect 20 0 21 0;
#P connect 25 0 20 0;
#P connect 23 0 25 0;
#P connect 19 0 23 0;
#P connect 15 0 19 0;
#P connect 16 0 15 0;
#P fasten 17 0 15 0 347 77 294 77;
#P connect 37 0 6 0;
#P fasten 22 0 8 2 421 271 260 271;
#P fasten 6 0 5 2 269 265 162 265;
#P fasten 6 0 8 2 269 267 260 267;
#P fasten 4 0 0 0 257 182 101 182;
#P fasten 4 0 10 1 257 184 160 184;
#P connect 4 0 38 0;
#P connect 4 0 14 1;
#P connect 36 0 4 0;
#P connect 14 0 8 1;
#P connect 12 0 14 0;
#P connect 38 0 10 0;
#P connect 38 0 14 0;
#P connect 11 0 12 0;
#P connect 35 0 11 0;
#P fasten 27 0 7 0 21 610 27 610;
#P connect 27 0 32 0;
#P fasten 27 0 5 0 21 264 96 264;
#P fasten 27 0 8 0 21 260 192 260;
#P fasten 22 0 5 2 421 269 162 269;
#P connect 10 0 5 1;
#P connect 13 0 10 0;
#P fasten 11 0 13 0 226 212 129 212;
#P connect 0 0 27 2;
#P connect 28 0 27 1;
#P connect 33 0 32 0;
#P connect 29 0 27 0;
#P connect 34 0 29 0;
#P window clipboard copycount 39;

Fibart

un festival de arte interactivo, aparentemente. podría ser de interés para alguien

http://www.infokool.org/0_0/CONVOCATORIES/detall.cfm?IDIOMA=CAT&IDIOMA_ID=1&ID=000000066T

saludos

josé manuel

domingo, 11 de febrero de 2007

Proxima sesion : Lunes 12 de Febrero de 2007. 17.00

Hola

Recuerdo con este anuncio que mañana, lunes, 12 de febrero de 2007, habrá sesión de seminario. Aprovecho para comunicaros que los últimos cambios en el patch de control de wiimote están en

http://www.sonoscop.net/jmb/pub/wiiprueba.pat.zip

Saludos

José Manuel

domingo, 4 de febrero de 2007

control del wiimote hackeado

Jordi Puig me dejó el wiimote y he estado trabajando con él. En el patch que publico aquí se muestra como

1. se gira un objeto en 3D en los ejes z y x cuando no hay aceleración

2. se detecta la aceleración en los tres ejes

3. se transforma la aceleración en cambio de posición y generación de sonido

Ya sabéis : se copia todo el secript y se pega en una ventana de maxmsp. el objeto aka.wiimote y jitter deben estar instalados.

Saludos

José Manuel

#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 339 164 29 196617 gate;
#P newex 358 126 60 196617 r vibracion;
#P newex 440 275 71 196617 route connect;
#P window linecount 2;
#P message 624 570 80 196617 \; max hidecursor;
#P message 537 570 85 196617 \; max showcursor;
#P window linecount 1;
#P comment 24 111 478 196617 2) Mandar el mensaje "connect" a aka.wiiremote. Los 4 led dejan de parpadear al establecer la conexión;
#P comment 24 98 303 196617 1) Pulsar el botón "Synch" del WiiRemote. Los 4 leds parpadearán;
#P comment 24 85 487 196617 0) Ajustar WiiRemote con el ordenador por medio de "Bluetooth Setup Assistant." (sólo la primera vez);
#P newex 537 542 55 196617 select 0 1;
#P newex 650 480 45 196617 onebang;
#P newex 699 480 45 196617 onebang;
#P message 699 500 14 196617 0;
#P newex 699 455 46 196617 select 1;
#P newex 699 436 47 196617 r boton-;
#P message 650 500 14 196617 1;
#P newex 650 455 46 196617 select 1;
#P newex 650 436 48 196617 r boton+;
#P toggle 24 379 15 0;
#P newex 24 407 47 196617 gate 1 1;
#P newex 777 322 105 196617 pak position 0. 0. 90.;
#N vpatcher 54 44 1266 815;
#P origin 0 -4;
#P window setfont "Sans Serif" 9.;
#P newex 865 434 35 196617 * 11.;
#P window linecount 0;
#P newex 543 528 35 196617 *~ 1.;
#P user gain~ 576 649 13 39 158 0 1.071519 7.94321 10.;
#P newex 613 624 27 196617 *~;
#P newex 544 617 27 196617 *~;
#P message 678 507 14 196617 0;
#P newex 678 487 55 196617 delay 300;
#P message 655 506 14 196617 1;
#P newex 655 530 60 196617 s vibracion;
#P user number~ 502 647 541 662 9 3 3 2 0. 0. 0 0. 250 0. 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 804 104 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 765 103 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 647 105 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 608 104 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 503 436 101 196617 t f b;
#P newex 503 466 55 196617 pipe 0. 11;
#P message 594 488 31 196617 0 10;
#P comment 32 79 83 196617 extracción;
#P comment 502 81 57 196617 extracción;
#P comment 45 671 57 196617 movimiento;
#P comment 42 360 57 196617 adecuación;
#P newex 543 548 42 196617 s filtro;
#P newex 543 508 39 196617 noise~;
#P comment 1100 14 76 196617 analisis botones;
#P comment 814 364 57 196617 adecuación;
#P comment 776 494 98 196617 generación de sonido;
#P comment 482 8 83 196617 analisis dinámico;
#P message 677 611 26 196617 127;
#P newex 596 654 61 196617 delay 4000;
#P newex 656 572 48 196617 loadbang;
#P message 596 685 14 196617 1;
#N vpatcher 109 428 698 623;
#P origin 0 15;
#P window setfont "Sans Serif" 9.;
#P newex 455 137 48 196617 s botonv;
#P newex 406 137 46 196617 s boton^;
#P newex 357 137 47 196617 s boton>;
#P newex 308 137 47 196617 s boton<;
#P newex 504 137 48 196617 s boton+;
#P newex 259 137 48 196617 s boton=;
#P newex 210 137 47 196617 s boton-;
#P newex 14 137 48 196617 s boton2;
#P newex 63 137 48 196617 s boton1;
#P toggle 503 165 15 0;
#P comment 518 167 38 196617 Plus;
#P toggle 454 165 15 0;
#P comment 469 167 38 196617 Up;
#P toggle 405 165 15 0;
#P comment 420 167 38 196617 Down;
#P toggle 356 165 15 0;
#P comment 371 167 38 196617 Right;
#P toggle 307 165 15 0;
#P comment 322 167 38 196617 Left;
#P toggle 258 165 15 0;
#P comment 273 167 38 196617 Home;
#P toggle 209 165 15 0;
#P comment 224 167 38 196617 Minus;
#P toggle 160 165 15 0;
#P comment 175 167 38 196617 A;
#P toggle 111 165 15 0;
#P comment 126 167 38 196617 B;
#P toggle 62 165 15 0;
#P comment 77 167 38 196617 1;
#P toggle 13 165 15 0;
#P comment 28 167 38 196617 2;
#P newex 112 137 47 196617 s botonb;
#P newex 161 137 47 196617 s botona;
#P newex 504 104 27 196617 > 0;
#P newex 455 104 27 196617 > 0;
#P newex 406 104 27 196617 > 0;
#P newex 357 104 27 196617 > 0;
#P newex 308 104 27 196617 > 0;
#P newex 259 104 27 196617 > 0;
#P newex 210 104 27 196617 > 0;
#P newex 161 104 27 196617 > 0;
#P newex 112 104 27 196617 > 0;
#P newex 63 104 27 196617 > 0;
#P newex 14 104 27 196617 > 0;
#P newex 14 49 40 196617 change;
#P newex 504 78 45 196617 & 4096;
#P newex 455 78 45 196617 & 2048;
#P newex 406 78 45 196617 & 1024;
#P newex 357 78 39 196617 & 512;
#P newex 308 78 39 196617 & 256;
#P newex 259 78 39 196617 & 128;
#P newex 210 78 33 196617 & 16;
#P newex 161 78 27 196617 & 8;
#P newex 112 78 27 196617 & 4;
#P newex 63 78 27 196617 & 2;
#P newex 14 78 27 196617 & 1;
#P inlet 14 24 15 0;
#P connect 0 0 12 0;
#P fasten 12 0 1 0 19 72 19 72;
#P connect 1 0 13 0;
#P connect 13 0 49 0;
#P fasten 12 0 2 0 19 72 68 72;
#P connect 2 0 14 0;
#P connect 14 0 48 0;
#P fasten 12 0 3 0 19 72 117 72;
#P connect 3 0 15 0;
#P connect 15 0 25 0;
#P fasten 12 0 4 0 19 72 166 72;
#P connect 4 0 16 0;
#P connect 16 0 24 0;
#P fasten 12 0 5 0 19 72 215 72;
#P connect 5 0 17 0;
#P connect 17 0 50 0;
#P fasten 12 0 6 0 19 72 264 72;
#P connect 6 0 18 0;
#P connect 18 0 51 0;
#P fasten 12 0 7 0 19 72 313 72;
#P connect 7 0 19 0;
#P connect 19 0 53 0;
#P fasten 12 0 8 0 19 72 362 72;
#P connect 8 0 20 0;
#P connect 20 0 54 0;
#P fasten 12 0 9 0 19 72 411 72;
#P connect 9 0 21 0;
#P connect 21 0 55 0;
#P fasten 12 0 10 0 19 72 460 72;
#P connect 10 0 22 0;
#P connect 22 0 56 0;
#P fasten 12 0 11 0 19 72 509 72;
#P connect 11 0 23 0;
#P connect 23 0 52 0;
#P pop;
#P newobj 1082 35 60 196617 p botonanal;
#P newex 681 367 29 196617 * 4.;
#N vpatcher 211 87 966 498;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 553 118 130 196617 expr abs($f1 - 128) * 14.;
#P newex 252 110 130 196617 expr abs($f1 - 128) * 10.;
#P newex 493 62 46 196617 select 1;
#P newex 493 41 48 196617 r botonv;
#P newex 426 63 46 196617 select 1;
#P newex 426 42 46 196617 r boton^;
#P message 493 89 37 196617 0 300;
#P message 426 89 42 196617 0 -300;
#P newex 190 57 46 196617 select 1;
#P newex 190 36 47 196617 r boton>;
#P newex 123 58 46 196617 select 1;
#P newex 123 37 47 196617 r boton<;
#P window linecount 1;
#P message 190 84 37 196617 0 300;
#P window linecount 0;
#P message 123 84 42 196617 0 -300;
#P window linecount 1;
#P newex 94 181 31 196617 * -1;
#P window linecount 0;
#P newex 553 186 31 196617 * -1;
#P window linecount 1;
#P newex 635 231 46 196617 select 1;
#P newex 635 206 47 196617 r botonb;
#P newex 585 231 46 196617 select 1;
#P newex 585 206 48 196617 r boton=;
#P newex 259 232 46 196617 select 1;
#P newex 259 207 47 196617 r botona;
#P newex 209 232 46 196617 select 1;
#P newex 209 207 48 196617 r boton=;
#P newex 395 163 168 196617 if $i1 > 128 then $f2 else out2 $f2;
#P inlet 395 84 15 0;
#P message 395 209 43 196617 \$1 100;
#P newex 395 229 40 196617 line 1.;
#P message 585 259 14 196617 0;
#P newex 395 335 27 196617 f;
#P newex 395 314 27 196617 + 0.;
#P outlet 395 363 15 0;
#P newex 395 290 52 196617 / 10000.;
#P message 395 248 62 196617 \$1 \, 0 5000;
#P newex 395 270 40 196617 line 1.;
#P newex 94 158 168 196617 if $i1 > 128 then $f2 else out2 $f2;
#P inlet 94 85 15 0;
#P message 94 204 43 196617 \$1 100;
#P newex 94 224 40 196617 line 1.;
#P message 209 271 14 196617 0;
#P newex 94 330 27 196617 f;
#P newex 94 309 27 196617 + 0.;
#P outlet 94 358 15 0;
#P newex 94 285 52 196617 / 10000.;
#P message 94 243 62 196617 \$1 \, 0 5000;
#P newex 94 265 40 196617 line 1.;
#P connect 9 0 10 0;
#P connect 32 0 10 0;
#P connect 33 0 10 0;
#P connect 10 0 31 0;
#P connect 10 1 8 0;
#P connect 31 0 8 0;
#P connect 8 0 7 0;
#P connect 7 0 1 0;
#P connect 1 0 0 0;
#P connect 0 0 2 0;
#P connect 6 0 4 0;
#P connect 2 0 4 0;
#P connect 4 0 5 0;
#P connect 5 0 3 0;
#P connect 6 0 4 1;
#P fasten 5 0 4 1 99 350 123 350 123 305 116 305;
#P connect 6 0 5 1;
#P connect 34 0 35 0;
#P connect 35 0 32 0;
#P connect 36 0 37 0;
#P connect 37 0 33 0;
#P connect 22 0 23 0;
#P connect 25 0 6 0;
#P connect 23 0 6 0;
#P connect 9 0 44 0;
#P connect 44 0 10 1;
#P connect 24 0 25 0;
#P connect 20 0 21 0;
#P connect 38 0 21 0;
#P connect 39 0 21 0;
#P connect 21 0 19 0;
#P connect 30 0 19 0;
#P connect 19 0 18 0;
#P connect 18 0 12 0;
#P connect 12 0 11 0;
#P connect 11 0 13 0;
#P connect 17 0 15 0;
#P connect 13 0 15 0;
#P connect 15 0 16 0;
#P connect 16 0 14 0;
#P connect 17 0 15 1;
#P fasten 16 0 15 1 400 355 424 355 424 310 417 310;
#P connect 17 0 16 1;
#P connect 40 0 41 0;
#P connect 41 0 38 0;
#P connect 42 0 43 0;
#P connect 43 0 39 0;
#P connect 20 0 45 0;
#P connect 45 0 21 1;
#P connect 21 1 30 0;
#P connect 26 0 27 0;
#P connect 29 0 17 0;
#P connect 27 0 17 0;
#P connect 28 0 29 0;
#P pop;
#P newobj 910 686 71 196617 p frenateprop;
#P number 713 367 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 3;
#P message 656 705 224 196617 \; filtro Q 0 100 100 100 100 100 100 100 100 \; filtro gain 0 2 2 2 2 2 2 2 2;
#P window linecount 1;
#P newex 544 567 42 196617 r filtro;
#P newex 503 410 134 196617 expr abs(128 - $i1) / 128.;
#P flonum 606 437 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 521 382 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user ezdac~ 543 713 587 746 0;
#P user gain~ 543 649 13 39 158 0 1.071519 7.94321 10.;
#P newex 830 434 32 196617 * 10.;
#P newex 799 434 29 196617 * 9.;
#P newex 768 434 29 196617 * 8.;
#P newex 738 434 29 196617 * 7.;
#P newex 710 434 29 196617 * 6.;
#P newex 679 434 29 196617 * 5.;
#P newex 649 434 29 196617 * 4.;
#P newex 640 466 237 196617 pack freq 0 0 0 0 0 0 0 0 0;
#P newex 640 410 27 196617 t b i;
#P message 503 488 89 196617 0 \, \$1 50 0 5000;
#P newex 503 532 32 196617 line~;
#P newex 544 589 105 196617 fffb~ 8;
#P newex 521 328 27 196617 i;
#P message 594 230 14 196617 0;
#P message 550 230 14 196617 1;
#P message 621 253 33 196617 clear;
#P newex 621 230 55 196617 delay 300;
#P button 550 305 15 0;
#P newex 550 281 54 196617 buddy 2;
#P user number~ 503 130 548 145 9 3 3 2 0. 0. 0 0. 250 0. 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 594 201 15 0;
#P button 550 201 15 0;
#P newex 594 155 37 196617 ==~ 1;
#P newex 550 155 37 196617 ==~ 1;
#P newex 594 178 36 196617 edge~;
#P newex 550 178 36 196617 edge~;
#P newex 594 130 42 196617 <~ 105;
#P newex 550 130 42 196617 >~ 160;
#P newex 594 79 29 196617 sig~;
#P flonum 366 158 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 196 158 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 681 328 27 196617 i;
#P message 754 230 14 196617 0;
#P message 710 230 14 196617 1;
#P message 781 253 33 196617 clear;
#P newex 781 230 55 196617 delay 500;
#P button 710 305 15 0;
#P newex 710 281 54 196617 buddy 2;
#P user number~ 663 130 708 145 9 3 3 2 0. 0. 0 0. 250 0. 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 754 201 15 0;
#P button 710 201 15 0;
#P newex 754 155 37 196617 ==~ 1;
#P newex 710 155 37 196617 ==~ 1;
#P newex 754 178 36 196617 edge~;
#P newex 710 178 36 196617 edge~;
#P newex 754 130 42 196617 <~ 100;
#P newex 710 130 42 196617 >~ 160;
#P flonum 86 161 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 754 77 29 196617 sig~;
#P inlet 1082 14 15 0;
#P outlet 971 733 15 0;
#P outlet 941 733 15 0;
#P outlet 910 733 15 0;
#N vpatcher 455 50 776 544;
#P origin 47 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P message 76 109 14 196617 0;
#P window linecount 0;
#P message 27 109 14 196617 1;
#P window linecount 1;
#P newex 76 81 46 196617 select 1;
#P newex 76 38 48 196617 r boton2;
#P window linecount 0;
#P newex 27 81 46 196617 select 1;
#P newex 27 38 48 196617 r boton1;
#P newex 27 136 114 196617 gate 1 1;
#P newex 27 384 27 196617 f;
#P newex 27 365 27 196617 + 0.;
#P message 27 403 70 196617 \$1 \, -0.8 500;
#P newex 27 420 40 196617 line 1.;
#P outlet 27 451 15 0;
#P user meter~ 212 111 292 124 50 0 168 0 103 103 103 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3;
#P newex 27 239 27 196617 + 0.;
#P newex 27 186 27 196617 / 5.;
#P user meter~ 131 111 211 124 50 0 168 0 103 103 103 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3;
#P user ezadc~ 177 72 221 105 0;
#P message 27 265 43 196617 \$1 100;
#P newex 27 285 40 196617 line 1.;
#P newex 27 161 162 196617 if $f1 > 0.02 then $f1 else out2 0;
#P newex 179 185 27 196617 f;
#P newex 27 208 162 196617 if $f1 > $f2 then $f1;
#P message 27 312 56 196617 \$1 \, 0 500;
#P newex 27 335 40 196617 line 1.;
#P connect 18 0 19 0;
#P connect 19 0 22 0;
#P connect 23 0 17 0;
#P connect 22 0 17 0;
#P connect 17 0 4 0;
#P connect 4 0 9 0;
#P connect 9 0 2 0;
#P connect 2 0 10 0;
#P connect 10 0 6 0;
#P connect 6 0 5 0;
#P connect 5 0 1 0;
#P connect 1 0 0 0;
#P connect 0 0 15 0;
#P connect 15 0 16 0;
#P connect 16 0 14 0;
#P connect 14 0 13 0;
#P connect 13 0 12 0;
#P fasten 0 0 10 1 32 359 85 359 85 237 49 237;
#P fasten 13 0 15 1 32 445 99 445 99 361 49 361;
#P connect 20 0 21 0;
#P connect 21 0 23 0;
#P connect 7 0 8 0;
#P connect 8 0 17 1;
#P fasten 2 0 3 0 32 227 208 227 208 181 184 181;
#P connect 4 1 3 0;
#P connect 3 0 2 1;
#P connect 7 1 11 0;
#P pop;
#P newobj 941 709 72 196617 p frenatewind;
#P newex 22 401 34 196617 + 90.;
#P newex 22 135 103 196617 clip -0.9999 0.9999;
#P newex 162 135 103 196617 clip -0.9999 0.9999;
#P newex 331 135 103 196617 clip -0.9999 0.9999;
#P newex 331 710 40 196617 line 1.;
#P newex 331 688 66 196617 pack 0. 300;
#P outlet 331 733 15 0;
#P newex 162 710 41 196617 line 1.;
#P newex 162 688 66 196617 pack 0. 300;
#P newex 22 709 41 196617 line 1.;
#P newex 22 687 66 196617 pack 0. 300;
#P newex 331 381 135 196617 expr $f1 / 3.15912 * 360.;
#P newex 162 381 167 196617 expr 360. - $f1 / 3.15912 * 360.;
#P newex 22 381 138 196617 expr $f1 / 3.15912 * 360.;
#P newex 331 157 26 196617 asin;
#P newex 162 157 26 196617 asin;
#P newex 22 157 26 196617 asin;
#P newex 331 112 114 196617 expr ($f1 - 126) / 25.;
#P newex 162 112 114 196617 expr ($f1 - 129) / 25.;
#P newex 22 112 114 196617 expr ($f1 - 128) / 25.;
#P outlet 22 733 15 0;
#P outlet 162 733 15 0;
#P inlet 22 15 15 0;
#P newex 22 36 827 196617 unpack 0. 0. 0. 0;
#P comment 41 15 83 196617 analisis estático;
#P user panel 499 354 404 102;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 1061 2 130 754;
#X brgb 191 191 191;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P comment 986 688 58 196617 movimiento;
#P user panel 904 669 152 83;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 16 355 453 71;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 16 668 453 85;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 499 74 404 278;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 16 74 454 111;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 10 2 463 754;
#X brgb 191 191 191;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 499 459 404 293;
#X brgb 124 124 124;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 474 2 586 754;
#X brgb 191 191 191;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P connect 13 0 12 0;
#P connect 12 0 16 0;
#P connect 16 0 34 0;
#P connect 34 0 19 0;
#P connect 19 0 22 0;
#P connect 22 0 35 0;
#P connect 35 0 25 0;
#P connect 25 0 26 0;
#P connect 26 0 15 0;
#P connect 34 0 42 0;
#P fasten 12 1 17 0 299 67 167 67;
#P connect 17 0 33 0;
#P connect 33 0 20 0;
#P connect 20 0 23 0;
#P connect 23 0 27 0;
#P connect 27 0 28 0;
#P connect 28 0 14 0;
#P connect 33 0 59 0;
#P fasten 12 2 18 0 571 67 336 67;
#P connect 18 0 32 0;
#P connect 32 0 21 0;
#P connect 21 0 24 0;
#P connect 24 0 30 0;
#P connect 30 0 31 0;
#P connect 31 0 29 0;
#P connect 32 0 60 0;
#P connect 79 0 122 0;
#P connect 61 0 70 0;
#P fasten 58 0 94 0 686 363 508 363;
#P fasten 77 0 94 0 526 361 508 361;
#P connect 94 0 117 0;
#P connect 117 0 116 0;
#P connect 116 0 80 0;
#P fasten 115 0 79 0 599 505 508 505;
#P connect 80 0 79 0;
#P connect 72 0 77 0;
#P fasten 77 0 92 0 526 371 526 371;
#P connect 70 1 77 1;
#P connect 109 0 130 0;
#P connect 130 0 110 0;
#P fasten 82 0 110 0 645 546 548 546;
#P fasten 104 0 90 0 682 641 548 641;
#P connect 128 0 90 0;
#P fasten 101 0 91 0 601 710 548 710;
#P connect 90 0 91 0;
#P connect 95 0 78 0;
#P connect 78 0 127 0;
#P connect 78 2 127 0;
#P connect 78 4 127 0;
#P connect 78 6 127 0;
#P connect 61 0 62 0;
#P connect 62 0 66 0;
#P connect 66 0 64 0;
#P connect 64 0 68 0;
#P connect 68 0 75 0;
#P connect 75 0 71 0;
#P connect 74 0 71 0;
#P connect 71 0 72 0;
#P connect 79 0 127 1;
#P connect 127 0 129 0;
#P connect 90 1 129 0;
#P connect 129 0 91 1;
#P connect 118 0 62 1;
#P fasten 12 0 61 0 27 61 599 61;
#P connect 61 0 63 0;
#P connect 63 0 67 0;
#P connect 67 0 65 0;
#P connect 65 0 69 0;
#P connect 69 0 76 0;
#P connect 76 0 71 1;
#P connect 117 1 115 0;
#P fasten 102 0 103 0 661 646 601 646;
#P connect 103 0 101 0;
#P fasten 94 0 93 0 508 433 611 433;
#P connect 78 1 128 0;
#P connect 78 3 128 0;
#P connect 78 5 128 0;
#P connect 78 7 128 0;
#P connect 69 0 73 0;
#P connect 68 0 73 0;
#P connect 73 0 74 0;
#P connect 119 0 63 1;
#P connect 79 0 128 1;
#P connect 77 0 81 0;
#P connect 99 0 81 0;
#P connect 81 0 82 0;
#P fasten 81 1 83 0 662 431 654 431;
#P fasten 117 1 124 0 599 485 660 485;
#P connect 126 0 123 0;
#P connect 124 0 123 0;
#P connect 102 0 96 0;
#P connect 41 0 51 0;
#P connect 102 0 104 0;
#P fasten 117 1 125 0 599 485 683 485;
#P connect 125 0 126 0;
#P fasten 81 1 84 0 662 431 684 431;
#P connect 53 0 58 0;
#P fasten 58 0 99 0 686 363 686 363;
#P connect 83 0 82 2;
#P connect 51 1 58 1;
#P connect 41 0 43 0;
#P connect 43 0 47 0;
#P connect 47 0 45 0;
#P connect 45 0 49 0;
#P connect 49 0 56 0;
#P connect 55 0 52 0;
#P connect 56 0 52 0;
#P connect 52 0 53 0;
#P fasten 81 1 85 0 662 431 715 431;
#P fasten 58 0 97 0 686 358 718 358;
#P connect 84 0 82 3;
#P fasten 81 1 86 0 662 431 743 431;
#P connect 85 0 82 4;
#P connect 120 0 43 1;
#P fasten 12 2 41 0 571 61 759 61;
#P connect 41 0 44 0;
#P connect 44 0 48 0;
#P connect 48 0 46 0;
#P connect 46 0 50 0;
#P connect 50 0 57 0;
#P connect 57 0 52 1;
#P connect 86 0 82 5;
#P fasten 81 1 87 0 662 431 773 431;
#P connect 50 0 54 0;
#P connect 49 0 54 0;
#P connect 54 0 55 0;
#P connect 121 0 44 1;
#P connect 87 0 82 6;
#P fasten 81 1 88 0 662 431 804 431;
#P connect 88 0 82 7;
#P fasten 81 1 89 0 662 431 835 431;
#P connect 89 0 82 8;
#P fasten 81 1 131 0 662 431 870 431;
#P connect 131 0 82 9;
#P fasten 77 0 98 0 526 358 915 358;
#P connect 98 0 37 0;
#P connect 36 0 38 0;
#P fasten 58 0 98 1 686 358 976 358;
#P connect 98 1 39 0;
#P connect 40 0 100 0;
#P pop;
#P newobj 695 276 188 196617 p analizar;
#P message 782 541 70 196617 fullscreen \$1;
#P toggle 537 523 15 0;
#P newex 537 484 50 196617 select 27;
#P newex 537 464 50 196617 key;
#P newex 537 603 373 196617 jit.window ml @depthbuffer 1 @rect 614 76 934 316 @floating 1 @fsmenubar 0;
#N vpatcher 290 149 1385 888;
#P origin 0 -43;
#P window setfont "Sans Serif" 9.;
#P newex 496 566 40 196617 + 270.;
#P flonum 35 669 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 195 484 27 196617 f;
#P newex 59 515 156 196617 if abs($f1 - $f2) < 100 then $f1;
#P outlet 80 651 15 0;
#P newex 603 386 27 196617 f;
#P newex 467 420 159 196617 if abs($f1 - $f2) < 130 then $f1;
#P newex 560 334 40 196617 change;
#P number 831 199 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 831 175 130 196617 expr (($i1 - 1) * -1) / 2;
#P flonum 896 88 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 896 125 48 196617 change -;
#P flonum 859 88 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 831 124 49 196617 change +;
#P flonum 914 326 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 627 541 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 668 257 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 467 513 40 196617 line 1.;
#P newex 467 480 66 196617 pack 0. 300;
#P newex 59 582 40 196617 line;
#P newex 59 557 66 196617 pack 0. 300;
#P flonum 875 327 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 401 324 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 652 288 175 196617 expr ($f1- 129)/52. * 180. + 270.;
#P newex 467 286 172 196617 expr (129. - $f1)/52. * 180. + 90;
#P newex 467 255 195 196617 if $i2 > 129 then $i1 else out2 $i1;
#P comment 255 322 100 196617 154 128;
#P comment 254 304 100 196617 128 103;
#P comment 253 287 100 196617 100 129 lsideup;
#P comment 253 269 100 196617 128 154 dalt;
#P newex 232 407 171 196617 expr ($f1-129.)/26. * -90. + 270.;
#P newex 63 409 157 196617 expr ($f1-129.)/26. * 90. + 90;
#P newex 63 378 166 196617 if $i2 > 128 then $i1 else out2 $i1;
#P comment 55 358 100 196617 103 129 128 dreta;
#P comment 55 337 100 196617 128 129 100 sota;
#P comment 55 313 100 196617 153 129 128 lsideup;
#P outlet 675 626 15 0;
#P outlet 457 597 15 0;
#P inlet 63 22 15 0;
#P newex 63 41 85 196617 unpack 0. 0. 0. 0;
#P comment 55 293 100 196617 128 129 154 dalt;
#P connect 21 0 39 0;
#P connect 9 0 37 0;
#P connect 10 0 37 0;
#P connect 37 0 20 0;
#P connect 20 0 21 0;
#P connect 2 0 1 0;
#P connect 1 0 8 0;
#P connect 8 0 9 0;
#P connect 21 0 36 0;
#P fasten 37 0 38 0 64 547 246 547 246 475 200 475;
#P connect 38 0 37 1;
#P connect 1 2 8 1;
#P connect 8 1 10 0;
#P connect 16 0 18 0;
#P connect 40 0 3 0;
#P connect 1 1 15 0;
#P connect 15 0 16 0;
#P connect 17 0 34 0;
#P connect 16 0 34 0;
#P connect 34 0 22 0;
#P connect 22 0 23 0;
#P connect 23 0 40 0;
#P connect 16 0 33 0;
#P fasten 34 0 35 0 472 449 654 449 654 377 608 377;
#P connect 35 0 34 1;
#P connect 34 0 25 0;
#P connect 1 2 15 1;
#P connect 15 1 17 0;
#P connect 1 2 24 0;
#P connect 28 0 27 0;
#P connect 29 0 31 0;
#P connect 27 0 31 0;
#P connect 31 0 32 0;
#P connect 17 0 19 0;
#P connect 30 0 29 0;
#P pop;
#P newobj 887 276 44 196617 p rintfh;
#P button 559 378 15 0;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 758 349 70 1441802 loadmess 1;
#B color 5;
#P window setfont "Sans Serif" 9.;
#P flonum 759 300 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 660 322 115 196617 pak rotatexyz 0. 0. 90.;
#P window setfont "Fixedwidth Serif" 10.;
#P message 553 302 103 1441802 material_mode \$1;
#P number 553 280 35 10 0 2 3 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 575 378 92 1441802 read apple.obj;
#P message 758 410 110 1441802 smooth_shading \$1;
#P message 633 202 113 1441802 texture grid 64 64;
#P message 829 349 113 1441802 read mushrooms.obj;
#P message 622 411 113 1441802 lighting_enable \$1;
#P message 547 410 68 1441802 verbose \$1;
#P message 554 326 50 1441802 reset;
#P newex 554 349 200 1441802 jit.gl.handle ml @auto_rotate 1;
#B color 5;
#P newex 546 201 73 1441802 t b b erase;
#P newex 537 439 100 1441802 jit.gl.model ml;
#B color 5;
#P window setfont Times 10.;
#P comment 561 157 70 1310730 Start Rendering;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 546 177 62 1441802 qmetro 50;
#P toggle 546 156 15 0;
#P newex 546 229 256 1441802 jit.gl.render ml @erase_color 0. 0. 0. 1.;
#B color 5;
#P window setfont "Sans Serif" 9.;
#P message 206 219 96 196617 getexpansionstatus;
#P message 132 219 65 196617 getledstatus;
#P message 41 219 80 196617 getbatterylevel;
#P user lcd 24 452 431 128 1 1 0 0 0;
#N vpatcher 287 282 803 861;
#P origin 0 -6;
#P button 20 417 15 0;
#P window setfont "Sans Serif" 9.;
#P number -3 537 94 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 0;
#P newex 17 484 35 196617 timer;
#P number 362 414 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 362 387 111 196617 expr ($f1 - 128) / 26;
#P number 336 352 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 336 325 111 196617 expr ($f1 - 129) / 25;
#P comment 264 480 54 196617 z1 = 154;
#P comment 265 462 54 196617 y2 = 154;
#P comment 57 480 133 196617 z = (zr - z0) / (z1 - z0);
#P comment 57 441 133 196617 x = (xr - x0) / (x3 - x0);
#P comment 57 410 259 196617 x0 = (z2 + z3 )/2 = (127 + 129 )/ 2. = 128;
#P comment 57 391 259 196617 x0 = (y1 + y3 )/2 = (129 + 129 )/ 2. = 129;
#P number 260 325 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 260 298 114 196617 expr ($f1 - 128 ) / 25;
#P newex 294 190 27 196617 int;
#P newex 198 190 27 196617 int;
#P newex 102 190 27 196617 int;
#P newex 246 161 59 196617 t i i b;
#P newex 150 160 59 196617 t i i b;
#P newex 54 160 58 196617 t i i b;
#P newex 342 134 27 196617 !- 5;
#P newex 342 158 32 196617 * 90;
#P newex 246 134 87 196617 scale 0 255 99 0;
#P newex 150 134 87 196617 scale 0 255 99 0;
#P newex 54 134 87 196617 scale 0 255 99 0;
#P user umenu 379 101 89 196645 3 64 117 0;
#X add Front side is up.;
#X add Right side is up.;
#X add Back side is up.;
#X add Left side is up.;
#P number 54 101 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 150 101 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 246 101 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 342 101 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 6;
#P message 54 241 182 196617 scrollrect 1 0 427 99 -1 0 \, linesegment 425 \$2 426 \$1 255 0 0 \, linesegment 425 \$4 426 \$3 0 255 0 \, linesegment 425 \$6 426 \$5 0 0 255 \, paintrect 0 100 27 120 0 \, paintarc 7 100 27 120 \$7 180 250;
#P window linecount 1;
#P newex 54 214 298 196617 pack 0 0 0 0 0 0 0;
#P comment 69 36 100 196617 motion sensor data;
#P comment 60 84 78 196617 accelaration-X;
#P comment 348 84 100 196617 orientation;
#P outlet 54 327 15 0;
#P comment 252 84 93 196617 accelaration-Z;
#P comment 156 84 77 196617 accelaration-Y;
#P newex 54 63 299 196617 unpack 0. 0. 0. 0;
#P inlet 54 36 15 0;
#P comment 57 373 259 196617 x0 = (x1 + x2 )/2 = (128 + 128 )/ 2. = 128;
#P comment 57 462 133 196617 y = (yr - y0) / (y2 - y0);
#P comment 265 441 54 196617 x3 = 153;
#P connect 41 0 42 0;
#P connect 43 0 41 0;
#P connect 4 0 43 0;
#P connect 43 0 41 1;
#P connect 3 0 4 0;
#P connect 4 0 16 0;
#P connect 16 0 18 0;
#P connect 18 0 23 0;
#P connect 23 0 11 0;
#P connect 11 0 12 0;
#P connect 12 0 7 0;
#P connect 23 2 26 0;
#P connect 26 0 11 1;
#P fasten 23 1 26 1 83 183 124 183;
#P connect 4 1 15 0;
#P connect 15 0 19 0;
#P connect 19 0 24 0;
#P connect 24 0 11 2;
#P connect 24 2 27 0;
#P connect 27 0 11 3;
#P fasten 24 1 27 1 179 183 220 183;
#P connect 4 2 14 0;
#P connect 14 0 20 0;
#P connect 20 0 25 0;
#P connect 25 0 11 4;
#P connect 29 0 30 0;
#P connect 25 2 28 0;
#P connect 28 0 11 5;
#P fasten 25 1 28 1 275 184 316 184;
#P connect 37 0 38 0;
#P connect 4 3 13 0;
#P connect 13 0 22 0;
#P connect 22 0 21 0;
#P connect 21 0 11 6;
#P connect 39 0 40 0;
#P hidden fasten 4 3 17 0 347 96 384 96;
#P pop;
#P newobj 24 285 78 196617 p motionsensor;
#P user lcd 159 311 128 128 1 1 0 0 0;
#N vpatcher 442 143 924 533;
#P origin 0 -6;
#P window setfont "Sans Serif" 9.;
#P newex 342 280 29 196617 gate;
#P newex 342 201 46 196617 t i clear;
#P window linecount 3;
#P message 54 226 174 196617 paintarc \$2 \$5 \$3 \$6 \$7 180 250 \, linesegment 0 \$4 127 \$4 26 \, linesegment \$1 0 \$1 127 26;
#P window linecount 1;
#P newex 86 175 30 196617 - 10;
#P newex 118 175 31 196617 + 10;
#P newex 182 175 30 196617 - 10;
#P newex 214 175 31 196617 + 10;
#P window linecount 0;
#P newex 54 201 203 196617 pack 0 0 0 0 0 0 0;
#P window linecount 2;
#P newex 246 129 95 196617 scale 0. 3.141593 90 270;
#P newex 150 129 59 196617 scale -1. 1. 127 0;
#P window linecount 1;
#P comment 69 36 100 196617 IR sensor data;
#P window linecount 0;
#P comment 60 84 59 196617 position-X;
#P toggle 342 99 15 0;
#P window linecount 1;
#P comment 348 84 100 196617 tracking;
#P outlet 342 315 15 0;
#P window linecount 0;
#P newex 54 129 59 196617 scale -1. 1. 0 127;
#P flonum 246 99 46 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 252 84 93 196617 angle(radian);
#P flonum 150 99 46 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 156 84 64 196617 position-Y;
#P flonum 54 99 46 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 54 63 299 196617 unpack 0. 0. 0. 0;
#P inlet 54 36 15 0;
#P connect 0 0 1 0;
#P connect 1 0 2 0;
#P connect 2 0 7 0;
#P connect 7 0 15 0;
#P connect 15 0 20 0;
#P fasten 7 0 19 0 59 166 91 166;
#P connect 19 0 15 1;
#P fasten 7 0 18 0 59 166 123 166;
#P connect 18 0 15 2;
#P connect 1 1 4 0;
#P connect 4 0 13 0;
#P fasten 13 0 15 3 155 195 155 195;
#P fasten 13 0 17 0 155 166 187 166;
#P connect 17 0 15 4;
#P fasten 13 0 16 0 155 166 219 166;
#P connect 16 0 15 5;
#P connect 1 2 6 0;
#P connect 6 0 14 0;
#P connect 14 0 15 6;
#P connect 1 3 10 0;
#P connect 10 0 21 0;
#P connect 21 0 22 0;
#P fasten 21 1 8 0 383 304 347 304;
#P connect 22 0 8 0;
#P fasten 20 0 22 1 59 272 366 272;
#P pop;
#P newobj 159 285 56 196617 p irsensor;
#P newex 429 312 63 196617 print status;
#P user radiogroup 350 310 18 72;
#X size 5;
#X offset 14;
#X inactive 0;
#X itemtype 1;
#X flagmode 0;
#X set 0 0 0 0 0;
#X done;
#P comment 369 369 38 196617 Plus;
#P comment 369 355 38 196617 Up;
#P comment 369 341 38 196617 Down;
#P comment 369 327 38 196617 Right;
#P comment 369 313 38 196617 Left;
#P comment 312 383 38 196617 Home;
#P comment 312 369 38 196617 Minus;
#P comment 312 355 38 196617 A;
#P comment 312 341 38 196617 B;
#P comment 312 327 38 196617 1;
#P comment 312 313 38 196617 2;
#N vpatcher 10 59 1197 325;
#P outlet 344 164 15 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 344 134 209 196617 pack 0 0 0 0 0;
#P outlet 50 164 15 0;
#P newex 50 132 256 196617 pack 0 0 0 0 0 0;
#P window linecount 1;
#P newex 50 50 40 196617 change;
#P toggle 540 106 15 0;
#P newex 540 79 45 196617 & 4096;
#P comment 555 108 38 196617 Plus;
#P toggle 491 106 15 0;
#P newex 491 79 45 196617 & 2048;
#P comment 506 108 38 196617 Up;
#P toggle 442 106 15 0;
#P newex 442 79 45 196617 & 1024;
#P comment 457 108 38 196617 Down;
#P toggle 393 106 15 0;
#P newex 393 79 39 196617 & 512;
#P comment 408 108 38 196617 Right;
#P toggle 344 106 15 0;
#P newex 344 79 39 196617 & 256;
#P comment 359 108 38 196617 Left;
#P toggle 295 106 15 0;
#P newex 295 79 39 196617 & 128;
#P comment 310 108 38 196617 Home;
#P toggle 246 106 15 0;
#P newex 246 79 33 196617 & 16;
#P comment 261 108 38 196617 Minus;
#P toggle 197 106 15 0;
#P newex 197 79 27 196617 & 8;
#P comment 212 108 38 196617 A;
#P toggle 148 106 15 0;
#P newex 148 79 27 196617 & 4;
#P comment 163 108 38 196617 B;
#P toggle 99 106 15 0;
#P newex 99 79 27 196617 & 2;
#P comment 114 108 38 196617 1;
#P toggle 50 106 15 0;
#P newex 50 79 27 196617 & 1;
#P comment 65 108 38 196617 2;
#P inlet 50 25 15 0;
#P connect 0 0 34 0;
#P fasten 34 0 2 0 55 73 55 73;
#P connect 2 0 3 0;
#P connect 3 0 35 0;
#P connect 35 0 36 0;
#P fasten 34 0 5 0 55 73 104 73;
#P connect 5 0 6 0;
#P connect 6 0 35 1;
#P fasten 34 0 8 0 55 73 153 73;
#P connect 8 0 9 0;
#P connect 9 0 35 2;
#P fasten 34 0 11 0 55 73 202 73;
#P connect 11 0 12 0;
#P connect 12 0 35 3;
#P fasten 34 0 14 0 55 73 251 73;
#P connect 14 0 15 0;
#P connect 15 0 35 4;
#P fasten 34 0 17 0 55 73 300 73;
#P connect 17 0 18 0;
#P connect 18 0 35 5;
#P fasten 34 0 20 0 55 73 349 73;
#P connect 20 0 21 0;
#P connect 21 0 37 0;
#P connect 37 0 38 0;
#P fasten 34 0 23 0 55 73 398 73;
#P connect 23 0 24 0;
#P connect 24 0 37 1;
#P fasten 34 0 26 0 55 73 447 73;
#P connect 26 0 27 0;
#P connect 27 0 37 2;
#P fasten 34 0 29 0 55 73 496 73;
#P connect 29 0 30 0;
#P connect 30 0 37 3;
#P fasten 34 0 32 0 55 73 545 73;
#P connect 32 0 33 0;
#P connect 33 0 37 4;
#P pop;
#P newobj 294 285 66 196617 p buttons;
#P user radiogroup 294 310 18 86;
#X size 6;
#X offset 14;
#X inactive 0;
#X itemtype 1;
#X flagmode 0;
#X set 0 0 0 0 0 0;
#X done;
#P comment 294 413 206 196617 Thanks to WiiLi.org and;
#P window linecount 3;
#P comment 273 35 122 196617 Argumentos: (nada) \; Inlet: bang \, connect... \; Outlet: lista \, lista \, int... \;;
#B color 13;
#P window setfont "Sans Serif" 18.;
#P window linecount 1;
#P comment 8 35 134 196626 aka.wiiremote;
#B color 13;
#P window setfont "Sans Serif" 9.;
#P comment 10 60 172 196617 Manipulador del Nintendo Wii Remote;
#B color 13;
#P user panel 0 28 400 50;
#X brgb 45 253 213;
#X frgb 0 0 0;
#X border 0;
#X rounded 0;
#X shadow 0;
#X done;
#P newex 546 89 60 196617 loadmess 1;
#P comment 182 163 67 196617 (default on);
#P toggle 482 163 15 0;
#P toggle 465 163 15 0;
#P toggle 448 163 15 0;
#P toggle 431 163 15 0;
#P newex 414 188 78 196617 pak led 0 0 0 0;
#P toggle 339 128 15 0;
#P message 339 188 66 196617 vibration \$1;
#P toggle 264 163 15 0;
#P message 264 188 63 196617 irsensor \$1;
#P toggle 167 163 15 0;
#P message 167 188 85 196617 motionsensor \$1;
#P message 34 197 57 196617 disconnect;
#B color 2;
#P message 24 180 44 196617 connect;
#B color 5;
#P newex 101 188 52 196617 metro 50;
#P toggle 101 163 15 0;
#P newex 24 247 417 196617 aka.wiiremote;
#P connect 0 2 24 0;
#P fasten 0 2 71 1 299 269 878 269;
#P connect 71 5 72 3;
#P fasten 71 4 72 2 840 307 844 307;
#P fasten 71 3 72 1 805 307 813 307;
#P fasten 69 0 83 0 542 540 542 540;
#P fasten 69 0 70 0 542 540 787 540;
#P fasten 62 0 61 3 764 319 770 319;
#P fasten 63 0 53 0 763 374 552 374;
#P fasten 63 0 64 0 763 376 564 376;
#P fasten 63 0 54 0 763 404 627 404;
#P connect 63 0 57 0;
#P fasten 83 1 88 0 564 562 629 562;
#P fasten 83 1 81 1 564 566 760 566 760 474 739 474;
#P connect 71 1 61 2;
#P connect 81 0 80 0;
#P connect 79 0 81 0;
#P connect 78 0 79 0;
#P connect 71 0 61 1;
#P connect 0 0 40 0;
#P fasten 0 0 71 0 29 269 700 269;
#P connect 83 0 87 0;
#P fasten 83 0 82 1 542 562 755 562 755 477 690 477;
#P connect 82 0 77 0;
#P connect 76 0 82 0;
#P connect 75 0 76 0;
#P connect 64 0 58 0;
#P fasten 72 0 51 0 782 344 559 344;
#P fasten 61 0 51 0 665 344 559 344;
#P connect 52 0 51 0;
#P connect 59 0 60 0;
#P fasten 56 0 45 0 638 226 551 226;
#P connect 50 0 45 0;
#P fasten 50 2 45 0 613 224 551 224;
#P connect 47 0 50 0;
#P connect 46 0 47 0;
#P fasten 17 0 6 0 551 149 172 149;
#P connect 17 0 46 0;
#P fasten 70 0 66 0 787 599 542 599;
#P fasten 80 0 69 0 704 518 542 518;
#P fasten 77 0 69 0 655 518 542 518;
#P connect 68 0 69 0;
#P connect 67 0 68 0;
#P fasten 60 0 49 0 558 322 542 322;
#P fasten 58 0 49 0 580 397 542 397;
#P fasten 57 0 49 0 763 430 542 430;
#P fasten 54 0 49 0 627 430 542 430;
#P fasten 51 0 49 0 559 370 542 370;
#P connect 53 0 49 0;
#P fasten 55 0 49 0 834 402 542 402;
#P connect 15 0 11 4;
#P connect 14 0 11 3;
#P connect 13 0 11 2;
#P connect 0 3 37 0;
#P connect 0 3 89 0;
#P connect 12 0 11 1;
#P connect 90 0 91 1;
#P connect 24 1 36 0;
#P connect 91 0 9 0;
#P connect 10 0 91 0;
#P connect 24 0 23 0;
#P connect 8 0 7 0;
#P connect 6 0 5 0;
#P connect 38 0 39 0;
#P connect 0 1 38 0;
#P connect 1 0 2 0;
#P fasten 89 0 1 0 445 301 529 301 529 156 106 156;
#P fasten 40 0 73 1 29 354 66 354;
#P connect 73 0 41 0;
#P connect 74 0 73 0;
#P fasten 43 0 0 0 137 240 29 240;
#P fasten 42 0 0 0 46 240 29 240;
#P fasten 11 0 0 0 419 215 29 215;
#P fasten 9 0 0 0 344 215 29 215;
#P fasten 7 0 0 0 269 215 29 215;
#P fasten 5 0 0 0 172 215 29 215;
#P fasten 4 0 0 0 39 215 29 215;
#P fasten 3 0 0 0 29 215 29 215;
#P fasten 44 0 0 0 211 240 29 240;
#P fasten 2 0 0 0 106 215 29 215;
#P window clipboard copycount 92;