Pd-cvs July 2004

pd-cvs@lists.iem.at

7 participants
73 discussions

externals/zexy/src makefile.linux,1.9,1.10 z_lp.c,1.4,1.5 z_skeleton_tilde.c,1.1,1.2
by IOhannes m zmölnig 21 Jul '04

21 Jul '04

Update of /cvsroot/pure-data/externals/zexy/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18372 Modified Files: makefile.linux z_lp.c z_skeleton_tilde.c Log Message: added first configure support Index: z_skeleton_tilde.c =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/z_skeleton_tilde.c,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** z_skeleton_tilde.c 9 Oct 2002 10:19:04 -0000 1.1 --- z_skeleton_tilde.c 21 Jul 2004 15:57:33 -0000 1.2 *************** *** 50,54 **** } ! void z_skeleton_setup(void) { skeleton_class = class_new(gensym("skeleton~"), (t_newmethod)skeleton_new, 0, --- 50,54 ---- } ! void z_skeleton_tilde_setup(void) { skeleton_class = class_new(gensym("skeleton~"), (t_newmethod)skeleton_new, 0, Index: makefile.linux =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/makefile.linux,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** makefile.linux 1 Dec 2003 15:09:03 -0000 1.9 --- makefile.linux 21 Jul 2004 15:57:33 -0000 1.10 *************** *** 16,20 **** # by default DESTDIR = ! INSTALL_PREFIX = /usr PDLIBDIR = /lib/pd #these were the user adjustables --- 16,20 ---- # by default DESTDIR = ! INSTALL_PREFIX = /usr/local PDLIBDIR = /lib/pd #these were the user adjustables Index: z_lp.c =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/z_lp.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** z_lp.c 8 Aug 2003 03:54:05 -0000 1.4 --- z_lp.c 21 Jul 2004 15:57:33 -0000 1.5 *************** *** 1,11 **** /* ! (c) 2005:forum::für::umläute:2000 write to the parallel port extended to write to any port (if we do have permissions) - */ - #ifdef __i386__ - #define BASE0 0x3bc #define BASE1 0x378 --- 1,8 ---- /* ! (c) 2000:forum::für::umläute:2004 write to the parallel port extended to write to any port (if we do have permissions) */ #define BASE0 0x3bc #define BASE1 0x378 *************** *** 17,30 **** #include "zexy.h" ! #include <sys/io.h> ! #include <stdlib.h> ! ! /* ----------------------- lp --------------------- */ static int count_iopl = 0; - static t_class *lp_class; ! typedef struct _lp { t_object x_obj; --- 14,29 ---- #include "zexy.h" ! /* ----------------------- lpt --------------------- */ + #ifdef Z_WANT_LPT + # include <sys/io.h> + # include <stdlib.h> static int count_iopl = 0; + #endif ! static t_class *lpt_class; ! ! typedef struct _lpt { t_object x_obj; *************** *** 33,50 **** int mode; // MODE_IOPERM, MODE_IOPL ! } t_lp; ! static void lp_float(t_lp *x, t_floatarg f) { if (x->port) { unsigned char b = f; outb(b, x->port); } } ! static void *lp_new(t_symbol *s, int argc, t_atom *argv) { ! t_lp *x = (t_lp *)pd_new(lp_class); x->port = 0; --- 32,54 ---- int mode; // MODE_IOPERM, MODE_IOPL ! } t_lpt; ! static void lpt_float(t_lpt *x, t_floatarg f) { + #ifdef Z_WANT_LPT if (x->port) { unsigned char b = f; outb(b, x->port); } + #endif /* Z_WANT_LPT */ } ! static void *lpt_new(t_symbol *s, int argc, t_atom *argv) { ! t_lpt *x = (t_lpt *)pd_new(lpt_class); ! if(s==gensym("lp")) ! error("lpt: the use of 'lp' has been deprecated; use 'lpt' instead"); + #ifdef Z_WANT_LPT x->port = 0; *************** *** 62,66 **** break; default: ! error("lp : only lp0, lp1 and lp2 are accessible"); x->port = 0; return (x); --- 66,70 ---- break; default: ! error("lpt : only lpt0, lpt1 and lpt2 are accessible"); x->port = 0; return (x); *************** *** 75,79 **** if (!x->port || x->port>65535){ ! post("lp : bad port %x", x->port); x->port = 0; return (x); --- 79,83 ---- if (!x->port || x->port>65535){ ! post("lpt : bad port %x", x->port); x->port = 0; return (x); *************** *** 82,86 **** if (x->port && x->port < 0x400){ if (ioperm(x->port, 8, 1)) { ! error("lp : couldn't get write permissions"); x->port = 0; return (x); --- 86,90 ---- if (x->port && x->port < 0x400){ if (ioperm(x->port, 8, 1)) { ! error("lpt : couldn't get write permissions"); x->port = 0; return (x); *************** *** 89,93 **** } else { if (iopl(3)){ ! error("lp : couldn't get write permissions"); x->port = 0; return (x); --- 93,97 ---- } else { if (iopl(3)){ ! error("lpt : couldn't get write permissions"); x->port = 0; return (x); *************** *** 100,136 **** post("connected to port %x in mode '%s'", x->port, (x->mode==MODE_IOPL)?"iopl":"ioperm"); if (x->mode==MODE_IOPL)post("warning: this might seriously damage your pc..."); ! return (x); } ! static void lp_free(t_lp *x) { if (x->port) { ! if (x->mode==MODE_IOPERM && ioperm(x->port, 8, 0)) error("lp: couldn't clean up device"); else if (x->mode==MODE_IOPL && (!--count_iopl) && iopl(0)) ! error("lp: couldn't clean up device"); } } ! static void helper(t_lp *x) { ! post("\n%c lp :: direct access to the parallel port", HEARTSYMBOL); post("<byte>\t: write byte to the parallel-port"); ! post("\ncreation:\t\"lp [<port>]\": connect to parallel port <port> (0..2)"); ! post("\t\t\"lp <portaddr>\": connect to port @ <portaddr> (hex)"); } ! void z_lp_setup(void) { ! lp_class = class_new(gensym("lp"), ! (t_newmethod)lp_new, (t_method)lp_free, ! sizeof(t_lp), 0, A_GIMME, 0); ! class_addfloat(lp_class, (t_method)lp_float); ! class_addmethod(lp_class, (t_method)helper, gensym("help"), 0); ! class_sethelpsymbol(lp_class, gensym("zexy/lp")); } ! #endif /* __i386__ */ --- 104,148 ---- post("connected to port %x in mode '%s'", x->port, (x->mode==MODE_IOPL)?"iopl":"ioperm"); if (x->mode==MODE_IOPL)post("warning: this might seriously damage your pc..."); ! #else ! error("zexy has been compiled without [lpt]!"); ! #endif /* Z_WANT_LPT */ ! return (x); } ! static void lpt_free(t_lpt *x) { + #ifdef Z_WANT_LPT if (x->port) { ! if (x->mode==MODE_IOPERM && ioperm(x->port, 8, 0)) error("lpt: couldn't clean up device"); else if (x->mode==MODE_IOPL && (!--count_iopl) && iopl(0)) ! error("lpt: couldn't clean up device"); } + #endif /* Z_WANT_LPT */ } ! static void helper(t_lpt *x) { ! post("\n%c lpt :: direct access to the parallel port", HEARTSYMBOL); post("<byte>\t: write byte to the parallel-port"); ! post("\ncreation:\t\"lpt [<port>]\": connect to parallel port <port> (0..2)"); ! post("\t\t\"lpt <portaddr>\": connect to port @ <portaddr> (hex)"); } ! void z_lpt_setup(void) { ! lpt_class = class_new(gensym("lpt"), ! (t_newmethod)lpt_new, (t_method)lpt_free, ! sizeof(t_lpt), 0, A_GIMME, 0); ! class_addcreator((t_newmethod)lpt_new, gensym("lp"), A_GIMME, 0); ! class_addfloat(lpt_class, (t_method)lpt_float); ! class_addmethod(lpt_class, (t_method)helper, gensym("help"), 0); ! class_sethelpsymbol(lpt_class, gensym("zexy/lpt")); } ! void z_lp_setup(void){ ! z_lpt_setup(); ! }

1 0

externals/zexy/src z_tabread4.c,1.1,1.2
by IOhannes m zmölnig 21 Jul '04

21 Jul '04

Update of /cvsroot/pure-data/externals/zexy/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21753 Modified Files: z_tabread4.c Log Message: removed [tabread4] (is in pd since ages) fixed a memory-leak in [tabdump] (thanks to ix(a)replic.net) Index: z_tabread4.c =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/z_tabread4.c,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** z_tabread4.c 9 Oct 2002 10:19:04 -0000 1.1 --- z_tabread4.c 21 Jul 2004 13:20:52 -0000 1.2 *************** *** 30,36 **** int n; t_atom *atombuf = (t_atom *)getbytes(sizeof(t_atom)*npoints); - for (n = 0; n < npoints; n++) SETFLOAT(&atombuf[n], vec[n]); outlet_list(x->x_obj.ob_outlet, &s_list, npoints, atombuf); } } --- 30,36 ---- int n; t_atom *atombuf = (t_atom *)getbytes(sizeof(t_atom)*npoints); for (n = 0; n < npoints; n++) SETFLOAT(&atombuf[n], vec[n]); outlet_list(x->x_obj.ob_outlet, &s_list, npoints, atombuf); + freebytes(atombuf,sizeof(t_atom)*npoints); } } *************** *** 157,248 **** - /* =================== tabread4 ====================== */ - - static t_class *tabread4_class; - - typedef struct _tabread - { - t_object x_obj; - t_symbol *x_arrayname; - } t_tabread; - - static void tabread4_float(t_tabread *x, t_float findex) - { - t_garray *A; - int npoints; - t_float *vec; - - if (!(A = (t_garray *)pd_findbyclass(x->x_arrayname, garray_class))) - error("%s: no such array", x->x_arrayname->s_name); - else if (!garray_getfloatarray(A, &npoints, &vec)) - - error("%s: bad template for tabread", x->x_arrayname->s_name); - else - { - float a, b, c, d, cminusb, frac, out; - int index = (int)findex, max_index = npoints - 1; - - if (index < 0) index = 0, frac = 0.; - else if (index > max_index) index = max_index, frac = 0.; - else frac = findex - index; - - a = vec[index-1]; - b = vec[index]; - c = vec[index+1]; - d = vec[index+2]; - cminusb = c - b; - - out = (t_float)(b + frac * (cminusb - 0.5 * (frac-1.) * ( - (a - d + 3.0 * cminusb) * frac + - (b - a - cminusb) - ) - )); - - outlet_float(x->x_obj.ob_outlet, (npoints ? out : 0)); - } - } - - - static void tabread4_set(t_tabread *x, t_symbol *s) - { - x->x_arrayname = s; - } - - static void *tabread4_new(t_symbol *s) - { - t_tabread *x = (t_tabread *)pd_new(tabread4_class); - x->x_arrayname = s; - outlet_new(&x->x_obj, &s_float); - - post("zexy/tabread4: this is obsolete, since tabread4 is now included into pd"); - post("maybe you should go for an upgrade..."); - return (x); - } - - static void tabread4_helper(void) - { - post("\n%c tabread4 - object : reads out a table (4point-interpolation-support)", HEARTSYMBOL); - post("'set <table>': read out another table\n" - "<position> : read from table at specified position\n" - "outlet\t: table-data at specified position (evt. interpolated)"); - post("creation: \"tabread4 <table>\""); - - } - - static void tabread4_setup(void) - { - tabread4_class = class_new(gensym("tabread4"), (t_newmethod)tabread4_new, - 0, sizeof(t_tabread), 0, A_DEFSYM, 0); - class_addfloat(tabread4_class, (t_method)tabread4_float); - class_addmethod(tabread4_class, (t_method)tabread4_set, gensym("set"), - A_SYMBOL, 0); - - class_addmethod(tabread4_class, (t_method)tabread4_helper, gensym("help"), 0); - class_sethelpsymbol(tabread4_class, gensym("zexy/tabread4")); - } - void z_tabread4_setup(void) { - tabread4_setup(); tabdump_setup(); tabset_setup(); --- 157,162 ----

1 0

doc/doxygen pd.doxygen,NONE,1.1
by Hans-Christoph Steiner 20 Jul '04

20 Jul '04

Update of /cvsroot/pure-data/doc/doxygen In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7266 Added Files: pd.doxygen Log Message: from Tom Schouten's email of 2004.07.02 --- NEW FILE: pd.doxygen --- # Doxyfile 1.3.4 #--------------------------------------------------------------------------- # Project related configuration options #--------------------------------------------------------------------------- PROJECT_NAME = pd PROJECT_NUMBER = OUTPUT_DIRECTORY = OUTPUT_LANGUAGE = English USE_WINDOWS_ENCODING = NO BRIEF_MEMBER_DESC = YES REPEAT_BRIEF = YES ALWAYS_DETAILED_SEC = NO INLINE_INHERITED_MEMB = NO FULL_PATH_NAMES = NO STRIP_FROM_PATH = SHORT_NAMES = NO JAVADOC_AUTOBRIEF = NO MULTILINE_CPP_IS_BRIEF = NO DETAILS_AT_TOP = NO INHERIT_DOCS = YES DISTRIBUTE_GROUP_DOC = NO TAB_SIZE = 8 ALIASES = OPTIMIZE_OUTPUT_FOR_C = YES OPTIMIZE_OUTPUT_JAVA = NO SUBGROUPING = YES #--------------------------------------------------------------------------- # Build related configuration options #--------------------------------------------------------------------------- EXTRACT_ALL = YES EXTRACT_PRIVATE = YES EXTRACT_STATIC = YES EXTRACT_LOCAL_CLASSES = YES HIDE_UNDOC_MEMBERS = NO HIDE_UNDOC_CLASSES = NO HIDE_FRIEND_COMPOUNDS = NO HIDE_IN_BODY_DOCS = NO INTERNAL_DOCS = YES CASE_SENSE_NAMES = YES HIDE_SCOPE_NAMES = NO SHOW_INCLUDE_FILES = YES INLINE_INFO = YES SORT_MEMBER_DOCS = YES GENERATE_TODOLIST = YES GENERATE_TESTLIST = YES GENERATE_BUGLIST = YES GENERATE_DEPRECATEDLIST= YES ENABLED_SECTIONS = MAX_INITIALIZER_LINES = 30 SHOW_USED_FILES = YES #--------------------------------------------------------------------------- # configuration options related to warning and progress messages #--------------------------------------------------------------------------- QUIET = NO WARNINGS = YES WARN_IF_UNDOCUMENTED = YES WARN_IF_DOC_ERROR = YES WARN_FORMAT = "$file:$line: $text" WARN_LOGFILE = #--------------------------------------------------------------------------- # configuration options related to the input files #--------------------------------------------------------------------------- INPUT = /home/tom/pd/src/pd/src FILE_PATTERNS = RECURSIVE = YES EXCLUDE = EXCLUDE_SYMLINKS = EXCLUDE_PATTERNS = EXAMPLE_PATH = EXAMPLE_PATTERNS = EXAMPLE_RECURSIVE = IMAGE_PATH = INPUT_FILTER = FILTER_SOURCE_FILES = NO #--------------------------------------------------------------------------- # configuration options related to source browsing #--------------------------------------------------------------------------- SOURCE_BROWSER = YES INLINE_SOURCES = NO STRIP_CODE_COMMENTS = NO REFERENCED_BY_RELATION = YES REFERENCES_RELATION = YES VERBATIM_HEADERS = YES #--------------------------------------------------------------------------- # configuration options related to the alphabetical class index #--------------------------------------------------------------------------- ALPHABETICAL_INDEX = NO COLS_IN_ALPHA_INDEX = 5 IGNORE_PREFIX = #--------------------------------------------------------------------------- # configuration options related to the HTML output #--------------------------------------------------------------------------- GENERATE_HTML = YES HTML_OUTPUT = pd-html HTML_FILE_EXTENSION = .html HTML_HEADER = HTML_FOOTER = HTML_STYLESHEET = HTML_ALIGN_MEMBERS = YES GENERATE_HTMLHELP = YES CHM_FILE = HHC_LOCATION = GENERATE_CHI = NO BINARY_TOC = NO TOC_EXPAND = NO DISABLE_INDEX = NO ENUM_VALUES_PER_LINE = 4 GENERATE_TREEVIEW = NO TREEVIEW_WIDTH = 250 #--------------------------------------------------------------------------- # configuration options related to the LaTeX output #--------------------------------------------------------------------------- GENERATE_LATEX = NO LATEX_OUTPUT = latex LATEX_CMD_NAME = latex MAKEINDEX_CMD_NAME = makeindex COMPACT_LATEX = NO PAPER_TYPE = a4wide EXTRA_PACKAGES = LATEX_HEADER = PDF_HYPERLINKS = NO USE_PDFLATEX = NO LATEX_BATCHMODE = NO LATEX_HIDE_INDICES = NO #--------------------------------------------------------------------------- # configuration options related to the RTF output #--------------------------------------------------------------------------- GENERATE_RTF = NO RTF_OUTPUT = rtf COMPACT_RTF = NO RTF_HYPERLINKS = NO RTF_STYLESHEET_FILE = RTF_EXTENSIONS_FILE = #--------------------------------------------------------------------------- # configuration options related to the man page output #--------------------------------------------------------------------------- GENERATE_MAN = NO MAN_OUTPUT = man MAN_EXTENSION = .3 MAN_LINKS = NO #--------------------------------------------------------------------------- # configuration options related to the XML output #--------------------------------------------------------------------------- GENERATE_XML = NO XML_OUTPUT = xml XML_SCHEMA = XML_DTD = #--------------------------------------------------------------------------- # configuration options for the AutoGen Definitions output #--------------------------------------------------------------------------- GENERATE_AUTOGEN_DEF = NO #--------------------------------------------------------------------------- # configuration options related to the Perl module output #--------------------------------------------------------------------------- GENERATE_PERLMOD = NO PERLMOD_LATEX = NO PERLMOD_PRETTY = YES PERLMOD_MAKEVAR_PREFIX = #--------------------------------------------------------------------------- # Configuration options related to the preprocessor #--------------------------------------------------------------------------- ENABLE_PREPROCESSING = YES MACRO_EXPANSION = NO EXPAND_ONLY_PREDEF = NO SEARCH_INCLUDES = YES INCLUDE_PATH = INCLUDE_FILE_PATTERNS = PREDEFINED = EXPAND_AS_DEFINED = SKIP_FUNCTION_MACROS = NO #--------------------------------------------------------------------------- # Configuration::addtions related to external references #--------------------------------------------------------------------------- TAGFILES = GENERATE_TAGFILE = ALLEXTERNALS = NO EXTERNAL_GROUPS = YES PERL_PATH = /usr/bin/perl #--------------------------------------------------------------------------- # Configuration options related to the dot tool #--------------------------------------------------------------------------- CLASS_DIAGRAMS = YES HIDE_UNDOC_RELATIONS = YES HAVE_DOT = NO CLASS_GRAPH = YES COLLABORATION_GRAPH = YES UML_LOOK = NO TEMPLATE_RELATIONS = NO INCLUDE_GRAPH = YES INCLUDED_BY_GRAPH = YES CALL_GRAPH = NO GRAPHICAL_HIERARCHY = YES DOT_IMAGE_FORMAT = png DOT_PATH = DOTFILE_DIRS = MAX_DOT_GRAPH_WIDTH = 1024 MAX_DOT_GRAPH_HEIGHT = 1024 MAX_DOT_GRAPH_DEPTH = 0 GENERATE_LEGEND = YES DOT_CLEANUP = YES #--------------------------------------------------------------------------- # Configuration::addtions related to the search engine #--------------------------------------------------------------------------- SEARCHENGINE = NO

1 0

doc/doxygen - New directory
by Hans-Christoph Steiner 20 Jul '04

20 Jul '04

Update of /cvsroot/pure-data/doc/doxygen In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7122/doxygen Log Message: Directory /cvsroot/pure-data/doc/doxygen added to the repository

1 0

externals/sc4pd/source Latoocarfian.cpp,NONE,1.1 main.cpp,1.7,1.8
by Tim Blechmann 19 Jul '04

19 Jul '04

Update of /cvsroot/pure-data/externals/sc4pd/source In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25852/source Modified Files: main.cpp Added Files: Latoocarfian.cpp Log Message: another object Index: main.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/source/main.cpp,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** main.cpp 17 Jul 2004 17:27:17 -0000 1.7 --- main.cpp 19 Jul 2004 21:28:04 -0000 1.8 *************** *** 58,62 **** "TExpRand(~), IRand(~), TIRand(~),\n CoinGate, " "LinRand(~), NRand(~), ExpRand(~), LFClipNoise(~),\n" ! " LFNoise0(~), LFNoise1(~), LFNoise2(~), Logistic(~)\n"); //initialize objects --- 58,63 ---- "TExpRand(~), IRand(~), TIRand(~),\n CoinGate, " "LinRand(~), NRand(~), ExpRand(~), LFClipNoise(~),\n" ! " LFNoise0(~), LFNoise1(~), LFNoise2(~), Logistic(~), " ! "Latoocarfian(~)\n"); //initialize objects *************** *** 134,137 **** --- 135,141 ---- FLEXT_DSP_SETUP(Logistic_ar); FLEXT_SETUP(Logistic_kr); + + FLEXT_DSP_SETUP(Latoocarfian_ar); + FLEXT_SETUP(Latoocarfian_kr); } --- NEW FILE: Latoocarfian.cpp --- /* sc4pd Latoocarfian, Latoocarfian~ Copyright (c) 2004 Tim Blechmann. This code is derived from: SuperCollider real time audio synthesis system Copyright (c) 2002 James McCartney. All rights reserved. http://www.audiosynth.com This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. Based on: PureData by Miller Puckette and others. http://www.crca.ucsd.edu/~msp/software.html FLEXT by Thomas Grill http://www.parasitaere-kapazitaeten.net/ext SuperCollider by James McCartney http://www.audiosynth.com Coded while listening to: Keith Rowe & John Tilbury: Duos For Doris */ #include <flext.h> #include "SC_PlugIn.h" #include "support.hpp" #if !defined(FLEXT_VERSION) || (FLEXT_VERSION < 406) #error You need at least FLEXT version 0.4.6 #endif /* ------------------------ Latoocarfian~ -------------------------------*/ class Latoocarfian_ar: public flext_dsp { FLEXT_HEADER(Latoocarfian_ar,flext_dsp); public: Latoocarfian_ar(int argc, t_atom *argv); protected: virtual void m_signal(int n, t_sample *const *in, t_sample *const *out); void m_set_a(float f) { m_a = f; } void m_set_b(float f) { m_b = f; } void m_set_c(float f) { m_c = f; } void m_set_d(float f) { m_d = f; } private: float m_x, m_y; //state float m_a, m_b, m_c, m_d; //parameters FLEXT_CALLBACK_F(m_set_a); FLEXT_CALLBACK_F(m_set_b); FLEXT_CALLBACK_F(m_set_c); FLEXT_CALLBACK_F(m_set_d); }; FLEXT_LIB_DSP_V("Latoocarfian~",Latoocarfian_ar); Latoocarfian_ar::Latoocarfian_ar(int argc, t_atom *argv) :m_x(0.4),m_y(1) { FLEXT_ADDMETHOD_(0,"a",m_set_a); FLEXT_ADDMETHOD_(0,"b",m_set_b); FLEXT_ADDMETHOD_(0,"c",m_set_c); FLEXT_ADDMETHOD_(0,"d",m_set_d); //parse arguments AtomList Args(argc,argv); if (Args.Count()!=4) { post("4 arguments needed"); } m_a = sc_getfloatarg(Args,0); m_b = sc_getfloatarg(Args,1); m_c = sc_getfloatarg(Args,2); m_d = sc_getfloatarg(Args,3); AddOutSignal(); AddOutSignal(); // supercollider is only using the x coordinate } void Latoocarfian_ar::m_signal(int n, t_sample *const *in, t_sample *const *out) { t_sample *xout = *out; t_sample *yout = *(out+1); float a = m_a; float b = m_b; float c = m_c; float d = m_d; float x = m_x; float y = m_y; for (int i = 0; i!= n;++i) { float x_new=sin(y*b)+c*sin(x*b); float y_new=sin(x*a)+d*sin(y*a); (*(xout)++)=x=x_new; (*(yout)++)=y=y_new; } m_x = x; m_y = y; } /* ------------------------ Latoocarfian ---------------------------------*/ class Latoocarfian_kr: public flext_base { FLEXT_HEADER(Latoocarfian_kr,flext_base); public: Latoocarfian_kr(int argc, t_atom *argv); protected: void m_perform(); void m_set_a(float f) { m_a = f; } void m_set_b(float f) { m_b = f; } void m_set_c(float f) { m_c = f; } void m_set_d(float f) { m_d = f; } private: float m_x, m_y; //state float m_a, m_b, m_c, m_d; //parameters FLEXT_CALLBACK_F(m_set_a); FLEXT_CALLBACK_F(m_set_b); FLEXT_CALLBACK_F(m_set_c); FLEXT_CALLBACK_F(m_set_d); FLEXT_CALLBACK(m_perform); }; FLEXT_LIB_V("Latoocarfian",Latoocarfian_kr); Latoocarfian_kr::Latoocarfian_kr(int argc, t_atom *argv) :m_x(1),m_y(1) { FLEXT_ADDMETHOD_(0,"a",m_set_a); FLEXT_ADDMETHOD_(0,"b",m_set_b); FLEXT_ADDMETHOD_(0,"c",m_set_c); FLEXT_ADDMETHOD_(0,"d",m_set_d); FLEXT_ADDBANG(0,m_perform); //parse arguments AtomList Args(argc,argv); if (Args.Count()!=4) { post("4 arguments needed"); } m_a = sc_getfloatarg(Args,0); m_b = sc_getfloatarg(Args,1); m_c = sc_getfloatarg(Args,2); m_d = sc_getfloatarg(Args,3); AddOutFloat(); AddOutFloat(); // one outlet more than sc } void Latoocarfian_kr::m_perform() { m_x=sin(m_y*m_b)+m_c*sin(m_x*m_b); m_y=sin(m_x*m_a)+m_d*sin(m_y*m_a); ToOutFloat(0,m_x); ToOutFloat(1,m_y); }

