Pd-cvs April 2006

pd-cvs@lists.iem.at

15 participants
271 discussions

scripts update-developer-layout.sh,1.1,1.2
by Hans-Christoph Steiner 08 Apr '06

08 Apr '06

Update of /cvsroot/pure-data/scripts In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26781 Modified Files: update-developer-layout.sh Log Message: added -Pd to get new dirs Index: update-developer-layout.sh =================================================================== RCS file: /cvsroot/pure-data/scripts/update-developer-layout.sh,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** update-developer-layout.sh 6 Apr 2006 01:38:54 -0000 1.1 --- update-developer-layout.sh 8 Apr 2006 01:04:04 -0000 1.2 *************** *** 20,24 **** echo "$section" cd $section ! cvs up cd .. done --- 20,24 ---- echo "$section" cd $section ! cvs up -Pd cd .. done

1 0

pd/src s_stuff.h, 1.5.4.10.2.3, 1.5.4.10.2.4 s_audio.c, 1.5.4.16.2.9, 1.5.4.16.2.10
by Tim Blechmann 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31839 Modified Files: Tag: devel_0_39 s_stuff.h s_audio.c Log Message: small fix Index: s_audio.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/s_audio.c,v retrieving revision 1.5.4.16.2.9 retrieving revision 1.5.4.16.2.10 diff -C2 -d -r1.5.4.16.2.9 -r1.5.4.16.2.10 *** s_audio.c 27 Mar 2006 12:08:57 -0000 1.5.4.16.2.9 --- s_audio.c 7 Apr 2006 21:02:42 -0000 1.5.4.16.2.10 *************** *** 71,74 **** --- 71,75 ---- static int audio_dacblocksize; static int audio_advance; + static int audio_scheduler; extern int sys_callbackscheduler; *************** *** 102,106 **** *pdacblocksize = audio_dacblocksize; *padvance = audio_advance; ! *pscheduler = sys_callbackscheduler; } --- 103,107 ---- *pdacblocksize = audio_dacblocksize; *padvance = audio_advance; ! *pscheduler = audio_scheduler; } *************** *** 108,112 **** int naudioindev, int *audioindev, int *chindev, int naudiooutdev, int *audiooutdev, int *choutdev, ! int rate, int dacblocksize, int advance) { int i; --- 109,113 ---- int naudioindev, int *audioindev, int *chindev, int naudiooutdev, int *audiooutdev, int *choutdev, ! int rate, int dacblocksize, int advance, int scheduler) { int i; *************** *** 122,125 **** --- 123,127 ---- audio_dacblocksize = dacblocksize; audio_advance = advance; + audio_scheduler = scheduler; } *************** *** 406,410 **** } sys_save_audio_params(naudioindev, audioindev, chindev, ! naudiooutdev, audiooutdev, choutdev, sys_dacsr, sys_dacblocksize, advance); if (sys_inchannels == 0 && sys_outchannels == 0) enable = 0; --- 408,412 ---- } sys_save_audio_params(naudioindev, audioindev, chindev, ! naudiooutdev, audiooutdev, choutdev, sys_dacsr, sys_dacblocksize, advance, schedmode); if (sys_inchannels == 0 && sys_outchannels == 0) enable = 0; *************** *** 1146,1153 **** naudiooutdev = naudioindev = (int)atom_getfloatarg(0, argc, argv); ! for (i = 0; i != MAXAUDIOINDEV; i=i+2) { ! audiooutdev[i] = audioindev[i] = atom_getfloatarg(i+1, argc, argv); ! audiochoutdev[i] = audiochindev[i] = atom_getfloatarg(i+2, argc, argv); } --- 1148,1155 ---- naudiooutdev = naudioindev = (int)atom_getfloatarg(0, argc, argv); ! for (i = 0; i != MAXAUDIOINDEV; i++) { ! audiooutdev[i] = audioindev[i] = atom_getfloatarg(i*2+1, argc, argv); ! audiochoutdev[i] = audiochindev[i] = atom_getfloatarg(i*2+2, argc, argv); } Index: s_stuff.h =================================================================== RCS file: /cvsroot/pure-data/pd/src/s_stuff.h,v retrieving revision 1.5.4.10.2.3 retrieving revision 1.5.4.10.2.4 diff -C2 -d -r1.5.4.10.2.3 -r1.5.4.10.2.4 *** s_stuff.h 9 Mar 2006 14:22:51 -0000 1.5.4.10.2.3 --- s_stuff.h 7 Apr 2006 21:02:42 -0000 1.5.4.10.2.4 *************** *** 305,309 **** int naudioindev, int *audioindev, int *chindev, int naudiooutdev, int *audiooutdev, int *choutdev, ! int rate, int dacblocksize, int advance); /* s_file.c */ --- 305,309 ---- int naudioindev, int *audioindev, int *chindev, int naudiooutdev, int *audiooutdev, int *choutdev, ! int rate, int dacblocksize, int advance, int scheduler); /* s_file.c */

