sensors-old.pd 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489
  1. #N canvas 1 53 450 300 10;
  2. #N canvas 0 232 1905 983 sensorsIn 0;
  3. #N canvas 74 488 1361 548 16bit 1;
  4. #X obj 153 195 gate 2;
  5. #X obj 153 146 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  6. 1;
  7. #X obj 153 119 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  8. -1 -1;
  9. #X floatatom 159 14 5 0 0 0 - - -, f 5;
  10. #X floatatom 186 218 5 0 255 0 - - -, f 5;
  11. #X floatatom 153 218 5 0 255 0 - - -, f 5;
  12. #X obj 153 330 |;
  13. #X obj 120 396 outlet;
  14. #X obj 273 264 << 8;
  15. #X floatatom 186 264 5 0 0 0 - - -, f 5;
  16. #X text 133 480 10bit Value from ADC;
  17. #X text -11 35 filter init byte (0x00);
  18. #X obj 159 35 sel 0;
  19. #X floatatom 186 75 5 0 0 0 - - -, f 5;
  20. #X obj 118 77 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  21. -1;
  22. #X obj 120 374 gate 1;
  23. #X obj 261 373 gate 1;
  24. #X obj 261 395 outlet;
  25. #X text -34 145 1st byte = 0x00 \, toggel = ON.;
  26. #X msg 199 35 0;
  27. #X text 198 14 Last (4th) byte is init set to 0x40.;
  28. #X obj 153 170 + 1;
  29. #X obj 118 117 == 0;
  30. #X msg 118 96 0;
  31. #X text 272 69 1st byte = init set to 0x00 \, 2nd byte is receive_h
  32. \, 3rd byte is receive_l \, 4th byte is init set to 0x40 (Note Off
  33. routine);
  34. #X text 227 218 upper_byte;
  35. #X text 81 217 lower_byte;
  36. #N canvas 454 249 565 580 M_debyte_LSB 0;
  37. #X obj 150 502 outlet;
  38. #X obj 150 449 float;
  39. #X obj 150 409 |;
  40. #X obj 64 402 -;
  41. #X obj 64 367 float;
  42. #X obj 64 347 trigger bang float;
  43. #X obj 169 373 &;
  44. #X obj 64 312 route 0 1;
  45. #X obj 64 222 change;
  46. #X obj 110 222 change;
  47. #X obj 157 222 change;
  48. #X obj 204 222 change;
  49. #X obj 350 503 outlet;
  50. #X obj 350 450 float;
  51. #X obj 350 410 |;
  52. #X obj 264 403 -;
  53. #X obj 264 368 float;
  54. #X obj 264 348 trigger bang float;
  55. #X obj 369 374 &;
  56. #X obj 264 313 route 0 1;
  57. #X obj 344 222 change;
  58. #X obj 391 222 change;
  59. #X msg 391 243 \$1 1;
  60. #X msg 344 243 \$1 2;
  61. #X obj 64 164 change;
  62. #X obj 110 164 change;
  63. #X obj 157 164 change;
  64. #X obj 204 164 change;
  65. #X obj 250 164 change;
  66. #X obj 297 164 change;
  67. #X obj 344 164 change;
  68. #X obj 391 164 change;
  69. #X obj 64 185 == 128;
  70. #X obj 64 120 trigger float float float float float float float float
  71. ;
  72. #X obj 64 76 inlet;
  73. #X obj 64 144 & 128;
  74. #X obj 391 143 & 1;
  75. #X obj 110 143 & 64;
  76. #X obj 344 143 & 2;
  77. #X obj 157 143 & 32;
  78. #X obj 297 143 & 4;
  79. #X obj 204 143 & 16;
  80. #X obj 250 143 & 8;
  81. #X obj 110 184 == 64;
  82. #X obj 344 184 == 2;
  83. #X obj 157 184 == 32;
  84. #X obj 297 184 == 4;
  85. #X obj 204 184 == 16;
  86. #X obj 250 184 == 8;
  87. #X text 208 94 extract byte into lo/hi -nippel;
  88. #X msg 204 243 \$1 4;
  89. #X msg 157 243 \$1 8;
  90. #X msg 110 243 \$1 16;
  91. #X msg 64 243 \$1 32;
  92. #X text 121 524 high 6 bit nipperl;
  93. #X text 324 527 low 2 bit nipperl;
  94. #X obj 250 222 change;
  95. #X obj 297 222 change;
  96. #X msg 250 243 \$1 2;
  97. #X msg 297 244 \$1 1;
  98. #X floatatom 106 80 5 0 0 0 - - -, f 5;
  99. #X connect 1 0 2 1;
  100. #X connect 1 0 4 1;
  101. #X connect 1 0 6 1;
  102. #X connect 1 0 0 0;
  103. #X connect 2 0 1 0;
  104. #X connect 3 0 1 0;
  105. #X connect 4 0 3 0;
  106. #X connect 5 0 4 0;
  107. #X connect 5 1 6 0;
  108. #X connect 6 0 3 1;
  109. #X connect 7 0 5 0;
  110. #X connect 7 1 2 0;
  111. #X connect 8 0 53 0;
  112. #X connect 9 0 52 0;
  113. #X connect 10 0 51 0;
  114. #X connect 11 0 50 0;
  115. #X connect 13 0 14 1;
  116. #X connect 13 0 16 1;
  117. #X connect 13 0 18 1;
  118. #X connect 13 0 12 0;
  119. #X connect 14 0 13 0;
  120. #X connect 15 0 13 0;
  121. #X connect 16 0 15 0;
  122. #X connect 17 0 16 0;
  123. #X connect 17 1 18 0;
  124. #X connect 18 0 15 1;
  125. #X connect 19 0 17 0;
  126. #X connect 19 1 14 0;
  127. #X connect 20 0 23 0;
  128. #X connect 21 0 22 0;
  129. #X connect 22 0 19 0;
  130. #X connect 23 0 19 0;
  131. #X connect 24 0 32 0;
  132. #X connect 25 0 43 0;
  133. #X connect 26 0 45 0;
  134. #X connect 27 0 47 0;
  135. #X connect 28 0 48 0;
  136. #X connect 29 0 46 0;
  137. #X connect 30 0 44 0;
  138. #X connect 31 0 21 0;
  139. #X connect 32 0 8 0;
  140. #X connect 33 0 35 0;
  141. #X connect 33 1 37 0;
  142. #X connect 33 2 39 0;
  143. #X connect 33 3 41 0;
  144. #X connect 33 4 42 0;
  145. #X connect 33 5 40 0;
  146. #X connect 33 6 38 0;
  147. #X connect 33 7 36 0;
  148. #X connect 34 0 33 0;
  149. #X connect 35 0 24 0;
  150. #X connect 36 0 31 0;
  151. #X connect 37 0 25 0;
  152. #X connect 38 0 30 0;
  153. #X connect 39 0 26 0;
  154. #X connect 40 0 29 0;
  155. #X connect 41 0 27 0;
  156. #X connect 42 0 28 0;
  157. #X connect 43 0 9 0;
  158. #X connect 44 0 20 0;
  159. #X connect 45 0 10 0;
  160. #X connect 46 0 57 0;
  161. #X connect 47 0 11 0;
  162. #X connect 48 0 56 0;
  163. #X connect 50 0 7 0;
  164. #X connect 51 0 7 0;
  165. #X connect 52 0 7 0;
  166. #X connect 53 0 7 0;
  167. #X connect 56 0 58 0;
  168. #X connect 57 0 59 0;
  169. #X connect 58 0 7 0;
  170. #X connect 59 0 7 0;
  171. #X connect 60 0 33 0;
  172. #X restore 186 240 pd M_debyte_LSB;
  173. #X text 311 264 upper 2 bit nippel (result of 10bit convertion).;
  174. #X obj 402 372 gate 1;
  175. #X obj 402 396 outlet;
  176. #X obj 543 374 gate 1;
  177. #X obj 543 396 outlet;
  178. #X obj 468 374 == 20;
  179. #X obj 506 374 == 4;
  180. #X obj 468 396 s Vel_3_Off;
  181. #X obj -4 454 nbx 4 45 -1e+37 1e+37 0 0 empty stick_mode empty 0 -8
  182. 0 25 -83269 -262144 -262144 0 256;
  183. #X text 273 105 M.hug Dec. 2010;
  184. #X obj 365 374 == 3;
  185. #X obj 326 396 s Vel_2_Off;
  186. #X obj 186 373 == 18;
  187. #X obj 685 374 gate 1;
  188. #X obj 685 396 outlet;
  189. #X obj 610 374 == 21;
  190. #X obj 648 374 == 5;
  191. #X obj 610 396 s Vel_4_Off;
  192. #X obj 821 372 gate 1;
  193. #X obj 821 394 outlet;
  194. #X obj 746 373 == 22;
  195. #X obj 784 373 == 6;
  196. #X obj 746 395 s Vel_5_Off;
  197. #X obj 958 371 gate 1;
  198. #X obj 958 393 outlet;
  199. #X obj 883 371 == 23;
  200. #X obj 921 371 == 7;
  201. #X obj 326 374 == 19;
  202. #X obj 186 395 s Vel_1_Off;
  203. #X obj 1093 371 gate 1;
  204. #X obj 1093 393 outlet;
  205. #X obj 1018 393 s Vel_7_Off;
  206. #X obj 1018 371 == 24;
  207. #X obj 1225 370 gate 1;
  208. #X obj 1225 392 outlet;
  209. #X obj 1150 370 == 25;
  210. #X obj 46 375 == 17;
  211. #X obj 46 396 s Vel_0_Off;
  212. #X obj 1056 371 == 8;
  213. #X obj 1188 370 == 9;
  214. #X obj 178 -17 inlet;
  215. #X obj 883 393 s Vel_6_Off;
  216. #X obj 1150 392 s Vel_8_Off;
  217. #X obj 84 375 == 0;
  218. #X obj 224 373 == 2;
  219. #X floatatom 309 457 5 0 0 0 - - -, f 5;
  220. #X obj 784 46 route 0;
  221. #X obj 737 65 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  222. -1;
  223. #X obj 784 72 t b b;
  224. #X obj 821 100 list-extend;
  225. #X obj 784 119 list;
  226. #X obj 1162 151 print;
  227. #N canvas 1398 225 450 380 bytesunpack 0;
  228. #X obj 62 -43 inlet;
  229. #X obj 62 -16 unpack f f;
  230. #X obj 62 9 t f f f;
  231. #X obj 101 52 >> 2;
  232. #X obj 62 267 pack f f;
  233. #X text 133 265 sensor ID / value;
  234. #X obj 159 311 print;
  235. #X floatatom 9 227 5 0 0 0 - - -, f 5;
  236. #X obj 62 311 s sensors;
  237. #X floatatom 27 7 5 0 0 0 - - -, f 5;
  238. #X obj 187 -35 import ../extra/issiconvert/issiconvert;
  239. #X obj 88 192 |;
  240. #X obj 101 82 t f f;
  241. #X obj 101 111 * 4;
  242. #X obj 52 57 -;
  243. #X floatatom 81 222 5 0 0 0 - - -, f 5;
  244. #X obj 76 151 << 8;
  245. #X msg 63 291 \$2 \$1;
  246. #X obj 98 131 - 1;
  247. #X connect 0 0 1 0;
  248. #X connect 1 0 2 0;
  249. #X connect 1 1 11 1;
  250. #X connect 2 1 14 0;
  251. #X connect 2 2 3 0;
  252. #X connect 3 0 7 0;
  253. #X connect 3 0 12 0;
  254. #X connect 4 0 17 0;
  255. #X connect 11 0 15 0;
  256. #X connect 11 0 4 0;
  257. #X connect 12 0 13 0;
  258. #X connect 12 1 4 1;
  259. #X connect 13 0 18 0;
  260. #X connect 14 0 16 0;
  261. #X connect 16 0 11 0;
  262. #X connect 17 0 8 0;
  263. #X connect 18 0 14 1;
  264. #X restore 784 162 pd bytesunpack;
  265. #X obj 929 275 print;
  266. #X obj 1066 38 route 0;
  267. #X obj 1066 67 t b b;
  268. #X obj 929 249 spigot;
  269. #X obj 962 232 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  270. 1;
  271. #X obj 977 4 gate 2 2;
  272. #X msg 1110 67 1;
  273. #X text 1107 71 sur 1er zero \, change gate;
  274. #X obj 977 38 t b a;
  275. #X obj 1004 163 list-extend;
  276. #X obj 929 180 list;
  277. #X obj 1003 -16 t a a b;
  278. #X obj 929 66 counter;
  279. #X msg 956 139 2;
  280. #X obj 929 116 t b b;
  281. #X obj 929 94 route 1;
  282. #X connect 0 0 5 0;
  283. #X connect 0 1 4 0;
  284. #X connect 1 0 21 0;
  285. #X connect 2 0 1 0;
  286. #X connect 3 0 12 0;
  287. #X connect 4 0 27 0;
  288. #X connect 5 0 6 0;
  289. #X connect 6 0 15 1;
  290. #X connect 6 0 16 1;
  291. #X connect 6 0 29 1;
  292. #X connect 6 0 31 1;
  293. #X connect 6 0 41 1;
  294. #X connect 6 0 46 1;
  295. #X connect 6 0 51 1;
  296. #X connect 6 0 36 0;
  297. #X connect 6 0 57 1;
  298. #X connect 6 0 61 1;
  299. #X connect 8 0 6 1;
  300. #X connect 9 0 33 0;
  301. #X connect 9 0 34 0;
  302. #X connect 9 0 38 0;
  303. #X connect 9 0 43 0;
  304. #X connect 9 0 44 0;
  305. #X connect 9 0 48 0;
  306. #X connect 9 0 49 0;
  307. #X connect 9 0 53 0;
  308. #X connect 9 0 54 0;
  309. #X connect 9 0 55 0;
  310. #X connect 9 0 40 0;
  311. #X connect 9 0 64 0;
  312. #X connect 9 0 60 0;
  313. #X connect 9 0 66 0;
  314. #X connect 9 0 63 0;
  315. #X connect 9 0 67 0;
  316. #X connect 9 0 71 0;
  317. #X connect 9 0 72 0;
  318. #X connect 12 0 14 0;
  319. #X connect 12 1 13 0;
  320. #X connect 13 0 0 1;
  321. #X connect 13 0 2 0;
  322. #X connect 14 0 23 0;
  323. #X connect 15 0 7 0;
  324. #X connect 16 0 17 0;
  325. #X connect 19 0 12 1;
  326. #X connect 21 0 0 0;
  327. #X connect 22 0 1 0;
  328. #X connect 23 0 22 0;
  329. #X connect 27 0 9 0;
  330. #X connect 27 1 8 0;
  331. #X connect 29 0 30 0;
  332. #X connect 31 0 32 0;
  333. #X connect 33 0 35 0;
  334. #X connect 34 0 31 0;
  335. #X connect 38 0 29 0;
  336. #X connect 40 0 56 0;
  337. #X connect 41 0 42 0;
  338. #X connect 43 0 45 0;
  339. #X connect 44 0 41 0;
  340. #X connect 46 0 47 0;
  341. #X connect 48 0 50 0;
  342. #X connect 49 0 46 0;
  343. #X connect 51 0 52 0;
  344. #X connect 53 0 69 0;
  345. #X connect 54 0 51 0;
  346. #X connect 55 0 39 0;
  347. #X connect 57 0 58 0;
  348. #X connect 60 0 59 0;
  349. #X connect 61 0 62 0;
  350. #X connect 63 0 70 0;
  351. #X connect 64 0 65 0;
  352. #X connect 66 0 57 0;
  353. #X connect 67 0 61 0;
  354. #X connect 68 0 3 0;
  355. #X connect 68 0 74 0;
  356. #X connect 68 0 92 0;
  357. #X connect 71 0 15 0;
  358. #X connect 72 0 16 0;
  359. #X connect 74 0 76 0;
  360. #X connect 74 1 77 0;
  361. #X connect 76 0 78 0;
  362. #X connect 76 1 77 1;
  363. #X connect 77 0 78 1;
  364. #X connect 78 0 80 0;
  365. #X connect 82 0 83 0;
  366. #X connect 83 0 90 1;
  367. #X connect 83 0 93 2;
  368. #X connect 83 1 87 0;
  369. #X connect 84 0 81 0;
  370. #X connect 85 0 84 1;
  371. #X connect 86 0 89 0;
  372. #X connect 86 1 82 0;
  373. #X connect 87 0 86 0;
  374. #X connect 89 0 93 0;
  375. #X connect 89 1 90 0;
  376. #X connect 90 0 91 1;
  377. #X connect 91 0 84 0;
  378. #X connect 92 1 86 1;
  379. #X connect 93 0 96 0;
  380. #X connect 94 0 86 0;
  381. #X connect 95 0 91 0;
  382. #X connect 95 1 94 0;
  383. #X connect 96 0 95 0;
  384. #X restore -68 94 pd 16bit to dec;
  385. #X msg -56 34 close;
  386. #X obj -9 14 r TH_Ctl;
  387. #X msg -9 36 100;
  388. #X obj 34 38 bng 35 250 50 0 empty empty resest 0 17 0 10 -258113 -262144
  389. -262144;
  390. #X msg -68 13 devices;
  391. #X obj -68 56 comport 4 9600;
  392. #X msg 170 8 devicename /dev/ttyUSB0;
  393. #X obj -101 178 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  394. -1 -1 0 1;
  395. #X obj -56 147 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  396. -1 -1 0 1;
  397. #X obj -66 254 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  398. -1 -1 0 1;
  399. #X obj -32 147 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  400. -1 -1 0 1;
  401. #X obj -19 147 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  402. -1 -1 0 1;
  403. #X obj -7 147 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  404. -1 -1 0 1;
  405. #X obj 46 150 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  406. -1 -1 0 1;
  407. #X obj 17 147 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  408. -1 -1 0 1;
  409. #X obj 63 147 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  410. -1 -1 0 1;
  411. #X obj 142 106 print;
  412. #X obj 459 209 r sensors;
  413. #X obj 459 256 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  414. -1 -1 134 1;
  415. #X obj 525 209 r sensors;
  416. #X obj 525 256 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  417. -1 -1 2974 1;
  418. #X obj 595 209 r sensors;
  419. #X obj 595 256 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  420. -1 -1 627 1;
  421. #X obj 470 310 print;
  422. #X msg -55 213 \; sensors 1 \$1;
  423. #X obj 459 231 route 1;
  424. #X obj 525 232 route 2;
  425. #X obj 219 174 t a b;
  426. #X obj 225 248 tabwrite test;
  427. #X obj 251 213 counter 2000;
  428. #X obj 376 182 counter 2000;
  429. #X obj 350 217 tabwrite test2;
  430. #X obj 348 153 t a b;
  431. #X obj 356 124 list-mean;
  432. #X msg 861 809 \; test const 0;
  433. #X msg 561 798 \; test const 0 \; test2 const 0;
  434. #X obj 351 96 last-x 500;
  435. #X obj 752 114 textfiler;
  436. #X msg 0 342 \; sensors 4 \$1;
  437. #X msg 24 399 \; sensors 5 \$1;
  438. #X msg 127 436 \; sensors 6 \$1;
  439. #X obj 595 231 route 3;
  440. #X obj 93 217 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  441. -1 -1 0 1;
  442. #X obj 100 187 list-mean;
  443. #X obj 96 160 last-x 500;
  444. #X obj 136 214 mean;
  445. #X obj 133 237 vsl 10 50 0 1023 0 0 empty empty empty 0 -9 0 10 -262144
  446. -1 -1 0 1;
  447. #X msg -40 260 \; sensors 2 \$1;
  448. #X msg -13 303 \; sensors 3 \$1;
  449. #X connect 0 0 8 0;
  450. #X connect 0 1 9 0;
  451. #X connect 0 2 10 0;
  452. #X connect 0 3 11 0;
  453. #X connect 0 4 12 0;
  454. #X connect 0 5 13 0;
  455. #X connect 0 6 14 0;
  456. #X connect 0 7 15 0;
  457. #X connect 0 8 16 0;
  458. #X connect 1 0 6 0;
  459. #X connect 2 0 6 0;
  460. #X connect 3 0 6 0;
  461. #X connect 4 0 3 0;
  462. #X connect 5 0 6 0;
  463. #X connect 6 0 0 0;
  464. #X connect 7 0 6 0;
  465. #X connect 9 0 25 0;
  466. #X connect 11 0 48 0;
  467. #X connect 12 0 49 0;
  468. #X connect 13 0 45 0;
  469. #X connect 13 0 46 0;
  470. #X connect 15 0 39 0;
  471. #X connect 18 0 26 0;
  472. #X connect 20 0 27 0;
  473. #X connect 22 0 42 0;
  474. #X connect 26 0 19 0;
  475. #X connect 27 0 21 0;
  476. #X connect 28 0 29 0;
  477. #X connect 28 1 30 0;
  478. #X connect 30 0 29 1;
  479. #X connect 31 0 32 1;
  480. #X connect 33 0 32 0;
  481. #X connect 33 1 31 0;
  482. #X connect 34 0 33 0;
  483. #X connect 37 0 34 0;
  484. #X connect 42 0 23 0;
  485. #X connect 44 0 43 0;
  486. #X connect 45 0 44 0;
  487. #X connect 46 0 47 0;
  488. #X restore -30 40 pd sensorsIn;