Commit b92b7bb9 authored by J Reso's avatar J Reso
Browse files

update onoff with mutex, NEW examples BASICS, add m object minimalize mem

parent 6b3c1306
#N canvas 0 0 150 687 10;
#N canvas 1 135 150 687 10;
#X declare -path abstractions/in -path abstractions/numbers -path abstractions/audio
-path abstractions/video -path abstractions/core -path abstractions/out
-path abstractions -path abstractions/brutbox;
......@@ -194,7 +194,7 @@
#X restore 2 617 pd open;
#X restore 54 253 pd BIG_SLIDERS;
#X text 48 57 Main :;
#X obj 55 34 cnv 10 10 10 empty \$0-CNV-CPU CPU:4% 0 5 0 10 -233017
#X obj 55 34 cnv 10 10 10 empty \$0-CNV-CPU CPU:6% 0 5 0 10 -233017
-166441 0;
#N canvas 632 229 723 458 ADD_OBJECTS 0;
#X text 284 369 \; example-file obj x y abstraction;
......@@ -743,18 +743,18 @@ empty 0 -8 0 10 -208051 -208051 -262144 0;
;
#X obj 9 113 m-project projects/default;
#X obj 10 219 m-object in;
#X obj 114 261 m-help seq;
#X obj 114 261 mhelp seq;
#X obj 9 85 vradio 10 1 0 2 M-LEVEL M-LEVEL-IN empty 0 -8 0 10 -1 -262144
-1 0;
#X obj 20 95 cnv 9 50 9 empty \$0-cnv-expert Expert 2 7 1 9 -262144
-128992 0;
#X obj 20 84 cnv 7 50 9 empty \$0-cnv-beginner Débutant 2 7 1 9 -262144
-128992 0;
#X obj 114 219 m-help in;
#X obj 114 240 m-help numbers;
#X obj 114 282 m-help audio;
#X obj 114 303 m-help video;
#X obj 114 324 m-help out;
#X obj 114 219 mhelp in;
#X obj 114 240 mhelp numbers;
#X obj 114 282 mhelp audio;
#X obj 114 303 mhelp video;
#X obj 114 324 mhelp out;
#X obj 10 261 m-object seq;
#X obj 10 282 m-object audio;
#X obj 10 240 m-object numbers;
......
#N canvas 225 119 576 390 10;
#N canvas 223 120 576 390 10;
#X declare -path ../core;
#X obj 50 87 cnv 15 139 21 empty empty empty 20 12 1 9 -187776 -33289
0;
#X obj 180 87 tgl 10 0 \$0-on \$0-on-in empty 17 7 1 9 -187776 -33289
-33289 0 1;
-33289 1 1;
#X obj 160 87 bng 10 250 50 0 \$0-open \$0-open-in o 3 5 1 9 -187776
-33289 -33289;
#X obj 170 87 bng 10 250 50 0 \$0-save \$0-save-in s 3 5 1 9 -187776
......@@ -685,14 +685,14 @@ fade;
#X connect 8 0 1 0;
#X restore 51 286 pd \$0-PLAY;
#X obj 114 87 nbx 4 10 -100 100 0 0 \$0-speed \$0-speed-in speed -28
5 1 9 -187776 -33289 -33289 0 256;
5 1 9 -187776 -33289 -33289 1 256;
#X obj 53 117 hsl 135 10 0 1 0 0 \$0-pos \$0-pos-in pos 1 6 1 9 -187776
-33289 -33289 0 1;
-33289 -33289 13400 1;
#X obj 150 87 tgl 10 0 \$0-loop \$0-loop-in L 3 6 1 9 -187776 -33289
-33289 0 1;
#X obj 50 87 hradio 10 1 0 3 \$0-mode \$0-mode-in empty 0 -8 0 10 -187776
-1 -1 0;
#X obj 61 88 cnv 8 1 3 empty \$0-cnv-play  0 3 0 13 -187776 -1 0;
-1 -1 1;
#X obj 61 88 cnv 8 1 3 empty \$0-cnv-play  0 3 0 13 -1 -187776 0;
#X obj 71 88 cnv 8 8 8 empty \$0-cnv-rec -3 0 2 60 -187776 -1 0;
#N canvas 292 84 811 589 \$0-GUI-SAMPLER 0;
#X msg 99 114 26 15 0 3 1;
......@@ -892,7 +892,7 @@ fade;
#X obj 164 397 s \$0-pos-in;
#X text 159 9 Switch on only if playing \;;
#X obj 199 157 switch~;
#X obj 219 276 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
#X obj 219 276 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 166 349 spigot;
#X obj 266 371 > 130;
......@@ -993,11 +993,11 @@ fade;
#X obj 180 97 tgl 10 0 \$0-auto-length \$0-auto-length-in C 2 6 1 9
-187776 -33289 -33289 0 1;
#X obj 180 107 tgl 10 0 \$0-auto-update \$0-auto-update-in U 2 6 1
9 -187776 -33289 -33289 0 1;
9 -187776 -33289 -33289 1 1;
#X obj 53 97 hsl 125 10 0 1 0 0 \$0-start \$0-start-in start 1 6 1
9 -187776 -33289 -33289 0 1;
#X obj 53 107 hsl 125 10 0 1 0 0 \$0-end \$0-end-in end 1 6 1 9 -187776
-33289 -33289 0 1;
-33289 -33289 12400 1;
#N canvas 44 99 1279 546 \$0-MODES-AUTO 0;
#X text 232 488 speed;
#X obj 357 305 r \$0-speed;
......
#N canvas 329 362 492 375 10;
#N canvas 327 363 492 375 10;
#X obj 63 50 inlet;
#X obj 259 55 inlet;
#X obj 63 71 route float bang;
#X obj 109 96 s \$1-one-in;
#X obj 195 301 outlet;
#X obj 63 119 s \$1-mode-in;
#N canvas 65 148 992 493 \$0-COMMANDS 0;
#N canvas 63 149 992 493 \$0-COMMANDS 0;
#X obj 28 145 inlet;
#X obj 270 363 s \$1-max-in;
#X obj 82 124 spigot;
......@@ -37,7 +37,6 @@
#X obj 128 245 s \$1-reset-in;
#X obj 82 75 r TIME-MASTER;
#X text 79 56 from time-master;
#X obj 716 264 route auto-reset auto-update;
#X obj 624 84 s \$0-loadbang;
#X obj 624 56 initbang;
#X obj 214 48 r \$0-loadbang;
......@@ -49,17 +48,16 @@
#X obj 298 341 s \$1-size;
#X msg 214 185 sync 1 \, min 0 \, mode 0 \, auto-reset 1 \, auto-update
0 \, size \$1 \, max \$1 \, ms \$2 \, * \$3;
#X obj 692 57 loadbang;
#X obj 227 138 - 1;
#X msg 191 139 15;
#X obj 582 58 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 716 264 route auto-reset auto-update on;
#X obj 850 317 s \$1-mode-in;
#X connect 0 0 27 0;
#X connect 2 0 27 0;
#X connect 3 0 2 1;
#X connect 4 0 44 0;
#X connect 4 1 43 0;
#X connect 5 0 41 0;
#X connect 4 0 42 0;
#X connect 4 1 41 0;
#X connect 5 0 40 0;
#X connect 6 0 9 0;
#X connect 6 1 5 1;
#X connect 7 0 8 0;
......@@ -76,7 +74,7 @@
#X connect 14 2 17 0;
#X connect 14 3 18 0;
#X connect 14 4 19 0;
#X connect 14 5 31 0;
#X connect 14 5 43 0;
#X connect 16 0 15 0;
#X connect 17 0 15 0;
#X connect 18 0 15 0;
......@@ -86,26 +84,25 @@
#X connect 26 0 7 0;
#X connect 27 0 21 0;
#X connect 27 1 28 0;
#X connect 27 2 35 0;
#X connect 27 2 34 0;
#X connect 29 0 2 0;
#X connect 31 0 13 0;
#X connect 31 1 22 0;
#X connect 33 0 32 0;
#X connect 34 0 12 0;
#X connect 35 0 20 0;
#X connect 35 1 23 0;
#X connect 35 2 1 0;
#X connect 35 3 40 0;
#X connect 35 4 36 0;
#X connect 35 5 39 0;
#X connect 35 6 38 0;
#X connect 35 7 37 0;
#X connect 35 8 14 0;
#X connect 41 0 35 0;
#X connect 42 0 32 0;
#X connect 43 0 5 0;
#X connect 44 0 5 0;
#X connect 45 0 32 0;
#X connect 32 0 31 0;
#X connect 33 0 12 0;
#X connect 34 0 20 0;
#X connect 34 1 23 0;
#X connect 34 2 1 0;
#X connect 34 3 39 0;
#X connect 34 4 35 0;
#X connect 34 5 38 0;
#X connect 34 6 37 0;
#X connect 34 7 36 0;
#X connect 34 8 14 0;
#X connect 40 0 34 0;
#X connect 41 0 5 0;
#X connect 42 0 5 0;
#X connect 43 0 13 0;
#X connect 43 1 22 0;
#X connect 43 2 44 0;
#X restore 259 76 pd \$0-COMMANDS;
#N canvas 366 125 831 570 \$0-GUI 0;
#X msg 126 114 26 15 0 3 1;
......
#N canvas 174 133 754 595 10;
#N canvas 170 135 866 595 10;
#X msg 175 239 \$1 20;
#X obj 37 303 *~;
#X obj 175 258 line~;
......@@ -28,7 +28,6 @@
#X text 297 346 REC \; ---------------;
#X msg 311 96 0;
#X obj 663 70 r AUDIO-MASTER;
#X obj 663 92 route on;
#X msg 583 137 100;
#X obj 158 412 *~;
#X obj 56 406 *~;
......@@ -321,16 +320,19 @@ empty 0 -8 0 10 -208051 -208051 -262144 0;
#X text 175 90 ???;
#X msg 338 522 open ../../medias/recording/MASTER_\$1_\$2h\$3m\$4s_\$5.wav
;
#X obj 692 129 s \$0-vol-in;
#X obj 663 92 route on vol gain;
#X obj 729 121 s \$0-gain-in;
#X connect 0 0 2 0;
#X connect 1 0 14 0;
#X connect 1 0 32 0;
#X connect 1 0 31 0;
#X connect 2 0 1 1;
#X connect 2 0 3 1;
#X connect 3 0 14 1;
#X connect 3 0 31 0;
#X connect 3 0 30 0;
#X connect 4 0 17 0;
#X connect 4 0 33 0;
#X connect 5 0 35 0;
#X connect 4 0 32 0;
#X connect 5 0 34 0;
#X connect 6 0 0 0;
#X connect 8 0 1 0;
#X connect 9 0 3 0;
......@@ -338,47 +340,49 @@ empty 0 -8 0 10 -208051 -208051 -262144 0;
#X connect 13 0 9 0;
#X connect 15 0 14 0;
#X connect 16 0 15 0;
#X connect 16 1 62 0;
#X connect 17 0 30 0;
#X connect 16 1 61 0;
#X connect 17 0 29 0;
#X connect 17 1 5 0;
#X connect 18 0 19 0;
#X connect 19 0 37 0;
#X connect 19 0 36 0;
#X connect 20 0 21 0;
#X connect 27 0 40 0;
#X connect 28 0 29 0;
#X connect 29 0 35 0;
#X connect 30 0 34 0;
#X connect 31 0 71 1;
#X connect 32 0 71 0;
#X connect 33 0 38 0;
#X connect 36 0 20 0;
#X connect 39 0 56 1;
#X connect 41 0 43 0;
#X connect 42 0 6 0;
#X connect 43 0 44 0;
#X connect 44 0 32 1;
#X connect 44 0 31 1;
#X connect 55 0 27 0;
#X connect 57 0 14 0;
#X connect 58 0 61 1;
#X connect 58 1 61 2;
#X connect 58 2 61 3;
#X connect 59 0 57 0;
#X connect 60 0 61 0;
#X connect 61 0 75 0;
#X connect 62 0 59 0;
#X connect 62 1 60 0;
#X connect 62 2 58 0;
#X connect 63 0 16 0;
#X connect 64 0 60 1;
#X connect 65 0 66 0;
#X connect 66 0 68 0;
#X connect 67 0 65 0;
#X connect 71 0 72 0;
#X connect 71 1 73 0;
#X connect 72 0 56 0;
#X connect 72 0 7 0;
#X connect 73 0 7 1;
#X connect 73 0 56 2;
#X connect 75 0 14 0;
#X connect 27 0 39 0;
#X connect 28 0 76 0;
#X connect 29 0 33 0;
#X connect 30 0 70 1;
#X connect 31 0 70 0;
#X connect 32 0 37 0;
#X connect 35 0 20 0;
#X connect 38 0 55 1;
#X connect 40 0 42 0;
#X connect 41 0 6 0;
#X connect 42 0 43 0;
#X connect 43 0 31 1;
#X connect 43 0 30 1;
#X connect 54 0 27 0;
#X connect 56 0 14 0;
#X connect 57 0 60 1;
#X connect 57 1 60 2;
#X connect 57 2 60 3;
#X connect 58 0 56 0;
#X connect 59 0 60 0;
#X connect 60 0 74 0;
#X connect 61 0 58 0;
#X connect 61 1 59 0;
#X connect 61 2 57 0;
#X connect 62 0 16 0;
#X connect 63 0 59 1;
#X connect 64 0 65 0;
#X connect 65 0 67 0;
#X connect 66 0 64 0;
#X connect 70 0 71 0;
#X connect 70 1 72 0;
#X connect 71 0 55 0;
#X connect 71 0 7 0;
#X connect 72 0 7 1;
#X connect 72 0 55 2;
#X connect 74 0 14 0;
#X connect 76 0 34 0;
#X connect 76 1 75 0;
#X connect 76 2 77 0;
#X coords 0 -1 1 1 58 110 2 100 100;
#N canvas 451 284 450 300 10;
#N canvas 449 285 450 300 10;
#X obj 105 125 key-char;
#X obj 134 168 print e;
#X obj 105 195 print a;
#X text 101 35 key-char \; -------- \; Get the 10 first alphabetic
keys.;
#X obj 105 101 tgl 15 0 empty empty on/off_(1-0) 17 7 0 10 -262144
-1 -1 0 1;
#X connect 0 0 2 0;
#X connect 0 2 1 0;
#X connect 4 0 0 0;
#X obj 105 215 print key:a;
#X obj 136 188 print key:e;
#X connect 0 0 3 0;
#X connect 0 2 4 0;
#X connect 2 0 0 0;
#N canvas 144 121 574 397 10;
#N canvas 142 122 574 397 10;
#X obj 109 317 outlet;
#X obj 158 317 outlet;
#X text 107 335 X (0-1);
......@@ -19,7 +19,7 @@
#X obj 190 73 route float;
#X obj 101 117 cnv 10 43 10 empty \$0-cnv-pitch x:0.30 2 5 1 9 -261504
-1 0;
#X obj 146 117 cnv 10 48 10 empty \$0-cnv-level y:0.25 2 5 1 9 -261504
#X obj 146 117 cnv 10 48 10 empty \$0-cnv-level y:0.50 2 5 1 9 -261504
-1 0;
#X obj 330 281 makefilename %d;
#X obj 331 325 s \$0-cnv-pitch;
......@@ -35,7 +35,8 @@
#X obj 449 246 * 100;
#X msg 328 302 label x:0.\$1;
#X msg 448 303 label y:0.\$1;
#X connect 4 0 11 0;
#X obj 236 296 change;
#X connect 4 0 33 0;
#X connect 4 1 8 0;
#X connect 4 2 9 0;
#X connect 5 0 7 0;
......@@ -64,4 +65,5 @@
#X connect 30 0 28 0;
#X connect 31 0 21 0;
#X connect 32 0 22 0;
#X connect 33 0 11 0;
#X coords 0 -1 1 1 100 30 1 100 100;
#N canvas 177 81 495 673 10;
#N canvas 173 83 495 673 10;
#X declare -path ../core;
#X declare -path ../../abstractions/in -path ../../abstractions/out
-path ../../abstractions/numbers -path ../../abstractions/video -path
../../abstractions/audio -path ../../abstractions/core -path ../../abstractions/brutbox
-path ../../abstractions/seq;
;
#X declare -path ../../abstractions/seq;
#X declare -path ../core;
#X obj 28 347 cnv 10 100 20 empty empty CALIBRATION 4 10 1 9 -237178
-33289 0;
......@@ -92,20 +93,17 @@ size 10 10 \, cnv size 10 10;
#X obj 302 584 universal 1;
#X obj 29 516 physics 3;
#X obj 153 531 rand-bangs;
#X obj 286 57 g-editor;
#X obj 285 183 g-play;
#X obj 283 170 g-play;
#X obj 154 259 count 16;
#X obj 42 625 list-wrandom;
#X obj 32 625 list-wrandom;
#X obj 151 602 chance 70;
#X obj 29 486 inverse 20;
#X obj 152 571 rand-del 10 200;
#X obj 29 388 between 10 15;
#X obj 157 385 rand 1;
#X obj 153 497 rand-range;
#X text 370 337 [mem16];
#X obj 284 342 mem16;
#X obj 154 299 for 8;
#X obj 285 80 g 100;
#X obj 283 67 g 100;
#X obj 150 628 rand-n 12;
#X obj 283 29 cnv 10 100 20 empty empty GRAPH 5 10 1 9 -237178 -33289
0;
......@@ -113,4 +111,6 @@ size 10 10 \, cnv size 10 10;
#X obj 153 108 onoff 80;
#X obj 153 218 fade;
#X obj 153 148 start 1000;
#X obj 283 343 m;
#X text 370 337 [m];
#X connect 20 0 23 0;
#N canvas 306 161 579 423 10;
#N canvas 304 162 579 423 10;
#X obj 397 65 initbang;
#X obj 397 88 f \$1;
#X obj 101 132 cnv 10 99 10 empty empty empty 1 6 1 9 -237178 -1 0
......@@ -10,7 +10,6 @@
#X obj 166 244 + 1;
#X msg 138 205 0;
#X obj 96 355 outlet;
#X msg 397 129 4;
#X obj 318 78 inlet max;
#X obj 166 269 mod;
#X obj 195 268 r \$0-max;
......@@ -28,28 +27,29 @@
#X obj 166 311 sel 0;
#X obj 166 290 t f f;
#X obj 108 117 cnv 2 91 2 empty empty empty 1 6 1 9 -237178 -1 0;
#X msg 397 129 10;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 4 0 9 0;
#X connect 4 1 16 0;
#X connect 4 0 25 0;
#X connect 4 1 15 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 11 0;
#X connect 6 0 10 0;
#X connect 7 0 5 1;
#X connect 9 0 16 0;
#X connect 10 0 21 0;
#X connect 11 0 24 0;
#X connect 12 0 11 1;
#X connect 14 0 18 0;
#X connect 15 0 13 0;
#X connect 16 0 21 0;
#X connect 18 0 5 0;
#X connect 19 0 7 0;
#X connect 21 0 17 0;
#X connect 21 1 17 0;
#X connect 21 2 15 0;
#X connect 21 3 15 0;
#X connect 9 0 20 0;
#X connect 10 0 23 0;
#X connect 11 0 10 1;
#X connect 13 0 17 0;
#X connect 14 0 12 0;
#X connect 15 0 20 0;
#X connect 17 0 5 0;
#X connect 18 0 7 0;
#X connect 20 0 16 0;
#X connect 20 1 16 0;
#X connect 20 2 14 0;
#X connect 20 3 14 0;
#X connect 22 0 21 0;
#X connect 23 0 22 0;
#X connect 24 0 23 0;
#X connect 24 1 5 1;
#X connect 23 1 5 1;
#X connect 25 0 15 0;
#X coords 0 -1 1 1 100 20 1 100 100;
#N canvas 321 282 467 320 10;
#X obj 69 119 hsl 128 15 0 1 0 0 empty empty 0-1 10 -8 0 10 -262144
#N canvas 319 283 467 320 10;
#X obj 67 149 hsl 128 15 0 1 0 0 empty empty 0-1 10 -8 0 10 -262144
-1 -1 0 1;
#X obj 66 151 inverse;
#X text 60 19 Inverse \; ------- \; Inverse the value \;;
#X obj 69 199 hsl 128 15 0 1 0 0 empty empty 0-1 10 -8 0 10 -262144
-1 -1 12700 1;
#X obj 223 118 hsl 128 15 0 100 0 0 empty empty 0-100 10 -8 0 10 -262144
-1 -1 6700 1;
#X obj 223 198 hsl 128 15 0 100 0 0 empty empty 0-100 10 -8 0 10 -262144
-1 -1 6000 1;
#X obj 220 150 inverse 100;
#X obj 64 181 inverse;
#X obj 67 229 hsl 128 15 0 1 0 0 empty empty 0-1 10 -8 0 10 -262144
-1 -1 0 1;
#X obj 221 148 hsl 128 15 0 100 0 0 empty empty 0-100 10 -8 0 10 -262144
-1 -1 0 1;
#X obj 221 228 hsl 128 15 0 100 0 0 empty empty 0-100 10 -8 0 10 -262144
-1 -1 0 1;
#X obj 218 180 inverse 100;
#X text 60 19 Inverse \; ------- \; Inverse the value \; Argument \;
\$1 : max value \;;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 4 0 6 0;
#X connect 6 0 5 0;
#X connect 1 0 2 0;
#X connect 3 0 5 0;
#X connect 5 0 4 0;
#N canvas 325 103 427 553 10;
#X declare -path ../numbers;
#X declare -path ../numbers;
#X declare -path ../../abstractions/in -path ../../abstractions/out
-path ../../abstractions/numbers -path ../../abstractions/video -path
../../abstractions/audio -path ../../abstractions/core -path ../../abstractions/brutbox
;
#X declare -path ../../abstractions/seq;
#X floatatom 64 218 5 0 0 0 - - -;
#X floatatom 64 432 5 0 0 3 length - -;
#X obj 64 410 route length list;
#X obj 64 195 hradio 15 1 0 8 empty empty Read_preset 0 -8 0 10 -262144
-1 -1 0;
#X msg 78 261 20 10 29 1092 288 199;
#X text 75 240 Fill the preset with lists;
#X msg 87 312 write;
#X text 85 290 Write the preset;
#N canvas 144 140 807 305 -EXAMPLES- 0;
#X obj 276 48 seq16;
#X obj 276 69 seq16-nb;
#X obj 137 43 g-play;
#X obj 142 200 synth~;
#X obj 724 163 init 4;
#X obj 724 211 v GEM_H;
#X obj 732 187 v GEM_W;
#X obj 34 200 synth;
#X msg 558 18 write;
#X text 274 20 WITH SEQUENCERS;
#X text 603 134 WITH TRACK-AREAS;
#X obj 650 20 ../include;
#X obj 276 162 seq24x6;
#X obj 447 92 mem seq16-nb.txt;
#X obj 465 40 mem seq.txt;
#X obj 33 43 g 100;
#X obj 604 162 track-areas;
#X text 32 175 WITH AUDIO WAVEFORMS;
#X text 31 18 WITH ENVELOPPES OF DATA;
#X connect 0 1 14 0;
#X connect 1 1 13 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 8 0 14 1;
#X connect 13 0 1 1;
#X connect 14 0 0 1;
#X restore 64 496 pd -EXAMPLES-;
#N canvas 340 80 635 626 -PRESET-MESSAGES 0;
#X msg 63 219 file tmp2.txt;
#X text 59 199 Change filename preset;
#X obj 115 385 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 102 308 length;
#X msg 79 266 update;
#X obj 62 55 hradio 15 1 0 8 empty empty Read_a_preset 0 -8 0 10 -262144
-1 -1 0;
#X msg 115 408 auto-max \$1;
#X msg 86 108 write;
#X obj 63 438 s \$0-to-mem;
#X obj 62 164 s \$0-to-mem;
#X msg 76 81 id 4;
#X msg 93 138 write 1;
#X text 108 335 Clear all presets;
#X text 194 390 Auto-max constraint \; If 1: the maximum is limited
to the number of presets \; Default : 1;
#X obj 339 132 rand-n 100 10;
#X obj 339 112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 339 159 s \$0-to-mem;
#X text 336 91 Fill with 10 numbers from 0 to 99;
#X msg 109 353 clear;
#X text 100 287 Number of presets stored;
#X text 75 247 Output current state;
#X text 115 78 Preset number to write;
#X text 128 105 Write into the file;
#X text 143 137 Write with a preset number;
#X msg 66 491 20 10 29 1092 288 199;
#X text 63 470 Fill the preset with lists;
#X obj 66 515 s \$0-to-mem;
#X msg 340 223 delete;
#X obj 340 299 s \$0-to-mem;
#X text 338 205 Delete current preset;
#X msg 351 265 delete 3;
#X text 349 247 Delete preset number;
#X obj 69 561 r \$0-to-mem;
#X obj 69 586 outlet;
#X connect 0 0 8 0;
#X connect 2 0 6 0;
#X connect 3 0 8 0;
#X connect 4 0 8 0;
#X connect 5 0 9 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 10 0 9 0;
#X connect 11 0 9 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 18 0 8 0;
#X connect 24 0 26 0;
#X connect 27 0 28 0;
#X connect 30 0 28 0;
#X connect 32 0 33 0;
#X restore 157 331 pd -PRESET-MESSAGES;
#X obj 113 443 print FROM-MEM;
#X obj 63 371 m tmp.txt 2;
#X text 61 30 m \; --- \; Store and read data from a file (minimalist)
\; It is exactly the same object that mem but very little \; Files
are stored in "abstractions/core/presets" \; Arguments \; \$1 : preset
file (default : mem.txt) \; \$2 : preset number (default : 0) \;;
#X connect 0 0 11 0;
#X connect 2 0 1 0;
#X connect 2 1 10 0;
#X connect 3 0 0 0;
#X connect 4 0 11 0;
#X connect 6 0 11 0;
#X connect 9 0 11 1;
#X connect 11 0 2 0;
#N canvas 1 82 450 300 10;
#X obj 134 102 cnv 8 30 8 empty empty empty 2 0 1 9 -237178 -33289
0;
#X obj 122 100 bng 10 50 50 0 \$0-write \$0-write-in w 3 5 1 7 -237178
-33289 -33289;
#X obj 100 100 nbx 2 10 0 7 0 0 \$0-read \$0-read-in empty 25 6 1 9
-237178 -33289 -33289 2 256;
#X obj 132 100 nbx 2 10 0 7 0 0 \$0-id \$0-id-in empty -10 6 1 9 -237178
-33289 -33289 2 256;
#X obj 247 183 inlet;
#X obj 112 181 inlet;
#X obj 112 278 outlet;
#X obj 154 100 bng 10 100 50 0 \$0-clear \$0-clear-in c 3 5 1 9 -237178
-33289 -33289;
#X obj 154 182 r \$0-write;
#X msg 154 203 write;
#X obj 112 234 ../core/_mem \$0 \$1 \$2 1;
#X connect 4 0 10 1;
#X connect 5 0 10 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X coords 0 -1 1 1 64 10 2 100 100;
#N canvas 213 261 506 281 10;
#X floatatom 203 222 5 0 0 0 - - -;
#X obj 203 203 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0