1 0

externals/postlude/flib/src cross~.c, 1.2, 1.3 flib.h, 1.1.1.1, 1.2
by Jamie Bullock 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/externals/postlude/flib/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29159/src Modified Files: cross~.c flib.h Log Message: Removed need for arg in cross~ Index: flib.h =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/flib/src/flib.h,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** flib.h 10 Jan 2006 11:49:01 -0000 1.1.1.1 --- flib.h 7 Apr 2006 20:11:49 -0000 1.2 *************** *** 38,40 **** --- 38,41 ---- void wdv_tilde_setup(void); void hca_tilde_setup(void); + void cross_tilde_setup(void); Index: cross~.c =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/flib/src/cross~.c,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** cross~.c 7 Apr 2006 19:59:03 -0000 1.2 --- cross~.c 7 Apr 2006 20:11:49 -0000 1.3 *************** *** 46,49 **** --- 46,52 ---- maxdelay = N * .5; post("cross~: invalid maxdelay, must be <= blocksize/2"); + } + else if (!maxdelay){ + maxdelay = N * .5; }

1 0

externals/postlude/flib/src cross~.c,1.1,1.2
by Jamie Bullock 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/externals/postlude/flib/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19714/src Modified Files: cross~.c Log Message: Tidied. Index: cross~.c =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/flib/src/cross~.c,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** cross~.c 7 Apr 2006 10:30:43 -0000 1.1 --- cross~.c 7 Apr 2006 19:59:03 -0000 1.2 *************** *** 19,22 **** --- 19,24 ---- /*Calculate the (non optimized) cross correlation of two signal vectors*/ + /*Based on code by Phil Bourke */ + #include "flib.h" *************** *** 77,96 **** sxy += (x[i] - mx) * (y[j] - my); ! ! /* ! if (j < 0 || j >= N) ! continue; ! else ! sxy += (x[i] - mx) * (y[j] - my); ! */ ! ! ! /* Or should it be (?) ! if (j < 0 || j >= n) ! sxy += (x[i] - mx) * (-my); ! else ! sxy += (x[i] - mx) * (y[j] - my); ! */ ! } r = sxy / denom; *out++ = r; --- 79,83 ---- sxy += (x[i] - mx) * (y[j] - my); ! } r = sxy / denom; *out++ = r;

1 0

