File: sarray-help.pd

package info (click to toggle)
pd-moonlib 0.4-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 828 kB
  • sloc: ansic: 5,454; makefile: 64; tcl: 22
file content (116 lines) | stat: -rw-r--r-- 3,246 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
#N canvas 95 58 934 486 10;
#X obj 0 0 cnv 8 100 60 empty empty sarray 10 20 1 18 -262144 -1109
0;
#X msg 734 75 1;
#X msg 763 75 2;
#X msg 791 75 3;
#X symbolatom 799 156 10 0 0 0 - - -, f 10;
#X msg 263 241 reset;
#X text 109 12 shared array of symbols;
#X obj 47 146 sarray foo 8;
#X text 23 48 1) set the length;
#X msg 47 71 setlen 10;
#X text 236 43 2) set the nth element;
#X msg 266 85 set 2 two;
#X msg 274 106 set 3 three;
#X obj 258 169 sarray foo;
#X msg 129 110 print;
#X msg 704 99 get \$1;
#X obj 704 120 sarray foo;
#X obj 704 139 route bang;
#X msg 819 75 4;
#X obj 704 159 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 704 75 0;
#X obj 263 261 sarray foo;
#X text 701 177 (bang when empty);
#X obj 29 351 sarray foo;
#X msg 29 244 dump;
#X obj 29 372 print dump;
#X msg 64 297 dump _null_;
#X msg 64 317 dump *?!;
#X text 45 270 specify a default symbol;
#X text 59 281 for empty elements;
#X obj 449 170 sarray foo;
#X text 471 80 specify a default symbol;
#X text 471 92 for empty elements;
#X msg 294 147 print;
#X msg 405 141 print;
#X msg 308 241 print;
#X text 6 165 args: sarray name [length];
#X text 219 189 args: set [empty_symbol] first_index sym1 [sym2 [sym3...]]]
;
#X text 16 397 args: dump [empty_symbol];
#X msg 258 61 set 0 zero;
#X text 430 38 3) set many elements;
#X text 510 129 ...erase one element;
#X msg 281 127 set 4 four;
#X msg 57 93 setlen 4;
#X msg 511 144 set _niet_ 3 _niet_;
#X msg 476 108 set _ 0 zero un _ trois _ cinq;
#X msg 449 55 set 0 zero ein zwei drei;
#X obj 253 342 sarray foo2 4;
#X msg 253 323 set 0 zero2 one2 two2 three2;
#X obj 258 414 sarray;
#X msg 258 374 print;
#X msg 307 375 setarray foo;
#X msg 307 394 setarray foo2;
#X text 699 53 4) get the nth symbol (first:0);
#X text 28 224 5) dump the whole array;
#X text 261 223 7) clear the sarray;
#X text 253 305 8) switch to another array;
#X text 494 222 9) find a symbol;
#X obj 523 305 sarray foo;
#X msg 508 240 find zero;
#X msg 536 282 find two;
#X msg 523 260 find un;
#X floatatom 588 325 5 0 0 0 - - -, f 5;
#X text 518 339 (-1 if not found);
#X obj 698 320 sarray foo;
#X floatatom 763 340 5 0 0 0 - - -, f 5;
#X msg 683 255 add what;
#X msg 698 275 add who;
#X msg 711 297 add where;
#X text 722 356 (-1 if full);
#X text 657 233 (at the first empty place);
#X text 668 220 10) add a symbol;
#X text 6 447 (c) Moonix: Antoine Rousseau 2003-2005;
#X connect 1 0 15 0;
#X connect 2 0 15 0;
#X connect 3 0 15 0;
#X connect 5 0 21 0;
#X connect 9 0 7 0;
#X connect 11 0 13 0;
#X connect 12 0 13 0;
#X connect 14 0 7 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 19 0;
#X connect 17 1 4 0;
#X connect 18 0 15 0;
#X connect 20 0 15 0;
#X connect 23 0 25 0;
#X connect 24 0 23 0;
#X connect 26 0 23 0;
#X connect 27 0 23 0;
#X connect 33 0 13 0;
#X connect 34 0 30 0;
#X connect 35 0 21 0;
#X connect 39 0 13 0;
#X connect 42 0 13 0;
#X connect 43 0 7 0;
#X connect 44 0 30 0;
#X connect 45 0 30 0;
#X connect 46 0 30 0;
#X connect 48 0 47 0;
#X connect 50 0 49 0;
#X connect 51 0 49 0;
#X connect 52 0 49 0;
#X connect 58 1 62 0;
#X connect 59 0 58 0;
#X connect 60 0 58 0;
#X connect 61 0 58 0;
#X connect 64 1 65 0;
#X connect 66 0 64 0;
#X connect 67 0 64 0;
#X connect 68 0 64 0;