blob: 8a515a2a09f6a0230d98089ac412653ee710d0f1 (
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
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
|
#N canvas 31 15 964 662 10;
#X text 54 77 argument/right inlet: value;
#X obj 58 27 cnv 15 15 15 empty empty vasp.offset= 0 10 1 14 -262144
-1 0;
#X text 68 587 abbreviation;
#X obj 75 272 prepend set;
#N canvas 0 0 450 300 graph1 0;
#X array bufsoffs1 1000 float 0;
#X coords 0 1 999 -1 300 100 1;
#X restore 551 88 graph;
#N canvas 466 356 387 251 init 0;
#X obj 33 19 loadbang;
#X msg 33 45 symbol bufsoffs1;
#X msg 151 45 symbol bufsoffs2;
#X msg 33 71 \; \$1 xticks 0 100 10 \; \$1 xlabel 1.1 0 200 300 500
700 800 1000 \; \$1 yticks 0 0.25 2 \; \$1 ylabel 1100 -1 -0.5 0 0.5
1;
#X connect 0 0 1 0;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 3 0;
#X restore 802 556 pd init;
#N canvas 0 0 450 300 graph1 0;
#X array bufsoffs2 1000 float 0;
#X coords 0 1 999 -1 300 100 1;
#X restore 551 207 graph;
#X obj 64 177 vasp.u;
#X msg 63 130 vasp bufsoffs1;
#X msg 64 221 vasp bufsoffs1;
#X msg 75 293 vasp 701 bufsoffs1 299 0;
#X obj 64 367 vasp.noise;
#X obj 64 388 vasp.u;
#X obj 159 591 vasp.o=;
#X obj 259 592 VASP-HELP;
#X text 54 95 right outlet: relative offset position in frames;
#X text 201 128 1 generate a ramp;
#X text 199 220 2 generate noise \, and start at the point \,;
#X obj 64 325 vasp.o?;
#X msg 64 346 vasp bufsoffs2 \$1;
#X text 54 59 search for a value set it as offset;
#X floatatom 161 271 5 0 0;
#X obj 170 130 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
-1;
#X obj 170 221 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
-1;
#N canvas 0 0 261 214 clear_buffer 0;
#X obj 49 73 vasp.= 0;
#X obj 49 49 inlet;
#X obj 49 97 vasp.u;
#X obj 49 118 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
8 -262144 -1 -1;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X restore 683 549 pd clear_buffer;
#X msg 683 528 vasp bufsoffs2;
#X text 703 508 clear second buffer;
#X obj 683 509 bng 15 250 50 0 empty \$0-clear empty 0 -6 576 8 -262144
-1 -1;
#X obj 162 445 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
-1;
#N canvas 77 60 409 578 dir_and_target 0;
#X text 46 56 forward;
#X text 48 154 backward;
#X text 31 22 search direction;
#X text 58 369 both;
#X text 28 401 negative;
#X text 58 337 positive;
#X text 28 314 target slope;
#X text 46 99 both (nearest);
#X obj 183 210 vasp.noise;
#X obj 183 231 vasp.u;
#X msg 183 189 vasp bufsoffs2 \$1;
#X msg 110 156 dir -1;
#X msg 111 121 dir 0;
#X msg 110 59 dir 1;
#X obj 183 164 vasp.o?;
#X obj 185 90 t a b;
#X obj 210 111 bng 15 250 50 0 \$0-clear empty empty 0 -6 1152 8 -262144
-1 -1;
#X text 228 111 (clear);
#X obj 185 135 vasp.offset= 0.1;
#X msg 185 71 vasp bufsoffs1 500;
#X floatatom 276 161 5 0 0;
#X msg 126 336 slope 1;
#X msg 110 367 slope 0;
#X msg 97 399 slope -1;
#X obj 239 484 vasp.noise;
#X obj 239 505 vasp.u;
#X msg 239 463 vasp bufsoffs2 \$1;
#X obj 239 438 vasp.o?;
#X obj 239 355 t a b;
#X obj 264 376 bng 15 250 50 0 \$0-clear empty empty 0 -6 1152 8 -262144
-1 -1;
#X text 282 376 (clear);
#X obj 239 400 vasp.offset= 0.1;
#X floatatom 330 426 5 0 0;
#X text 29 290 find values with positive and/or negative slope;
#X msg 239 336 vasp bufsoffs1;
#X connect 8 0 9 0;
#X connect 10 0 8 0;
#X connect 11 0 18 0;
#X connect 12 0 18 0;
#X connect 13 0 18 0;
#X connect 14 0 10 0;
#X connect 15 0 18 0;
#X connect 15 1 16 0;
#X connect 18 0 14 0;
#X connect 18 1 20 0;
#X connect 19 0 15 0;
#X connect 21 0 31 0;
#X connect 22 0 31 0;
#X connect 23 0 31 0;
#X connect 24 0 25 0;
#X connect 26 0 24 0;
#X connect 27 0 26 0;
#X connect 28 0 31 0;
#X connect 28 1 29 0;
#X connect 31 0 27 0;
#X connect 31 1 32 0;
#X connect 34 0 28 0;
#X restore 612 422 pd dir_and_target;
#X obj 64 151 vasp.= env -1 0 1 500 -1 1000;
#X obj 102 496 t a b;
#X obj 127 517 bng 15 250 50 0 \$0-clear empty empty 0 -6 1152 8 -262144
-1 -1;
#X text 145 517 (clear);
#X text 148 418 the search always starts at the offsetpoint;
#X text 566 403 more features!;
#X obj 564 419 cnv 15 15 15 empty empty --> 0 10 0 14 -262144 -24198
0;
#X text 214 232 where the ramp is at 0.2;
#X obj 64 242 vasp.offset= 0.2;
#X text 189 443 3 start searching at frame 501;
#X msg 102 475 vasp bufsoffs1 501;
#X connect 3 0 10 0;
#X connect 8 0 30 0;
#X connect 9 0 38 0;
#X connect 11 0 12 0;
#X connect 18 0 19 0;
#X connect 19 0 11 0;
#X connect 22 0 8 0;
#X connect 23 0 9 0;
#X connect 25 0 24 0;
#X connect 27 0 25 0;
#X connect 28 0 40 0;
#X connect 30 0 7 0;
#X connect 31 0 38 0;
#X connect 31 1 32 0;
#X connect 38 0 18 0;
#X connect 38 0 3 0;
#X connect 38 1 21 0;
#X connect 40 0 31 0;
|