1 0

externals/sc4pd make-files.txt,1.6,1.7
by Tim Blechmann 19 Jul '04

19 Jul '04

Update of /cvsroot/pure-data/externals/sc4pd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25852 Modified Files: make-files.txt Log Message: another object Index: make-files.txt =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/make-files.txt,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** make-files.txt 17 Jul 2004 17:27:17 -0000 1.6 --- make-files.txt 19 Jul 2004 21:28:03 -0000 1.7 *************** *** 7,9 **** IRand.cpp TIRand.cpp CoinGate.cpp support.cpp LinRand.cpp NRand.cpp\ ExpRand.cpp LFClipNoise.cpp LFNoise0.cpp LFNoise1.cpp LFNoise2.cpp \ ! Logistic.cpp \ No newline at end of file --- 7,9 ---- IRand.cpp TIRand.cpp CoinGate.cpp support.cpp LinRand.cpp NRand.cpp\ ExpRand.cpp LFClipNoise.cpp LFNoise0.cpp LFNoise1.cpp LFNoise2.cpp \ ! Logistic.cpp Latoocarfian.cpp \ No newline at end of file

1 0

externals/sc4pd/pd latoocarfian.pd,NONE,1.1
by Tim Blechmann 19 Jul '04

19 Jul '04

Update of /cvsroot/pure-data/externals/sc4pd/pd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25852/pd Added Files: latoocarfian.pd Log Message: another object --- NEW FILE: latoocarfian.pd --- #N canvas 0 0 450 300 10; #X obj 89 115 print~; #X obj 141 88 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 128 161 dac~; #X obj 89 48 Latoocarfian~ 0.88 1.8 1.2 1.3; #X obj 231 125 Latoocarfian 0.88 1.8 1.2 1.3; #X floatatom 247 154 5 0 0 0 - - -; #X floatatom 410 152 5 0 0 0 - - -; #X obj 275 97 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X connect 1 0 0 0; #X connect 3 0 0 0; #X connect 3 0 2 0; #X connect 3 1 2 1; #X connect 4 0 5 0; #X connect 4 1 6 0; #X connect 7 0 4 0;

