kpofquad.pd 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336
  1. #N canvas 178 577 965 433 10;
  2. #X declare -path kollabs;
  3. #X obj 61 72 cnv 15 198 31 empty empty empty 20 12 0 14 -233017 -66577
  4. 0;
  5. #X obj 65 76 tgl 15 1 /kpof/\$1/state /kpof/\$1/state on/off 17 7 0
  6. 10 -4034 -1 -1 1 1;
  7. #X msg 158 121 vis 1;
  8. #X obj 158 76 bng 15 250 50 0 empty empty settings 17 7 0 10 -159808
  9. -1 -1;
  10. #X obj 14 242 cnv 15 360 60 empty empty creation_arguments: 3 8 0 12
  11. -191407 -1 0;
  12. #N canvas 1090 313 507 632 corners 0;
  13. #X obj 58 568 outlet;
  14. #X obj 58 28 r /kpof/\$1/corner/top/left/x;
  15. #X obj 79 52 r /kpof/\$1/corner/top/left/y;
  16. #X obj 91 151 r /kpof/\$1/corner/top/right/x;
  17. #X obj 116 175 r /kpof/\$1/corner/top/right/y;
  18. #X obj 142 273 r /kpof/\$1/corner/bottom/right/x;
  19. #X obj 167 300 r /kpof/\$1/corner/bottom/right/y;
  20. #X obj 201 425 r /kpof/\$1/corner/bottom/left/x;
  21. #X obj 226 452 r /kpof/\$1/corner/bottom/left/y;
  22. #X msg 58 120 corner 0 \$1 \$2;
  23. #X msg 91 239 corner 1 \$1 \$2;
  24. #X msg 142 366 corner 2 \$1 \$2;
  25. #X msg 201 519 corner 3 \$1 \$2;
  26. #X obj 58 94 pack f f;
  27. #X obj 91 219 pack f f;
  28. #X obj 142 345 pack f f;
  29. #X obj 201 496 pack f f;
  30. #X obj 79 74 t b f;
  31. #X obj 116 195 t b f;
  32. #X obj 167 324 t b f;
  33. #X obj 226 472 t b f;
  34. #X connect 1 0 13 0;
  35. #X connect 2 0 17 0;
  36. #X connect 3 0 14 0;
  37. #X connect 4 0 18 0;
  38. #X connect 5 0 15 0;
  39. #X connect 6 0 19 0;
  40. #X connect 7 0 16 0;
  41. #X connect 8 0 20 0;
  42. #X connect 9 0 0 0;
  43. #X connect 10 0 0 0;
  44. #X connect 11 0 0 0;
  45. #X connect 12 0 0 0;
  46. #X connect 13 0 9 0;
  47. #X connect 14 0 10 0;
  48. #X connect 15 0 11 0;
  49. #X connect 16 0 12 0;
  50. #X connect 17 0 13 0;
  51. #X connect 17 1 13 1;
  52. #X connect 18 0 14 0;
  53. #X connect 18 1 14 1;
  54. #X connect 19 0 15 0;
  55. #X connect 19 1 15 1;
  56. #X connect 20 0 16 0;
  57. #X connect 20 1 16 1;
  58. #X restore 627 245 pd corners;
  59. #X obj 612 204 pofcolor 1 1 1 1;
  60. #X text 19 261 1st: module ID \, needs to be unique \; 2nd: storage
  61. domain;
  62. #N canvas 5 74 450 300 alpha 0;
  63. #X obj 250 231 line;
  64. #X obj 250 207 pack f f;
  65. #X obj 303 187 r /kpof/\$1/fadetime;
  66. #X obj 250 152 r /kpof/\$1/alpha/2;
  67. #X obj 250 253 outlet;
  68. #X obj 157 77 r /kpof/\$1/fademode;
  69. #X obj 157 98 == 2;
  70. #X obj 30 231 line;
  71. #X obj 30 207 pack f f;
  72. #X obj 83 187 r /kpof/\$1/fadetime;
  73. #X obj 30 253 outlet;
  74. #X obj 34 77 r /kpof/\$1/fademode;
  75. #X obj 30 152 r /kpof/\$1/alpha/1;
  76. #X obj 34 98 == 1;
  77. #X obj 79 25 hradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144 -1
  78. -1 1;
  79. #X obj 79 45 s /kpof/\$1/fademode;
  80. #X obj 248 52 s /kpof/\$1/fadetime;
  81. #X floatatom 246 31 5 0 0 0 - - -, f 5;
  82. #X obj 157 119 s /kpof/\$1/alpha/2;
  83. #X obj 34 119 s /kpof/\$1/alpha/1;
  84. #X connect 0 0 4 0;
  85. #X connect 1 0 0 0;
  86. #X connect 2 0 1 1;
  87. #X connect 3 0 1 0;
  88. #X connect 5 0 6 0;
  89. #X connect 6 0 18 0;
  90. #X connect 7 0 10 0;
  91. #X connect 8 0 7 0;
  92. #X connect 9 0 8 1;
  93. #X connect 11 0 13 0;
  94. #X connect 12 0 8 0;
  95. #X connect 13 0 19 0;
  96. #X connect 14 0 15 0;
  97. #X connect 17 0 16 0;
  98. #X restore 721 162 pd alpha;
  99. #X obj 612 81 pofvisible 1;
  100. #X obj 652 43 r /kpof/\$1/state;
  101. #X obj 612 281 pofquad 200 200;
  102. #X text 34 316 TODO;
  103. #X text 30 339 inversion corners top/bottom;
  104. #X text 34 370 liste medias Cream;
  105. #X obj 612 8 inlet;
  106. #N canvas 1 52 875 363 \$0-touchPins 0;
  107. #X obj 655 35 pofwin;
  108. #X obj 655 56 route window;
  109. #X obj 245 53 inlet;
  110. #X obj 245 85 t a a a a a;
  111. #X obj 597 102 poftouch 1280 720;
  112. #X obj 655 16 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  113. -1;
  114. #X obj 655 78 unpack f f;
  115. #X obj 713 123 route move;
  116. #X obj 713 145 s \$0-touch-move;
  117. #N canvas 1 52 450 300 touchblob 0;
  118. #X obj 28 88 pofcolor 0 1 0 1;
  119. #X obj 123 137 route down up;
  120. #X msg 124 158 1;
  121. #X msg 168 158 0;
  122. #X obj 28 117 poftouch 20 20;
  123. #X msg 155 90 draw 1 \, shape ellipse \, dont_capture 2;
  124. #X obj 155 69 loadbang;
  125. #X obj 85 208 spigot;
  126. #X obj 85 184 r \$0-touch-move;
  127. #X obj 85 230 outlet;
  128. #X obj 28 50 inlet;
  129. #X connect 0 0 4 0;
  130. #X connect 1 0 2 0;
  131. #X connect 1 1 3 0;
  132. #X connect 2 0 0 1;
  133. #X connect 2 0 7 1;
  134. #X connect 3 0 0 1;
  135. #X connect 3 0 7 1;
  136. #X connect 4 1 1 0;
  137. #X connect 5 0 4 0;
  138. #X connect 6 0 5 0;
  139. #X connect 7 0 9 0;
  140. #X connect 8 0 7 0;
  141. #X connect 10 0 0 0;
  142. #X restore 340 213 pd touchblob;
  143. #X obj 388 170 unpack f f;
  144. #N canvas 1 52 450 300 touchblob 0;
  145. #X obj 28 88 pofcolor 0 1 0 1;
  146. #X msg 124 158 1;
  147. #X msg 168 158 0;
  148. #X obj 28 117 poftouch 20 20;
  149. #X msg 155 90 draw 1 \, shape ellipse \, dont_capture 2;
  150. #X obj 155 69 loadbang;
  151. #X obj 85 208 spigot;
  152. #X obj 85 184 r \$0-touch-move;
  153. #X obj 85 230 outlet;
  154. #X obj 28 50 inlet;
  155. #X obj 123 137 route down up;
  156. #X connect 0 0 3 0;
  157. #X connect 1 0 0 1;
  158. #X connect 1 0 6 1;
  159. #X connect 2 0 0 1;
  160. #X connect 2 0 6 1;
  161. #X connect 3 1 10 0;
  162. #X connect 4 0 3 0;
  163. #X connect 5 0 4 0;
  164. #X connect 6 0 8 0;
  165. #X connect 7 0 6 0;
  166. #X connect 9 0 0 0;
  167. #X connect 10 0 1 0;
  168. #X connect 10 1 2 0;
  169. #X restore 501 213 pd touchblob;
  170. #X obj 551 170 unpack f f;
  171. #N canvas 1 52 450 300 touchblob 0;
  172. #X obj 28 88 pofcolor 0 1 0 1;
  173. #X msg 124 158 1;
  174. #X msg 168 158 0;
  175. #X obj 28 117 poftouch 20 20;
  176. #X msg 155 90 draw 1 \, shape ellipse \, dont_capture 2;
  177. #X obj 155 69 loadbang;
  178. #X obj 85 208 spigot;
  179. #X obj 85 184 r \$0-touch-move;
  180. #X obj 85 230 outlet;
  181. #X obj 28 50 inlet;
  182. #X obj 123 137 route down up;
  183. #X connect 0 0 3 0;
  184. #X connect 1 0 0 1;
  185. #X connect 1 0 6 1;
  186. #X connect 2 0 0 1;
  187. #X connect 2 0 6 1;
  188. #X connect 3 1 10 0;
  189. #X connect 4 0 3 0;
  190. #X connect 5 0 4 0;
  191. #X connect 6 0 8 0;
  192. #X connect 7 0 6 0;
  193. #X connect 9 0 0 0;
  194. #X connect 10 0 1 0;
  195. #X connect 10 1 2 0;
  196. #X restore 15 213 pd touchblob;
  197. #X obj 15 192 poftranslate -200 -150;
  198. #N canvas 1 52 450 300 touchblob 0;
  199. #X obj 28 88 pofcolor 0 1 0 1;
  200. #X obj 123 137 route down up;
  201. #X msg 124 158 1;
  202. #X msg 168 158 0;
  203. #X obj 28 117 poftouch 20 20;
  204. #X msg 155 90 draw 1 \, shape ellipse \, dont_capture 2;
  205. #X obj 155 69 loadbang;
  206. #X obj 85 208 spigot;
  207. #X obj 85 184 r \$0-touch-move;
  208. #X obj 85 230 outlet;
  209. #X obj 28 50 inlet;
  210. #X connect 0 0 4 0;
  211. #X connect 1 0 2 0;
  212. #X connect 1 1 3 0;
  213. #X connect 2 0 0 1;
  214. #X connect 2 0 7 1;
  215. #X connect 3 0 0 1;
  216. #X connect 3 0 7 1;
  217. #X connect 4 1 1 0;
  218. #X connect 5 0 4 0;
  219. #X connect 6 0 5 0;
  220. #X connect 7 0 9 0;
  221. #X connect 8 0 7 0;
  222. #X connect 10 0 0 0;
  223. #X restore 180 213 pd touchblob;
  224. #X obj 228 170 unpack f f;
  225. #X obj 180 192 poftranslate 200 -150;
  226. #X obj 340 192 poftranslate 200 150;
  227. #X obj 501 192 poftranslate -200 150;
  228. #X obj 15 234 unpack f f;
  229. #X obj 15 259 s /kpof/\$1/corner/top/left/x;
  230. #X obj 82 283 s /kpof/\$1/corner/top/left/y;
  231. #X obj 45 109 r /kpof/\$1/corner/top/left/x;
  232. #X obj 112 133 r /kpof/\$1/corner/top/left/y;
  233. #X connect 0 0 1 0;
  234. #X connect 1 0 6 0;
  235. #X connect 2 0 3 0;
  236. #X connect 3 0 14 0;
  237. #X connect 3 1 17 0;
  238. #X connect 3 2 18 0;
  239. #X connect 3 3 19 0;
  240. #X connect 3 4 4 0;
  241. #X connect 4 1 7 0;
  242. #X connect 5 0 0 0;
  243. #X connect 6 0 4 1;
  244. #X connect 6 1 4 2;
  245. #X connect 7 0 8 0;
  246. #X connect 10 0 18 1;
  247. #X connect 10 1 18 2;
  248. #X connect 12 0 19 1;
  249. #X connect 12 1 19 2;
  250. #X connect 13 0 20 0;
  251. #X connect 14 0 13 0;
  252. #X connect 16 0 17 1;
  253. #X connect 16 1 17 2;
  254. #X connect 17 0 15 0;
  255. #X connect 18 0 9 0;
  256. #X connect 19 0 11 0;
  257. #X connect 20 0 21 0;
  258. #X connect 20 1 22 0;
  259. #X connect 23 0 14 1;
  260. #X connect 24 0 14 2;
  261. #X restore 455 107 pd \$0-touchPins;
  262. #N canvas 757 175 450 300 \$0-init 0;
  263. #X obj 98 76 loadbang;
  264. #X obj 98 98 list append \$1;
  265. #X obj 173 74 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
  266. -1;
  267. #X obj 102 37 declare -path kollabs;
  268. #X msg 98 121 \; /kpof/\$1/corner/top/left/x -200 \; /kpof/\$1/corner/top/left/y
  269. -200 \; /kpof/\$1/corner/top/right/x 200 \; /kpof/\$1/corner/top/right/y
  270. -200 \; /kpof/\$1/corner/bottom/right/x 200 \; /kpof/\$1/corner/bottom/right/y
  271. 200 \; /kpof/\$1/corner/bottom/left/x -200 \; /kpof/\$1/corner/bottom/left/y
  272. 200 \; /kpof/\$1/alpha 1 \; /kpof/\$1/state 1;
  273. #X connect 0 0 1 0;
  274. #X connect 1 0 4 0;
  275. #X connect 2 0 1 0;
  276. #X restore 268 58 pd \$0-init;
  277. #N canvas 658 158 768 540 \$0-storage_&_osc 0;
  278. #X obj 369 11 osc_bi \$2 /kpof/\$1/corner/top/left/x;
  279. #X obj 369 31 osc_bi \$2 /kpof/\$1/corner/top/left/y;
  280. #X obj 39 71 ds_reg \$2 /kpof/\$1/corner/top/right/y;
  281. #X obj 39 91 ds_reg \$2 /kpof/\$1/corner/bottom/right/x;
  282. #X obj 39 111 ds_reg \$2 /kpof/\$1/corner/bottom/right/y;
  283. #X obj 39 131 ds_reg \$2 /kpof/\$1/corner/bottom/left/x;
  284. #X obj 39 151 ds_reg \$2 /kpof/\$1/corner/bottom/left/y;
  285. #X obj 369 51 osc_bi \$2 /kpof/\$1/corner/top/right/x;
  286. #X obj 369 71 osc_bi \$2 /kpof/\$1/corner/top/right/y;
  287. #X obj 369 91 osc_bi \$2 /kpof/\$1/corner/bottom/right/x;
  288. #X obj 369 111 osc_bi \$2 /kpof/\$1/corner/bottom/right/y;
  289. #X obj 369 131 osc_bi \$2 /kpof/\$1/corner/bottom/left/x;
  290. #X obj 369 151 osc_bi \$2 /kpof/\$1/corner/bottom/left/y;
  291. #X obj 39 251 ds_reg \$2 /kpof/\$1/state;
  292. #X obj 369 251 osc_bi \$2 /kpof/\$1/state;
  293. #X obj 39 51 ds_reg \$2 /kpof/\$1/corner/top/right/x;
  294. #X obj 39 31 ds_reg \$2 /kpof/\$1/corner/top/left/y;
  295. #X obj 39 11 ds_reg \$2 /kpof/\$1/corner/top/left/x;
  296. #X obj 39 281 ds_reg \$2 /kpof/\$1/alpha;
  297. #X obj 369 280 osc_bi \$2 /kpof/\$1/alpha;
  298. #X restore 269 86 pd \$0-storage_&_osc;
  299. #N canvas 397 821 413 151 \$0-cfg_\$1 0;
  300. #X obj 2 2 cnv 15 170 145 empty empty QUAD 20 12 0 14 -233017 -66577
  301. 0;
  302. #X obj 21 52 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/top/left/x
  303. /kpof/\$1/corner/top/left/x x -10 7 0 10 -261234 -1 -1 -200 256;
  304. #X obj 21 68 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/top/left/y
  305. /kpof/\$1/corner/top/left/y y -10 7 0 10 -261234 -1 -1 -200 256;
  306. #X obj 98 52 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/top/right/x
  307. /kpof/\$1/corner/top/right/x x -10 7 0 10 -261234 -1 -1 200 256;
  308. #X obj 98 68 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/top/right/y
  309. /kpof/\$1/corner/top/right/y y -10 7 0 10 -261234 -1 -1 -200 256;
  310. #X obj 21 98 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/bottom/left/x
  311. /kpof/\$1/corner/bottom/left/x x -10 7 0 10 -261234 -1 -1 -200 256
  312. ;
  313. #X obj 21 114 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/bottom/left/y
  314. /kpof/\$1/corner/bottom/left/y y -10 7 0 10 -261234 -1 -1 200 256;
  315. #X obj 98 98 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/bottom/right/x
  316. /kpof/\$1/corner/bottom/right/x x -10 7 0 10 -261234 -1 -1 200 256
  317. ;
  318. #X obj 98 114 nbx 5 14 -10000 10000 0 0 /kpof/\$1/corner/bottom/right/y
  319. /kpof/\$1/corner/bottom/right/y y -10 7 0 10 -261234 -1 -1 200 256
  320. ;
  321. #X text 14 32 corners position;
  322. #X obj 227 60 vsl 15 60 0 1 0 0 /kpof/\$1/alpha /kpof/\$1/alpha alpha
  323. -10 -9 0 10 -262144 -1 -1 5900 0;
  324. #X coords 0 0 1 1 155 300 0;
  325. #X restore 158 167 pd \$0-cfg_\$1;
  326. #X obj 158 145 s pd-\$0-cfg_\$1;
  327. #X connect 2 0 20 0;
  328. #X connect 3 0 2 0;
  329. #X connect 5 0 11 0;
  330. #X connect 6 0 11 0;
  331. #X connect 8 0 6 4;
  332. #X connect 9 0 6 0;
  333. #X connect 10 0 9 0;
  334. #X connect 15 0 9 0;
  335. #X coords 0 -1 1 1 200 50 1 60 55;