externals/postlude/flib/src cross~.c, NONE, 1.1 flib.c, 1.1.1.1, 1.2
by Jamie Bullock 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/externals/postlude/flib/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24532/src Modified Files: flib.c Added Files: cross~.c Log Message: Initial check in Index: flib.c =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/flib/src/flib.c,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** flib.c 10 Jan 2006 11:49:01 -0000 1.1.1.1 --- flib.c 7 Apr 2006 10:30:43 -0000 1.2 *************** *** 37,41 **** int i; ! char *ext[] = {"sc~\t\tSpectral Centroid", "ss~\t\tSpectral Smoothness", "irreg~\t\tSpectral Irregularity (methods 1 and 2)", "mspec~\t\tMagnitude Spectrum", "peak~\t\tAmplitude and Frequency of Spectral Peaks", "pspec~\t\tPhase Spectrum", "sfm~\t\tSpectral Flatness Measure", "trist~\t\tTristimulus (x,y,z)", "++~\t\tSum of the samples in each block", "bmax~\t\tThe maximum value and location(s) each block", "melf~\t\tGenerate a mel spaced filter for fft", "clean~\t\tRemoves NaN, inf and -inf from a signal vector", "wdv~\t\tCalculate a wavelet dispersion vector (requires creb)", "hca~\t\tHarmonic component analysis"}; sc_tilde_setup(); ss_tilde_setup(); --- 37,41 ---- int i; ! char *ext[] = {"sc~\t\tSpectral Centroid", "ss~\t\tSpectral Smoothness", "irreg~\t\tSpectral Irregularity (methods 1 and 2)", "mspec~\t\tMagnitude Spectrum", "peak~\t\tAmplitude and Frequency of Spectral Peaks", "pspec~\t\tPhase Spectrum", "sfm~\t\tSpectral Flatness Measure", "trist~\t\tTristimulus (x,y,z)", "++~\t\tSum of the samples in each block", "bmax~\t\tThe maximum value and location(s) each block", "melf~\t\tGenerate a mel spaced filter for fft", "clean~\t\tRemoves NaN, inf and -inf from a signal vector", "wdv~\t\tCalculate a wavelet dispersion vector (requires creb)", "hca~\t\tHarmonic component analysis", "cross~\t\tCross correlation"}; sc_tilde_setup(); ss_tilde_setup(); *************** *** 52,59 **** wdv_tilde_setup(); hca_tilde_setup(); post("\n\tflib "VERSION" Feature Extraction Library\n\tby Jamie Bullock\n"); ! for(i = 0; i < 14; i++) post("\t%s",ext[i]); --- 52,60 ---- wdv_tilde_setup(); hca_tilde_setup(); + cross_tilde_setup(); post("\n\tflib "VERSION" Feature Extraction Library\n\tby Jamie Bullock\n"); ! for(i = 0; i < 15; i++) post("\t%s",ext[i]); --- NEW FILE: cross~.c --- /* flib - PD library for feature extraction Copyright (C) 2005 Jamie Bullock 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ /*Calculate the (non optimized) cross correlation of two signal vectors*/ #include "flib.h" #define SQ(a) (a * a) static t_class *cross_class; typedef struct _cross { t_object x_obj; t_float f; t_int delay; } t_cross; static t_int *cross_perform(t_int *w) { t_sample *x = (t_sample *)(w[1]); t_sample *y = (t_sample *)(w[2]); t_sample *out = (t_sample *)(w[3]); t_int N = (t_int)(w[4]), i, j, delay; t_int maxdelay = (t_int)(w[5]); t_float mx, my, sx, sy, sxy, denom, r; if(maxdelay > N * .5){ maxdelay = N * .5; post("cross~: invalid maxdelay, must be <= blocksize/2"); } /* Calculate the mean of the two series x[], y[] */ mx = 0; my = 0; for (i=0;i<N;i++) { mx += x[i]; my += y[i]; } mx /= N; my /= N; /* Calculate the denominator */ sx = 0; sy = 0; for (i=0;i<N;i++) { sx += (x[i] - mx) * (x[i] - mx); sy += (y[i] - my) * (y[i] - my); } denom = sqrt(sx*sy); /* Calculate the correlation series */ for (delay=-maxdelay;delay<maxdelay;delay++) { sxy = 0; for (i=0;i<N;i++) { j = i + delay; /* circular correlation */ while (j < 0) j += N; j %= N; sxy += (x[i] - mx) * (y[j] - my); /* if (j < 0 || j >= N) continue; else sxy += (x[i] - mx) * (y[j] - my); */ /* Or should it be (?) if (j < 0 || j >= n) sxy += (x[i] - mx) * (-my); else sxy += (x[i] - mx) * (y[j] - my); */ } r = sxy / denom; *out++ = r; /* r is the correlation coefficient at "delay" */ } return (w+6); } static void cross_dsp(t_cross *x, t_signal **sp) { dsp_add(cross_perform, 5, sp[0]->s_vec, sp[1]->s_vec, sp[2]->s_vec, sp[0]->s_n, x->delay); } static void *cross_new(t_floatarg f) { t_cross *x = (t_cross *)pd_new(cross_class); x->delay = (t_int)f; inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_signal, &s_signal); outlet_new(&x->x_obj, &s_signal); return (void *)x; } void cross_tilde_setup(void) { cross_class = class_new(gensym("cross~"), (t_newmethod)cross_new, 0, sizeof(t_cross), CLASS_DEFAULT, A_DEFFLOAT, 0); class_addmethod(cross_class, (t_method)cross_dsp, gensym("dsp"), 0); CLASS_MAINSIGNALIN(cross_class, t_cross,f); class_sethelpsymbol(cross_class, gensym("help-flib")); }