1 0

externals/unauthorized/playlist CHANGES.LOG,1.2,1.3 help-playlist.pd,1.3,1.4 playlist.c,1.6,1.7
by Yves Degoyon 19 Jul '04

19 Jul '04

Update of /cvsroot/pure-data/externals/unauthorized/playlist In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21216 Modified Files: CHANGES.LOG help-playlist.pd playlist.c Log Message: playlist 0.9 Index: CHANGES.LOG =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/playlist/CHANGES.LOG,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** CHANGES.LOG 30 Mar 2004 03:59:41 -0000 1.2 --- CHANGES.LOG 18 Jul 2004 23:55:26 -0000 1.3 *************** *** 1,2 **** --- 1,5 ---- + 0.9 + do not output directories ( for clicks and seeks ) + fixed cut&paste of playlists 0.8 added colors and font properties Index: playlist.c =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/playlist/playlist.c,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** playlist.c 30 Mar 2004 03:59:41 -0000 1.6 --- playlist.c 18 Jul 2004 23:55:27 -0000 1.7 *************** *** 54,58 **** static int guidebug=0; ! static char *playlist_version = "playlist: 1 click file chooser : version 0.8, written by Yves Degoyon (ydegoyon(a)free.fr)"; #define MAX_DIR_LENGTH 2048 // maximum length for a directory name --- 54,58 ---- static int guidebug=0; ! static char *playlist_version = "playlist: 1 click file chooser : version 0.9, written by Yves Degoyon (ydegoyon(a)free.fr)"; #define MAX_DIR_LENGTH 2048 // maximum length for a directory name *************** *** 240,243 **** --- 240,250 ---- { // output the selected dir+file + // check that it's not a directory + if ( chdir( x->x_dentries[x->x_itemselected] ) == 0 ) + { + chdir( x->x_curdir ); + return; + } + if ( x->x_dentries && x->x_itemselected < x->x_nentries && x->x_itemselected >= 0 ) { *************** *** 639,643 **** t_playlist *playlist_new(t_symbol *s, int argc, t_atom *argv ) { ! t_int i; t_playlist *x; char *tmpcurdir; --- 646,650 ---- t_playlist *playlist_new(t_symbol *s, int argc, t_atom *argv ) { ! t_int i, argoffset=0; t_playlist *x; char *tmpcurdir; *************** *** 709,757 **** if ( argc >= 6 ) { ! if ( argv[3].a_type != A_SYMBOL || argv[4].a_type != A_FLOAT || argv[5].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (font : 4,5,6)" ); return NULL; } ! sprintf( x->x_font, "%s %d %s", argv[3].a_w.w_symbol->s_name, ! (t_int)argv[4].a_w.w_float, argv[5].a_w.w_symbol->s_name ); ! x->x_charheight = (t_int)argv[4].a_w.w_float; } ! if ( argc >= 7 ) { ! if ( argv[6].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (background color : 7)" ); return NULL; } ! strcpy( x->x_bgcolor, argv[6].a_w.w_symbol->s_name ); } ! if ( argc >= 8 ) { ! if ( argv[7].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (scrollbar color : 8)" ); return NULL; } ! strcpy( x->x_sbcolor, argv[7].a_w.w_symbol->s_name ); } ! if ( argc >= 9 ) { ! if ( argv[8].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (foreground color : 9)" ); return NULL; } ! strcpy( x->x_fgcolor, argv[8].a_w.w_symbol->s_name ); } ! if ( argc >= 10 ) { ! if ( argv[9].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (selection color : 10)" ); return NULL; } ! strcpy( x->x_secolor, argv[9].a_w.w_symbol->s_name ); } --- 716,783 ---- if ( argc >= 6 ) { ! if ( argv[3].a_type != A_SYMBOL || argv[5].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (font : 4,6)" ); ! error( "argument types : %d %d", argv[3].a_type, argv[5].a_type ); return NULL; } ! if ( argv[4].a_type != A_SYMBOL && ! argv[4].a_type != A_FLOAT ) ! { ! error( "playlist : wrong arguments (font size : 5)" ); ! error( "argument types : %d", argv[4].a_type ); ! return NULL; ! } ! if ( argv[4].a_type == A_SYMBOL ) ! { ! sprintf( x->x_font, "%s", argv[3].a_w.w_symbol->s_name ); ! x->x_charheight = (t_int)atoi( strstr( argv[3].a_w.w_symbol->s_name, " ") ); ! argoffset=2; ! } ! if ( argv[4].a_type == A_FLOAT ) ! { ! x->x_charheight = (t_int)argv[4].a_w.w_float; ! sprintf( x->x_font, "%s %d %s", argv[3].a_w.w_symbol->s_name, ! x->x_charheight, argv[5].a_w.w_symbol->s_name ); ! argoffset=0; ! } ! post( "playlist : font : %s, size : %d", x->x_font, x->x_charheight ); } ! if ( argc >= 7-argoffset ) { ! if ( argv[6-argoffset].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (background color : %d)", 7-argoffset ); return NULL; } ! strcpy( x->x_bgcolor, argv[6-argoffset].a_w.w_symbol->s_name ); } ! if ( argc >= 8-argoffset ) { ! if ( argv[7-argoffset].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (scrollbar color : %d)", 8-argoffset ); return NULL; } ! strcpy( x->x_sbcolor, argv[7-argoffset].a_w.w_symbol->s_name ); } ! if ( argc >= 9-argoffset ) { ! if ( argv[8-argoffset].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (foreground color : %d)", 9-argoffset ); return NULL; } ! strcpy( x->x_fgcolor, argv[8-argoffset].a_w.w_symbol->s_name ); } ! if ( argc >= 10-argoffset ) { ! if ( argv[9-argoffset].a_type != A_SYMBOL ) { ! error( "playlist : wrong arguments (selection color : %d)", 10-argoffset ); return NULL; } ! strcpy( x->x_secolor, argv[9-argoffset].a_w.w_symbol->s_name ); } *************** *** 782,786 **** // post( "playlist : built extension=%s width=%d height=%d", x->x_extension, x->x_width, x->x_height ); ! return (x); } --- 808,812 ---- // post( "playlist : built extension=%s width=%d height=%d", x->x_extension, x->x_width, x->x_height ); ! return (x); } *************** *** 839,844 **** SYS_VGUI5(".x%x.c itemconfigure %xENTRY%d -fill %s\n", x->x_glist, x, x->x_itemselected, x->x_fgcolor); x->x_itemselected = iout; ! SYS_VGUI5(".x%x.c itemconfigure %xENTRY%d -fill %s\n", ! x->x_glist, x, x->x_itemselected, x->x_secolor); playlist_output_current(x); } --- 865,869 ---- SYS_VGUI5(".x%x.c itemconfigure %xENTRY%d -fill %s\n", x->x_glist, x, x->x_itemselected, x->x_fgcolor); x->x_itemselected = iout; ! SYS_VGUI5(".x%x.c itemconfigure %xENTRY%d -fill %s\n", x->x_glist, x, x->x_itemselected, x->x_secolor); playlist_output_current(x); } Index: help-playlist.pd =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/playlist/help-playlist.pd,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** help-playlist.pd 30 Mar 2004 03:59:41 -0000 1.3 --- help-playlist.pd 18 Jul 2004 23:55:27 -0000 1.4 *************** *** 4,13 **** #X text 88 107 playlist mp3 200 200; #X text 30 78 Examples :; ! #X text 80 454 Comments and bugs @ ydegoyon(a)free.fr; #X symbolatom 292 399 50 0 0 0 - - -; ! #X text 17 342 Note : you can scroll the list by dragging; ! #X text 15 353 the mouse in the yellow area; ! #X text 17 364 You can select and scroll in the blue area; ! #X obj 292 181 playlist all 400 200; #X msg 301 84 seek \$1; #X text 406 66 You can seek a file in the list; --- 4,14 ---- #X text 88 107 playlist mp3 200 200; #X text 30 78 Examples :; ! #X text 72 507 Comments and bugs @ ydegoyon(a)free.fr; #X symbolatom 292 399 50 0 0 0 - - -; ! #X text 17 444 Note : you can scroll the list by dragging; ! #X text 15 455 the mouse in the yellow area; ! #X text 17 466 You can select and scroll in the blue area; ! #X obj 292 181 playlist all 400 200 {Helvetica 10 bold} #457782 yellow ! black red; #X msg 301 84 seek \$1; #X text 406 66 You can seek a file in the list; *************** *** 21,28 **** #X msg 151 163 location ..; #X msg 150 140 location /tmp; ! #X text 60 211 You can change change location; ! #X text 60 221 with a message.; ! #X text 60 233 Thus \, you can initialize the object; ! #X text 59 242 in a particular folder.; #X msg 151 185 location patches; #X msg 299 111 sort \$1; --- 22,29 ---- #X msg 151 163 location ..; #X msg 150 140 location /tmp; ! #X text 33 212 You can change change location; ! #X text 33 222 with a message.; ! #X text 33 234 Thus \, you can initialize the object; ! #X text 32 243 in a particular folder.; #X msg 151 185 location patches; #X msg 299 111 sort \$1; *************** *** 31,37 **** #X text 405 109 Use alphabetical or creation time order; #X obj 87 140 loadbang; ! #X text 597 135 Change the font; #X msg 300 136 font Helvetica normal 14; ! #X msg 458 135 font Courier bold 24; #X connect 9 0 5 0; #X connect 9 1 17 0; --- 32,38 ---- #X text 405 109 Use alphabetical or creation time order; #X obj 87 140 loadbang; ! #X text 628 136 Change the font; #X msg 300 136 font Helvetica normal 14; ! #X msg 478 136 font Courier bold 24; #X connect 9 0 5 0; #X connect 9 1 17 0;

