kostepper.pd 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367
  1. #N canvas 1 55 1918 984 10;
  2. #X obj 85 172 cnv 15 130 100 empty empty Status 2 8 0 14 -233017 -128992
  3. 0;
  4. #X obj 85 277 cnv 15 130 100 empty empty MANUEL 2 8 0 14 -233017 -128992
  5. 0;
  6. #X obj 220 172 cnv 15 180 150 empty empty Move 2 8 0 14 -233017 -128992
  7. 0;
  8. #X obj 103 19 r /fromOSC;
  9. #X floatatom 134 195 10 0 0 0 - /stepper/#1/pos/current /stepper/#1/pos/current
  10. , f 10;
  11. #X floatatom 135 213 10 0 0 0 - - -, f 10;
  12. #X floatatom 135 231 10 0 0 0 - - -, f 10;
  13. #X floatatom 135 249 10 0 0 0 - - -, f 10;
  14. #X text 88 194 current;
  15. #X text 95 213 target;
  16. #X text 101 231 speed;
  17. #X text 83 249 maxspeed;
  18. #X obj 148 64 print stepper\$1;
  19. #N canvas 1 55 450 300 filter\$1 0;
  20. #X obj 60 41 t a a;
  21. #X obj 92 89 == \$1;
  22. #X obj 60 132 spigot;
  23. #X msg 92 67 \$1;
  24. #X obj 60 21 inlet;
  25. #X obj 60 153 outlet;
  26. #X connect 0 0 2 0;
  27. #X connect 0 1 3 0;
  28. #X connect 1 0 2 1;
  29. #X connect 2 0 5 0;
  30. #X connect 3 0 1 0;
  31. #X connect 4 0 0 0;
  32. #X restore 103 39 pd filter\$1;
  33. #N canvas 132 527 450 300 conversion 0;
  34. #X obj 97 9 inlet;
  35. #X obj 97 30 unpack f f f f f;
  36. #X obj 97 94 outlet;
  37. #X obj 120 134 outlet;
  38. #X obj 143 174 outlet;
  39. #X obj 166 214 outlet;
  40. #X obj 190 254 outlet;
  41. #X obj 97 75 steps2camrot;
  42. #X obj 120 115 steps2camrot;
  43. #X obj 143 155 steps2camrot;
  44. #X obj 166 195 steps2camrot;
  45. #X obj 190 235 steps2camrot;
  46. #X connect 0 0 1 0;
  47. #X connect 1 0 7 0;
  48. #X connect 1 1 8 0;
  49. #X connect 1 2 9 0;
  50. #X connect 1 3 10 0;
  51. #X connect 1 4 11 0;
  52. #X connect 7 0 2 0;
  53. #X connect 8 0 3 0;
  54. #X connect 9 0 4 0;
  55. #X connect 10 0 5 0;
  56. #X connect 11 0 6 0;
  57. #X restore 103 106 pd conversion;
  58. #X obj 103 84 route /status /onTarget;
  59. #X obj 327 304 bng 15 250 50 0 empty empty done 17 7 0 10 -262144 -1
  60. -1;
  61. #X obj 180 282 vsl 12 60 0 2 0 0 /stepper/\$1/manualSpeed /stepper/\$1/manualSpeed
  62. speed -10 70 0 10 -262144 -1 -1 0 1;
  63. #X obj 105 344 hradio 15 1 0 2 /stepper/\$1/manualDirection /stepper/\$1/manualDirection
  64. direction -10 22 0 10 -262144 -1 -1 0;
  65. #X obj 328 276 bng 25 250 50 0 /stepper/\$1/move/go /stepper/\$1/move/go
  66. GO 6 13 0 10 -4034 -1 -1;
  67. #X obj 304 846 tof/menubutton 100 25 \$0-mbS \$0-mbR 1 grey90 black
  68. grey95 black 0 \, none \, test (autre copie).move \, test.move \, test (3e copie).move
  69. \, test (4e copie).move \, test (copie).move;
  70. #X obj 1412 397 list prepend add;
  71. #X obj 1412 418 list trim;
  72. #X obj 1408 297 ofGetPatchDirectory;
  73. #X obj 1408 222 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  74. -1 -1;
  75. #X text 1429 222 get the list of file names in a directory.;
  76. #X msg 1409 345 symbol \$1/moves;
  77. #X symbolatom 1408 318 50 0 0 0 - - -, f 50;
  78. #X obj 1735 293 print;
  79. #X obj 1417 375 ofGetDirectoryFileNames move;
  80. #N canvas 448 266 906 607 \$0-osc 0;
  81. #X obj 47 13 kollabs/osc_bi \$2 /stepper/\$1/driveMode;
  82. #X obj 47 103 kollabs/osc_bi \$2 /stepper/\$1/move;
  83. #X obj 47 123 kollabs/osc_bi \$2 /stepper/\$1/moveTo;
  84. #X obj 47 183 kollabs/osc_bi \$2 /stepper/\$1/setSpeed;
  85. #X obj 47 203 kollabs/osc_bi \$2 /stepper/\$1/setMaxSpeed;
  86. #X obj 47 223 kollabs/osc_bi \$2 /stepper/\$1/acceleration;
  87. #X obj 47 33 kollabs/osc_bi \$2 /stepper/\$1/accMode;
  88. #X obj 47 53 kollabs/osc_bi \$2 /stepper/\$1/manualDrive;
  89. #X obj 47 -6 kollabs/osc_bi \$2 /stepper/\$1/updateStatus;
  90. #X obj 47 263 kollabs/osc_bi \$2 /stepper/\$1/sequences/list;
  91. #X obj 47 313 kollabs/osc_bi \$2 /stepper/\$1/pos/current;
  92. #X obj 47 333 kollabs/osc_bi \$2 /stepper/\$1/pos/current/deg;
  93. #X restore 1404 48 pd \$0-osc;
  94. #X obj 952 251 route 0 1;
  95. #X obj 952 207 r /stepper/\$1/manualDrive;
  96. #X obj 909 296 r /stepper/\$1/accMode;
  97. #X obj 952 228 t f f;
  98. #X obj 952 335 f;
  99. #X msg 977 271 2;
  100. #X obj 953 384 s /stepper/\$1/driveMode;
  101. #X obj 952 356 spigot;
  102. #X obj 1007 334 == 0;
  103. #X obj 106 298 tgl 35 0 /stepper/\$1/manualDrive /stepper/\$1/manualDrive
  104. empty 17 7 0 10 -204800 -33289 -1 0 1;
  105. #X obj 364 176 tgl 15 0 /stepper/\$1/accMode empty 0/1 17 7 0 10 -262144
  106. -1 -1 1 1;
  107. #X text 987 179 SET DRIVE MODE;
  108. #X obj 783 476 / 60;
  109. #X obj 783 453 r /stepper/\$1/setMaxSpeed;
  110. #X obj 89 626 r /stepper/\$1/driveMode;
  111. #X obj 659 602 list prepend;
  112. #X obj 89 714 pack s f f;
  113. #X obj 146 689 f \$1;
  114. #X obj 146 667 loadbang;
  115. #X obj 89 768 s /toOSC;
  116. #X msg 89 746 /\$1 \$3 \$2;
  117. #X obj 766 583 r /stepper/\$1/driveMode;
  118. #X text 108 602 SEND DRIVE MODE;
  119. #X obj 763 433 r /stepper/\$1/move;
  120. #X obj 651 518 f \$1;
  121. #X obj 335 579 / 60;
  122. #X obj 335 601 steps2camrot;
  123. #X obj 817 504 / 60;
  124. #X obj 817 481 r /stepper/\$1/acceleration;
  125. #X obj 659 579 pack f f f f;
  126. #X obj 659 643 route 0 1;
  127. #X obj 335 671 spigot;
  128. #X obj 368 629 r /stepper/\$1/driveMode;
  129. #X obj 368 650 == 2;
  130. #X msg 333 693 setSpeed \$1;
  131. #X obj 772 634 print;
  132. #X obj 909 317 == 0;
  133. #X msg 89 647 driveMode \$1 \, setSpeed 0;
  134. #X obj 224 303 nbx 4 14 -1e+37 1e+37 0 0 /stepper/\$1/move /stepper/\$1/move
  135. tours 0 -8 0 10 -262144 -1 -1 0 256;
  136. #X obj 693 742 list;
  137. #X msg 690 704 move \$2 \$1 \, setSpeed \$3 \$1 \, getStatus \$1 \$1
  138. ;
  139. #X text 426 605 MANUAL SPEED;
  140. #X obj 335 555 * 1;
  141. #X obj 391 539 t b f;
  142. #X obj 362 496 route 0 1;
  143. #X msg 362 517 -1;
  144. #X msg 391 517 1;
  145. #X obj 362 470 r /stepper/\$1/manualDirection;
  146. #X obj 335 444 r /stepper/\$1/manualSpeed;
  147. #X obj 714 498 steps2camrot;
  148. #X obj 694 454 steps2camrot;
  149. #X obj 748 526 steps2camrot;
  150. #X obj 168 359 nbx 4 14 -1e+37 1e+37 0 0 /stepper/\$1/manualSpeed /stepper/\$1/manualSpeed
  151. empty 0 -8 0 10 -262144 -1 -1 0 256;
  152. #X obj 295 177 vsl 12 60 0 2 0 0 /stepper/\$1/setMaxSpeed /stepper/\$1/setMaxSpeed
  153. speed -10 70 0 10 -262144 -1 -1 0 1;
  154. #X obj 283 254 nbx 4 14 -1e+37 1e+37 0 0 /stepper/\$1/setMaxSpeed /stepper/\$1/setMaxSpeed
  155. empty 0 -8 0 10 -262144 -1 -1 0 256;
  156. #X obj 345 177 vsl 12 60 0 2 0 0 /stepper/\$1/acceleration /stepper/\$1/acceleration
  157. acc -2 70 0 10 -262144 -1 -1 0 1;
  158. #X obj 333 254 nbx 4 14 -1e+37 1e+37 0 0 /stepper/\$1/acceleration
  159. /stepper/\$1/acceleration empty 0 -8 0 10 -262144 -1 -1 0 256;
  160. #X obj 227 842 cnv 15 180 100 empty empty presets 2 8 0 14 -233017
  161. -128992 0;
  162. #X obj 320 55 r /stepper/\$1/accMode;
  163. #X obj 320 76 route 0 1;
  164. #X msg 320 95 color 10 10 20;
  165. #X msg 345 116 color 0 22 22;
  166. #X obj 197 175 bng 15 250 50 0 /stepper/\$1/updateStatus /stepper/\$1/updateStatus
  167. refresh -45 8 0 10 -262144 -1 -1;
  168. #X obj 89 449 r /stepper/\$1/updateStatus;
  169. #X obj 89 470 f \$1;
  170. #X msg 89 491 /getStatus \$1;
  171. #X obj 89 512 s /toOSC;
  172. #X msg 219 106 color 10 10 20;
  173. #X obj 355 276 tgl 25 0 empty empty empty 17 7 0 10 -233017 -233017
  174. -195568 0 1;
  175. #X msg 228 123 color 14 14 14;
  176. #X text 1353 123 prise en compte du homing;
  177. #X text 1383 140 -> possibilité de placer le moteur en absolu sur
  178. 360° modulo;
  179. #X text 1387 155 -> utilisation facultative du point de départ d'un
  180. move;
  181. #X obj 693 788 s /toOSC;
  182. #X msg 693 766 /\$1 \$3 \$2;
  183. #X obj 651 414 r /stepper/\$1/move/go;
  184. #X obj 248 32 loadbang;
  185. #X obj 385 153 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  186. -1 -1;
  187. #X obj 428 320 f \$1;
  188. #X msg 428 341 /stop \$1;
  189. #X msg 659 673 acceleration \$4 \$1 \, maxSpeed \$3 \$1 \, move \$2
  190. \$1 \, getStatus \$1 \$1;
  191. #X obj 1408 242 t b b;
  192. #X obj 1413 476 s /stepper/\$1/sequences/list;
  193. #X obj 423 817 r /stepper/\$1/sequences/list;
  194. #X obj 640 52 stepperCue \$1 0;
  195. #X msg 1436 270 clear \, align 0 \, add none \, set 0;
  196. #X obj 640 152 stepperCue \$1 1;
  197. #X obj 83 127 s /stepper/\$1/pos/current;
  198. #X obj 1156 573 r /stepper/\$1/pos/current;
  199. #X obj 1156 594 * 360;
  200. #X obj 1156 615 mod 360;
  201. #X floatatom 1243 660 5 0 0 0 - - -, f 5;
  202. #X floatatom 1239 601 5 0 0 0 - - -, f 5;
  203. #X obj 224 213 nbx 4 14 -1e+37 1e+37 0 0 /stepper/\$1/move/startPos
  204. /stepper/\$1/move/startPos startPos 0 -8 0 10 -262144 -1 -1 350 256
  205. ;
  206. #X obj 225 232 bng 15 250 50 0 /stepper/\$1/move/gotoStart /stepper/\$1/move/gotoStart
  207. goto 17 7 0 10 -262144 -1 -1;
  208. #X obj 225 252 bng 15 250 50 0 /stepper/\$1/move/setStart /stepper/\$1/move/setStart
  209. set 17 7 0 10 -262144 -1 -1;
  210. #X obj 1131 655 f;
  211. #X obj 1131 547 r /stepper/\$1/move/setStart;
  212. #X obj 1107 746 r /stepper/\$1/move/gotoStart;
  213. #X obj 1131 697 s /stepper/\$1/move/startPos;
  214. #X obj 1444 586 r /stepper/\$1/move/startPos;
  215. #X obj 1422 633 -;
  216. #X obj 1444 606 t b f;
  217. #X text 1452 634 distance currentPos->startPos;
  218. #X obj 1324 683 moses 180;
  219. #X obj 1273 820 steps2camrot;
  220. #X obj 1384 704 - 360;
  221. #X text 1578 726 go backward \, quickest path;
  222. #X floatatom 1416 789 5 0 0 0 - - -, f 5;
  223. #X floatatom 1502 653 5 0 0 0 - - -, f 5;
  224. #X obj 1152 932 list;
  225. #X obj 1152 978 s /toOSC;
  226. #X msg 1152 956 /\$1 \$3 \$2;
  227. #X obj 1127 792 f \$1;
  228. #X obj 1324 768 / 360;
  229. #X obj 1134 853 pack 0 0 8000 0;
  230. #X msg 1140 889 driveMode 1 \$1 \, move \$2 \$1 \, setSpeed \$3 \$1
  231. \, getStatus \$1 \$1;
  232. #X obj 1156 638 s /stepper/\$1/pos/current/deg;
  233. #X obj 1418 565 r /stepper/\$1/pos/current/deg;
  234. #X obj 1354 662 abs;
  235. #X obj 198 195 nbx 3 14 -1e+37 1e+37 0 0 /stepper/\$1/pos/current/deg
  236. /stepper/\$1/pos/current/deg empty 0 -8 0 10 -262144 -1 -1 10 256;
  237. #X obj 1420 653 t f f;
  238. #X obj 1447 678 moses 0;
  239. #X floatatom 1324 789 5 0 0 0 - - -, f 5;
  240. #X msg 1447 699 360;
  241. #X msg 1477 698 -360;
  242. #X connect 3 0 13 0;
  243. #X connect 13 0 12 0;
  244. #X connect 13 0 15 0;
  245. #X connect 14 1 118 0;
  246. #X connect 14 2 5 0;
  247. #X connect 14 3 6 0;
  248. #X connect 14 4 7 0;
  249. #X connect 15 0 14 0;
  250. #X connect 15 1 16 0;
  251. #X connect 16 0 98 0;
  252. #X connect 19 0 100 0;
  253. #X connect 21 0 22 0;
  254. #X connect 22 0 113 0;
  255. #X connect 23 0 26 0;
  256. #X connect 23 0 27 0;
  257. #X connect 24 0 112 0;
  258. #X connect 26 0 29 0;
  259. #X connect 29 0 21 0;
  260. #X connect 29 0 28 0;
  261. #X connect 31 0 35 0;
  262. #X connect 31 1 36 0;
  263. #X connect 32 0 34 0;
  264. #X connect 33 0 67 0;
  265. #X connect 34 0 31 0;
  266. #X connect 34 1 39 0;
  267. #X connect 35 0 38 0;
  268. #X connect 36 0 37 0;
  269. #X connect 38 0 37 0;
  270. #X connect 39 0 38 1;
  271. #X connect 43 0 80 1;
  272. #X connect 44 0 43 0;
  273. #X connect 45 0 68 0;
  274. #X connect 46 0 61 0;
  275. #X connect 47 0 51 0;
  276. #X connect 48 0 47 2;
  277. #X connect 49 0 48 0;
  278. #X connect 51 0 50 0;
  279. #X connect 52 0 46 1;
  280. #X connect 54 0 81 1;
  281. #X connect 55 0 60 0;
  282. #X connect 56 0 57 1;
  283. #X connect 57 0 62 0;
  284. #X connect 58 0 82 1;
  285. #X connect 59 0 58 0;
  286. #X connect 60 0 46 0;
  287. #X connect 61 0 111 0;
  288. #X connect 61 1 71 0;
  289. #X connect 62 0 65 0;
  290. #X connect 63 0 64 0;
  291. #X connect 64 0 62 1;
  292. #X connect 65 0 47 0;
  293. #X connect 67 0 35 0;
  294. #X connect 68 0 47 0;
  295. #X connect 70 0 105 0;
  296. #X connect 71 0 70 0;
  297. #X connect 73 0 56 0;
  298. #X connect 74 0 73 0;
  299. #X connect 74 1 73 1;
  300. #X connect 75 0 76 0;
  301. #X connect 75 1 77 0;
  302. #X connect 76 0 74 0;
  303. #X connect 77 0 74 0;
  304. #X connect 78 0 75 0;
  305. #X connect 79 0 73 0;
  306. #X connect 80 0 60 2;
  307. #X connect 81 0 60 1;
  308. #X connect 82 0 60 3;
  309. #X connect 89 0 90 0;
  310. #X connect 90 0 91 0;
  311. #X connect 90 1 92 0;
  312. #X connect 91 0 86 0;
  313. #X connect 92 0 86 0;
  314. #X connect 94 0 95 0;
  315. #X connect 95 0 96 0;
  316. #X connect 96 0 97 0;
  317. #X connect 98 0 99 0;
  318. #X connect 100 0 99 0;
  319. #X connect 105 0 104 0;
  320. #X connect 106 0 55 0;
  321. #X connect 107 0 98 0;
  322. #X connect 107 0 41 0;
  323. #X connect 108 0 109 0;
  324. #X connect 109 0 110 0;
  325. #X connect 110 0 50 0;
  326. #X connect 111 0 70 0;
  327. #X connect 112 0 23 0;
  328. #X connect 112 1 116 0;
  329. #X connect 114 0 20 0;
  330. #X connect 116 0 113 0;
  331. #X connect 119 0 120 0;
  332. #X connect 120 0 121 0;
  333. #X connect 120 0 123 0;
  334. #X connect 121 0 122 0;
  335. #X connect 121 0 127 1;
  336. #X connect 121 0 148 0;
  337. #X connect 127 0 130 0;
  338. #X connect 128 0 127 0;
  339. #X connect 129 0 144 0;
  340. #X connect 131 0 133 0;
  341. #X connect 132 0 140 0;
  342. #X connect 132 0 152 0;
  343. #X connect 133 0 132 0;
  344. #X connect 133 1 132 1;
  345. #X connect 135 0 145 0;
  346. #X connect 135 0 139 0;
  347. #X connect 135 1 137 0;
  348. #X connect 136 0 146 1;
  349. #X connect 137 0 145 0;
  350. #X connect 137 0 139 0;
  351. #X connect 141 0 143 0;
  352. #X connect 143 0 142 0;
  353. #X connect 144 0 146 0;
  354. #X connect 145 0 154 0;
  355. #X connect 145 0 136 1;
  356. #X connect 146 0 147 0;
  357. #X connect 147 0 141 0;
  358. #X connect 149 0 132 0;
  359. #X connect 150 0 135 0;
  360. #X connect 152 0 150 0;
  361. #X connect 152 1 153 0;
  362. #X connect 153 0 155 0;
  363. #X connect 153 1 156 0;
  364. #X connect 155 0 145 1;
  365. #X connect 156 0 145 1;
  366. #X coords 0 -1 1 1 325 230 1 80 150;