#N canvas 714 178 1205 764 10;
#X obj 60 19 r /fromOSC;
#X floatatom 134 174 10 0 0 0 - - -, f 10;
#X floatatom 135 192 10 0 0 0 - - -, f 10;
#X floatatom 135 210 10 0 0 0 - - -, f 10;
#X floatatom 135 228 10 0 0 0 - - -, f 10;
#X text 88 173 current;
#X text 95 192 target;
#X text 101 210 speed;
#X text 83 228 maxspeed;
#X obj 539 667 pack s f f;
#X obj 606 644 f \$1;
#X obj 606 622 loadbang;
#X obj 539 721 s /toOSC;
#X obj 148 82 print stepper\$1;
#X msg 678 563 setCurrentPosition 0;
#X msg 605 529 currentPosition;
#X msg 601 466 setSpeed \$1;
#X floatatom 601 443 5 0 0 0 - - -, f 5;
#X text 962 465 teensy + BED & 17hs16-2004s1;
#X msg 965 484 maxSpeed 22000 \, acceleration 4000;
#X obj 441 527 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 469 484 move 160000 \, setSpeed 3200;
#X obj 867 590 metro 15000;
#X obj 869 568 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 727 417 hsl 128 15 0 10000 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 0;
#X obj 724 477 i;
#X msg 542 559 move 1.6e+06;
#X msg 539 699 /\$1 \$3 \$2;
#X msg 706 493 maxSpeed 25000 \, acceleration 200;
#X obj 726 453 * 1;
#X msg 792 439 -1;
#X msg 830 451 1;
#X obj 752 437 t b f;
#X obj 90 312 r /target;
#X obj 90 413 t f f;
#N canvas 1 55 450 300 speedCalc 0;
#X obj 110 35 inlet distance;
#X obj 310 42 inlet time;
#X obj 120 233 outlet speed;
#X text 225 149 constant speed mode;
#X obj 125 124 /;
#X obj 214 98 t b f;
#X connect 0 0 4 0;
#X connect 1 0 5 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 5 1 4 1;
#X restore 142 441 pd speedCalc;
#X obj 90 363 unpack f f;
#X floatatom 196 463 15 0 0 0 - - -, f 15;
#X text 161 365 # of turns \, time in seconds;
#X msg 24 346;
#X obj 159 500 print;
#X obj 89 484 pack f f;
#X obj 142 462 i;
#N canvas 1 55 450 300 filter\$1 0;
#X obj 60 41 t a a;
#X obj 92 89 == \$1;
#X obj 60 132 spigot;
#X msg 92 67 \$1;
#X obj 60 21 inlet;
#X obj 60 153 outlet;
#X connect 0 0 2 0;
#X connect 0 1 3 0;
#X connect 1 0 2 1;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X restore 60 47 pd filter\$1;
#N canvas 1 55 450 300 filter\$1 0;
#X obj 60 41 t a a;
#X obj 92 89 == \$1;
#X obj 60 132 spigot;
#X msg 92 67 \$1;
#X obj 60 21 inlet;
#X obj 60 153 outlet;
#X connect 0 0 2 0;
#X connect 0 1 3 0;
#X connect 1 0 2 1;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X restore 90 337 pd filter\$1;
#X msg 718 638 getStatus 0;
#X obj 89 601 pack s f f;
#X obj 156 578 f \$1;
#X obj 156 556 loadbang;
#X obj 89 655 s /toOSC;
#X msg 89 633 /\$1 \$3 \$2;
#X msg 268 572 getStatus 0;
#X msg 89 530 move \$1 \, setSpeed \$2 \, getStatus;
#N canvas 132 527 450 300 conversion 0;
#X obj 97 9 inlet;
#X obj 97 30 unpack f f f f f;
#X obj 97 94 outlet;
#X obj 120 134 outlet;
#X obj 143 174 outlet;
#X obj 166 214 outlet;
#X obj 190 254 outlet;
#X obj 97 75 steps2camrot;
#X obj 120 115 steps2camrot;
#X obj 143 155 steps2camrot;
#X obj 166 195 steps2camrot;
#X obj 190 235 steps2camrot;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 1 1 8 0;
#X connect 1 2 9 0;
#X connect 1 3 10 0;
#X connect 1 4 11 0;
#X connect 7 0 2 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X connect 10 0 5 0;
#X connect 11 0 6 0;
#X restore 105 126 pd conversion;
#X obj 208 198 vradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144
-1 -1 1;
#X text 230 196 with acc;
#X text 228 211 constant speed;
#X text 229 226 manual speed;
#X obj 103 105 route /status /onTarget;
#X obj 207 175 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 24 325 1 40;
#X obj 210 264 t b f;
#X obj 208 327 s /toOSC;
#X obj 325 445 print;
#X obj 209 285 pack \$1 0;
#X msg 209 306 /driveMode \$1 \$2;
#X obj 343 166 vsl 12 60 0 20000 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 0 1;
#X obj 342 327 i;
#X obj 342 307 * 1;
#X obj 368 291 t b f;
#X obj 342 409 s /toOSC;
#X obj 339 233 hradio 10 1 0 2 empty empty empty 0 -8 0 10 -262144
-1 -1 1;
#X obj 339 248 route 0 1;
#X msg 339 269 -1;
#X msg 368 269 1;
#X obj 342 346 t b f;
#X obj 342 367 pack \$1 0;
#X msg 342 388 /setSpeed \$1 \$2;
#X obj 447 309 pack \$1 0 0;
#X floatatom 441 180 5 0 0 0 tours - -, f 5;
#X msg 447 330 /move \$1 \$2 \, /setSpeed \$1 \$3 \, /getStatus \$1
;
#X obj 499 166 vsl 12 60 0 0.7 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 5900 1;
#X floatatom 619 281 20 0 0 0 - - -, f 20;
#X obj 442 228 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 447 351 s /toOSC;
#X obj 472 274 steps2camrot;
#X obj 499 234 / 60;
#X obj 647 146 tof/menubutton 100 25 \$0-mbS \$0-mbR 1 grey90 black
grey95 black -1 \, test (autre copie).move \, test.move \, test (3e copie).move
\, test (4e copie).move \, test (copie).move;
#X obj 649 81 list prepend add;
#X obj 649 102 list trim;
#X obj 322 62 ofGetPatchDirectory;
#X obj 322 37 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X text 343 37 get the list of file names in a directory.;
#X msg 646 29 symbol \$1/moves;
#X symbolatom 322 83 50 0 0 0 - - -, f 50;
#X obj 811 100 print;
#X obj 654 59 ofGetDirectoryFileNames move;
#X floatatom 540 309 5 0 0 0 - - -, f 5;
#X obj 21 387 steps2camrot;
#X obj 489 247 steps2camrot;
#X connect 0 0 43 0;
#X connect 9 0 27 0;
#X connect 10 0 9 2;
#X connect 11 0 10 0;
#X connect 14 0 9 0;
#X connect 15 0 9 0;
#X connect 16 0 9 0;
#X connect 17 0 16 0;
#X connect 20 0 21 0;
#X connect 21 0 9 0;
#X connect 22 0 26 0;
#X connect 23 0 22 0;
#X connect 24 0 29 0;
#X connect 25 0 17 0;
#X connect 26 0 9 0;
#X connect 27 0 12 0;
#X connect 28 0 9 0;
#X connect 29 0 25 0;
#X connect 30 0 32 0;
#X connect 31 0 32 0;
#X connect 32 0 29 0;
#X connect 32 1 29 1;
#X connect 33 0 44 0;
#X connect 34 0 41 0;
#X connect 34 1 35 0;
#X connect 35 0 37 0;
#X connect 35 0 42 0;
#X connect 36 0 98 1;
#X connect 36 1 35 1;
#X connect 41 0 52 0;
#X connect 42 0 41 1;
#X connect 43 0 13 0;
#X connect 43 0 58 0;
#X connect 44 0 36 0;
#X connect 45 0 9 0;
#X connect 46 0 50 0;
#X connect 47 0 46 2;
#X connect 48 0 47 0;
#X connect 50 0 49 0;
#X connect 51 0 46 0;
#X connect 52 0 46 0;
#X connect 53 1 1 0;
#X connect 53 2 2 0;
#X connect 53 3 3 0;
#X connect 53 4 4 0;
#X connect 54 0 61 0;
#X connect 58 0 53 0;
#X connect 58 1 59 0;
#X connect 60 0 36 0;
#X connect 60 0 39 0;
#X connect 61 0 64 0;
#X connect 61 1 64 1;
#X connect 64 0 65 0;
#X connect 65 0 62 0;
#X connect 66 0 68 0;
#X connect 67 0 75 0;
#X connect 68 0 67 0;
#X connect 69 0 68 0;
#X connect 69 1 68 1;
#X connect 71 0 72 0;
#X connect 72 0 73 0;
#X connect 72 1 74 0;
#X connect 73 0 69 0;
#X connect 74 0 69 0;
#X connect 75 0 76 0;
#X connect 75 1 76 1;
#X connect 76 0 77 0;
#X connect 77 0 70 0;
#X connect 78 0 80 0;
#X connect 79 0 85 1;
#X connect 80 0 84 0;
#X connect 81 0 86 0;
#X connect 83 0 78 0;
#X connect 85 1 97 0;
#X connect 85 1 78 1;
#X connect 86 0 99 1;
#X connect 88 0 89 0;
#X connect 89 0 87 0;
#X connect 90 0 93 0;
#X connect 90 0 94 0;
#X connect 91 0 90 0;
#X connect 93 0 96 0;
#X connect 96 0 88 0;
#X connect 96 0 95 0;
#X connect 98 1 34 0;
#X connect 99 1 82 0;
#X connect 99 1 78 2;
#X coords 0 -1 1 1 500 100 1 80 150;