blob: e735fa0af88889c86484ce51273adb996744050a (
plain)
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
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
#N canvas 200 200 300 120 10;
#N canvas 154 41 402 182 inside 0;
#N canvas 183 206 183 114 wavetable 0;
#X obj 30 22 table \$1 44100;
#X restore 62 51 pd wavetable;
#X text 146 50 contains the sample;
#N canvas 46 30 530 612 drawdisplay 0;
#X obj 168 398 vasp.frames 20;
#X obj 168 429 vasp.offset 0;
#X msg 83 83 bang;
#X obj 168 137 0;
#X obj 168 225 t f f f;
#X obj 181 114 + 1;
#X obj 168 252 *;
#X text 45 80 start;
#X text 262 215 (reset);
#X obj 168 479 vasp.max?;
#X obj 168 505 vasp.min?;
#X obj 325 275 t f f;
#X obj 83 128 until 1;
#X obj 83 107 300;
#X obj 251 527 tabwrite \$0+;
#X obj 217 573 tabwrite \$0-;
#X msg 168 345 vasp \$1;
#X obj 168 317 symbol \$1;
#X obj 325 254 / 300;
#X obj 251 504 clip -1 1;
#X obj 217 548 clip -1 1;
#X obj 168 162 moses 299;
#X msg 242 217 0;
#X obj 217 196 t f b;
#X obj 325 229 r \$0-sample-length;
#X obj 83 46 r \$0-draw_display;
#X obj 168 281 t b f;
#X obj 344 449 r \$0-bounds-;
#X obj 344 475 r \$0-bounds+;
#X connect 0 0 1 0;
#X connect 1 0 9 0;
#X connect 2 0 13 0;
#X connect 3 0 5 0;
#X connect 3 0 21 0;
#X connect 4 0 6 0;
#X connect 4 1 14 1;
#X connect 4 2 15 1;
#X connect 5 0 3 1;
#X connect 6 0 26 0;
#X connect 9 0 10 0;
#X connect 9 1 19 0;
#X connect 10 1 20 0;
#X connect 11 0 6 1;
#X connect 11 1 0 1;
#X connect 12 0 3 0;
#X connect 13 0 12 0;
#X connect 16 0 0 0;
#X connect 17 0 16 0;
#X connect 18 0 11 0;
#X connect 19 0 14 0;
#X connect 20 0 15 0;
#X connect 21 0 4 0;
#X connect 21 1 23 0;
#X connect 22 0 1 1;
#X connect 22 0 3 1;
#X connect 23 0 4 0;
#X connect 23 1 22 0;
#X connect 24 0 18 0;
#X connect 25 0 2 0;
#X connect 26 0 17 0;
#X connect 26 1 1 1;
#X connect 27 0 19 1;
#X connect 27 0 20 1;
#X connect 28 0 19 2;
#X connect 28 0 20 2;
#X restore 62 74 pd drawdisplay;
#X text 160 73 draws the display;
#N canvas 149 160 294 134 init 0;
#X obj 33 19 loadbang;
#X obj 33 86 s \$0-;
#X msg 33 44 xticks 0 30 5 \, ylabel 315 -1 -0.5 0 0.5 \, yticks 0
0.25 2;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 61 97 pd init;
#N canvas 0 0 424 148 makelocal 0;
#X obj 83 72 s \$0-draw_display;
#X obj 83 46 r \$2-draw_display;
#X obj 216 45 r \$2-sample-length;
#X obj 216 71 s \$0-sample-length;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X restore 61 129 pd makelocal;
#X restore 369 90 pd inside;
#X text 374 15 this display shows the min and max of all samples that
a pixel represents;
#X text 375 46 arguments: name of array \, \$0 of the parent patch
;
#X obj 0 0 cnv 15 300 120 empty empty empty 20 12 0 14 -225271 -66577
0;
#N canvas 0 0 450 300 graph1 0;
#X array \$0- 300 float 0;
#X array \$0+ 300 float 0;
#X coords 0 1 300 -1 300 120 1;
#X restore 0 0 graph;
#X obj 438 70 inlet;
#X text 480 69 individual length;
#N canvas 71 382 599 303 individual 0;
#X obj 319 150 s \$0-sample-length;
#X obj 73 58 inlet;
#X msg 369 173 resize \$1;
#X obj 369 196 s \$1;
#X obj 127 253 send \$0-;
#X text 139 73 resize and sample-length;
#X text 138 58 for individual bounds \, ticks and label \,;
#X obj 41 182 unpack 0 0 0 0;
#X obj 40 230 s \$0-bounds-;
#X obj 40 207 s \$0-bounds+;
#X msg 127 150 bounds \$1 \$2 \$3 \$4;
#X obj 127 124 route bounds ylabel yticks;
#X msg 151 175 ylabel \$1 \$2 \$3 \$4;
#X msg 166 197 yticks \$1 \$2 \$3 \$4;
#X connect 1 0 11 0;
#X connect 2 0 3 0;
#X connect 7 1 9 0;
#X connect 7 3 8 0;
#X connect 10 0 4 0;
#X connect 11 0 7 0;
#X connect 11 0 10 0;
#X connect 11 1 12 0;
#X connect 11 2 13 0;
#X connect 11 3 0 0;
#X connect 11 3 2 0;
#X connect 12 0 4 0;
#X connect 13 0 4 0;
#X restore 438 90 pd individual;
#X connect 5 0 7 0;
#X coords 0 0 1 1 300 120 1;
|