1 0

externals/sc4pd/pd lfnoise2.pd,NONE,1.1 logistic.pd,NONE,1.1 lfclipnoise.pd,1.1,1.2 lfnoise1.pd,1.1,1.2
by Tim Blechmann 17 Jul '04

17 Jul '04

Update of /cvsroot/pure-data/externals/sc4pd/pd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29579/pd Modified Files: lfclipnoise.pd lfnoise1.pd Added Files: lfnoise2.pd logistic.pd Log Message: one more object and some changes Index: lfnoise1.pd =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/pd/lfnoise1.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** lfnoise1.pd 16 Jul 2004 16:43:47 -0000 1.1 --- lfnoise1.pd 17 Jul 2004 17:27:17 -0000 1.2 *************** *** 7,12 **** #X obj 246 123 t b b; #X floatatom 246 168 5 0 0 0 - - -; - #X obj 246 55 LFNoise0 10; #X obj 89 48 LFNoise1~ 100; #X connect 1 0 0 0; #X connect 2 0 4 0; --- 7,12 ---- #X obj 246 123 t b b; #X floatatom 246 168 5 0 0 0 - - -; #X obj 89 48 LFNoise1~ 100; + #X obj 246 55 LFNoise1 10; #X connect 1 0 0 0; #X connect 2 0 4 0; *************** *** 14,17 **** #X connect 4 0 3 0; #X connect 4 1 3 1; ! #X connect 6 0 2 0; ! #X connect 7 0 0 0; --- 14,17 ---- #X connect 4 0 3 0; #X connect 4 1 3 1; ! #X connect 6 0 0 0; ! #X connect 7 0 2 0; --- NEW FILE: logistic.pd --- #N canvas 0 0 450 300 10; #X obj 89 115 print~; #X floatatom 246 97 5 0 0 0 - - -; #X obj 246 143 timer; #X obj 246 123 t b b; #X floatatom 246 168 5 0 0 0 - - -; #X obj 246 55 Logistic 1 0.5; #X obj 246 17 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 74 159 dac~; #X obj 89 134 Logistic~ 1000 4 0.4; #X obj 116 90 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 89 48 Logistic~ 1000 4 0.4; #X connect 1 0 3 0; #X connect 2 0 4 0; #X connect 3 0 2 0; #X connect 3 1 2 1; #X connect 5 0 1 0; #X connect 6 0 5 0; #X connect 8 0 7 1; #X connect 9 0 0 0; #X connect 10 0 0 0; #X connect 10 0 7 0; Index: lfclipnoise.pd =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/pd/lfclipnoise.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** lfclipnoise.pd 15 Jul 2004 21:34:12 -0000 1.1 --- lfclipnoise.pd 17 Jul 2004 17:27:17 -0000 1.2 *************** *** 1,10 **** #N canvas 0 0 450 300 10; - #X obj 89 115 print~; - #X obj 141 88 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 - -1; #X floatatom 246 97 5 0 0 0 - - -; - #X obj 89 48 LFClipNoise~ 1000; #X obj 246 55 LFClipNoise 10; #X connect 1 0 0 0; ! #X connect 3 0 0 0; ! #X connect 4 0 2 0; --- 1,13 ---- #N canvas 0 0 450 300 10; #X floatatom 246 97 5 0 0 0 - - -; #X obj 246 55 LFClipNoise 10; + #X obj 139 179 dac~; + #X obj 89 154 *~ 0.1; + #X obj 161 124 LFClipNoise~ 1001; + #X obj 89 48 LFClipNoise~ 999; + #X obj 161 151 *~ 0.1; #X connect 1 0 0 0; ! #X connect 3 0 2 0; ! #X connect 4 0 6 0; ! #X connect 5 0 3 0; ! #X connect 6 0 2 1; --- NEW FILE: lfnoise2.pd --- #N canvas 0 0 450 300 10; #X obj 89 115 print~; #X obj 141 88 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 246 97 5 0 0 0 - - -; #X obj 246 143 timer; #X obj 246 123 t b b; #X floatatom 246 168 5 0 0 0 - - -; #X obj 246 55 LFNoise2 10; #X obj 89 48 LFNoise2~ 100; #X connect 1 0 0 0; #X connect 2 0 4 0; #X connect 3 0 5 0; #X connect 4 0 3 0; #X connect 4 1 3 1; #X connect 6 0 2 0; #X connect 7 0 0 0;

