-
flextUser
Hey,
I've been looking for a straightforward multitrack timeline tool that can send automation values, but I couldn't find anything that works for me. So, I created a little TCL app to do just that.
Currently, it's still a work in progress and I don't know if it is worth developing the idea further. I'm trying to figure out what values to send, especially when it comes to dealing with single points. I'm not entirely sure how useful it will be in the end, but I thought I'd share my progress in case anyone else is looking for something similar.
Send me your thoughts.
-
flextUser
No, but there is slop~ that can work for a similar purpose. slop~ functions as a controllable slew limiter. It's not an implementation of Andrew Simper's algorithm, but it can be used for signal smoothing/denoising sensors. It's a single pole. I'm not a filter expert, though.
-
flextUser
@porres Sorry, this one: Jussi Pekonen, Juhan Nam, Vesa Välimäki and Julius O. Smith " Optimized Polynomial Spline Basis Function Design for Quasi-Bandlimited Classical Waveform Synthesis,” IEEE Signal Processing Letters, 2012.
The web page is here:
https://ccrma.stanford.edu/~juhan/vas.html -
flextUser
@porres Sure. If you have access to IEEE you can get the article here:
https://ccrma.stanford.edu/~juhan/publication.html
and for anything filters, this is the best source:
-
flextUser
@whale-av Ha ha, Love the name "Tcl for a rainy day" project. It rains almost every day for 6 months where I live....the popup is good stuff.
-
flextUser
@oid Not too hard, but I would rather stay away from TCL
-
flextUser
@oid Cool, thanks. I am not a fan of TCL/TK, but I am curious as to how difficult it would be to add a menu to load my own settings. Is this something that can be done with plugins alone ?
-
flextUser
In pd_bindings.tcl, I replaced this :
# and the Pd window is in a class to itself bind all <KeyPress> {::pd_bindings::sendkey %W 1 %K %A 0 %k} bind all <KeyRelease> {::pd_bindings::sendkey %W 0 %K %A 0 %k} bind all <Shift-KeyPress> {::pd_bindings::sendkey %W 1 %K %A 1 %k} bind all <Shift-KeyRelease> {::pd_bindings::sendkey %W 0 %K %A 1 %k}``` with:
Max style bindings
bind all <KeyPress> { set w [winfo toplevel %W] if {[winfo class $w] eq "PatchWindow" && $::editmode($w) && !$::editingtext($w)} { switch -- %K { "n" {menu_send_float %W obj 0} "m" {menu_send_float %W msg 0} "i" {menu_send_float %W floatatom 0} "l" {menu_send_float %W listbox 0} "c" {menu_send_float %W text 0} "b" {menu_send %W bng} "f" {menu_send %W numbox} "v" {menu_send %W vslider} "h" {menu_send %W hslider} "r" {menu_send %W hradio} "d" {menu_send %W vradio} "g" {menu_send %W graph} "a" {menu_send %W menuarray} "u" {menu_send %W vumeter} default {::pd_bindings::sendkey %W 1 %K %A 0 %k} } } else { ::pd_bindings::sendkey %W 1 %K %A 0 %k } } bind all <KeyRelease> {::pd_bindings::sendkey %W 0 %K %A 0 %k} bind all <Shift-KeyPress> {::pd_bindings::sendkey %W 1 %K %A 1 %k} bind all <Shift-KeyRelease> {::pd_bindings::sendkey %W 0 %K %A 1 %k}```
Are there any implications? Why isn't this (or similar) a default setting?
-