1 files changed, 61 insertions, 0 deletions
diff --git a/iemabs/help-ap1~.pd b/iemabs/help-ap1~.pd
new file mode 100644
index 0000000..246f0b9
--- /dev/null
+++ b/iemabs/help-ap1~.pd
@@ -0,0 +1,61 @@
+#N canvas 375 118 368 452 10;
+#X text 3 233 ~signal_in~;
+#X text 16 386 (c) musil@iem.kug.ac.at;
+#X text 58 399 IEM KUG;
+#X text 28 48 dsp ON/OFF;
+#X floatatom 79 164 3 15 133 0 - - -;
+#X obj 79 185 mtof;
+#X floatatom 79 206 9 0 22000 0 - - -;
+#X text 149 205 Hz;
+#X text 58 262 ~signal_out~;
+#X floatatom 146 289 7 0 0 0 - - -;
+#X text 203 290 dB;
+#X floatatom 110 163 9 0 22000 0 - - -;
+#X text 180 163 Hz;
+#X floatatom 46 119 3 15 133 0 - - -;
+#X floatatom 11 88 5 0 0 0 - - -;
+#X text 46 87 % cpu;
+#X floatatom 108 227 5 2 9999 0 - - -;
+#X text 151 226 ms;
+#X obj 11 68 dsp;
+#X obj 11 48 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1
+;
+#X obj 46 334 dac~;
+#X obj 46 309 gainvu~ 300;
+#X obj 203 167 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
+#X obj 259 178 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
+-1 -1 9600 1;
+#X obj 46 141 testtone~ 200;
+#X text 33 411 graz \, austria 2001;
+#X obj 115 101 init 69;
+#X text 73 120 midi;
+#X text 15 362 2.arg:<float> interpolation_time [ms];
+#X obj 46 248 ap1~ 440 200;
+#X text 15 352 1.arg:<float> -90_degree_freq. [Hz];
+#X obj 14 266 +~;
+#X obj 14 287 *~ 0.5;
+#X text 58 287 (like lp1~);
+#X floatatom 234 327 7 0 0 0 - - -;
+#X text 291 328 dB;
+#X obj 11 13 cnv 8 1 1 empty empty ap1~ 1 2 1 18 -262144 -1109 0;
+#X text 79 8 allpass 1.order;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 29 1;
+#X connect 13 0 24 0;
+#X connect 16 0 29 2;
+#X connect 18 0 14 0;
+#X connect 19 0 18 0;
+#X connect 21 0 20 0;
+#X connect 21 0 20 1;
+#X connect 21 1 34 0;
+#X connect 21 2 22 0;
+#X connect 22 1 9 0;
+#X connect 23 0 21 1;
+#X connect 24 0 29 0;
+#X connect 24 0 31 0;
+#X connect 24 1 11 0;
+#X connect 26 0 13 0;
+#X connect 29 0 31 1;
+#X connect 31 0 32 0;
+#X connect 32 0 21 0;