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;