1 0

externals/sc4pd make-files.txt,1.5,1.6
by Tim Blechmann 17 Jul '04

17 Jul '04

Update of /cvsroot/pure-data/externals/sc4pd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29579 Modified Files: make-files.txt Log Message: one more object and some changes Index: make-files.txt =================================================================== RCS file: /cvsroot/pure-data/externals/sc4pd/make-files.txt,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** make-files.txt 16 Jul 2004 16:43:47 -0000 1.5 --- make-files.txt 17 Jul 2004 17:27:17 -0000 1.6 *************** *** 6,8 **** PinkNoise.cpp Dust2.cpp Crackle.cpp Rand.cpp TRand.cpp TExpRand.cpp \ IRand.cpp TIRand.cpp CoinGate.cpp support.cpp LinRand.cpp NRand.cpp\ ! ExpRand.cpp LFClipNoise.cpp LFNoise0.cpp LFNoise1.cpp LFNoise2.cpp \ No newline at end of file --- 6,9 ---- PinkNoise.cpp Dust2.cpp Crackle.cpp Rand.cpp TRand.cpp TExpRand.cpp \ IRand.cpp TIRand.cpp CoinGate.cpp support.cpp LinRand.cpp NRand.cpp\ ! ExpRand.cpp LFClipNoise.cpp LFNoise0.cpp LFNoise1.cpp LFNoise2.cpp \ ! Logistic.cpp \ No newline at end of file

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

Pd-cvs July 2004