Pd-cvs November 2005

pd-cvs@lists.iem.at

17 participants
497 discussions

abstractions/purepd README, NONE, 1.1 delta.pd, NONE, 1.1 float_argument.pd, NONE, 1.1 inv.pd, NONE, 1.1 oneshot.pd, NONE, 1.1 purepd_error.pd, NONE, 1.1 symbol_argument.pd, NONE, 1.1 velocity.pd, NONE, 1.1
by Hans-Christoph Steiner 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/abstractions/purepd In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31350 Added Files: README delta.pd float_argument.pd inv.pd oneshot.pd purepd_error.pd symbol_argument.pd velocity.pd Log Message: moved purepd from externals/hcs/ to abstractions --- NEW FILE: oneshot.pd --- #N canvas 108 421 470 320 10; #X msg 228 125 1; #X obj 150 20 inlet; #X obj 259 256 outlet; #X text 10 7 [oneshot]; #X text 309 255 bang; #X obj 228 99 t b b; #X msg 149 125 0; #X text 85 105 reset; #X obj 149 75 route clear; #X obj 149 102 bang; #X obj 259 206 select 0; #X obj 259 184 float 0; #X connect 0 0 11 1; #X connect 1 0 8 0; #X connect 5 0 0 0; #X connect 5 1 11 0; #X connect 6 0 11 1; #X connect 8 0 9 0; #X connect 8 1 5 0; #X connect 9 0 6 0; #X connect 10 0 2 0; #X connect 11 0 10 0; --- NEW FILE: float_argument.pd --- #N canvas 390 291 482 332 10; #X obj 143 96 f \$1; #X obj 244 203 outlet; #X obj 143 14 loadbang; #X text 40 248 If the argument is not equal to 0 \, use it. Pd init arguments to 0 so unused arguments will be 0; #X obj 194 153 select 0; #X obj 142 51 trigger bang bang; #X text 39 285 This is useful to have internals inited \, but not reset if there is no argument specified.; #X connect 0 0 4 0; #X connect 2 0 5 0; #X connect 4 1 1 0; #X connect 5 0 0 0; --- NEW FILE: purepd_error.pd --- #N canvas 0 22 454 304 10; #X obj 168 52 inlet; #X obj 167 186 print \$1_ERROR:; #X connect 0 0 1 0; --- NEW FILE: inv.pd --- #N canvas 682 147 454 304 10; #X obj 139 34 inlet; #X obj 152 255 outlet; #X obj 153 133 /; #X obj 140 88 t b f; #X msg 140 109 1; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 3 1 2 1; #X connect 4 0 2 0; --- NEW FILE: README --- PurePd is a library of objects are written purely in Pd. The idea is to replace standard externals with Pd objects so that Pd its more and more a language written in Pd. <hans(a)at.or.at> --- NEW FILE: delta.pd --- #N canvas 634 304 437 438 10; #X obj 114 136 f; #X obj 114 114 f; #X obj 85 71 t f b; #X obj 84 136 f; #X obj 97 166 -; #X obj 84 45 inlet; #X obj 135 381 outlet; #X obj 183 111 f \$1; #X obj 183 85 loadbang; #X obj 183 130 sel 2; #X text 228 117 go into 2nd order mode; #X obj 203 303 f; #X obj 203 281 f; #X obj 174 238 t f b; #X obj 173 303 f; #X obj 186 333 -; #X obj 97 212 spigot 1; #X obj 174 212 spigot 0; #X msg 147 183 0; #X msg 224 182 1; #X text 19 10 replacement for maxlib's [delta] written in Pd; #X connect 0 0 4 1; #X connect 1 0 0 0; #X connect 2 0 1 1; #X connect 2 0 3 0; #X connect 2 1 1 0; #X connect 3 0 4 0; #X connect 4 0 16 0; #X connect 4 0 17 0; #X connect 5 0 2 0; #X connect 7 0 9 0; #X connect 8 0 7 0; #X connect 9 0 19 0; #X connect 9 0 18 0; #X connect 11 0 15 1; #X connect 12 0 11 0; #X connect 13 0 12 1; #X connect 13 0 14 0; #X connect 13 1 12 0; #X connect 14 0 15 0; #X connect 15 0 6 0; #X connect 16 0 6 0; #X connect 17 0 13 0; #X connect 18 0 16 1; #X connect 19 0 17 1; --- NEW FILE: velocity.pd --- #N canvas 136 458 454 304 10; #X obj 177 14 inlet; #X obj 177 268 outlet; #X obj 177 64 t b b; #X obj 178 115 timer; #X msg 178 159 1000 \$1; #X obj 178 186 /; #X connect 0 0 2 0; #X connect 2 0 3 0; #X connect 2 1 3 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 1 0; --- NEW FILE: symbol_argument.pd --- #N canvas 0 22 454 304 10; #X obj 142 28 loadbang; #X obj 141 63 trigger bang bang; #X obj 256 92 symbol; #X obj 141 129 select symbol; #X obj 141 91 symbol \$1; #X obj 227 261 outlet; #X connect 0 0 1 0; #X connect 1 0 4 0; #X connect 1 1 2 0; #X connect 2 0 3 1; #X connect 3 1 5 0; #X connect 4 0 3 0;

1 0

abstractions/purepd - New directory
by Hans-Christoph Steiner 19 Nov '05

19 Nov '05

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

1 0

