From 0c9b89b1018eb7760708ee5b080cd96846861328 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Thu, 2 Jun 2005 18:25:00 +0000 Subject: updated to release-1.16 svn path=/trunk/externals/iemlib/; revision=3102 --- src/iemlib1/v2db.c | 90 +++++++++++++++++++++++++++--------------------------- 1 file changed, 45 insertions(+), 45 deletions(-) (limited to 'src/iemlib1/v2db.c') diff --git a/src/iemlib1/v2db.c b/src/iemlib1/v2db.c index b3e342d..bf33d34 100644 --- a/src/iemlib1/v2db.c +++ b/src/iemlib1/v2db.c @@ -1,45 +1,45 @@ -/* For information on usage and redistribution, and for a DISCLAIMER OF ALL -* WARRANTIES, see the file, "LICENSE.txt," in this distribution. - -iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2003 */ - -#ifdef NT -#pragma warning( disable : 4244 ) -#pragma warning( disable : 4305 ) -#endif - - -#include "m_pd.h" -#include "iemlib.h" -#include -#include -#include - -/* ---------------- v2db - value to dB converter. ----------------- */ - -static t_class *v2db_class; - -float v2db(float f) -{ - return (f <= 0 ? -199.9 : 8.6858896381*log(f)); -} - -static void v2db_float(t_object *x, t_float f) -{ - outlet_float(x->ob_outlet, v2db(f)); -} - -static void *v2db_new(void) -{ - t_object *x = (t_object *)pd_new(v2db_class); - outlet_new(x, &s_float); - return (x); -} - -void v2db_setup(void) -{ - v2db_class = class_new(gensym("v2db"), v2db_new, 0, - sizeof(t_object), 0, 0); - class_addfloat(v2db_class, (t_method)v2db_float); - class_sethelpsymbol(v2db_class, gensym("iemhelp/help-v2db")); -} +/* For information on usage and redistribution, and for a DISCLAIMER OF ALL +* WARRANTIES, see the file, "LICENSE.txt," in this distribution. + +iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2005 */ + +#ifdef NT +#pragma warning( disable : 4244 ) +#pragma warning( disable : 4305 ) +#endif + + +#include "m_pd.h" +#include "iemlib.h" +#include +#include +#include + +/* -------- v2db - a rms-value to techn. dB converter. --------- */ + +static t_class *v2db_class; + +float v2db(float f) +{ + return (f <= 0 ? -199.9 : 8.6858896381*log(f)); +} + +static void v2db_float(t_object *x, t_float f) +{ + outlet_float(x->ob_outlet, v2db(f)); +} + +static void *v2db_new(void) +{ + t_object *x = (t_object *)pd_new(v2db_class); + outlet_new(x, &s_float); + return (x); +} + +void v2db_setup(void) +{ + v2db_class = class_new(gensym("v2db"), v2db_new, 0, + sizeof(t_object), 0, 0); + class_addfloat(v2db_class, (t_method)v2db_float); + class_sethelpsymbol(v2db_class, gensym("iemhelp/help-v2db")); +} -- cgit v1.2.1