Hi all

FYI and as APOC a dc-blocker as suggested by Josh

peace/slp

#N canvas 122 23 416 538 10; #X text 11 35 y(n) = x(n) - x(n-1) + R*y(n-1); #X obj 18 269 outlet~; #X obj 19 170 inlet~; #X text 11 8 http://www.dsprelated.com/dspbooks/filters/DC_Blocker.html ; #X obj 188 104 bang~; #X obj 18 133 table $0-out 64; #X obj 17 102 table $0-in 64; #X obj 18 199 tabsend~ $0-in; #X obj 18 231 tabreceive~ $0-out; #X obj 188 192 until; #X obj 188 256 f; #X obj 220 256 + 1; #X obj 241 157 0; #X obj 128 363 t f f; #X obj 126 397 -; #X obj 126 447 +; #X obj 158 447 * 0.995; #X obj 188 281 t f f; #X obj 128 321 tabread $0-in; #X obj 186 483 tabwrite $0-out; #X text 32 493 slp@2008; #X obj 188 165 64; #X obj 188 134 t b b; #X connect 2 0 7 0; #X connect 4 0 22 0; #X connect 8 0 1 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 10 0 17 0; #X connect 11 0 10 1; #X connect 12 0 10 1; #X connect 13 0 14 1; #X connect 13 1 14 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 15 0 19 0; #X connect 16 0 15 1; #X connect 17 0 18 0; #X connect 17 1 19 1; #X connect 18 0 13 0; #X connect 21 0 9 0; #X connect 22 0 21 0; #X connect 22 1 12 0;