1 0

externals/postlude/flib makefile,1.1.1.1,1.2
by Jamie Bullock 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/externals/postlude/flib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24532 Modified Files: makefile Log Message: Initial check in Index: makefile =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/flib/makefile,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** makefile 10 Jan 2006 11:48:59 -0000 1.1.1.1 --- makefile 7 Apr 2006 10:30:37 -0000 1.2 *************** *** 13,17 **** PDDIR = $(INSTALL_PREFIX)$(PDLIBDIR) ! TARGETS = sc~ ss~ irreg~ mspec~ peak~ pspec~ sfm~ trist~ pp~ bmax~ melf~ clean~ wdv~ hca~ --- 13,17 ---- PDDIR = $(INSTALL_PREFIX)$(PDLIBDIR) ! TARGETS = sc~ ss~ irreg~ mspec~ peak~ pspec~ sfm~ trist~ pp~ bmax~ melf~ clean~ wdv~ hca~ cross~ *************** *** 54,57 **** --- 54,58 ---- $(CC) $(PDNTCFLAGS) $(PDNTINCLUDE) -c src/wdv~.c $(CC) $(PDNTCFLAGS) $(PDNTINCLUDE) -c src/hca~.c + $(CC) $(PDNTCFLAGS) $(PDNTINCLUDE) -c src/cross~.c $(CC) $(PDNTCFLAGS) $(PDNTINCLUDE) /c $*.c link /dll /export:$(CSYM)_setup $(NAME).obj $(PDNTOBJECTS) $(PDNTLIB) *************** *** 89,92 **** --- 90,94 ---- $(CC) $(DARWINCFLAGS) $(DARWININCLUDE) -c src/wdv~.c $(CC) $(DARWINCFLAGS) $(DARWININCLUDE) -c src/hca~.c + $(CC) $(DARWINCFLAGS) $(DARWININCLUDE) -c src/cross~.c $(CC) $(DARWINCFLAGS) $(DARWININCLUDE) -c $*.c $(CC) -bundle -undefined suppress -flat_namespace -o $(NAME).pd_darwin $(NAME).o $(DARWINOBJECTS) *************** *** 126,130 **** $(LINUXOBJECTS): *.h ! LINUXCFLAGS = -DPD -O2 -fPIC -funroll-loops -Wall -W -Wshadow -Wstrict-prototypes -Werror -fomit-frame-pointer -Wno-unused -Wno-parentheses -Wno-switch $(AFLAGS) LINUXINCLUDE = -I/usr/include --- 128,132 ---- $(LINUXOBJECTS): *.h ! LINUXCFLAGS = -DPD -O3 -fPIC -funroll-loops -Wall -W -Wshadow -Wstrict-prototypes -Werror -fomit-frame-pointer -Wno-unused -Wno-parentheses -Wno-switch $(AFLAGS) LINUXINCLUDE = -I/usr/include *************** *** 146,149 **** --- 148,152 ---- $(CC) $(LINUXCFLAGS) $(LINUXINCLUDE) -c src/wdv~.c $(CC) $(LINUXCFLAGS) $(LINUXINCLUDE) -c src/hca~.c + $(CC) $(LINUXCFLAGS) $(LINUXINCLUDE) -c src/cross~.c $(CC) $(LINUXCFLAGS) $(LINUXINCLUDE) -c $*.c ld -export_dynamic -shared -o $(NAME).pd_linux $(NAME).o $(LINUXOBJECTS) -lc -lm

1 0