externals/zexy/src z~.c,1.2,1.3
by IOhannes m zmölnig 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/externals/zexy/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30938 Modified Files: z~.c Log Message: added 2nd inlet, so people recognize that the delay is settable on the fly (it has been so since the beginning, but people consider floats and signals to be the same so they believe that sending a number to the 1st inlet does not set the delay); this change is fully backwards compatible (sending a number to the 2nd inlet is the same as sending it to the 1st inlet) Index: z~.c =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/z~.c,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** z~.c 19 May 2005 09:42:55 -0000 1.2 --- z~.c 19 Nov 2005 16:25:25 -0000 1.3 *************** *** 102,105 **** --- 102,106 ---- x->phase = 0; + inlet_new(&x->x_obj, &x->x_obj.ob_pd, gensym("float"), gensym("ft1")); outlet_new(&x->x_obj, gensym("signal")); return (x); *************** *** 127,130 **** --- 128,132 ---- class_addfloat(zNdelay_class, zdel_float); + class_addmethod(zNdelay_class, (t_method)zdel_float, gensym("ft1"), A_FLOAT, 0); class_addmethod(zNdelay_class, (t_method)zdel_helper, gensym("help"), 0); class_sethelpsymbol(zNdelay_class, gensym("zexy/z~"));

1 0

[PD-cvs] externals/zexy/src Make.config, 1.1, 1.2 configure.ac, 1.9, 1.10
by IOhannes m zmölnig 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/externals/zexy/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29513 Modified Files: Make.config configure.ac Log Message: try to use -fPIC when compiling Index: configure.ac =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/configure.ac,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** configure.ac 27 Oct 2005 21:13:29 -0000 1.9 --- configure.ac 19 Nov 2005 16:18:18 -0000 1.10 *************** *** 128,131 **** --- 128,146 ---- + AC_MSG_CHECKING("PIC") + cat > conftest.c << EOF + int main(){ + return 0; + } + EOF + if ${CC} ${INCLUDES} ${DFLAGS} -o conftest.o conftest.c ${CFLAGS} -fPIC > /dev/null 2>&1 + then + echo "yes" + CFLAGS="${CFLAGS} -fPIC" + else + echo "no" + fi + + dnl if we don't have $LD set, we set it to $(CC) Index: Make.config =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/Make.config,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Make.config 27 Oct 2005 21:13:29 -0000 1.1 --- Make.config 19 Nov 2005 16:18:18 -0000 1.2 *************** *** 22,26 **** # ICCFLAGS=-march=pentiumiii -axK ! Z_CFLAGS = $(DEFS) $(IFLAGS) $(WFLAGS) -g -O2 -mms-bitfields -DPD $(CFLAGS) MAKEDEP_FLAGS = -MM --- 22,26 ---- # ICCFLAGS=-march=pentiumiii -axK ! Z_CFLAGS = $(DEFS) $(IFLAGS) $(WFLAGS) -g -O2 -mms-bitfields -fPIC -DPD $(CFLAGS) MAKEDEP_FLAGS = -MM

1 0

externals/unauthorized/scrolllist scrolllist.c,1.1,1.2
by Yves Degoyon 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/externals/unauthorized/scrolllist In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24901 Modified Files: scrolllist.c Log Message: fixed compilation warnings Index: scrolllist.c =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/scrolllist/scrolllist.c,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** scrolllist.c 19 Nov 2005 03:44:29 -0000 1.1 --- scrolllist.c 19 Nov 2005 15:57:52 -0000 1.2 *************** *** 436,440 **** sprintf(buf, "pdtk_scrolllist_dialog %%s %d %d %d %s %s %s %s\n", ! x->x_capacity, x->x_width, x->x_height, x->x_font, x->x_bgcolor, x->x_fgcolor, x->x_secolor ); --- 436,440 ---- sprintf(buf, "pdtk_scrolllist_dialog %%s %d %d %d %s %s %s %s\n", ! (int)x->x_capacity, (int)x->x_width, (int)x->x_height, x->x_font, x->x_bgcolor, x->x_fgcolor, x->x_secolor ); *************** *** 503,507 **** x->x_height = (int)argv[2].a_w.w_float; 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; strcpy( x->x_bgcolor, argv[6].a_w.w_symbol->s_name ); --- 503,507 ---- x->x_height = (int)argv[2].a_w.w_float; sprintf( x->x_font, "{%s %d %s}", argv[3].a_w.w_symbol->s_name, ! (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; strcpy( x->x_bgcolor, argv[6].a_w.w_symbol->s_name ); *************** *** 598,602 **** return; } ! sprintf( x->x_font, "{%s %d %s}", fname->s_name, (t_int)fsize, fcase->s_name ); x->x_charheight = (t_int)fsize; x->x_charwidth = (2*x->x_charheight)/3; --- 598,602 ---- return; } ! sprintf( x->x_font, "{%s %d %s}", fname->s_name, (int)fsize, fcase->s_name ); x->x_charheight = (t_int)fsize; x->x_charwidth = (2*x->x_charheight)/3; *************** *** 868,872 **** 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; } --- 868,872 ---- 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, ! (int)x->x_charheight, argv[5].a_w.w_symbol->s_name ); argoffset=0; }

1 0

