pied.pd 37 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487
  1. #N canvas 385 506 396 342 10;
  2. #X declare -stdpath moonlib;
  3. #X declare -stdpath hcs;
  4. #X declare -stdpath ggee;
  5. #X declare -lib ../extra/s2f -lib ../extra/slist;
  6. #X declare -lib ../extra/getdir -lib ../extra/shell;
  7. #X declare -lib ../extra/comport;
  8. #X declare -lib ../extra/folder_list -lib ../extra/stat -lib ../extra/uname
  9. ;
  10. #X declare -stdpath zexy;
  11. #X declare -lib ../extra/zexy -lib zexy;
  12. #X obj 21 51 cnv 10 150 30 empty \$0-stastocan-rcv empty 20 12 0 14
  13. -241291 -1 0;
  14. #X obj 20 51 tgl 15 0 \$0-on-snd \$0-on-rcv on 3 7 1 8 -258699 -258699
  15. -262144 1 1;
  16. #X obj 21 30 inlet;
  17. #X obj 15 238 outlet;
  18. #X obj 15 193 r \$0-pied;
  19. #X obj 15 215 route actif;
  20. #N canvas 442 297 418 403 FromFraise 0;
  21. #X obj 317 119 print;
  22. #X obj 317 96 spigot;
  23. #X obj 361 98 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  24. 1;
  25. #X obj 167 79 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  26. 1;
  27. #X obj 110 123 print fraise_system;
  28. #X obj 97 279 route UsbFraise;
  29. #X symbolatom 30 344 10 0 0 0 - - -, f 10;
  30. #X obj 97 341 s \$0-version;
  31. #X obj 97 303 symbol;
  32. #X obj 133 255 s \$0-piedID;
  33. #X obj 170 234 s \$0-Fr2;
  34. #X msg 170 212 \$1 present \$2;
  35. #X obj 97 17 r \$0-piedraw-snd;
  36. #X obj 248 120 s \$0-Fr2;
  37. #X msg 206 191 \$1 wrerror 1;
  38. #N canvas 68 350 534 510 totext_separe-system-data 0;
  39. #X obj 67 22 inlet;
  40. #X obj 67 45 sel 10;
  41. #X obj 338 180 list trim;
  42. #X obj 67 188 list trim;
  43. #X obj 67 211 route s;
  44. #X obj 365 337 list trim;
  45. #X obj 112 431 outlet system;
  46. #X obj 8 269 route D;
  47. #X obj 8 290 intern/hexa2dec;
  48. #X floatatom 8 312 5 0 0 0 - - -, f 5;
  49. #X msg 8 333 ID \$1;
  50. #X msg 61 334 present \$1 0;
  51. #X msg 165 335 present \$1 1;
  52. #X obj 414 202 s \$0-pied-snd;
  53. #X obj 100 67 moses 32;
  54. #X obj 145 87 moses 127;
  55. #X obj 67 235 route I c C T;
  56. #X msg 265 336 wrerror \$1;
  57. #N canvas 597 140 422 453 num/string-toFruits 0;
  58. #X obj 40 9 inlet;
  59. #X obj 40 49 t a a;
  60. #X obj 111 404 outlet;
  61. #X obj 115 139 > 128;
  62. #X obj 212 328 list append;
  63. #X obj 212 304 - 128;
  64. #X obj 40 29 list;
  65. #X obj 115 76 list split 2;
  66. #X obj 115 96 unpack s s;
  67. #X obj 40 161 intern/mdemux;
  68. #X obj 212 237 list split 2;
  69. #X obj 212 258 unpack s s;
  70. #X obj 67 221 list split 2;
  71. #X obj 67 261 unpack s s;
  72. #X obj 101 242 t a;
  73. #X obj 40 192 t b a b;
  74. #X obj 67 330 t a;
  75. #X msg 167 284 list;
  76. #X obj 67 308 list append;
  77. #X obj 40 355 list, f 5;
  78. #X obj 316 282 intern/l2ss2l;
  79. #X obj 212 282 intern/hexa2dec;
  80. #X obj 115 118 intern/hexa2dec;
  81. #X obj 67 284 intern/hexa2dec;
  82. #X connect 0 0 6 0;
  83. #X connect 1 0 9 0;
  84. #X connect 1 1 7 0;
  85. #X connect 3 0 9 1;
  86. #X connect 4 0 2 0;
  87. #X connect 5 0 4 0;
  88. #X connect 6 0 1 0;
  89. #X connect 7 0 8 0;
  90. #X connect 7 1 20 0;
  91. #X connect 8 0 22 0;
  92. #X connect 8 1 22 1;
  93. #X connect 9 0 15 0;
  94. #X connect 9 1 10 0;
  95. #X connect 10 0 11 0;
  96. #X connect 11 0 21 0;
  97. #X connect 11 1 21 1;
  98. #X connect 12 0 13 0;
  99. #X connect 12 1 14 0;
  100. #X connect 13 0 23 0;
  101. #X connect 13 1 23 1;
  102. #X connect 14 0 12 0;
  103. #X connect 15 0 19 0;
  104. #X connect 15 1 12 0;
  105. #X connect 15 2 17 0;
  106. #X connect 16 0 18 1;
  107. #X connect 16 0 19 1;
  108. #X connect 17 0 16 0;
  109. #X connect 18 0 16 0;
  110. #X connect 19 0 2 0;
  111. #X connect 20 0 4 1;
  112. #X connect 21 0 5 0;
  113. #X connect 22 0 3 0;
  114. #X connect 23 0 18 0;
  115. #X restore 302 227 pd num/string-toFruits;
  116. #X obj 302 248 outlet Fr2;
  117. #X obj 338 202 outlet debug;
  118. #X obj 338 155 intern/l2ss2l;
  119. #X obj 145 110 list tosymbol;
  120. #X obj 104 159 t a;
  121. #X obj 67 111 t b b;
  122. #X obj 67 160 list;
  123. #X msg 107 111 list;
  124. #X obj 88 136 list prepend;
  125. #X text 139 161 get line;
  126. #X obj 365 314 intern/l2ss2l;
  127. #X obj 61 314 intern/hexa2dec;
  128. #X obj 165 315 intern/hexa2dec;
  129. #X obj 265 315 intern/hexa2dec;
  130. #X connect 0 0 1 0;
  131. #X connect 1 0 24 0;
  132. #X connect 1 1 14 0;
  133. #X connect 2 0 13 0;
  134. #X connect 2 0 20 0;
  135. #X connect 3 0 4 0;
  136. #X connect 4 0 16 0;
  137. #X connect 4 1 18 0;
  138. #X connect 4 1 21 0;
  139. #X connect 5 0 6 0;
  140. #X connect 7 0 8 0;
  141. #X connect 8 0 9 0;
  142. #X connect 9 0 10 0;
  143. #X connect 10 0 6 0;
  144. #X connect 11 0 6 0;
  145. #X connect 12 0 6 0;
  146. #X connect 14 1 15 0;
  147. #X connect 15 0 22 0;
  148. #X connect 16 0 7 0;
  149. #X connect 16 1 30 0;
  150. #X connect 16 2 31 0;
  151. #X connect 16 3 32 0;
  152. #X connect 16 4 29 0;
  153. #X connect 17 0 6 0;
  154. #X connect 18 0 19 0;
  155. #X connect 21 0 2 0;
  156. #X connect 22 0 27 0;
  157. #X connect 23 0 27 1;
  158. #X connect 24 0 25 0;
  159. #X connect 24 1 26 0;
  160. #X connect 25 0 3 0;
  161. #X connect 26 0 27 1;
  162. #X connect 27 0 23 0;
  163. #X connect 27 0 25 1;
  164. #X connect 29 0 5 0;
  165. #X connect 30 0 11 0;
  166. #X connect 31 0 12 0;
  167. #X connect 32 0 17 0;
  168. #X restore 97 53 pd totext_separe-system-data;
  169. #X obj 97 150 route V ID present wrerror Echo;
  170. #X obj 243 171 s \$0-echo;
  171. #X obj 109 78 spigot 1;
  172. #X obj 109 100 route Echo;
  173. #X floatatom 227 271 5 0 0 0 - - -, f 5;
  174. #X connect 1 0 0 0;
  175. #X connect 2 0 1 1;
  176. #X connect 3 0 18 1;
  177. #X connect 5 0 8 0;
  178. #X connect 8 0 6 0;
  179. #X connect 8 0 7 0;
  180. #X connect 11 0 10 0;
  181. #X connect 12 0 15 0;
  182. #X connect 14 0 10 0;
  183. #X connect 15 0 16 0;
  184. #X connect 15 0 18 0;
  185. #X connect 15 1 13 0;
  186. #X connect 15 2 1 0;
  187. #X connect 16 0 5 0;
  188. #X connect 16 1 9 0;
  189. #X connect 16 1 20 0;
  190. #X connect 16 2 11 0;
  191. #X connect 16 3 14 0;
  192. #X connect 16 4 17 0;
  193. #X connect 18 0 19 0;
  194. #X connect 19 1 4 0;
  195. #X restore 141 138 pd FromFraise;
  196. #N canvas 33 176 891 578 ToFraise 0;
  197. #X obj 63 6 r \$0-2Fr2;
  198. #X msg 763 217 actif 1;
  199. #X obj 763 237 s \$0-Fr2;
  200. #X msg 264 288 #S\$1;
  201. #X msg 294 237 #C\$1;
  202. #X text 125 195 Assign FruitName #n;
  203. #X obj 120 215 unpack s f;
  204. #X obj 120 257 pack s s;
  205. #X msg 120 282 !N\$2\$1;
  206. #X obj 339 465 s \$0-pied-rcv;
  207. #X obj 63 58 route Boot;
  208. #X obj 120 80 spigot 1;
  209. #X obj 165 39 r \$0-bootloadermode;
  210. #X obj 165 60 == 0;
  211. #X obj 63 485 s \$0-Bootloader-rcv;
  212. #X obj 63 31 spigot 1;
  213. #X obj 128 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  214. 1;
  215. #X obj 175 10 print;
  216. #X obj 177 237 intern/dec2hexa;
  217. #X obj 294 216 intern/dec2hexa;
  218. #X obj 264 266 intern/dec2hexa;
  219. #X obj 585 244 + 128;
  220. #X obj 585 267 intern/dec2hexa;
  221. #X obj 585 220 list split 1;
  222. #X obj 649 246 list split 1;
  223. #X obj 585 289 list append;
  224. #X msg 585 314 symbol \$1\$2;
  225. #X obj 585 337 list append;
  226. #X obj 419 263 list split 1;
  227. #X obj 400 215 t b a b;
  228. #X obj 419 289 intern/dec2hexa;
  229. #X obj 430 243 t a;
  230. #X obj 419 318 pack s s;
  231. #X msg 479 318 symbol \$1\$2;
  232. #X msg 521 285 symbol;
  233. #X obj 400 346 symbol;
  234. #X obj 120 109 route Assign Select Deselect Out OutC Status;
  235. #X connect 0 0 15 0;
  236. #X connect 1 0 2 0;
  237. #X connect 3 0 9 0;
  238. #X connect 4 0 9 0;
  239. #X connect 6 0 7 0;
  240. #X connect 6 1 18 0;
  241. #X connect 7 0 8 0;
  242. #X connect 8 0 9 0;
  243. #X connect 10 0 14 0;
  244. #X connect 10 1 11 0;
  245. #X connect 11 0 36 0;
  246. #X connect 12 0 13 0;
  247. #X connect 13 0 11 1;
  248. #X connect 15 0 10 0;
  249. #X connect 16 0 15 1;
  250. #X connect 18 0 7 1;
  251. #X connect 19 0 4 0;
  252. #X connect 20 0 3 0;
  253. #X connect 21 0 22 0;
  254. #X connect 22 0 25 0;
  255. #X connect 23 0 21 0;
  256. #X connect 23 1 24 0;
  257. #X connect 24 0 25 1;
  258. #X connect 24 1 27 1;
  259. #X connect 25 0 26 0;
  260. #X connect 26 0 27 0;
  261. #X connect 27 0 9 0;
  262. #X connect 28 0 30 0;
  263. #X connect 28 1 31 0;
  264. #X connect 29 0 35 0;
  265. #X connect 29 1 28 0;
  266. #X connect 29 2 34 0;
  267. #X connect 30 0 32 0;
  268. #X connect 31 0 28 0;
  269. #X connect 32 0 33 0;
  270. #X connect 33 0 32 1;
  271. #X connect 33 0 35 1;
  272. #X connect 34 0 32 1;
  273. #X connect 35 0 9 0;
  274. #X connect 36 0 6 0;
  275. #X connect 36 1 20 0;
  276. #X connect 36 2 19 0;
  277. #X connect 36 3 29 0;
  278. #X connect 36 4 23 0;
  279. #X connect 36 5 1 0;
  280. #X restore 141 160 pd ToFraise;
  281. #N canvas 829 311 360 194 SetID 0;
  282. #X msg 148 23 1;
  283. #X msg 179 23 2;
  284. #X msg 211 23 3;
  285. #X msg 243 23 4;
  286. #X obj 167 108 s \$0-pied-rcv;
  287. #X msg 167 87 #W\$1 \, #R;
  288. #X obj 79 24 r \$0-setID;
  289. #X obj 167 68 intern/dec2hexa;
  290. #X connect 0 0 7 0;
  291. #X connect 1 0 7 0;
  292. #X connect 2 0 7 0;
  293. #X connect 3 0 7 0;
  294. #X connect 5 0 4 0;
  295. #X connect 6 0 7 0;
  296. #X connect 7 0 5 0;
  297. #X restore 15 148 pd SetID;
  298. #X obj 21 67 cnv 13 70 13 empty \$0-piedIDcan piedID:1 2 7 1 12 -204786
  299. -66577 0;
  300. #N canvas 751 142 652 345 comport 0;
  301. #X msg 155 160 close;
  302. #X obj 155 80 sel 0 1;
  303. #X obj 155 45 tgl 30 0 empty empty empty 17 7 0 10 -4034 -1 -1 1 1
  304. ;
  305. #X obj 360 101 list prepend print;
  306. #X obj 360 123 list trim;
  307. #X obj 360 33 r \$0-pied-rcv;
  308. #X obj 222 177 t b a;
  309. #X obj 197 176 10;
  310. #X obj 155 312 s \$0-piedraw-snd;
  311. #X obj 360 55 spigot 1;
  312. #X msg 248 135 pollintervall 1;
  313. #X obj 217 44 loadbang;
  314. #X obj 84 83 metro 500;
  315. #X obj 194 232 route open;
  316. #X msg 84 104 info;
  317. #X obj 177 256 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
  318. 1;
  319. #X obj 84 37 loadbang;
  320. #X obj 106 59 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  321. -1;
  322. #X msg 269 261 set -1;
  323. #X obj 194 283 s \$0-opened;
  324. #X msg 338 180 devicename /dev/ttyACM0;
  325. #X obj 194 114 f \$1;
  326. #X msg 194 136 open \$1;
  327. #X obj 19 150 r \$0-listdevices-snd;
  328. #X msg 19 172 devices;
  329. #X obj 194 263 change -1;
  330. #N canvas 430 196 475 393 outrate 0;
  331. #X obj 136 130 t b b;
  332. #X obj 150 159 i;
  333. #X obj 179 161 + 1;
  334. #X obj 36 44 inlet;
  335. #X obj 208 198 i;
  336. #X obj 214 59 metro 200;
  337. #X obj 214 81 t b b;
  338. #X msg 214 105 0;
  339. #X obj 216 31 loadbang;
  340. #X obj 208 248 * 5;
  341. #X obj 181 41 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  342. -1;
  343. #X obj 208 274 s \$0-outrate;
  344. #X obj 36 129 list split 1;
  345. #X obj 70 149 t a;
  346. #X obj 36 172 list fromsymbol;
  347. #X obj 36 194 list split 1;
  348. #X obj 70 214 t a;
  349. #X obj 208 221 intern/m_mavg 10;
  350. #X connect 0 0 1 0;
  351. #X connect 1 0 2 0;
  352. #X connect 1 0 4 1;
  353. #X connect 2 0 1 1;
  354. #X connect 3 0 12 0;
  355. #X connect 4 0 17 0;
  356. #X connect 5 0 6 0;
  357. #X connect 6 0 7 0;
  358. #X connect 6 1 4 0;
  359. #X connect 7 0 1 0;
  360. #X connect 8 0 5 0;
  361. #X connect 9 0 11 0;
  362. #X connect 10 0 5 0;
  363. #X connect 12 0 14 0;
  364. #X connect 12 1 13 0;
  365. #X connect 13 0 12 0;
  366. #X connect 14 0 15 0;
  367. #X connect 15 0 0 0;
  368. #X connect 15 1 16 0;
  369. #X connect 16 0 15 0;
  370. #X connect 17 0 9 0;
  371. #X restore 437 135 pd outrate;
  372. #N canvas 24 430 450 300 inrate 0;
  373. #X obj 136 130 t b b;
  374. #X obj 150 159 i;
  375. #X obj 179 161 + 1;
  376. #X obj 136 73 inlet;
  377. #X obj 208 198 i;
  378. #X obj 214 59 metro 200;
  379. #X obj 214 81 t b b;
  380. #X msg 214 105 0;
  381. #X obj 214 31 loadbang;
  382. #X obj 211 249 * 5;
  383. #X floatatom 211 275 5 0 0 0 - - -, f 5;
  384. #X obj 181 41 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  385. -1;
  386. #X obj 260 273 s \$0-inrate;
  387. #X obj 211 222 intern/m_mavg 10;
  388. #X connect 0 0 1 0;
  389. #X connect 1 0 2 0;
  390. #X connect 1 0 4 1;
  391. #X connect 2 0 1 1;
  392. #X connect 3 0 0 0;
  393. #X connect 4 0 13 0;
  394. #X connect 5 0 6 0;
  395. #X connect 6 0 7 0;
  396. #X connect 6 1 4 0;
  397. #X connect 7 0 1 0;
  398. #X connect 8 0 5 0;
  399. #X connect 9 0 10 0;
  400. #X connect 9 0 12 0;
  401. #X connect 11 0 5 0;
  402. #X connect 13 0 9 0;
  403. #X restore 68 280 pd inrate;
  404. #X obj 419 55 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  405. 1;
  406. #X obj 155 136 t b b;
  407. #X msg 262 232 0;
  408. #X obj 277 296 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
  409. 1;
  410. #X obj 155 209 comport;
  411. #X obj 155 18 r \$0-comport-on-snd;
  412. #X obj 360 76 list;
  413. #X connect 0 0 32 0;
  414. #X connect 1 0 29 0;
  415. #X connect 1 1 10 0;
  416. #X connect 1 1 21 0;
  417. #X connect 2 0 1 0;
  418. #X connect 3 0 4 0;
  419. #X connect 4 0 6 0;
  420. #X connect 5 0 9 0;
  421. #X connect 6 0 7 0;
  422. #X connect 6 1 32 0;
  423. #X connect 7 0 32 0;
  424. #X connect 9 0 34 0;
  425. #X connect 10 0 32 0;
  426. #X connect 11 0 10 0;
  427. #X connect 11 0 0 0;
  428. #X connect 12 0 14 0;
  429. #X connect 13 0 15 0;
  430. #X connect 13 0 25 0;
  431. #X connect 14 0 32 0;
  432. #X connect 16 0 12 0;
  433. #X connect 17 0 12 0;
  434. #X connect 18 0 25 0;
  435. #X connect 21 0 22 0;
  436. #X connect 22 0 32 0;
  437. #X connect 23 0 24 0;
  438. #X connect 24 0 32 0;
  439. #X connect 25 0 19 0;
  440. #X connect 25 0 31 0;
  441. #X connect 28 0 9 1;
  442. #X connect 29 0 0 0;
  443. #X connect 29 1 30 0;
  444. #X connect 30 0 25 0;
  445. #X connect 32 0 8 0;
  446. #X connect 32 0 27 0;
  447. #X connect 32 1 13 0;
  448. #X connect 33 0 2 0;
  449. #X connect 34 0 3 0;
  450. #X connect 34 0 26 0;
  451. #X restore 15 107 pd comport;
  452. #X obj 36 52 cnv 15 135 12 empty \$0-piedvercan firmware_version:2.1.3
  453. 2 7 1 10 -262130 -66577 0;
  454. #N canvas 523 616 186 256 \$0-utils 0;
  455. #X obj 2 -1 cnv 15 170 250 empty empty empty 20 12 0 14 -57730 -66577
  456. 0;
  457. #X obj 10 7 bng 20 250 50 0 \$0-listdevices-snd \$0-listdevices-rcv
  458. list_serial_devices 22 10 0 12 -262144 -1 -262144;
  459. #X obj 11 35 cnv 15 140 80 empty empty set_ID 20 10 0 14 -257985 -66577
  460. 0;
  461. #X msg 19 60 1;
  462. #X msg 50 60 2;
  463. #X msg 82 60 3;
  464. #X msg 114 60 4;
  465. #X obj 19 90 s \$0-setID;
  466. #X obj 11 123 cnv 15 140 80 empty empty fake_ID 20 10 0 14 -260097
  467. -66577 0;
  468. #X msg 19 147 1;
  469. #X msg 50 147 2;
  470. #X msg 82 147 3;
  471. #X msg 114 147 4;
  472. #X obj 19 178 s \$0-piedID;
  473. #X obj 10 210 cnv 15 140 35 empty empty compilation 20 10 0 14 -258113
  474. -66577 0;
  475. #X obj 20 229 tgl 15 0 \$0-dontclean-snd \$0-dontclean-rcv dont_clean
  476. 17 7 0 10 -262144 -1 -1 0 1;
  477. #X connect 3 0 7 0;
  478. #X connect 4 0 7 0;
  479. #X connect 5 0 7 0;
  480. #X connect 6 0 7 0;
  481. #X connect 9 0 13 0;
  482. #X connect 10 0 13 0;
  483. #X connect 11 0 13 0;
  484. #X connect 12 0 13 0;
  485. #X restore 195 64 pd \$0-utils;
  486. #X obj 123 65 bng 15 250 50 0 \$0-showutils-snd \$0-showutils-rcv utils
  487. 17 7 0 10 -4034 -1 -1;
  488. #N canvas 409 497 493 343 Fr2-interface 0;
  489. #X obj 250 151 t a;
  490. #X obj 25 27 r 2Fr2;
  491. #X obj 250 222 s Fr2;
  492. #X obj 25 168 s \$0-2Fr2;
  493. #X obj 250 112 r \$0-Fr2;
  494. #X obj 200 18 r \$0-piedID;
  495. #X obj 88 27 r \$0-piedID;
  496. #X obj 200 40 t f f;
  497. #X msg 233 89 actif 1;
  498. #X obj 200 65 sel -1;
  499. #X obj 25 56 list split 1;
  500. #X obj 25 143 list trim;
  501. #X obj 25 120 list, f 5;
  502. #X obj 25 98 sel -1;
  503. #X obj 250 201 list trim;
  504. #X obj 250 176 list prepend;
  505. #X connect 0 0 15 0;
  506. #X connect 1 0 10 0;
  507. #X connect 4 0 0 0;
  508. #X connect 5 0 7 0;
  509. #X connect 6 0 13 1;
  510. #X connect 7 0 9 0;
  511. #X connect 7 1 15 1;
  512. #X connect 8 0 0 0;
  513. #X connect 9 1 8 0;
  514. #X connect 10 0 13 0;
  515. #X connect 10 1 12 1;
  516. #X connect 11 0 3 0;
  517. #X connect 12 0 11 0;
  518. #X connect 13 0 12 0;
  519. #X connect 14 0 2 0;
  520. #X connect 15 0 14 0;
  521. #X restore 15 128 pd Fr2-interface;
  522. #N canvas 634 113 450 300 UI 0;
  523. #X obj 27 202 change -1;
  524. #X obj 27 156 r \$0-pied;
  525. #X obj 27 178 route actif;
  526. #N canvas 374 255 344 144 canvascolor 0;
  527. #X obj 15 13 inlet;
  528. #X obj 15 103 s \$0-stastocan-rcv;
  529. #X msg 15 74 color 1 13 22;
  530. #X msg 114 74 color 15 13 22;
  531. #X obj 15 37 sel 0 1 2;
  532. #X msg 213 75 color 14 13 22;
  533. #X connect 0 0 4 0;
  534. #X connect 2 0 1 0;
  535. #X connect 3 0 1 0;
  536. #X connect 4 0 2 0;
  537. #X connect 4 1 3 0;
  538. #X connect 4 2 5 0;
  539. #X connect 5 0 1 0;
  540. #X restore 27 278 pd canvascolor;
  541. #X obj 26 16 r \$0-version;
  542. #X msg 26 38 label firmware_version:\$1;
  543. #X obj 26 58 s \$0-piedvercan;
  544. #X obj 27 85 r \$0-piedID;
  545. #X msg 27 106 label piedID:\$1;
  546. #X obj 27 129 s \$0-piedIDcan;
  547. #X obj 239 17 r \$0-showutils-snd;
  548. #X obj 330 102 loadbang;
  549. #X msg 330 122 set 1;
  550. #X obj 330 143 s \$0-on-rcv;
  551. #X obj 239 119 r \$0-on-snd;
  552. #X obj 239 149 sel 0 1;
  553. #X obj 239 240 s \$0-on-rcv;
  554. #X msg 258 172 color 13 13 0 \, label on;
  555. #X msg 239 205 color 1 1 2 \, label off;
  556. #X obj 101 179 r \$0-bootloadermode;
  557. #X obj 38 227 t b f;
  558. #X obj 101 199 + 1;
  559. #X obj 27 250 * 1;
  560. #X msg 137 224 0;
  561. #X obj 239 39 symbol pd-\$0-utils;
  562. #X msg 239 63 \; \$1 vis 0 \; \$1 vis 1;
  563. #X connect 0 0 22 0;
  564. #X connect 1 0 2 0;
  565. #X connect 2 0 0 0;
  566. #X connect 4 0 5 0;
  567. #X connect 5 0 6 0;
  568. #X connect 7 0 8 0;
  569. #X connect 8 0 9 0;
  570. #X connect 10 0 24 0;
  571. #X connect 11 0 12 0;
  572. #X connect 11 0 17 0;
  573. #X connect 11 0 23 0;
  574. #X connect 12 0 13 0;
  575. #X connect 14 0 15 0;
  576. #X connect 15 0 18 0;
  577. #X connect 15 1 17 0;
  578. #X connect 17 0 16 0;
  579. #X connect 18 0 16 0;
  580. #X connect 19 0 21 0;
  581. #X connect 20 0 22 0;
  582. #X connect 20 1 22 1;
  583. #X connect 21 0 20 0;
  584. #X connect 22 0 3 0;
  585. #X connect 23 0 3 0;
  586. #X connect 24 0 25 0;
  587. #X restore 15 168 pd UI;
  588. #X obj 143 238 netreceive \$2;
  589. #X obj 43 85 nbx 5 14 -1e+37 1e+37 0 0 empty \$0-outrate out -18 6
  590. 0 8 -262144 -1 -1 60007 256;
  591. #X obj 114 85 nbx 5 14 -1e+37 1e+37 0 0 empty \$0-inrate in -18 6 0
  592. 8 -262144 -1 -1 54970 256;
  593. #N canvas 154 360 495 183 interprete 0;
  594. #X obj 68 21 inlet;
  595. #X obj 68 124 s \$0-make-done;
  596. #X msg 68 102 bang;
  597. #X msg 150 71 bang;
  598. #X obj 150 93 s \$0-make-cleaned;
  599. #X obj 340 84 print;
  600. #X obj 68 42 route make_done make_cleaned make_main_done;
  601. #X msg 266 95 bang;
  602. #X obj 266 117 s \$0-make-main-done;
  603. #X connect 0 0 6 0;
  604. #X connect 2 0 1 0;
  605. #X connect 3 0 4 0;
  606. #X connect 6 0 2 0;
  607. #X connect 6 1 3 0;
  608. #X connect 6 2 7 0;
  609. #X connect 6 3 5 0;
  610. #X connect 7 0 8 0;
  611. #X restore 143 259 pd interprete;
  612. #N canvas 41 116 560 372 tosystem 0;
  613. #X msg 238 283 echo \$2/make.sh \$1 \$3 | at now;
  614. #X obj 30 22 inlet tosystem;
  615. #X obj 384 165 list prepend nohup;
  616. #X obj 30 243 list trim;
  617. #X obj 135 292 print;
  618. #X obj 197 234 list prepend start -MIN bash -c;
  619. #X obj 30 182 list append "| at now;
  620. #X obj 30 159 list prepend echo ";
  621. #X obj 177 183 list append ";
  622. #X obj 176 161 list prepend start bash -c ";
  623. #X obj 30 281 shell;
  624. #X obj 30 318 l system;
  625. #X obj 30 90 intern/demux_os;
  626. #X connect 1 0 12 0;
  627. #X connect 2 0 3 0;
  628. #X connect 3 0 10 0;
  629. #X connect 6 0 3 0;
  630. #X connect 7 0 6 0;
  631. #X connect 8 0 3 0;
  632. #X connect 9 0 8 0;
  633. #X connect 12 0 2 0;
  634. #X connect 12 1 9 0;
  635. #X connect 12 2 2 0;
  636. #X restore 142 209 pd tosystem;
  637. #N canvas 19 591 419 259 Bootloader/Compiler 0;
  638. #N canvas 844 375 498 407 enter-boot-quit 0;
  639. #X msg 123 204 0;
  640. #X obj 123 225 s \$0-verified;
  641. #X msg 199 157 !F\$1;
  642. #X msg 88 151 V\$1;
  643. #X obj 88 76 t s s;
  644. #X obj 88 53 r \$0-enterbld;
  645. #X obj 88 105 pipe s 100;
  646. #X obj 279 62 r \$0-quitbld;
  647. #X obj 85 264 r \$0-pied-snd;
  648. #X obj 85 287 drip;
  649. #X obj 85 310 sel V;
  650. #X obj 85 355 s \$0-verified;
  651. #X msg 85 333 1;
  652. #X msg 279 89 A \, #F;
  653. #X text 237 43 run device app \, quit pied bootload mode;
  654. #X text 39 22 enter boot mode for device X;
  655. #X text 43 36 then verify it's done;
  656. #X obj 88 172 t a b;
  657. #X obj 182 314 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  658. -1 -1;
  659. #X msg 183 82 symbol Lyre1;
  660. #X obj 88 125 symbol;
  661. #X obj 54 101 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  662. -1;
  663. #X obj 199 136 symbol;
  664. #X obj 199 113 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  665. -1 -1;
  666. #X obj 279 206 s \$0-pied-rcv;
  667. #X msg 21 204 symbol Test;
  668. #X obj 264 273 r \$0-verified;
  669. #X obj 262 295 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  670. 1;
  671. #X connect 0 0 1 0;
  672. #X connect 2 0 24 0;
  673. #X connect 3 0 17 0;
  674. #X connect 4 0 6 0;
  675. #X connect 4 1 22 0;
  676. #X connect 5 0 4 0;
  677. #X connect 6 0 20 0;
  678. #X connect 7 0 13 0;
  679. #X connect 8 0 9 0;
  680. #X connect 9 0 10 0;
  681. #X connect 10 0 12 0;
  682. #X connect 10 0 18 0;
  683. #X connect 12 0 11 0;
  684. #X connect 13 0 0 0;
  685. #X connect 13 0 24 0;
  686. #X connect 17 0 24 0;
  687. #X connect 17 1 0 0;
  688. #X connect 19 0 3 0;
  689. #X connect 20 0 3 0;
  690. #X connect 21 0 20 0;
  691. #X connect 22 0 2 0;
  692. #X connect 23 0 22 0;
  693. #X connect 25 0 3 0;
  694. #X connect 26 0 27 0;
  695. #X restore 232 17 pd enter-boot-quit;
  696. #N canvas 496 178 748 542 sendfile 0;
  697. #X obj 68 332 msgfile;
  698. #X msg 219 183 rewind;
  699. #X obj 200 183 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  700. -1 -1;
  701. #X obj 200 115 bng 15 250 50 0 empty empty program 17 7 0 10 -260097
  702. -1 -1;
  703. #X obj 377 149 r \$0-pied-snd;
  704. #X obj 377 177 drip;
  705. #X msg 244 253 prev;
  706. #X obj 68 360 t a b;
  707. #X obj 76 421 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  708. -1;
  709. #X obj 377 198 sel X;
  710. #X obj 533 393 print checksumerror;
  711. #X obj 517 443 print DONE !;
  712. #X obj 502 463 print unsupported-command;
  713. #X msg 375 85 goto \$1 \, bang;
  714. #X obj 375 68 hradio 15 1 0 16 empty empty empty 0 -8 0 10 -262144
  715. -1 -1 0;
  716. #X obj 25 200 symbol;
  717. #X obj 68 269 r \$0-msgfile;
  718. #X obj 25 249 s \$0-msgfile;
  719. #X obj 200 278 s \$0-msgfile;
  720. #X obj 164 375 r \$0-msgtimeout-stop;
  721. #X obj 473 216 s \$0-msgtimeout-stop;
  722. #X obj 244 205 r \$0-msgtimeout;
  723. #X obj 377 310 s \$0-msgfile;
  724. #X msg 435 257 0;
  725. #X msg 463 257 1;
  726. #X text 441 240 auto;
  727. #X obj 543 305 del 2;
  728. #X msg 626 345 0;
  729. #X msg 654 344 1;
  730. #X text 633 327 auto;
  731. #X msg 543 325 prev;
  732. #X obj 543 370 s \$0-msgfile;
  733. #X obj 626 364 r \$0-auto;
  734. #X obj 435 277 r \$0-auto;
  735. #X obj 502 259 sel u Y z l;
  736. #X obj 549 282 print format-error;
  737. #X obj 446 170 sel V;
  738. #X obj 525 419 s \$0-DONE;
  739. #X msg 302 233 0;
  740. #X msg 329 233 1;
  741. #X text 308 216 auto;
  742. #X obj 302 253 r \$0-auto;
  743. #X obj 200 135 del 100;
  744. #X obj 375 107 s \$0-msgfile;
  745. #X msg 465 115 :10085000E5FF08C0E5FF09C0E5FF0AC0E5FF0BC0E2;
  746. #X msg 553 93 :020000040000FA;
  747. #X obj 95 460 del 100;
  748. #X obj 266 143 s \$0-auto;
  749. #X msg 266 112 1;
  750. #X obj 299 88 r \$0-DONE;
  751. #X msg 299 109 0;
  752. #X obj 244 233 spigot;
  753. #X obj 377 257 spigot;
  754. #X obj 543 348 spigot;
  755. #X obj 216 303 print timeout ! retry...;
  756. #X obj 95 483 s \$0-msgtimeout;
  757. #X obj 203 437 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  758. -1 -1;
  759. #X msg 164 436 stop;
  760. #X obj 38 486 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  761. -1;
  762. #X obj 355 366 timer;
  763. #X obj 377 283 t b b;
  764. #X floatatom 355 400 5 0 0 0 - - -, f 5;
  765. #X obj 336 340 b;
  766. #X obj 377 237 del 0;
  767. #X obj 400 346 b;
  768. #X floatatom 107 379 5 0 0 0 - - -, f 5;
  769. #X floatatom 23 364 5 0 0 0 - - -, f 5;
  770. #X msg 8 304 print;
  771. #X msg 25 225 read \$1 cr \, end \, skip -1 \, where;
  772. #X obj 14 170 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  773. -1;
  774. #X obj 68 290 t b a;
  775. #X msg 68 310 where;
  776. #X obj 122 399 f;
  777. #X obj 107 420 /;
  778. #X obj 107 440 outlet;
  779. #X obj 200 159 t b b b;
  780. #X obj 414 373 mavg 10;
  781. #X floatatom 414 401 5 0 0 0 - - -, f 5;
  782. #X obj 107 351 route float;
  783. #X obj 70 200 r \$0-bootprogfile;
  784. #X obj 200 62 r \$0-bootdoprogram;
  785. #X obj 68 505 s \$0-pied-rcv;
  786. #X obj 314 128 s \$0-msgtimeout-stop;
  787. #X obj 330 109 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  788. -1 -1;
  789. #X obj 506 169 r \$0-auto;
  790. #X obj 473 193 spigot;
  791. #X connect 0 0 7 0;
  792. #X connect 0 1 78 0;
  793. #X connect 1 0 18 0;
  794. #X connect 2 0 18 0;
  795. #X connect 3 0 42 0;
  796. #X connect 3 0 15 0;
  797. #X connect 4 0 5 0;
  798. #X connect 5 0 9 0;
  799. #X connect 5 0 36 0;
  800. #X connect 6 0 18 0;
  801. #X connect 7 0 81 0;
  802. #X connect 7 1 46 0;
  803. #X connect 7 1 62 0;
  804. #X connect 9 0 63 0;
  805. #X connect 9 0 64 0;
  806. #X connect 9 1 34 0;
  807. #X connect 13 0 43 0;
  808. #X connect 14 0 13 0;
  809. #X connect 15 0 68 0;
  810. #X connect 16 0 70 0;
  811. #X connect 19 0 57 0;
  812. #X connect 19 0 56 0;
  813. #X connect 21 0 51 0;
  814. #X connect 23 0 52 1;
  815. #X connect 24 0 52 1;
  816. #X connect 26 0 30 0;
  817. #X connect 27 0 53 1;
  818. #X connect 28 0 53 1;
  819. #X connect 30 0 53 0;
  820. #X connect 32 0 53 1;
  821. #X connect 33 0 52 1;
  822. #X connect 34 0 12 0;
  823. #X connect 34 0 63 0;
  824. #X connect 34 1 11 0;
  825. #X connect 34 1 37 0;
  826. #X connect 34 2 10 0;
  827. #X connect 34 2 26 0;
  828. #X connect 34 3 35 0;
  829. #X connect 36 1 85 0;
  830. #X connect 38 0 51 1;
  831. #X connect 39 0 51 1;
  832. #X connect 41 0 51 1;
  833. #X connect 42 0 75 0;
  834. #X connect 46 0 8 0;
  835. #X connect 46 0 55 0;
  836. #X connect 46 0 58 0;
  837. #X connect 48 0 47 0;
  838. #X connect 49 0 50 0;
  839. #X connect 49 0 82 0;
  840. #X connect 50 0 47 0;
  841. #X connect 51 0 6 0;
  842. #X connect 51 0 54 0;
  843. #X connect 52 0 60 0;
  844. #X connect 53 0 31 0;
  845. #X connect 57 0 46 0;
  846. #X connect 59 0 61 0;
  847. #X connect 59 0 76 0;
  848. #X connect 60 0 22 0;
  849. #X connect 60 1 59 1;
  850. #X connect 62 0 59 0;
  851. #X connect 63 0 52 0;
  852. #X connect 64 0 59 1;
  853. #X connect 65 0 73 0;
  854. #X connect 67 0 0 0;
  855. #X connect 68 0 17 0;
  856. #X connect 69 0 15 0;
  857. #X connect 70 0 71 0;
  858. #X connect 70 1 0 0;
  859. #X connect 71 0 0 0;
  860. #X connect 72 0 73 1;
  861. #X connect 73 0 74 0;
  862. #X connect 75 0 2 0;
  863. #X connect 75 1 1 0;
  864. #X connect 75 2 72 0;
  865. #X connect 76 0 77 0;
  866. #X connect 78 0 65 0;
  867. #X connect 78 0 72 1;
  868. #X connect 79 0 15 1;
  869. #X connect 80 0 3 0;
  870. #X connect 80 0 48 0;
  871. #X connect 83 0 82 0;
  872. #X connect 84 0 85 1;
  873. #X connect 85 0 20 0;
  874. #X restore 231 39 pd sendfile;
  875. #N canvas 831 412 452 306 debug_read-memory 0;
  876. #X msg 4 133 r0800;
  877. #X msg 41 135 r5870;
  878. #X obj 152 101 + 5870;
  879. #X msg 124 124 r\$1;
  880. #X floatatom 157 79 5 0 0 0 - - -, f 5;
  881. #X msg 13 166 A;
  882. #X msg 160 58 8;
  883. #X msg 160 126 r5880;
  884. #X msg 172 144 r5F10;
  885. #X obj 153 199 s \$0-fraise-rcv;
  886. #X floatatom 79 49 5 0 0 0 - - -, f 5;
  887. #X msg 84 19 8;
  888. #X obj 73 95 + 800;
  889. #X msg 76 115 r0\$1;
  890. #X obj 120 22 hradio 15 1 0 16 empty empty empty 0 -8 0 10 -262144
  891. -1 -1 0;
  892. #X obj 78 72 * 10;
  893. #X msg 223 88 !b0122;
  894. #X msg 223 111 811234;
  895. #X msg 251 231 !N01Truc;
  896. #X msg 263 157 Ebon;
  897. #X obj 285 56 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  898. 1;
  899. #X obj 284 79 metro 1000;
  900. #X obj 385 182 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  901. -1 -1;
  902. #X msg 337 56 200;
  903. #X obj 287 111 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  904. 1;
  905. #X obj 279 133 sel 0 1;
  906. #X msg 296 156 EAh;
  907. #X msg 359 80 20;
  908. #X connect 0 0 9 0;
  909. #X connect 1 0 9 0;
  910. #X connect 2 0 3 0;
  911. #X connect 3 0 9 0;
  912. #X connect 4 0 2 0;
  913. #X connect 5 0 9 0;
  914. #X connect 6 0 4 0;
  915. #X connect 7 0 9 0;
  916. #X connect 8 0 9 0;
  917. #X connect 10 0 15 0;
  918. #X connect 11 0 10 0;
  919. #X connect 12 0 13 0;
  920. #X connect 13 0 9 0;
  921. #X connect 14 0 10 0;
  922. #X connect 15 0 12 0;
  923. #X connect 16 0 9 0;
  924. #X connect 17 0 9 0;
  925. #X connect 18 0 9 0;
  926. #X connect 19 0 9 0;
  927. #X connect 20 0 21 0;
  928. #X connect 21 0 22 0;
  929. #X connect 21 0 24 0;
  930. #X connect 23 0 21 1;
  931. #X connect 24 0 25 0;
  932. #X connect 25 0 19 0;
  933. #X connect 25 1 26 0;
  934. #X connect 26 0 9 0;
  935. #X connect 27 0 21 1;
  936. #X restore 231 82 pd debug_read-memory;
  937. #N canvas 787 395 407 325 rename/prefix 0;
  938. #X obj 93 124 s \$0-fraise-rcv;
  939. #X msg 201 106 !N10Mira;
  940. #X msg 272 85 !N01Lyre2;
  941. #X msg 206 84 !N01Truc;
  942. #X msg 129 9 !N02Gratte1;
  943. #X msg 35 13 RENAME:Gratte1;
  944. #X msg 282 157 !B;
  945. #X msg 93 34 RENAME:Truc;
  946. #X msg 269 55 !N10Lyre1;
  947. #X msg 118 73 PREFIX:;
  948. #X msg 179 35 RENAME:Lyre1;
  949. #X msg 196 196 RENAME:KE1;
  950. #X msg 196 222 !N20KE1;
  951. #X connect 1 0 0 0;
  952. #X connect 2 0 0 0;
  953. #X connect 3 0 0 0;
  954. #X connect 4 0 0 0;
  955. #X connect 5 0 0 0;
  956. #X connect 6 0 0 0;
  957. #X connect 7 0 0 0;
  958. #X connect 8 0 0 0;
  959. #X connect 9 0 0 0;
  960. #X connect 10 0 0 0;
  961. #X connect 11 0 0 0;
  962. #X connect 12 0 0 0;
  963. #X restore 232 102 pd rename/prefix;
  964. #X obj 308 39 hsl 80 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
  965. -1 -1 0 1;
  966. #X obj 11 18 r \$0-Bootloader-rcv;
  967. #X obj 275 136 r \$0-Bootloader-snd;
  968. #X obj 275 158 list prepend Boot;
  969. #X obj 275 179 list trim;
  970. #X obj 275 199 s \$0-Fr2;
  971. #X obj 11 40 t a b;
  972. #N canvas 465 196 644 654 rename 0;
  973. #X obj 270 162 s \$0-bootloadermode;
  974. #X msg 270 142 1;
  975. #X obj 270 234 s \$0-enterbld;
  976. #X obj 243 254 del 200;
  977. #X obj 243 99 symbol;
  978. #X obj 243 121 t s b;
  979. #X obj 243 194 t b s;
  980. #X msg 243 298 RENAME:\$1;
  981. #X obj 243 275 symbol;
  982. #X obj 281 215 s \$0-bootfruitname;
  983. #X obj 289 275 r \$0-bootfruitname;
  984. #X obj 408 304 r \$0-verified;
  985. #X obj 408 326 sel 1;
  986. #X obj 243 321 s \$0-pied-rcv;
  987. #X obj 408 437 s \$0-Bootloader-snd;
  988. #X obj 408 368 symbol;
  989. #X obj 454 368 r \$0-bootfruitname;
  990. #X obj 408 346 spigot;
  991. #X msg 408 413 \$1 renamed;
  992. #X msg 445 326 1;
  993. #X msg 453 345 0;
  994. #X obj 473 326 r \$0-bootloadermode;
  995. #X obj 212 342 del 200;
  996. #X obj 212 364 symbol;
  997. #X obj 256 364 r \$0-bootfruitname;
  998. #X obj 212 385 s \$0-enterbld;
  999. #X msg 184 451 V\$1;
  1000. #X obj 184 472 s \$0-pied-rcv;
  1001. #X obj 184 409 del 200;
  1002. #X obj 184 429 symbol;
  1003. #X obj 228 429 r \$0-bootfruitname;
  1004. #X obj 159 497 del 200;
  1005. #X obj 87 438 b;
  1006. #X msg 155 258 stop;
  1007. #X obj 485 412 s \$0-quitbld;
  1008. #X obj 408 389 t s b;
  1009. #X obj 159 561 print Fraise_RENAME;
  1010. #X msg 159 536 not responding. retrying...;
  1011. #X obj 217 314 b;
  1012. #X msg 106 196 stop;
  1013. #X obj 128 634 s \$0-Bootloader-snd;
  1014. #X obj 10 484 s \$0-quitbld;
  1015. #X msg 66 549 aborting !;
  1016. #X msg 72 505 \$1 rename_error;
  1017. #X obj 443 480 s \$0-bootloadermode;
  1018. #X msg 443 460 0;
  1019. #X obj 35 572 s \$0-bootloadermode;
  1020. #X msg 35 552 0;
  1021. #X msg 376 540 \$1 successful;
  1022. #X obj 507 273 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  1023. 1;
  1024. #X msg 290 474 VTest;
  1025. #X msg 349 469 Test;
  1026. #X obj 4 320 del 10000;
  1027. #X obj 106 169 r \$0-bootstoptimers;
  1028. #X obj 243 72 inlet;
  1029. #X obj 4 403 symbol;
  1030. #X obj 50 403 r \$0-bootfruitname;
  1031. #X text 280 70 (rename) Fruitname;
  1032. #X obj 157 609 print;
  1033. #X obj 26 367 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  1034. -1;
  1035. #X obj 4 447 t s b s;
  1036. #X connect 1 0 0 0;
  1037. #X connect 3 0 8 0;
  1038. #X connect 3 0 52 0;
  1039. #X connect 4 0 5 0;
  1040. #X connect 5 0 6 0;
  1041. #X connect 5 1 1 0;
  1042. #X connect 6 0 3 0;
  1043. #X connect 6 1 2 0;
  1044. #X connect 6 1 9 0;
  1045. #X connect 6 1 19 0;
  1046. #X connect 7 0 13 0;
  1047. #X connect 8 0 7 0;
  1048. #X connect 8 0 38 0;
  1049. #X connect 10 0 8 1;
  1050. #X connect 11 0 12 0;
  1051. #X connect 11 0 49 0;
  1052. #X connect 12 0 17 0;
  1053. #X connect 15 0 35 0;
  1054. #X connect 16 0 15 1;
  1055. #X connect 17 0 15 0;
  1056. #X connect 17 0 20 0;
  1057. #X connect 17 0 33 0;
  1058. #X connect 17 0 39 0;
  1059. #X connect 18 0 14 0;
  1060. #X connect 19 0 17 1;
  1061. #X connect 20 0 17 1;
  1062. #X connect 21 0 20 0;
  1063. #X connect 22 0 23 0;
  1064. #X connect 22 0 28 0;
  1065. #X connect 23 0 25 0;
  1066. #X connect 24 0 23 1;
  1067. #X connect 26 0 27 0;
  1068. #X connect 28 0 29 0;
  1069. #X connect 28 0 31 0;
  1070. #X connect 29 0 26 0;
  1071. #X connect 30 0 29 1;
  1072. #X connect 31 0 32 0;
  1073. #X connect 31 0 37 0;
  1074. #X connect 32 0 8 0;
  1075. #X connect 33 0 22 0;
  1076. #X connect 33 0 28 0;
  1077. #X connect 33 0 31 0;
  1078. #X connect 35 0 18 0;
  1079. #X connect 35 0 48 0;
  1080. #X connect 35 1 34 0;
  1081. #X connect 35 1 45 0;
  1082. #X connect 37 0 36 0;
  1083. #X connect 38 0 22 0;
  1084. #X connect 39 0 33 0;
  1085. #X connect 39 0 3 0;
  1086. #X connect 39 0 52 0;
  1087. #X connect 42 0 36 0;
  1088. #X connect 43 0 40 0;
  1089. #X connect 45 0 44 0;
  1090. #X connect 47 0 46 0;
  1091. #X connect 48 0 36 0;
  1092. #X connect 50 0 27 0;
  1093. #X connect 51 0 23 0;
  1094. #X connect 52 0 33 0;
  1095. #X connect 52 0 55 0;
  1096. #X connect 53 0 39 0;
  1097. #X connect 54 0 4 0;
  1098. #X connect 55 0 60 0;
  1099. #X connect 56 0 55 1;
  1100. #X connect 59 0 55 0;
  1101. #X connect 60 1 41 0;
  1102. #X connect 60 1 42 0;
  1103. #X connect 60 1 47 0;
  1104. #X connect 60 2 43 0;
  1105. #X restore 11 141 pd rename;
  1106. #X obj 58 47 s \$0-bootstoptimers;
  1107. #N canvas 446 81 644 654 program 0;
  1108. #X obj 281 123 s \$0-bootloadermode;
  1109. #X msg 281 103 1;
  1110. #X obj 281 222 s \$0-enterbld;
  1111. #X obj 254 82 t s b;
  1112. #X obj 292 203 s \$0-bootfruitname;
  1113. #X obj 375 255 r \$0-verified;
  1114. #X obj 375 277 sel 1;
  1115. #X obj 453 496 s \$0-Bootloader-snd;
  1116. #X obj 453 427 symbol;
  1117. #X obj 499 427 r \$0-bootfruitname;
  1118. #X obj 375 297 spigot;
  1119. #X msg 412 277 1;
  1120. #X msg 420 296 0;
  1121. #X obj 440 277 r \$0-bootloadermode;
  1122. #X obj 548 471 s \$0-quitbld;
  1123. #X obj 453 448 t s b;
  1124. #X obj 205 217 b;
  1125. #X msg 122 125 stop;
  1126. #X obj 4 517 s \$0-Bootloader-snd;
  1127. #X obj 51 471 s \$0-quitbld;
  1128. #X obj 4 447 t s b;
  1129. #X obj 480 539 s \$0-bootloadermode;
  1130. #X msg 480 519 0;
  1131. #X obj 31 572 s \$0-bootloadermode;
  1132. #X msg 31 552 0;
  1133. #X obj 351 258 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
  1134. 1;
  1135. #X obj 111 205 del 10000;
  1136. #X obj 122 98 r \$0-bootstoptimers;
  1137. #X obj 254 33 inlet;
  1138. #X obj 254 60 unpack s s;
  1139. #X obj 311 83 s \$0-bootprogfile;
  1140. #X obj 273 600 print Fraise_PROGRAM;
  1141. #X obj 254 263 del 200;
  1142. #X obj 254 158 symbol;
  1143. #X msg 172 256 stop;
  1144. #X msg 4 493 \$1 program_error;
  1145. #X msg 453 472 \$1 programmed;
  1146. #X obj 254 519 symbol;
  1147. #X obj 287 498 r \$0-bootfruitname;
  1148. #X msg 273 575 \$1 not responding. retrying...;
  1149. #X obj 375 328 s \$0-bootdoprogram;
  1150. #X obj 297 372 spigot;
  1151. #X msg 334 352 1;
  1152. #X msg 342 371 0;
  1153. #X obj 297 330 r \$0-DONE;
  1154. #X obj 383 359 r \$0-bootloadermode;
  1155. #X msg 316 537 \$1 successfully programmed;
  1156. #X obj 193 415 del 30000;
  1157. #X msg 193 388 stop;
  1158. #X obj 163 328 r \$0-bootstoptimers;
  1159. #X obj 193 437 t b b;
  1160. #X obj 4 422 symbol;
  1161. #X obj 37 401 r \$0-bootfruitname;
  1162. #X msg 136 549 aborting programming \$1!;
  1163. #X obj 526 336 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  1164. -1 -1;
  1165. #X obj 254 182 t b s b;
  1166. #X obj 193 464 s \$0-DONE;
  1167. #X obj 163 413 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  1168. -1 -1;
  1169. #X obj 457 85 r \$0-prog-progress;
  1170. #X obj 502 106 r \$0-bootfruitname;
  1171. #X obj 457 174 s \$0-Bootloader-snd;
  1172. #X obj 457 127 pack f s;
  1173. #X msg 457 150 \$2 prog_progress \$1;
  1174. #X obj 156 472 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  1175. -1 -1;
  1176. #X text 294 30 (program) Fruitname HexFile;
  1177. #X connect 1 0 0 0;
  1178. #X connect 3 0 33 0;
  1179. #X connect 3 1 1 0;
  1180. #X connect 3 1 26 0;
  1181. #X connect 5 0 6 0;
  1182. #X connect 5 0 25 0;
  1183. #X connect 6 0 10 0;
  1184. #X connect 8 0 15 0;
  1185. #X connect 9 0 8 1;
  1186. #X connect 10 0 12 0;
  1187. #X connect 10 0 17 0;
  1188. #X connect 10 0 40 0;
  1189. #X connect 10 0 42 0;
  1190. #X connect 10 0 47 0;
  1191. #X connect 10 0 54 0;
  1192. #X connect 11 0 10 1;
  1193. #X connect 12 0 10 1;
  1194. #X connect 13 0 12 0;
  1195. #X connect 15 0 36 0;
  1196. #X connect 15 0 46 0;
  1197. #X connect 15 1 14 0;
  1198. #X connect 15 1 22 0;
  1199. #X connect 16 0 33 0;
  1200. #X connect 17 0 26 0;
  1201. #X connect 17 0 34 0;
  1202. #X connect 20 0 35 0;
  1203. #X connect 20 0 53 0;
  1204. #X connect 20 1 19 0;
  1205. #X connect 20 1 24 0;
  1206. #X connect 22 0 21 0;
  1207. #X connect 24 0 23 0;
  1208. #X connect 26 0 34 0;
  1209. #X connect 26 0 51 0;
  1210. #X connect 27 0 17 0;
  1211. #X connect 28 0 29 0;
  1212. #X connect 29 0 3 0;
  1213. #X connect 29 1 30 0;
  1214. #X connect 32 0 16 0;
  1215. #X connect 32 0 37 0;
  1216. #X connect 33 0 55 0;
  1217. #X connect 34 0 32 0;
  1218. #X connect 35 0 18 0;
  1219. #X connect 36 0 7 0;
  1220. #X connect 37 0 39 0;
  1221. #X connect 38 0 37 1;
  1222. #X connect 39 0 31 0;
  1223. #X connect 41 0 43 0;
  1224. #X connect 41 0 8 0;
  1225. #X connect 41 0 48 0;
  1226. #X connect 42 0 41 1;
  1227. #X connect 43 0 41 1;
  1228. #X connect 44 0 41 0;
  1229. #X connect 45 0 43 0;
  1230. #X connect 46 0 31 0;
  1231. #X connect 47 0 50 0;
  1232. #X connect 48 0 47 0;
  1233. #X connect 49 0 48 0;
  1234. #X connect 50 0 56 0;
  1235. #X connect 50 0 51 0;
  1236. #X connect 50 1 43 0;
  1237. #X connect 51 0 20 0;
  1238. #X connect 52 0 51 1;
  1239. #X connect 53 0 31 0;
  1240. #X connect 55 0 32 0;
  1241. #X connect 55 1 2 0;
  1242. #X connect 55 1 4 0;
  1243. #X connect 55 2 11 0;
  1244. #X connect 57 0 50 0;
  1245. #X connect 58 0 61 0;
  1246. #X connect 59 0 61 1;
  1247. #X connect 61 0 62 0;
  1248. #X connect 62 0 60 0;
  1249. #X connect 63 0 56 0;
  1250. #X connect 63 0 19 0;
  1251. #X restore 27 116 pd program;
  1252. #X obj 231 60 s \$0-prog-progress;
  1253. #X obj 11 69 route rename program make progboot;
  1254. #N canvas 468 506 503 290 progboot 0;
  1255. #X obj 51 18 inlet;
  1256. #X obj 129 105 getdir;
  1257. #X obj 51 71 t a b;
  1258. #X msg 51 105 symbol \$1;
  1259. #X obj 51 131 pack s s \$2;
  1260. #X text 125 132 SourcePath thisPath netPort;
  1261. #X text 86 17 (progboot) Fruitname SourcePath;
  1262. #X obj 51 211 outlet tosystem;
  1263. #X obj 188 51 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  1264. -1;
  1265. #X obj 188 103 print Error progboot;
  1266. #X msg 188 75 sorry your OS is not supported yet.;
  1267. #X text 210 152 thisPath/progboot.sh SourcePath netPort;
  1268. #X msg 51 153 bash \$2/progboot.sh \$1 \$3;
  1269. #X obj 221 52 intern/demux_os;
  1270. #X connect 0 0 2 0;
  1271. #X connect 1 0 4 1;
  1272. #X connect 2 0 3 0;
  1273. #X connect 2 1 1 0;
  1274. #X connect 3 0 4 0;
  1275. #X connect 4 0 12 0;
  1276. #X connect 8 0 10 0;
  1277. #X connect 10 0 9 0;
  1278. #X connect 12 0 7 0;
  1279. #X connect 13 1 8 0;
  1280. #X connect 13 2 8 0;
  1281. #X restore 160 135 pd progboot;
  1282. #X obj 160 158 outlet tosystem;
  1283. #X obj 111 101 intern/MAKE \$0 \$2;
  1284. #X connect 1 0 4 0;
  1285. #X connect 1 0 14 0;
  1286. #X connect 5 0 10 0;
  1287. #X connect 6 0 7 0;
  1288. #X connect 7 0 8 0;
  1289. #X connect 8 0 9 0;
  1290. #X connect 10 0 15 0;
  1291. #X connect 10 1 12 0;
  1292. #X connect 15 0 11 0;
  1293. #X connect 15 1 13 0;
  1294. #X connect 15 2 18 0;
  1295. #X connect 15 3 16 0;
  1296. #X connect 16 0 17 0;
  1297. #X restore 142 189 pd Bootloader/Compiler;
  1298. #X text 2 9 usage: Fr2Pied num_serial_device unique_network_port;
  1299. #N canvas 64 215 999 356 autoReconnect 0;
  1300. #X obj 128 43 r \$0-on-snd;
  1301. #X obj 128 279 s \$0-comport-on-snd;
  1302. #X obj 493 286 s \$0-pied-rcv;
  1303. #X obj 365 181 s \$0-version;
  1304. #X msg 365 159 symbol;
  1305. #X obj 338 61 r \$0-opened;
  1306. #X obj 338 83 sel 0 1;
  1307. #X msg 338 206 -1;
  1308. #X obj 338 225 s \$0-piedID;
  1309. #X obj 338 124 t b b;
  1310. #X msg 493 245 #i \, #V \, #R;
  1311. #X msg 452 174 stop;
  1312. #X obj 422 92 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  1313. -1;
  1314. #X obj 422 69 loadbang;
  1315. #X msg 493 199 1;
  1316. #X obj 493 225 metro 1000;
  1317. #X msg 452 198 0;
  1318. #X obj 493 177 del 500;
  1319. #X msg 894 241 actif 1;
  1320. #X obj 894 218 del 50;
  1321. #X msg 894 188 stop;
  1322. #X obj 928 188 b;
  1323. #X obj 894 98 r \$0-version;
  1324. #X msg 921 142 symbol;
  1325. #X obj 894 163 sel _;
  1326. #X msg 841 240 actif 0;
  1327. #X obj 905 291 s \$0-pied;
  1328. #X obj 894 263 t a;
  1329. #X obj 894 312 s \$0-Fr2;
  1330. #X obj 658 63 r \$0-pied;
  1331. #X obj 658 85 route actif;
  1332. #X obj 658 109 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
  1333. 1;
  1334. #X obj 658 129 metro 1000;
  1335. #X obj 744 171 del 800;
  1336. #X obj 744 110 r \$0-echo;
  1337. #X msg 744 130 stop;
  1338. #X obj 239 78 r \$0-pied;
  1339. #X obj 239 100 route actif;
  1340. #X obj 169 127 f;
  1341. #X obj 169 149 sel 0;
  1342. #X obj 128 65 t f f;
  1343. #X msg 128 238 0;
  1344. #X obj 169 99 metro 3000;
  1345. #X msg 169 206 1;
  1346. #X msg 136 149 stop;
  1347. #X obj 128 99 sel 0;
  1348. #X obj 222 183 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
  1349. -1 -1;
  1350. #X obj 169 184 del 200;
  1351. #X msg 464 245 #R;
  1352. #X obj 555 130 r \$0-pied;
  1353. #X obj 555 152 route actif;
  1354. #X obj 555 174 sel 1;
  1355. #X msg 555 196 0;
  1356. #X obj 894 119 t s b;
  1357. #X obj 22 46 loadbang;
  1358. #X msg 22 89 0 \, 1;
  1359. #X obj 22 111 s \$0-on-rcv;
  1360. #X obj 22 68 del 10;
  1361. #X obj 744 315 s \$0-comport-on-snd;
  1362. #X msg 744 292 0;
  1363. #X text 24 17 1 : init;
  1364. #X text 126 18 2 : connect comport;
  1365. #X text 336 18 3 : get version and ID;
  1366. #X text 656 24 4 : send "actif" and start echo-watchdog. close comport
  1367. if watchdog fires., f 41;
  1368. #X obj 658 197 s \$0-pied-rcv;
  1369. #X msg 658 175 #EsEcho;
  1370. #X obj 744 194 spigot 1;
  1371. #X obj 812 73 r \$0-bootloadermode;
  1372. #X obj 812 95 == 0;
  1373. #X connect 0 0 40 0;
  1374. #X connect 4 0 3 0;
  1375. #X connect 5 0 6 0;
  1376. #X connect 6 0 9 0;
  1377. #X connect 6 1 17 0;
  1378. #X connect 7 0 8 0;
  1379. #X connect 9 0 7 0;
  1380. #X connect 9 1 4 0;
  1381. #X connect 9 1 11 0;
  1382. #X connect 10 0 2 0;
  1383. #X connect 11 0 16 0;
  1384. #X connect 11 0 17 0;
  1385. #X connect 12 0 9 0;
  1386. #X connect 13 0 12 0;
  1387. #X connect 14 0 15 0;
  1388. #X connect 15 0 10 0;
  1389. #X connect 16 0 15 0;
  1390. #X connect 17 0 14 0;
  1391. #X connect 18 0 27 0;
  1392. #X connect 19 0 18 0;
  1393. #X connect 20 0 19 0;
  1394. #X connect 21 0 19 0;
  1395. #X connect 22 0 53 0;
  1396. #X connect 23 0 24 1;
  1397. #X connect 24 0 20 0;
  1398. #X connect 24 0 25 0;
  1399. #X connect 24 1 21 0;
  1400. #X connect 25 0 27 0;
  1401. #X connect 27 0 26 0;
  1402. #X connect 27 0 28 0;
  1403. #X connect 29 0 30 0;
  1404. #X connect 30 0 31 0;
  1405. #X connect 31 0 32 0;
  1406. #X connect 32 0 33 0;
  1407. #X connect 32 0 65 0;
  1408. #X connect 33 0 66 0;
  1409. #X connect 34 0 35 0;
  1410. #X connect 35 0 33 0;
  1411. #X connect 36 0 37 0;
  1412. #X connect 37 0 38 1;
  1413. #X connect 38 0 39 0;
  1414. #X connect 39 0 41 0;
  1415. #X connect 39 0 46 0;
  1416. #X connect 39 0 47 0;
  1417. #X connect 40 0 45 0;
  1418. #X connect 40 1 42 0;
  1419. #X connect 41 0 1 0;
  1420. #X connect 42 0 38 0;
  1421. #X connect 43 0 1 0;
  1422. #X connect 44 0 47 0;
  1423. #X connect 45 0 44 0;
  1424. #X connect 45 0 41 0;
  1425. #X connect 47 0 43 0;
  1426. #X connect 48 0 2 0;
  1427. #X connect 49 0 50 0;
  1428. #X connect 50 0 51 0;
  1429. #X connect 51 0 52 0;
  1430. #X connect 52 0 15 0;
  1431. #X connect 53 0 24 0;
  1432. #X connect 53 1 23 0;
  1433. #X connect 54 0 57 0;
  1434. #X connect 55 0 56 0;
  1435. #X connect 57 0 55 0;
  1436. #X connect 59 0 58 0;
  1437. #X connect 65 0 64 0;
  1438. #X connect 66 0 25 0;
  1439. #X connect 66 0 59 0;
  1440. #X connect 67 0 68 0;
  1441. #X connect 68 0 66 1;
  1442. #X restore 125 109 pd autoReconnect;
  1443. #N canvas 2 95 657 225 DECLARE-LIBS 0;
  1444. #X obj 66 34 declare -stdpath moonlib;
  1445. #X obj 93 73 declare -stdpath hcs;
  1446. #X obj 86 117 declare -stdpath ggee;
  1447. #X obj 243 34 declare -lib ../extra/s2f -lib ../extra/slist;
  1448. #X obj 241 117 declare -lib ../extra/getdir -lib ../extra/shell;
  1449. #X obj 241 168 declare -lib ../extra/comport;
  1450. #X obj 242 72 declare -lib ../extra/folder_list -lib ../extra/stat
  1451. -lib ../extra/uname;
  1452. #X obj 86 142 declare -stdpath zexy;
  1453. #X obj 242 142 declare -lib ../extra/zexy -lib zexy;
  1454. #X restore 18 289 pd DECLARE-LIBS;
  1455. #N canvas 5 75 450 300 testBitRate 1;
  1456. #X obj 157 184 s \$0-pied-rcv;
  1457. #X msg 157 159 #ETESTSTRING;
  1458. #X obj 157 31 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
  1459. 1;
  1460. #X obj 157 67 metro 10;
  1461. #X msg 221 26 1;
  1462. #X msg 343 26 10;
  1463. #X obj 157 129 until;
  1464. #X obj 157 107 f 10;
  1465. #X msg 249 27 2;
  1466. #X msg 313 26 5;
  1467. #X msg 282 25 4;
  1468. #X msg 302 73 3;
  1469. #X connect 1 0 0 0;
  1470. #X connect 2 0 3 0;
  1471. #X connect 3 0 7 0;
  1472. #X connect 4 0 3 1;
  1473. #X connect 5 0 3 1;
  1474. #X connect 6 0 1 0;
  1475. #X connect 7 0 6 0;
  1476. #X connect 8 0 3 1;
  1477. #X connect 9 0 3 1;
  1478. #X connect 10 0 3 1;
  1479. #X connect 11 0 3 1;
  1480. #X restore 287 102 pd testBitRate;
  1481. #X connect 2 0 1 0;
  1482. #X connect 4 0 5 0;
  1483. #X connect 5 0 3 0;
  1484. #X connect 16 0 19 0;
  1485. #X connect 21 0 20 0;
  1486. #X coords 0 -1 1 1 152 72 1 20 30;