externals/postlude/dssi/src dssi~.c, 1.13, 1.14 dssi~.h, 1.10, 1.11
by Jamie Bullock 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/externals/postlude/dssi/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22375/src Modified Files: dssi~.c dssi~.h Log Message: Now sending note messages to instance 0 sends to all instances Index: dssi~.c =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/dssi/src/dssi~.c,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -d -r1.13 -r1.14 *** dssi~.c 29 Mar 2006 19:38:55 -0000 1.13 --- dssi~.c 7 Apr 2006 10:27:59 -0000 1.14 *************** *** 617,621 **** int n_instances = x->n_instances; ! if (instance > x->n_instances || instance < 0){ post("dssi~: control: invalid instance number %d", instance); return; --- 617,621 ---- int n_instances = x->n_instances; ! if (instance > x->n_instances || instance < -1){ post("dssi~: control: invalid instance number %d", instance); return; *************** *** 654,660 **** static void dssi_tilde_info (t_dssi_tilde *x){ ! unsigned int i; t_atom argv[7]; for(i = 0; i < x->descriptor->LADSPA_Plugin->PortCount; i++){ memcpy(&argv[0], &x->port_info[i].type, --- 654,664 ---- static void dssi_tilde_info (t_dssi_tilde *x){ ! unsigned int i, ! ctrl_portno, ! audio_portno; t_atom argv[7]; + ctrl_portno = audio_portno = 0; + for(i = 0; i < x->descriptor->LADSPA_Plugin->PortCount; i++){ memcpy(&argv[0], &x->port_info[i].type, *************** *** 671,675 **** sizeof(t_atom)); argv[2].a_type = A_FLOAT; ! argv[2].a_w.w_float = (t_float)i - 1; outlet_anything (x->control_outlet, gensym ("port"), 7, argv); } --- 675,684 ---- sizeof(t_atom)); argv[2].a_type = A_FLOAT; ! if(!strcmp(argv[1].a_w.w_symbol->s_name, "control")) ! argv[2].a_w.w_float = (t_float)++ctrl_portno; ! ! else if(!strcmp(argv[1].a_w.w_symbol->s_name, "audio")) ! argv[2].a_w.w_float = (t_float)++audio_portno; ! outlet_anything (x->control_outlet, gensym ("port"), 7, argv); } *************** *** 1297,1300 **** --- 1306,1311 ---- int param = (int)atom_getfloatarg(2, argc, argv); int val = (int)atom_getfloatarg(3, argc, argv); + int n_instances = x->n_instances; + switch (msg_type[0]){ case ASCII_n: ev_type = SND_SEQ_EVENT_NOTEON; *************** *** 1315,1319 **** #endif if(ev_type != 0){ ! MIDIbuf(ev_type, chan, param, val, x); } free(msg_type); --- 1326,1335 ---- #endif if(ev_type != 0){ ! if(chan > 0) ! MIDIbuf(ev_type, chan, param, val, x); ! else { ! while(n_instances--) ! MIDIbuf(ev_type, n_instances, param, val, x); ! } } free(msg_type); Index: dssi~.h =================================================================== RCS file: /cvsroot/pure-data/externals/postlude/dssi/src/dssi~.h,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** dssi~.h 29 Mar 2006 19:38:55 -0000 1.10 --- dssi~.h 7 Apr 2006 10:28:02 -0000 1.11 *************** *** 32,36 **** #include <stdio.h> #include <string.h> - #include <stdlib.h> /*for exit()*/ #include <sys/types.h> /* for fork() */ --- 32,35 ---- *************** *** 42,46 **** ! #define VERSION 0.94 #define EVENT_BUFSIZE 1024 #define OSC_BASE_MAX 1024 --- 41,45 ---- ! #define VERSION 0.95 #define EVENT_BUFSIZE 1024 #define OSC_BASE_MAX 1024

1 0

doc/tutorials/visual 02.gemwin_as_reference.pd, NONE, 1.1 TEMPLATE.pd, NONE, 1.1 gemwin_control-help.pd, NONE, 1.1 gemwin_control.pd, NONE, 1.1 05.lighting.pd, 1.1, 1.2 02.gemwin_as_reference copy.pd, 1.1, NONE
by Hans-Christoph Steiner 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/doc/tutorials/visual In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4937 Modified Files: 05.lighting.pd Added Files: 02.gemwin_as_reference.pd TEMPLATE.pd gemwin_control-help.pd gemwin_control.pd Removed Files: 02.gemwin_as_reference copy.pd Log Message: messed with template, the first few patches will just use straight gemwin while later ones will use gemwin_contorl --- NEW FILE: 02.gemwin_as_reference.pd --- #N canvas 548 149 480 369 10; #X obj 64 322 gemwin; #X obj 8 10 cnv 15 400 40 empty empty gemwin_as_pointer 20 12 0 24 -228992 -66577 0; #X msg 64 254 create; #X text 17 63 Gem is based on OpenGL \, which uses the graphics card to do the processing. That means that instead of directly controlling the data like you do with Pd messages or audio \, in Gem you are controlling a "pointer" to the data on the video card.; #X obj 302 323 gemwin; #X text 17 137 [gemwin] is a pointer to the output buffer of your video card. The screen you are looking at is that output buffer drawn to the screen.; #X msg 302 255 destroy; #X text 17 188 So even if there are multiple [gemwin] objects \, there is only one screen. Each [gemwin] object is then a pointer to the same window.; #X connect 2 0 0 0; #X connect 6 0 4 0; --- NEW FILE: TEMPLATE.pd --- #N canvas 15 58 628 448 10; #X obj 8 10 cnv 15 400 40 empty empty TEMPLATE 20 12 0 24 -228992 -66577 0; #X obj 465 16 gemwin_control; #X obj 466 60 import Gem; --- 02.gemwin_as_reference copy.pd DELETED --- --- NEW FILE: gemwin_control.pd --- #N canvas 224 95 713 582 10; #X obj 18 17 inlet; #X text 66 16 options pass-thru; #X obj 16 528 outlet; #X text 72 528 pass-thru; #X obj 17 503 gemwin \$1; #X obj 386 467 send GLOBAL_GEMWIN_CONTROL; #X obj 101 103 cnv 15 128 22 empty GLOBAL_GEMWIN_CONTROL_CANVAS gemwin 3 5 0 14 -233017 -33289 0; #X obj 200 102 tgl 17 0 \$0-render_toggle THIS_IS_TO_MAKE_THE_INLET_DISAPPEAR render -6 21 1 9 -233017 -33289 -33289 0 1; #X obj 159 102 tgl 17 0 \$0-window_toggle THIS_IS_TO_MAKE_THE_INLET_DISAPPEAR window -6 21 1 9 -233017 -33289 -33289 0 1; #X obj 155 49 receive GLOBAL_GEMWIN_CONTROL; #N canvas 77 396 762 359 window 0; #X obj 56 126 select 0; #X obj 107 146 bang; #X msg 107 166 reset \, create; #X msg 228 164 window set \$1; #X obj 321 115 select 0 1; #X msg 354 136 76; #X msg 321 136 10; #X msg 331 163 window color \$1 12 12; #X obj 93 235 outlet; #X obj 460 273 outlet; #X obj 58 6 inlet; #X text 106 7 window status; #X msg 527 164 render 0; #X obj 557 3 inlet; #X text 602 3 render status; #X obj 527 92 float; #X obj 58 47 trigger float bang; #X obj 58 28 route float; #X obj 527 143 select 1; #X text 488 66 turn off rendering \, if on; #X msg 27 166 destroy; #X text 146 26 TODO: don't receive message if status is the same; #X obj 527 118 change; #X connect 0 0 20 0; #X connect 0 1 1 0; #X connect 1 0 2 0; #X connect 2 0 8 0; #X connect 3 0 9 0; #X connect 4 0 6 0; #X connect 4 1 5 0; #X connect 5 0 7 0; #X connect 6 0 7 0; #X connect 7 0 9 0; #X connect 10 0 17 0; #X connect 12 0 9 0; #X connect 13 0 15 1; #X connect 15 0 22 0; #X connect 16 0 0 0; #X connect 16 0 4 0; #X connect 16 0 3 0; #X connect 16 1 15 0; #X connect 17 0 16 0; #X connect 18 0 12 0; #X connect 20 0 8 0; #X connect 22 0 18 0; #X restore 76 369 pd window logic; #X obj 41 153 receive \$0-window_toggle; #N canvas 472 123 674 370 render 0; #X obj 253 118 select 0 1; #X msg 286 149 76; #X msg 253 149 10; #X msg 138 187 render set \$1; #X msg 291 187 render color \$1 12 12; #X obj 23 286 outlet; #X text 75 288 to gemwin; #X obj 377 280 outlet; #X obj 160 10 inlet; #X text 206 10 render status; #X text 545 8 window status; #X obj 498 8 inlet; #X msg 468 184 window 1; #X obj 469 101 float; #X text 430 75 create window \, if not created; #X obj 469 152 select 0; #X obj 160 30 route float; #X obj 161 58 trigger float bang; #X msg 223 307 \; GLOBAL_GEMWIN_CONTROL_CANVAS color \$1 12 12; #X obj 469 128 change; #X obj 381 128 iemabs/once; #X connect 0 0 2 0; #X connect 0 1 1 0; #X connect 1 0 4 0; #X connect 1 0 18 0; #X connect 2 0 4 0; #X connect 2 0 18 0; #X connect 3 0 7 0; #X connect 4 0 7 0; #X connect 8 0 16 0; #X connect 11 0 13 1; #X connect 12 0 7 0; #X connect 13 0 19 0; #X connect 15 0 12 0; #X connect 16 0 17 0; #X connect 17 0 3 0; #X connect 17 0 0 0; #X connect 17 0 5 0; #X connect 17 1 13 0; #X connect 17 1 20 0; #X connect 19 0 15 0; #X connect 20 0 12 0; #X restore 300 369 pd render logic; #X obj 313 153 receive \$0-render_toggle; #X obj 155 72 route window render status; #X obj 301 230 float; #X obj 76 233 float; #X obj 263 153 bang; #X msg 529 250 status; #X obj 414 203 loadbang; #X obj 300 296 spigot 0; #X obj 77 296 spigot 0; #X obj 414 224 trigger bang bang; #X msg 414 250 1; #X text 354 187 first get status from existing objects; #X obj 76 255 change; #X obj 301 251 change; #X connect 0 0 4 0; #X connect 4 0 2 0; #X connect 9 0 14 0; #X connect 10 0 4 0; #X connect 10 1 5 0; #X connect 11 0 16 0; #X connect 12 0 4 0; #X connect 12 1 5 0; #X connect 13 0 15 0; #X connect 14 0 8 0; #X connect 14 1 7 0; #X connect 14 2 17 0; #X connect 15 0 26 0; #X connect 16 0 25 0; #X connect 17 0 15 0; #X connect 17 0 16 0; #X connect 18 0 5 0; #X connect 19 0 22 0; #X connect 20 0 12 0; #X connect 20 0 10 1; #X connect 21 0 10 0; #X connect 21 0 12 1; #X connect 22 0 23 0; #X connect 22 1 18 0; #X connect 23 0 20 1; #X connect 23 0 21 1; #X connect 25 0 21 0; #X connect 26 0 20 0; #X coords 0 -1 1 1 130 28 1 100 100; --- NEW FILE: gemwin_control-help.pd --- #N canvas 584 136 494 414 10; #X text 55 51 control the gemwin and rendering \, and see status; #X obj 67 130 gemwin_control; #X obj 241 129 gemwin_control; Index: 05.lighting.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/visual/05.lighting.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 05.lighting.pd 7 Apr 2006 05:22:42 -0000 1.1 --- 05.lighting.pd 7 Apr 2006 06:01:54 -0000 1.2 *************** *** 1,8 **** ! #N canvas 548 149 492 381 10; ! #X obj 11 9 cnv 15 400 40 empty empty lighting 20 12 0 24 -228992 -66577 0; ! #X obj 29 120 gemwin; ! #X msg 28 63 create \, 1; ! #X msg 42 90 destroy; ! #X connect 2 0 1 0; ! #X connect 3 0 1 0; --- 1,18 ---- ! #N canvas 362 246 632 452 10; ! #X obj 8 10 cnv 15 400 40 empty empty lighting 20 12 0 24 -228992 -66577 0; ! #X obj 465 16 gemwin_control; ! #X obj 466 60 import Gem; ! #X obj 29 150 gemwin; ! #X msg 29 119 lighting \$1; ! #X obj 29 101 tgl 15 1 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1 ! ; ! #X obj 72 294 world_light; ! #X obj 72 256 gemhead; ! #X obj 295 253 gemhead; ! #X obj 295 274 sphere 1 35; ! #X text 255 228 draw a sphere; ! #X connect 4 0 3 0; ! #X connect 5 0 4 0; ! #X connect 7 0 6 0; ! #X connect 8 0 9 0;

1 0

doc/tutorials/sound 01.hello_world.pd, NONE, 1.1 02.audio_data.pd, NONE, 1.1
by Hans-Christoph Steiner 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/doc/tutorials/sound In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10412/sound Added Files: 01.hello_world.pd 02.audio_data.pd Log Message: some basic structure for the five day intro to Pd workshop --- NEW FILE: 01.hello_world.pd --- #N canvas 15 58 626 395 10; #X obj 292 20 import cyclone; #X obj 533 20 pddp/dsp; #X obj 8 10 cnv 15 400 40 empty empty hello_world 20 12 0 24 -228992 -66577 0; #X obj 198 136 comment 400 14 Helvetica ? 0 0 0 0 2 create an object called: osc~; #X obj 198 106 comment 400 14 Helvetica ? 0 0 0 0 1 create a message box with the text: 200; #X obj 198 166 comment 400 14 Helvetica ? 0 0 0 0 3 create an object called: dac~; #X obj 198 196 comment 400 14 Helvetica ? 0 0 0 0 4 connect the message box to the osc~ object's left inlet; #X obj 198 226 comment 400 14 Helvetica ? 0 0 0 0 5 connect the osc~ object to both inlets of the dac~ object; #X obj 198 256 comment 400 14 Helvetica ? 0 0 0 0 6 make sure your volume is set very low; #X obj 198 286 comment 400 14 Helvetica ? 0 0 0 0 7 turn on DSP by clicking the box on the upper right corner; #X obj 198 316 comment 400 14 Helvetica ? 0 0 0 0 8 click the message box to hear sound; --- NEW FILE: 02.audio_data.pd --- #N canvas 15 58 624 444 10; #X obj 292 20 import cyclone; #X obj 236 244 *~; #X obj 253 217 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1 ; #X obj 236 186 osc~ 500; #X obj 224 288 dac~; #X msg 232 142 250; #X msg 267 143 500; #X msg 200 142 125; #X obj 533 20 pddp/dsp; #X text 62 373 TODO: find out how to type ~ on various keyboards; #X obj 29 68 comment 400 12 Helvetica ? 0 0 0 0 For audio \, Pd has a specific data type. It is represented by tilde ("~") objects and thick cords.; #X obj 87 168 comment 200 12 Helvetica ? 0 0 0 0 messages (thin cord) -->; #X obj 116 266 comment 200 12 Helvetica ? 0 0 0 0 audio (thick cord) -->; #X obj 8 10 cnv 15 400 40 empty empty audio_data 20 12 0 24 -228992 -66577 0; #X connect 1 0 4 0; #X connect 1 0 4 1; #X connect 2 0 1 1; #X connect 3 0 1 0; #X connect 5 0 3 0; #X connect 6 0 3 0; #X connect 7 0 3 0;

1 0

doc/tutorials/intro README.txt,1.1,1.2
by Hans-Christoph Steiner 07 Apr '06

07 Apr '06

Update of /cvsroot/pure-data/doc/tutorials/intro In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10412/intro Modified Files: README.txt Log Message: some basic structure for the five day intro to Pd workshop Index: README.txt =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/README.txt,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** README.txt 6 Apr 2006 23:56:54 -0000 1.1 --- README.txt 7 Apr 2006 05:22:41 -0000 1.2 *************** *** 7,11 **** Alexandre Castonguay - Andy Farnell Aymeric Mansoux Ben Bogart --- 7,10 ---- *************** *** 18,20 **** Miller Puckette Thomas Musil - Tom Erbe --- 17,18 ----

1 0

← Newer
1
...
20
21
22
23
24
25
26
27
28
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

Pd-cvs April 2006