scripts pd-mode.el,1.1,1.2
by Hans-Christoph Steiner 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/scripts In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12824 Modified Files: pd-mode.el Log Message: now colorizes all object names Index: pd-mode.el =================================================================== RCS file: /cvsroot/pure-data/scripts/pd-mode.el,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** pd-mode.el 17 Nov 2005 22:12:55 -0000 1.1 --- pd-mode.el 19 Nov 2005 06:27:40 -0000 1.2 *************** *** 63,72 **** (list (concat ; object types "^#X \$" ! (regexp-opt '("canvas" "connect" "floatatom" "msg" ! "obj" "restore" "scalar" "struct" "symbolatom" "text")) "\$ ") 1 'font-lock-type-face) ; connect numbers (list "^#X connect \$[0-9]+\$ [0-9]+ [0-9]+ [0-9]+" --- 63,77 ---- (list (concat ; object types "^#X \$" ! (regexp-opt '("connect" "floatatom" "msg" "obj" "scalar" "struct" "symbolatom" "text")) "\$ ") 1 'font-lock-type-face) + (list (concat ; object types + "\$^#[NX] " + (regexp-opt '("canvas" "restore")) + "\$ ") + 1 'font-lock-warning-face) + ; connect numbers (list "^#X connect \$[0-9]+\$ [0-9]+ [0-9]+ [0-9]+" *************** *** 88,114 **** (list "\$^#X\$" 0 'font-lock-builtin-face t) ! (list "\$^#N\$" 0 'font-lock-constant-face t) ; (list "^#N.*$" 0 'font-lock-comment-face t) ! (list (concat ; object names ! "\\Wobj\\W[0-9]+\\W[0-9]+\\W\$" ! (regexp-opt '("+" "+~" "-" "-~" ! "a2l" "adc~" "any2list" "bang" "bng" "cnv" ! "dac~" "del" "delay" ! "expr" ! "f" "float" ! "hsl" ! "i" "int" "loadbang" ! "makefilename" "metro" "mod" ! "openpanel" ! "pack" "pddp" "pddplink" ! "print" ! "r" "route" ! "s" "savepanel" "sel" "select" "symbol" ! "t" "tgl" "trigger" ! "unpack" "vsl")) ! "\$\\W") ! 1 'font-lock-constant-face))) "Expressions to highlight in Pd config buffers.") --- 93,109 ---- (list "\$^#X\$" 0 'font-lock-builtin-face t) ! ; (list "\$^#N\$" 0 'font-lock-constant-face t) ; (list "^#N.*$" 0 'font-lock-comment-face t) ! (list "^#X obj [0-9]+ [0-9]+ \$[a-zA-Z0-9+*._-]+\$[ ;]" ! 1 'font-lock-constant-face t) ! ! (list "^#X msg [0-9]+ [0-9]+ \$[a-zA-Z0-9+*._-]+\$;" ! 1 'font-lock-variable-name-face) ! ! ; (list "^#X text [0-9]+ [0-9]+ \$.*\$;" ! ; 1 'font-lock-comment-face) ! )) "Expressions to highlight in Pd config buffers.")

1 0

externals/unauthorized/scrolllist CHANGES.LOG, NONE, 1.1 INSTALL, NONE, 1.1 Makefile, NONE, 1.1 README, NONE, 1.1 Untitled-1.pd, NONE, 1.1 ave-lucifer.txt, NONE, 1.1 help-scrolllist.pd, NONE, 1.1 scrolllist.c, NONE, 1.1 scrolllist.pd_linux, NONE, 1.1 scrolllist.tk, NONE, 1.1 scrolllist.tk2c, NONE, 1.1 tk2c.bash, NONE, 1.1 yesterday.txt, NONE, 1.1
by Yves Degoyon 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/externals/unauthorized/scrolllist In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18936/scrolllist Added Files: CHANGES.LOG INSTALL Makefile README Untitled-1.pd ave-lucifer.txt help-scrolllist.pd scrolllist.c scrolllist.pd_linux scrolllist.tk scrolllist.tk2c tk2c.bash yesterday.txt Log Message: scrolllist 0.1 --- NEW FILE: scrolllist.c --- /*---------------------- scrolllist~ ------------------------------------------ */ /* */ /* scrolllist~ : scrolling list of text items */ /* constructor : scrolllist | scrolllist <capacity> <width> <height> */ /* */ /* Copyleft Yves Degoyon ( ydegoyon(a)free.fr ) */ /* */ /* 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. */ /* */ /* See file LICENSE for further informations on licensing terms. */ /* */ /* 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. */ /* */ [...961 lines suppressed...] scrolllist_widgetbehavior.w_getrectfn = scrolllist_getrect; scrolllist_widgetbehavior.w_displacefn = scrolllist_displace; scrolllist_widgetbehavior.w_selectfn = scrolllist_select; scrolllist_widgetbehavior.w_activatefn = NULL; scrolllist_widgetbehavior.w_deletefn = scrolllist_deleteobj; scrolllist_widgetbehavior.w_visfn = scrolllist_vis; scrolllist_widgetbehavior.w_clickfn = scrolllist_click; #if PD_MINOR_VERSION >= 37 class_setpropertiesfn(scrolllist_class, scrolllist_properties); class_setsavefn(scrolllist_class, scrolllist_save); #else scrolllist_widgetbehavior.w_propertiesfn = scrolllist_properties; scrolllist_widgetbehavior.w_savefn = scrolllist_save; #endif class_setwidget(scrolllist_class, &scrolllist_widgetbehavior); class_sethelpsymbol(scrolllist_class, gensym("help-scrolllist.pd")); } --- NEW FILE: scrolllist.pd_linux --- (This appears to be a binary file; contents omitted.) --- NEW FILE: ave-lucifer.txt --- (This appears to be a binary file; contents omitted.) --- NEW FILE: help-scrolllist.pd --- #N canvas 38 85 936 562 10; #X text 574 514 scrolllist 100 200 200; #X text 576 527 scrolllist; #X text 500 515 Examples :; #X text 72 507 Comments and bugs @ ydegoyon(a)free.fr; #X symbolatom 26 481 30 0 0 0 - - -; #X text 472 332 Note : you can scroll the list by dragging; #X msg 67 79 seek \$1; #X floatatom 127 81 5 0 0 0 - - -; #X text 444 129 Change the font; #X msg 116 129 font Helvetica normal 14; #X msg 297 129 font Courier bold 24; #X msg 128 157 scroll 200; #X msg 209 157 scroll -200; #X text 300 156 Scrolling by numbers for the laziest; #X obj 254 183 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X msg 164 183 graphics \$1; #X text 383 183 Show or hide graphics; #X msg 277 182 1; #X obj 310 183 loadbang; #X text 498 469 Scrollist lets you display text items in a patch window ; #X text 498 486 Constructor : scrolllist <capacity> <width> <height> | scrolllist ( defaults 100 400 200 ); #X text 168 73 You can seek in the text list; #X text 168 86 It behaves as a circular list; #X text 142 104 Sort the text items; #X text 248 481 Selected text item; #X text 470 397 with the "Properties" dialog; #X text 470 383 You can change all the properties of the object; #X msg 612 57 add \$1; #X text 666 58 add a text; #X obj 612 32 l2s; #X text 808 90 insert a text; #X msg 742 89 dystopia; #X msg 612 7 the aesthetics of our anger; #X msg 734 115 atacama; #X text 797 115 replace a text; #X text 828 149 delete a text; #X msg 611 89 insert \$1 3; #X obj 709 89 l2s; #X obj 705 115 l2s; #X msg 610 115 replace \$1 3; #X msg 612 149 delete \$1; #X obj 692 149 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1 -1 0; #X obj 555 269 textfile; #X msg 585 236 read yesterday.txt cr; #X msg 620 270 rewind; #X obj 527 269 l2s; #X msg 525 236 add \$1; #X obj 748 216 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 747 237 metro 1000; #X obj 35 222 scrolllist 25 400 200 {Helvetica 12 normal} black green #904562; #X text 470 343 the mouse in the text area; #X msg 33 57 clear; #X text 79 57 clear all; #X obj 482 270 t b; #X text 746 270 read a full text; #X msg 481 295 scroll 12; #X obj 585 213 loadbang; #X obj 73 237 r smsg; #X obj 62 383 s somsg; #X obj 26 455 r somsg; #X obj 14 176 s smsg; #X obj 557 295 s smsg; #X obj 573 176 s smsg; #X msg 95 105 sort; #X msg 617 295 read ave-lucifer.txt cr; #X connect 6 0 60 0; #X connect 7 0 6 0; #X connect 9 0 60 0; #X connect 10 0 60 0; #X connect 11 0 60 0; #X connect 12 0 60 0; #X connect 14 0 15 0; #X connect 15 0 60 0; #X connect 17 0 14 0; #X connect 18 0 17 0; #X connect 27 0 62 0; #X connect 29 0 27 0; #X connect 31 0 37 0; #X connect 32 0 29 0; #X connect 33 0 38 0; #X connect 36 0 62 0; #X connect 37 0 36 0; #X connect 38 0 39 0; #X connect 39 0 62 0; #X connect 40 0 62 0; #X connect 41 0 40 0; #X connect 42 0 45 0; #X connect 42 1 44 0; #X connect 43 0 42 0; #X connect 44 0 42 0; #X connect 45 0 46 0; #X connect 46 0 53 0; #X connect 46 0 61 0; #X connect 47 0 48 0; #X connect 48 0 42 0; #X connect 49 0 58 0; #X connect 51 0 60 0; #X connect 53 0 55 0; #X connect 55 0 61 0; #X connect 56 0 43 0; #X connect 57 0 49 0; #X connect 59 0 4 0; #X connect 63 0 60 0; #X connect 64 0 42 0; --- NEW FILE: Makefile --- NAME=scrolllist CSYM=scrolllist current: pd_linux INCLUDE = -I../../src # ----------------------- Mac OSX ----------------------- pd_darwin: $(NAME).pd_darwin .SUFFIXES: .pd_darwin DARWINCFLAGS = -DPD -O2 -Wall -W -Wshadow -Wstrict-prototypes \ -Wno-unused -Wno-parentheses -Wno-switch .c.pd_darwin: cc $(DARWINCFLAGS) $(INCLUDE) -o $*.o -c $*.c cc -bundle -undefined suppress -flat_namespace -o $*.pd_darwin $*.o rm -f $*.o ../$*.pd_darwin ln -s $*/$*.pd_darwin .. # ----------------------- LINUX i386 ----------------------- pd_linux: $(NAME).pd_linux .SUFFIXES: .pd_linux LINUXCFLAGS = -DPD -DUNIX -O2 -funroll-loops -fomit-frame-pointer \ -Wall -W -Wno-shadow -Wstrict-prototypes \ -Wno-unused -Wno-parentheses -Wno-switch -Werror -g .c.pd_linux: ./tk2c.bash < $*.tk > $*.tk2c gcc $(LINUXCFLAGS) $(INCLUDE) -o $*.o -c $*.c ld -export_dynamic -shared -o $*.pd_linux $*.o -lc -lm strip --strip-unneeded $*.pd_linux rm -f $*.o ../$*.pd_linux ln -s $*/$*.pd_linux .. # ---------------------------------------------------------- install: cp help-*.pd ../../doc/5.reference clean: rm -f *.o *.pd_* so_locations --- NEW FILE: tk2c.bash --- #!/bin/bash #set -x while read line do for word in $line do if [ "X"$word != "X"${word#\#} ] then echo // ${line#\#} break else line=${line//\'/\\\'} #useless, slashes never gets in line=${line//\\/\\\\} #this one's dirty, i know line=${line//;/\\\\;} line=${line//\"/\\\"} echo 'sys_gui("'$line'\n");' break fi done done --- NEW FILE: scrolllist.tk --- ############ scrolllist procedures -- ydegoyon(a)free.fr ######### proc scrolllist_apply {id} { # strip "." from the TK id to make a variable name suffix set vid [string trimleft $id .] # for each variable, make a local variable to hold its name... set var_graph_capacity [concat graph_capacity_$vid] global $var_graph_capacity set var_graph_width [concat graph_width_$vid] global $var_graph_width set var_graph_height [concat graph_height$vid] global $var_graph_height set var_graph_font [concat graph_font$vid] global $var_graph_font set var_graph_bgcolor [concat graph_bgcolor$vid] global $var_graph_bgcolor set var_graph_fgcolor [concat graph_fgcolor$vid] global $var_graph_fgcolor set var_graph_secolor [concat graph_secolor$vid] global $var_graph_secolor set cmd [concat $id dialog \ [eval concat $$var_graph_capacity] \ [eval concat $$var_graph_width] \ [eval concat $$var_graph_height] \ [eval concat $$var_graph_font] \ [eval concat $$var_graph_bgcolor] \ [eval concat $$var_graph_fgcolor] \ [eval concat $$var_graph_secolor] \ \;] #puts stderr $cmd pd $cmd } proc scrolllist_cancel {id} { set cmd [concat $id cancel \;] #puts stderr $cmd pd $cmd } proc scrolllist_ok {id} { scrolllist_apply $id scrolllist_cancel $id } proc pdtk_scrolllist_dialog {id capacity width height font bgcolor fgcolor secolor} { set vid [string trimleft $id .] set var_graph_capacity [concat graph_capacity_$vid] global $var_graph_capacity set var_graph_width [concat graph_width_$vid] global $var_graph_width set var_graph_height [concat graph_height$vid] global $var_graph_height set var_graph_font [concat graph_font$vid] global $var_graph_font set var_graph_bgcolor [concat graph_bgcolor$vid] global $var_graph_bgcolor set var_graph_fgcolor [concat graph_fgcolor$vid] global $var_graph_fgcolor set var_graph_secolor [concat graph_secolor$vid] global $var_graph_secolor set $var_graph_capacity $capacity set $var_graph_width $width set $var_graph_height $height set $var_graph_font $font set $var_graph_bgcolor $bgcolor set $var_graph_fgcolor $fgcolor set $var_graph_secolor $secolor toplevel $id wm title $id {scrolllist} wm protocol $id WM_DELETE_WINDOW [concat scrolllist_cancel $id] label $id.label -text {SCROLLLIST PROPERTIES} pack $id.label -side top frame $id.buttonframe pack $id.buttonframe -side bottom -fill x -pady 2m button $id.buttonframe.cancel -text {Cancel}\ -command "scrolllist_cancel $id" button $id.buttonframe.apply -text {Apply}\ -command "scrolllist_apply $id" button $id.buttonframe.ok -text {OK}\ -command "scrolllist_ok $id" pack $id.buttonframe.cancel -side left -expand 1 pack $id.buttonframe.apply -side left -expand 1 pack $id.buttonframe.ok -side left -expand 1 frame $id.1rangef pack $id.1rangef -side top label $id.1rangef.lcapacity -text "Capacity :" entry $id.1rangef.capacity -textvariable $var_graph_capacity -width 7 pack $id.1rangef.lcapacity $id.1rangef.capacity -side left frame $id.2rangef pack $id.2rangef -side top label $id.2rangef.lwidth -text "Width :" entry $id.2rangef.width -textvariable $var_graph_width -width 7 pack $id.2rangef.lwidth $id.2rangef.width -side left frame $id.3rangef pack $id.3rangef -side top label $id.3rangef.lheight -text "Height :" entry $id.3rangef.height -textvariable $var_graph_height -width 7 pack $id.3rangef.lheight $id.3rangef.height -side left frame $id.3_5rangef pack $id.3_5rangef -side top label $id.3_5rangef.lfont -text "Font :" entry $id.3_5rangef.font -textvariable $var_graph_font -width 30 pack $id.3_5rangef.lfont $id.3_5rangef.font -side left frame $id.4rangef pack $id.4rangef -side top label $id.4rangef.lbgcolor -text "Background Color :" entry $id.4rangef.bgcolor -textvariable $var_graph_bgcolor -width 7 pack $id.4rangef.lbgcolor $id.4rangef.bgcolor -side left frame $id.5rangef pack $id.5rangef -side top label $id.5rangef.lfgcolor -text "Foreground Color :" entry $id.5rangef.fgcolor -textvariable $var_graph_fgcolor -width 7 pack $id.5rangef.lfgcolor $id.5rangef.fgcolor -side left frame $id.6rangef pack $id.6rangef -side top label $id.6rangef.lsecolor -text "Selection Color :" entry $id.6rangef.secolor -textvariable $var_graph_secolor -width 7 pack $id.6rangef.lsecolor $id.6rangef.secolor -side left bind $id.1rangef.capacity <KeyPress-Return> [concat scrolllist_ok $id] bind $id.2rangef.width <KeyPress-Return> [concat scrolllist_ok $id] bind $id.3rangef.height <KeyPress-Return> [concat scrolllist_ok $id] bind $id.3_5rangef.font <KeyPress-Return> [concat scrolllist_ok $id] bind $id.4rangef.bgcolor <KeyPress-Return> [concat scrolllist_ok $id] bind $id.5rangef.fgcolor <KeyPress-Return> [concat scrolllist_ok $id] bind $id.6rangef.secolor <KeyPress-Return> [concat scrolllist_ok $id] } ############ scrolllist procedures END -- ydegoyon(a)free.fr ######### --- NEW FILE: yesterday.txt --- Yesterday All those backups seemed a waste of pay. Now my database has gone away. Oh I believe in yesterday. Suddenly, There's not half the files there used to be, And there's a milestone hanging over me The system crashed so suddenly. I pushed something wrong What it was I could not say. Now all my data's gone and I long for yesterday-ay-ay-ay. Yesterday, The need for back-ups seemed so far away. I knew my data was all here to stay, Now I believe in yesterday. Yesterday All those backups seemed a waste of pay. Now my database has gone away. Oh I believe in yesterday. Suddenly, There's not half the files there used to be, And there's a milestone hanging over me The system crashed so suddenly. I pushed something wrong What it was I could not say. Now all my data's gone and I long for yesterday-ay-ay-ay. Yesterday, The need for back-ups seemed so far away. I knew my data was all here to stay, Now I believe in yesterday. --- NEW FILE: Untitled-1.pd --- #N canvas 0 0 999 679 10; #N canvas 0 0 450 300 sub 1; #X obj -24 -13 scrolllist 100 400 200 {Helvetica 10 bold} white black red; #X msg 123 227 graphics 0; #X connect 1 0 0 0; #X coords 0 0 1 1 200 140 1; #X restore 206 100 pd sub; --- NEW FILE: INSTALL --- untar in /my/pd/dir/externs cd /my/pd/dir/externs/scrolllist make clean make make install open help-scrolllist.pd Thanx for getting here. Yves/ --- NEW FILE: README --- Version 0.01 copyleft 2001 by Yves Degoyon tarballs and updates available @ http://ydegoyon.free.fr/software.html scrolllist : displays and scrolls a text in a patch window To install scrolllist, follow the steps from INSTALL This software is published under GPL terms. This is software with ABSOLUTELY NO WARRANTY. Use it at your OWN RISK. It's possible to damage e.g. hardware or your hearing due to a bug or for other reasons. We do not warrant that the program is free of infringement of any third-party patents. ***************************************************************************** --- NEW FILE: CHANGES.LOG --- 0.1 initial version --- NEW FILE: scrolllist.tk2c --- // ########### scrolllist procedures -- ydegoyon(a)free.fr ######### sys_gui("proc scrolllist_apply {id} {\n"); // strip "." from the TK id to make a variable name suffix sys_gui("set vid [string trimleft $id .]\n"); // for each variable, make a local variable to hold its name... sys_gui("set var_graph_capacity [concat graph_capacity_$vid]\n"); sys_gui("global $var_graph_capacity\n"); sys_gui("set var_graph_width [concat graph_width_$vid]\n"); sys_gui("global $var_graph_width\n"); sys_gui("set var_graph_height [concat graph_height$vid]\n"); sys_gui("global $var_graph_height\n"); sys_gui("set var_graph_font [concat graph_font$vid]\n"); sys_gui("global $var_graph_font\n"); sys_gui("set var_graph_bgcolor [concat graph_bgcolor$vid]\n"); sys_gui("global $var_graph_bgcolor\n"); sys_gui("set var_graph_fgcolor [concat graph_fgcolor$vid]\n"); sys_gui("global $var_graph_fgcolor\n"); sys_gui("set var_graph_secolor [concat graph_secolor$vid]\n"); sys_gui("global $var_graph_secolor\n"); sys_gui("set cmd [concat $id dialog [eval concat $$var_graph_capacity] [eval concat $$var_graph_width] [eval concat $$var_graph_height] [eval concat $$var_graph_font] [eval concat $$var_graph_bgcolor] [eval concat $$var_graph_fgcolor] [eval concat $$var_graph_secolor] \\;]\n"); // puts stderr $cmd sys_gui("pd $cmd\n"); sys_gui("}\n"); sys_gui("proc scrolllist_cancel {id} {\n"); sys_gui("set cmd [concat $id cancel \\;]\n"); // puts stderr $cmd sys_gui("pd $cmd\n"); sys_gui("}\n"); sys_gui("proc scrolllist_ok {id} {\n"); sys_gui("scrolllist_apply $id\n"); sys_gui("scrolllist_cancel $id\n"); sys_gui("}\n"); sys_gui("proc pdtk_scrolllist_dialog {id capacity width height font bgcolor fgcolor secolor} {\n"); sys_gui("set vid [string trimleft $id .]\n"); sys_gui("set var_graph_capacity [concat graph_capacity_$vid]\n"); sys_gui("global $var_graph_capacity\n"); sys_gui("set var_graph_width [concat graph_width_$vid]\n"); sys_gui("global $var_graph_width\n"); sys_gui("set var_graph_height [concat graph_height$vid]\n"); sys_gui("global $var_graph_height\n"); sys_gui("set var_graph_font [concat graph_font$vid]\n"); sys_gui("global $var_graph_font\n"); sys_gui("set var_graph_bgcolor [concat graph_bgcolor$vid]\n"); sys_gui("global $var_graph_bgcolor\n"); sys_gui("set var_graph_fgcolor [concat graph_fgcolor$vid]\n"); sys_gui("global $var_graph_fgcolor\n"); sys_gui("set var_graph_secolor [concat graph_secolor$vid]\n"); sys_gui("global $var_graph_secolor\n"); sys_gui("set $var_graph_capacity $capacity\n"); sys_gui("set $var_graph_width $width\n"); sys_gui("set $var_graph_height $height\n"); sys_gui("set $var_graph_font $font\n"); sys_gui("set $var_graph_bgcolor $bgcolor\n"); sys_gui("set $var_graph_fgcolor $fgcolor\n"); sys_gui("set $var_graph_secolor $secolor\n"); sys_gui("toplevel $id\n"); sys_gui("wm title $id {scrolllist}\n"); sys_gui("wm protocol $id WM_DELETE_WINDOW [concat scrolllist_cancel $id]\n"); sys_gui("label $id.label -text {SCROLLLIST PROPERTIES}\n"); sys_gui("pack $id.label -side top\n"); sys_gui("frame $id.buttonframe\n"); sys_gui("pack $id.buttonframe -side bottom -fill x -pady 2m\n"); sys_gui("button $id.buttonframe.cancel -text {Cancel} -command \"scrolllist_cancel $id\"\n"); sys_gui("button $id.buttonframe.apply -text {Apply} -command \"scrolllist_apply $id\"\n"); sys_gui("button $id.buttonframe.ok -text {OK} -command \"scrolllist_ok $id\"\n"); sys_gui("pack $id.buttonframe.cancel -side left -expand 1\n"); sys_gui("pack $id.buttonframe.apply -side left -expand 1\n"); sys_gui("pack $id.buttonframe.ok -side left -expand 1\n"); sys_gui("frame $id.1rangef\n"); sys_gui("pack $id.1rangef -side top\n"); sys_gui("label $id.1rangef.lcapacity -text \"Capacity :\"\n"); sys_gui("entry $id.1rangef.capacity -textvariable $var_graph_capacity -width 7\n"); sys_gui("pack $id.1rangef.lcapacity $id.1rangef.capacity -side left\n"); sys_gui("frame $id.2rangef\n"); sys_gui("pack $id.2rangef -side top\n"); sys_gui("label $id.2rangef.lwidth -text \"Width :\"\n"); sys_gui("entry $id.2rangef.width -textvariable $var_graph_width -width 7\n"); sys_gui("pack $id.2rangef.lwidth $id.2rangef.width -side left\n"); sys_gui("frame $id.3rangef\n"); sys_gui("pack $id.3rangef -side top\n"); sys_gui("label $id.3rangef.lheight -text \"Height :\"\n"); sys_gui("entry $id.3rangef.height -textvariable $var_graph_height -width 7\n"); sys_gui("pack $id.3rangef.lheight $id.3rangef.height -side left\n"); sys_gui("frame $id.3_5rangef\n"); sys_gui("pack $id.3_5rangef -side top\n"); sys_gui("label $id.3_5rangef.lfont -text \"Font :\"\n"); sys_gui("entry $id.3_5rangef.font -textvariable $var_graph_font -width 30\n"); sys_gui("pack $id.3_5rangef.lfont $id.3_5rangef.font -side left\n"); sys_gui("frame $id.4rangef\n"); sys_gui("pack $id.4rangef -side top\n"); sys_gui("label $id.4rangef.lbgcolor -text \"Background Color :\"\n"); sys_gui("entry $id.4rangef.bgcolor -textvariable $var_graph_bgcolor -width 7\n"); sys_gui("pack $id.4rangef.lbgcolor $id.4rangef.bgcolor -side left\n"); sys_gui("frame $id.5rangef\n"); sys_gui("pack $id.5rangef -side top\n"); sys_gui("label $id.5rangef.lfgcolor -text \"Foreground Color :\"\n"); sys_gui("entry $id.5rangef.fgcolor -textvariable $var_graph_fgcolor -width 7\n"); sys_gui("pack $id.5rangef.lfgcolor $id.5rangef.fgcolor -side left\n"); sys_gui("frame $id.6rangef\n"); sys_gui("pack $id.6rangef -side top\n"); sys_gui("label $id.6rangef.lsecolor -text \"Selection Color :\"\n"); sys_gui("entry $id.6rangef.secolor -textvariable $var_graph_secolor -width 7\n"); sys_gui("pack $id.6rangef.lsecolor $id.6rangef.secolor -side left\n"); sys_gui("bind $id.1rangef.capacity <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("bind $id.2rangef.width <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("bind $id.3rangef.height <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("bind $id.3_5rangef.font <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("bind $id.4rangef.bgcolor <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("bind $id.5rangef.fgcolor <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("bind $id.6rangef.secolor <KeyPress-Return> [concat scrolllist_ok $id]\n"); sys_gui("}\n"); // ########### scrolllist procedures END -- ydegoyon(a)free.fr #########

1 0

externals/unauthorized/scrolllist - New directory
by Yves Degoyon 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/externals/unauthorized/scrolllist In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18690/scrolllist Log Message: Directory /cvsroot/pure-data/externals/unauthorized/scrolllist added to the repository

1 0

pd/src m_class.c,1.3.4.7.2.7,1.3.4.7.2.8
by Thomas Grill 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24918/src Modified Files: Tag: devel_0_39 m_class.c Log Message: small correction for successful compilation... Index: m_class.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/m_class.c,v retrieving revision 1.3.4.7.2.7 retrieving revision 1.3.4.7.2.8 diff -C2 -d -r1.3.4.7.2.7 -r1.3.4.7.2.8 *** m_class.c 15 Nov 2005 23:30:59 -0000 1.3.4.7.2.7 --- m_class.c 18 Nov 2005 23:20:16 -0000 1.3.4.7.2.8 *************** *** 364,372 **** } ! void class_addmethod(t_class *c, t_method fn, t_symbol *sel, t_atomtype arg1, ...) { char fmt[42],*f=fmt; va_list ap; va_start(ap,arg1); ! int t=arg1; for(;;) { if (!t) break; --- 364,374 ---- } ! void class_addmethod(t_class *c, t_method fn, t_symbol *sel, t_atomtype arg1, ...) ! { char fmt[42],*f=fmt; + int t; va_list ap; va_start(ap,arg1); ! t=arg1; for(;;) { if (!t) break;

1 0

abstractions/footils/list-abs list-l2s-help.pd, NONE, 1.1 list-l2s.pd, NONE, 1.1 README, 1.8, 1.9
by Frank Barknecht 19 Nov '05

19 Nov '05

Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23960 Modified Files: README Added Files: list-l2s-help.pd list-l2s.pd Log Message: added list-l2s Index: README =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/README,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** README 15 Nov 2005 12:24:03 -0000 1.8 --- README 18 Nov 2005 23:17:53 -0000 1.9 *************** *** 63,66 **** --- 63,71 ---- requires gem for visualisation. + list-l2s.pd + + Concatenate a list into a single symbol using ARG1 as delimiter. Delimiter + can be set through second inlet. + list-lastx.pd --- NEW FILE: list-l2s-help.pd --- #N canvas 333 384 543 295 10; #X msg 52 90 a b c d 1 2; #X msg 165 90 a b c d 1 2; #X msg 288 91 a b c d 1 2; #X symbolatom 165 154 15 0 0 0 - - -; #X symbolatom 52 155 10 0 0 0 - - -; #X symbolatom 288 154 25 0 0 0 - - -; #X obj 52 127 list-l2s; #X obj 165 126 list-l2s -; #X obj 288 124 list-l2s _|_; #X msg 395 90 symbol PD; #X text 54 42 Concatenate a list into a single symbol using ARG1 as delimiter. Delimiter can be set through second inlet.; #X text 55 20 list-l2s; #X connect 0 0 6 0; #X connect 1 0 7 0; #X connect 2 0 8 0; #X connect 6 0 4 0; #X connect 7 0 3 0; #X connect 8 0 5 0; #X connect 9 0 8 1; --- NEW FILE: list-l2s.pd --- #N canvas 424 382 729 381 10; #X msg 327 196 set %s; #X obj 235 244 t a; #X obj 118 252 makefilename %s; #X obj 96 62 t b a b; #X obj 96 283 symbol; #X msg 142 22 a b c d 1 2; #X obj 118 158 route symbol float; #X obj 118 186 symbol; #X obj 178 190 makefilename %d; #X obj 96 21 inlet; #X obj 96 313 outlet; #X obj 395 192 makefilename 1%s%%s; #X obj 395 165 symbol \$1; #X msg 405 123 bang; #X obj 395 89 loadbang; #X msg 395 228 set set \, adddollsym \$1; #X msg 235 265 set \$1%s; #N canvas 0 0 533 407 drip 0; #X obj 64 206 list split 1; #X obj 64 123 until; #X obj 64 181 list append; #X obj 194 206 bang; #X text 146 90 First store list \, then start the loop; #X text 163 118 "until" bangs its output until told to stop by a "bang" to its right inlet.; #X text 182 160 Store the remaining list.; #X text 239 205 third outlet of "split" tells us to stop.; #X obj 64 243 outlet; #X obj 64 57 inlet; #X text 237 44 From list-help.pd; #X obj 143 243 outlet; #X obj 64 86 t b a; #X connect 0 0 8 0; #X connect 0 1 2 1; #X connect 0 2 3 0; #X connect 0 2 11 0; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 3 0 1 1; #X connect 9 0 12 0; #X connect 12 0 1 0; #X connect 12 1 2 1; #X restore 118 123 pd drip; #X obj 447 124 inlet; #X connect 0 0 2 0; #X connect 1 0 16 0; #X connect 2 0 1 0; #X connect 2 0 4 1; #X connect 3 0 4 0; #X connect 3 1 17 0; #X connect 3 2 0 0; #X connect 4 0 10 0; #X connect 5 0 3 0; #X connect 6 0 7 0; #X connect 6 1 8 0; #X connect 7 0 2 0; #X connect 8 0 2 0; #X connect 9 0 3 0; #X connect 11 0 15 0; #X connect 12 0 11 0; #X connect 13 0 12 0; #X connect 14 0 12 0; #X connect 15 0 16 0; #X connect 16 0 2 0; #X connect 17 0 6 0; #X connect 18 0 12 0;

1 0

← Newer
1
...
26
27
28
29
30
31
32
...
50
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 November 2005