Pd-cvs April 2006

pd-cvs@lists.iem.at

15 participants
271 discussions

abstractions/pddp print_long.pd,1.2,1.3
by Hans-Christoph Steiner 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/abstractions/pddp In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11681 Modified Files: print_long.pd Log Message: made it blank by default (it had cruft saved in it) Index: print_long.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pddp/print_long.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** print_long.pd 12 Apr 2006 17:31:25 -0000 1.2 --- print_long.pd 12 Apr 2006 17:35:22 -0000 1.3 *************** *** 1,4 **** #N canvas 531 196 237 190 10; ! #X obj 1 1 cnv 15 198 16 empty \$0-pddp_print 61 2 8 1 14 -262144 -33289 0; #X obj 62 47 inlet; --- 1,4 ---- #N canvas 531 196 237 190 10; ! #X obj 1 1 cnv 15 198 16 empty \$0-pddp_print empty 2 8 1 14 -262144 -33289 0; #X obj 62 47 inlet;

1 0

abstractions/pddp print-help.pd, NONE, 1.1 print_long-help.pd, NONE, 1.1 print.pd, 1.1, 1.2 print_long.pd, 1.1, 1.2
by Hans-Christoph Steiner 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/abstractions/pddp In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9544 Modified Files: print.pd print_long.pd Added Files: print-help.pd print_long-help.pd Log Message: cleaned up and ported to GOP 0.39, namespaces, and added helpfiles Index: print_long.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pddp/print_long.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** print_long.pd 21 Nov 2005 15:54:14 -0000 1.1 --- print_long.pd 12 Apr 2006 17:31:25 -0000 1.2 *************** *** 1,11 **** ! #N canvas 273 236 233 186 10; ! #X obj 0 0 cnv 15 200 20 empty \$0-pddp_print 61 5 10 1 14 -233017 ! -33289 0; ! #X obj 62 130 s \$0-pddp_print; ! #X obj 62 104 prepend label; #X obj 62 47 inlet; ! #X obj 62 77 list2symbol; ! #X connect 2 0 1 0; ! #X connect 3 0 4 0; ! #X connect 4 0 2 0; ! #X coords 0 0 1 1 200 20 1; --- 1,11 ---- ! #N canvas 531 196 237 190 10; ! #X obj 1 1 cnv 15 198 16 empty \$0-pddp_print 61 2 8 1 14 -262144 -33289 ! 0; #X obj 62 47 inlet; ! #X obj 62 130 send \$0-pddp_print; ! #X obj 62 104 cyclone/prepend label; ! #X obj 62 77 zexy/list2symbol; ! #X connect 1 0 4 0; ! #X connect 3 0 2 0; ! #X connect 4 0 3 0; ! #X coords 0 -1 1 1 200 18 1 0 0; --- NEW FILE: print-help.pd --- #N canvas 246 157 454 304 10; #X obj 151 182 pddp/print; #X text 17 48 this object is for displaying generic messages in the patch rather than in the Pd window.; #X msg 61 114 word; #X msg 131 114 symbol asdf; #X msg 234 114 list 1 2 3; #X msg 234 147 selector series of 4; #X connect 2 0 0 0; #X connect 3 0 0 0; #X connect 4 0 0 0; #X connect 5 0 0 0; Index: print.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pddp/print.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** print.pd 21 Nov 2005 15:54:14 -0000 1.1 --- print.pd 12 Apr 2006 17:31:25 -0000 1.2 *************** *** 1,11 **** ! #N canvas 273 236 140 203 10; ! #X obj 0 0 cnv 15 100 20 empty \$0-pddp_print empty 5 11 1 16 -233017 ! -33289 0; ! #X obj 10 156 s \$0-pddp_print; ! #X obj 10 130 prepend label; #X obj 9 48 inlet; ! #X obj 9 78 list2symbol; ! #X connect 2 0 1 0; ! #X connect 3 0 4 0; ! #X connect 4 0 2 0; ! #X coords 0 0 1 1 100 20 1; --- 1,13 ---- ! #N canvas 183 209 335 309 10; #X obj 9 48 inlet; ! #X obj 10 156 send \$0-pddp_print; ! #X obj 9 78 zexy/list2symbol; ! #X obj 9 110 cyclone/prepend label; ! #X obj 85 1 cnv 15 15 18 empty empty empty 20 12 0 14 -262144 -66577 ! 0; ! #X obj 1 3 cnv 15 98 16 empty \$0-pddp_print selector series of 4 5 ! 8 1 16 -262144 -33289 0; ! #X connect 0 0 2 0; ! #X connect 2 0 3 0; ! #X connect 3 0 1 0; ! #X coords 0 -1 1 1 100 20 1 0 0; --- NEW FILE: print_long-help.pd --- #N canvas 93 178 454 304 10; #X text 13 30 this object is for displaying generic messages in the patch rather than in the Pd window.; #X msg 41 114 word; #X msg 111 114 symbol asdf; #X msg 214 114 list 1 2 3; #X msg 234 162 selector series of 4; #X text 33 68 its got a longer box and its closed on four sides; #X obj 140 195 pddp/print_long; #X obj 83 93 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 4900 1; #X msg 229 138 list of words?; #X text 11 237 because of Pd's type handling \, it strips off data selectors "float" \, "symbol" and "list".; #X connect 1 0 6 0; #X connect 2 0 6 0; #X connect 3 0 6 0; #X connect 4 0 6 0; #X connect 7 0 6 0; #X connect 8 0 6 0;

1 0

pd/src desire.tk,1.1.2.151,1.1.2.152
by chunlee 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17068 Modified Files: Tag: devel_0_39 desire.tk Log Message: forgot some typos... duh.... Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.151 retrieving revision 1.1.2.152 diff -C2 -d -r1.1.2.151 -r1.1.2.152 *** desire.tk 12 Apr 2006 15:41:53 -0000 1.1.2.151 --- desire.tk 12 Apr 2006 16:11:14 -0000 1.1.2.152 *************** *** 1326,1330 **** text $t -height 1 -width [expr [string length $@text]+1] -relief flat \ -bg ${look(objectbg)} -borderwidth 0 -highlightthickness 0\ ! -font $font(str) #text $t -height 1 -width $@textchars -relief flat \ # -bg ${look(objectbg)} -borderwidth 0 -highlightthickness 0\ --- 1326,1330 ---- text $t -height 1 -width [expr [string length $@text]+1] -relief flat \ -bg ${look(objectbg)} -borderwidth 0 -highlightthickness 0\ ! -font $font(str) -fg $look(objectfg) #text $t -height 1 -width $@textchars -relief flat \ # -bg ${look(objectbg)} -borderwidth 0 -highlightthickness 0\ *************** *** 1335,1339 **** mset {cx cy} [$self xy] .$(a)canvas.c create window [expr $cx+2] [expr $cy+2] \ ! -window $t -anchor nw -tags "${self}text $self" #$self draw $t configure -pady 0 -padx 1 --- 1335,1339 ---- mset {cx cy} [$self xy] .$(a)canvas.c create window [expr $cx+2] [expr $cy+2] \ ! -window $t -anchor nw -tags "${self}text $self" #$self draw $t configure -pady 0 -padx 1 *************** *** 2117,2121 **** set p $self$type$port set outline [switch $type {i {concat $look(outletfg)} o {concat $look(inletfg)}}] ! $c create rectangle [l+ [$c coords $p] {-4 -4 +4 +4}] -outline $outline -width 1 -tags ${p}b -fill switch $type {i {set tip "inlet $port"} o {set tip "outlet $port"}} $@canvas show_tooltip $x $y $tip --- 2117,2121 ---- set p $self$type$port set outline [switch $type {i {concat $look(outletfg)} o {concat $look(inletfg)}}] ! $c create rectangle [l+ [$c coords $p] {-4 -4 +4 +4}] -outline $outline -width 1 -tags ${p}b switch $type {i {set tip "inlet $port"} o {set tip "outlet $port"}} $@canvas show_tooltip $x $y $tip

1 0

pd/src desire.tk,1.1.2.150,1.1.2.151
by chunlee 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28218 Modified Files: Tag: devel_0_39 desire.tk Log Message: first attempt in making a config file for the $look Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.150 retrieving revision 1.1.2.151 diff -C2 -d -r1.1.2.150 -r1.1.2.151 *** desire.tk 10 Apr 2006 23:39:49 -0000 1.1.2.150 --- desire.tk 12 Apr 2006 15:41:53 -0000 1.1.2.151 *************** *** 544,548 **** def client open_file {} { global pd_opendir ! set filename [tk_getOpenFile -defaultextension .pd \ -filetypes { {{pd files} {.pd}} {{max files} {.pat}}} \ -initialdir $pd_opendir] --- 544,548 ---- def client open_file {} { global pd_opendir ! set hname [tk_getOpenFile -defaultextension .pd \ -filetypes { {{pd files} {.pd}} {{max files} {.pat}}} \ -initialdir $pd_opendir] *************** *** 681,684 **** --- 681,686 ---- set look(iowidth) 7 set look(iopos) 0 + set look(inletfg) #ff0000 + set look(outletfg) #ff0000 set look(objectfg) #000000 set look(objectbg) #ffffff *************** *** 689,698 **** set look(canvasbgrun) #ffffff set look(canvasbgedit) #dddddd set look(wirefg) #888888 set look(wirefg2) #ee0000 set look(sliderbg) #ccebff #set look(sliderbg) #ffeedd ! set look(inletfg) #ff0000 ! set look(outletfg) #ff0000 set look(extrapix) [switch $OS { osx {concat 2} --- 691,702 ---- set look(canvasbgrun) #ffffff set look(canvasbgedit) #dddddd + set look(selrect) #ff12ff set look(wirefg) #888888 set look(wirefg2) #ee0000 + set look(wirethick) 1 + set look(wiredash) #ee0012 set look(sliderbg) #ccebff #set look(sliderbg) #ffeedd ! set look(extrapix) [switch $OS { osx {concat 2} *************** *** 701,704 **** --- 705,745 ---- #-----------------------------------------------------------------------------------# + proc read_ddrc {} { + global look + set file [open "~/.ddrc" "RDONLY CREAT"] + set dd_config [read $file] + close $file + + set lines [split $dd_config "\n"] + foreach line $lines { + # comments begins with "#", and is skipped + if {[regexp {^#} $line comment]} {} else { + + if {[regexp {^-[a-zA-Z]{2,10}} $line option]} { + + foreach {word1 word2 word3} $line { + puts "word:: $word1 | $word2 | $word3" + set word1 [string replace $word1 0 0] + + switch $word1 { + look { + set look($word2) $word3 + puts "look($word2) $word3" + } + font { + puts "settings for font" + } + default { + puts "settings for something" + } + } + + } + } + } + } + } + read_ddrc + #-----------------------------------------------------------------------------------# set pd_apilist "{ALSA 1}" *************** *** 1730,1733 **** --- 1771,1775 ---- def* canvas clickedit {x y b f} { + global look set c .[$self canvas].c mset {type id} [$self identify_target $x $y $b $f "click"] *************** *** 1740,1744 **** set @action rect $c create line $x $y $x $y $x $y $x $y $x $y \ ! -tags {selrect1 selrect} -fill black -dash {3 3 3 3} -dashoffset 3 return } --- 1782,1786 ---- set @action rect $c create line $x $y $x $y $x $y $x $y $x $y \ ! -tags {selrect1 selrect} -fill black -dash {3 3 3 3} -dashoffset 3 -fill $look(selrect) return } *************** *** 1763,1767 **** set out [expr int(($x-$x1)*$outs/($x2-$x1))] mset {x1 y1 x2 y2} [$c bbox ${id}o${out}] ! $c create line [expr ($x1+$x2)/2] [expr ($y1+$y2)/2] $x $y -dash {4 4 4 4} -tags lnew set @wire_from [list $id $out] set @action wire --- 1805,1809 ---- set out [expr int(($x-$x1)*$outs/($x2-$x1))] mset {x1 y1 x2 y2} [$c bbox ${id}o${out}] ! $c create line [expr ($x1+$x2)/2] [expr ($y1+$y2)/2] $x $y -dash {4 4 4 4} -tags lnew -fill $look(wiredash) set @wire_from [list $id $out] set @action wire *************** *** 1870,1873 **** --- 1912,1923 ---- } move { + puts "something moved ::: $@selection" + + #foreach obj $@selection { + ##this could be wrong.... + #mset {x y} [$obj xy] + #pd .$self object_moveto !$obj $x $y + #} + #puts "....select_by:$@select_by" #if {$@select_by == "click"} { *************** *** 2067,2071 **** set p $self$type$port set outline [switch $type {i {concat $look(outletfg)} o {concat $look(inletfg)}}] ! $c create rectangle [l+ [$c coords $p] {-4 -4 +4 +4}] -outline $outline -width 1 -tags ${p}b switch $type {i {set tip "inlet $port"} o {set tip "outlet $port"}} $@canvas show_tooltip $x $y $tip --- 2117,2121 ---- set p $self$type$port set outline [switch $type {i {concat $look(outletfg)} o {concat $look(inletfg)}}] ! $c create rectangle [l+ [$c coords $p] {-4 -4 +4 +4}] -outline $outline -width 1 -tags ${p}b -fill switch $type {i {set tip "inlet $port"} o {set tip "outlet $port"}} $@canvas show_tooltip $x $y $tip *************** *** 2098,2102 **** def* wire draw {} { global look ! set thick 2 puts "------- from:$@obj1 outlet:$@port1 to:$@obj2 inlet:$@port2" set bbox1 [.$(a)canvas.c bbox [join [list "$@obj1" o "$@port1"] ""]] --- 2148,2152 ---- def* wire draw {} { global look ! #set thick 2 puts "------- from:$@obj1 outlet:$@port1 to:$@obj2 inlet:$@port2" set bbox1 [.$(a)canvas.c bbox [join [list "$@obj1" o "$@port1"] ""]] *************** *** 2109,2112 **** --- 2159,2163 ---- set xys [list $x1 $y1 $x2 $y2] set length [expr sqrt(pow($x2-$x1,2)+pow($y2-$y1,2))] + # how to customise the arrow size/shape? set arrowsize [expr $length<100 ? $length/10 : 10] if {$arrowsize < 5} {set arrow none} {set arrow last} *************** *** 2115,2119 **** if {$@select_by == "selrect"} {set wire_color $look(wirefg2)} {set wire_color $look(wirefg)} #set wire_color $look(wirefg) ! $self item WIRE line $xys -width $thick -smooth yes \ -arrow $arrow -arrowshape $arrowshape -fill $wire_color --- 2166,2170 ---- if {$@select_by == "selrect"} {set wire_color $look(wirefg2)} {set wire_color $look(wirefg)} #set wire_color $look(wirefg) ! $self item WIRE line $xys -width $look(wirethick) -smooth yes \ -arrow $arrow -arrowshape $arrowshape -fill $wire_color *************** *** 3415,3416 **** --- 3466,3468 ---- post_hierarchy thing +

1 0

doc/tutorials/intro keywords.pd, NONE, 1.1 number_limitations.pd, NONE, 1.1 TEMPLATE.pd, 1.2, 1.3
by Hans-Christoph Steiner 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/doc/tutorials/intro In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4126 Modified Files: TEMPLATE.pd Added Files: keywords.pd number_limitations.pd Log Message: raw sketches, incomplete ideas --- NEW FILE: keywords.pd --- #N canvas 21 40 643 459 12; #X obj -39 10 cnv 15 400 40 empty empty keywords 20 12 0 24 -228992 -66577 0; #X text 127 126 float; #X text 127 106 bang; #X text 127 146 list; #X text 127 166 pointer; #X text 127 186 symbol; Index: TEMPLATE.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/TEMPLATE.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** TEMPLATE.pd 12 Apr 2006 14:20:34 -0000 1.2 --- TEMPLATE.pd 12 Apr 2006 14:23:54 -0000 1.3 *************** *** 1,3 **** #N canvas 21 40 639 455 12; ! #X obj -39 10 cnv 15 400 40 empty empty TEMPLATE 20 12 0 24 -228992 -66577 0; --- 1,3 ---- #N canvas 21 40 639 455 12; ! #X obj -34 8 cnv 15 400 40 empty empty TEMPLATE 20 12 0 24 -228992 -66577 0; --- NEW FILE: number_limitations.pd --- #N canvas 399 275 659 475 12; #X obj -30 9 cnv 15 400 40 empty empty number_limitations 20 12 0 24 -228992 -66577 0; #X text 13 146 NaN; #X text 76 147 -inf; #X text 144 148 inf; #X text -19 233 rounding errors; #X floatatom -8 381 12 999900 1e+20 0 - - -; #X text -19 343 Pd can only display 6 significant digits:; #X text -17 421 If you are fortunate enough to have a 64-bit system \, then you can have much longer numbers.; #X floatatom -7 311 12 0 0 0 - - -; #X text 103 267 999999 + 999999 = 1 \, 999 \, 998; #X msg -7 258 999999; #X obj -7 285 + 999999; #X obj -19 204 pddp/pddplink http://en.wikipedia.org/wiki/Real_numbers ; #X text -23 61 Computers use floating point numbers to try to represent real numbers (a real number is any number that could be plotted on a line).; #X text 118 379 <-- scroll up to see; #X text 127 312 == 2 \, OOO \, OOO; #X connect 10 0 11 0; #X connect 11 0 8 0;

1 0

doc/tutorials/intro trigger_conversion.pd, NONE, 1.1 floats_and_ints.pd, NONE, 1.1 typing_conventions.pd, NONE, 1.1
by Hans-Christoph Steiner 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/doc/tutorials/intro In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4015 Added Files: trigger_conversion.pd floats_and_ints.pd typing_conventions.pd Log Message: created some usable sketches --- NEW FILE: floats_and_ints.pd --- #N canvas 338 33 639 455 12; #X obj -47 -1 cnv 15 400 40 empty empty floats_and_ints 20 12 0 24 -228992 -66577 0; #X text -40 55 In Pd \, there is only one kind of number \, its generally known as a "float" \, which is a word used in programming to mean a "floating point number" \, i.e. a number with a decimal point in it. ; #X text -34 237 Oftentimes \, its useful to use integers. For this there is the [int] object.; #X text 26 144 4.5; #X text 69 200 1.234e+07; #X text 178 157 -0.0032; #X text 313 173 4.3332; #X obj 213 317 int; #X floatatom 213 353 5 0 0 1 int - -; #X floatatom 154 353 5 0 0 0 float - -; #X obj 216 281 hsl 128 15 0 20 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 2800 1; #X text -32 391 floats and ints are direct representations of how your CPU handles numbers.; #X connect 7 0 8 0; #X connect 10 0 9 0; #X connect 10 0 7 0; --- NEW FILE: trigger_conversion.pd --- #N canvas 227 116 643 459 12; #X obj -32 7 cnv 15 400 40 empty empty trigger_conversion 20 12 0 24 -228992 -66577 0; #X obj 126 187 trigger anything float bang; #X text -21 80 [trigger] can also do conversions in addition to ordering. The keyword "anything" tells [trigger] to do no conversion.; #X msg 125 142 float 45.234; #X floatatom 128 213 5 0 0 0 - - -; #X floatatom 263 212 5 0 0 0 - - -; #X obj 404 211 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 10 296 12 45 blah; #X msg 131 295 blah; #X msg 189 296 123; #X msg 233 295 symbol test; #X obj 128 368 print bang; #X obj 128 342 trigger bang anything; #X obj 333 368 print anything; #X connect 1 0 4 0; #X connect 1 1 5 0; #X connect 1 2 6 0; #X connect 3 0 1 0; #X connect 7 0 12 0; #X connect 8 0 12 0; #X connect 9 0 12 0; #X connect 10 0 12 0; #X connect 12 0 11 0; #X connect 12 1 13 0; --- NEW FILE: typing_conventions.pd --- #N canvas 468 219 647 458 12; #X obj -29 10 cnv 15 400 40 empty empty typing_conventions 20 12 0 24 -228992 -66577 0; #X text 17 160 an object is a word surrounded by two square brackets ; #X text -18 135 [route] ==; #X obj 95 136 route; #X msg 106 203 my msg; #X text -18 202 [my msg( ==; #X text -18 290 You can even make ASCII patches:; #X msg 344 310 bang; #X obj 344 349 delay 500; #X text -1 318 [bang(; #X text 2 335 |; #X text -1 351 [delay 500]; #X text 2 371 |; #X text 204 350 ==; #X text -1 388 [print why?]; #X obj 344 388 print why?; #X text -26 72 When typing out various Pd elements \, there are a couple conventions:; #X text 17 230 an message is a word preceeded by an open square bracket and terminated by an open parenthesis; #X connect 7 0 8 0; #X connect 8 0 15 0;

1 0

externals/OSCx/src sendOSC.c,1.5,1.6
by IOhannes m zmölnig 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/externals/OSCx/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1113 Modified Files: sendOSC.c Log Message: applied patch [ 1446663 ] in order to use typed list-elements instead of reparsing the send-string (up till now the list to send was converted to a string and this string was then converted into an OSC-message; this prevented us from sending of a symbol "12" (instead it became a float 12) Index: sendOSC.c =================================================================== RCS file: /cvsroot/pure-data/externals/OSCx/src/sendOSC.c,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** sendOSC.c 30 Aug 2005 20:54:05 -0000 1.5 --- sendOSC.c 12 Apr 2006 14:21:34 -0000 1.6 *************** *** 44,47 **** --- 44,48 ---- -- ost_at_test.at + i22_at_test.at, 2000-2002 modified to compile as pd externel + --20060308 MP clear out some unused code and improve conversion from pd types to OSC types */ *************** *** 60,72 **** #include <string.h> [...1089 lines suppressed...] - } - } - - if (!SynthControl_willMessageFit(buf, size)) { - send_complain("Message \"%s\" won't fit in buffer: dropping.", messageName); - return; - } - #endif --- 544,554 ---- } ! void SendData(void *htmsocket, int size, char *data) ! { ! if (!SendHTMSocket(htmsocket, size, data)) ! { post("SendData::SendHTMSocket()failure -- not connected"); CloseHTMSocket(htmsocket); } }

1 0

doc/tutorials/intro 00.hello_world.pd, 1.2, 1.3 gui_objects.pd, 1.1, 1.2 outlet_order.pd, 1.2, 1.3 ordering_messages.pd, 1.1, 1.2 TEMPLATE.pd, 1.1, 1.2 TODO, 1.2, 1.3
by Hans-Christoph Steiner 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/doc/tutorials/intro In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2026 Modified Files: 00.hello_world.pd gui_objects.pd outlet_order.pd ordering_messages.pd TEMPLATE.pd TODO Log Message: minor fixes, updates, and wording updates Index: ordering_messages.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/ordering_messages.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** ordering_messages.pd 7 Apr 2006 00:15:27 -0000 1.1 --- ordering_messages.pd 12 Apr 2006 14:20:34 -0000 1.2 *************** *** 1,42 **** ! #N canvas 570 267 619 435 12; #X obj -60 8 cnv 15 400 40 empty empty ordering_messages 20 12 0 24 -228992 -66577 0; ! #X obj 214 364 t f b s l p a; ! #X text 64 362 abbreviations:; ! #X obj -26 396 trigger float bang symbol list pointer anything; ! #X obj 239 89 trigger; ! #X msg 471 223 now; ! #X msg 392 223 this; ! #X msg 313 223 makes; ! #X msg 234 223 sense; ! #X msg 156 223 !; ! #X msg 232 326; ! #X obj 233 265 symbol; ! #X msg 233 289 add2 \$1; ! #X msg 196 133 bang; ! #X text -56 54 The [trigger] object allows you to specify the order ! of execution. If you need to make sure that one thing executes before ! another \, use:; ! #X msg 3 155 set; ! #X text -62 155 reset:; ! #X obj 196 160 trigger bang bang bang bang bang; ! #X msg 88 154 bang; ! #X connect 5 0 11 0; ! #X connect 6 0 11 0; ! #X connect 7 0 11 0; ! #X connect 8 0 11 0; #X connect 9 0 11 0; ! #X connect 11 0 12 0; ! #X connect 12 0 10 0; ! #X connect 13 0 17 0; ! #X connect 15 0 10 0; ! #X connect 17 0 9 0; ! #X connect 17 1 8 0; ! #X connect 17 2 7 0; ! #X connect 17 3 6 0; ! #X connect 17 4 5 0; ! #X connect 18 0 8 0; ! #X connect 18 0 9 0; ! #X connect 18 0 6 0; ! #X connect 18 0 7 0; ! #X connect 18 0 5 0; --- 1,42 ---- ! #N canvas 542 117 623 439 12; #X obj -60 8 cnv 15 400 40 empty empty ordering_messages 20 12 0 24 -228992 -66577 0; ! #X msg 395 249 now; ! #X msg 316 250 this; ! #X msg 237 250 makes; ! #X msg 158 250 sense; ! #X msg 80 250 !; ! #X msg 276 391 sense now this; ! #X obj 157 292 symbol; ! #X msg 159 151 bang; ! #X msg -27 177 bang; ! #X msg 157 316 add2 \$1; ! #X msg 478 248 set; ! #X obj 160 178 trigger bang bang bang bang bang bang; ! #X text -18 393 look here for the result -->; ! #X text -50 62 Officially \, the execution order in Pd is undefined. ! ; ! #X text -50 88 The [trigger] object allows you to specify the order ! of messages are sent. If you need to make sure that one thing runs ! before another \, use [trigger]:; ! #X connect 1 0 7 0; ! #X connect 2 0 7 0; ! #X connect 3 0 7 0; ! #X connect 4 0 7 0; ! #X connect 5 0 7 0; ! #X connect 7 0 10 0; ! #X connect 8 0 12 0; ! #X connect 9 0 3 0; ! #X connect 9 0 5 0; #X connect 9 0 11 0; ! #X connect 9 0 4 0; ! #X connect 9 0 1 0; ! #X connect 9 0 2 0; ! #X connect 10 0 6 0; ! #X connect 11 0 6 0; ! #X connect 12 0 5 0; ! #X connect 12 1 4 0; ! #X connect 12 2 3 0; ! #X connect 12 3 2 0; ! #X connect 12 4 1 0; ! #X connect 12 5 11 0; Index: TEMPLATE.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/TEMPLATE.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** TEMPLATE.pd 10 Apr 2006 18:54:51 -0000 1.1 --- TEMPLATE.pd 12 Apr 2006 14:20:34 -0000 1.2 *************** *** 1,3 **** ! #N canvas 21 40 631 447 12; ! #X obj -54 8 cnv 15 400 40 empty empty TEMPLATE 20 12 0 24 -228992 -66577 0; --- 1,3 ---- ! #N canvas 21 40 639 455 12; ! #X obj -39 10 cnv 15 400 40 empty empty TEMPLATE 20 12 0 24 -228992 -66577 0; Index: gui_objects.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/gui_objects.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** gui_objects.pd 28 Mar 2006 05:35:22 -0000 1.1 --- gui_objects.pd 12 Apr 2006 14:20:34 -0000 1.2 *************** *** 1,3 **** ! #N canvas 293 91 746 588 10; #X obj 504 24 import cyclone unauthorized; #X obj 30 70 bng 15 250 50 0 \$1 \$1 empty 20 8 0 8 -262144 -1 -1; --- 1,3 ---- ! #N canvas 312 62 750 592 10; #X obj 504 24 import cyclone unauthorized; #X obj 30 70 bng 15 250 50 0 \$1 \$1 empty 20 8 0 8 -262144 -1 -1; *************** *** 5,11 **** -1 0 1; #X obj 34 148 vsl 15 128 0 127 0 1.04858e+06 empty \$3 empty 20 8 0 ! 8 -262144 -1 -1 12700 1; #X obj 191 278 hsl 128 15 0 127 0 0 empty empty empty 20 8 0 8 -262144 ! -1 -1 2700 1; #X obj 201 249 hdl 15 1 2.6624e+06 8 \$5 \$5 empty 20 8 192 8 -262144 -1 -1 0; --- 5,11 ---- -1 0 1; #X obj 34 148 vsl 15 128 0 127 0 1.04858e+06 empty \$3 empty 20 8 0 ! 8 -262144 -1 -1 0 1; #X obj 191 278 hsl 128 15 0 127 0 0 empty empty empty 20 8 0 8 -262144 ! -1 -1 0 1; #X obj 201 249 hdl 15 1 2.6624e+06 8 \$5 \$5 empty 20 8 192 8 -262144 -1 -1 0; *************** *** 24,35 **** #X obj 142 367 popup 124 25 #ffffff popup option; #X obj 298 363 ticker ; ! #X obj 503 415 envgen 200 140 1 0 ; #X obj 366 499 knob 32 32 0 127 0 0 empty empty empty 0 -8 32 8 -262144 -1 -1 3100 1; #X text 360 473 [knob]; #X text 281 340 [ticker]; ! #X obj 492 96 grid grid1 200 0 199 200 0 199 1 1 1 10 10 19 11; ! #X text 500 73 [unauthorized/grid]; ! #X text 483 391 [envgen]; #X text 112 405 [cyclone/Scope~]; #X text 23 339 [button]; --- 24,35 ---- #X obj 142 367 popup 124 25 #ffffff popup option; #X obj 298 363 ticker ; ! #X obj 495 419 envgen 200 140 1 0 ; #X obj 366 499 knob 32 32 0 127 0 0 empty empty empty 0 -8 32 8 -262144 -1 -1 3100 1; #X text 360 473 [knob]; #X text 281 340 [ticker]; ! #X obj 500 71 grid grid1 200 0 199 200 0 199 1 1 1 10 10 570 188; ! #X text 474 51 [unauthorized/grid]; ! #X text 475 395 [envgen]; #X text 112 405 [cyclone/Scope~]; #X text 23 339 [button]; *************** *** 45,46 **** --- 45,48 ---- 135 135 0; #X text 337 118 [nbx]; + #X obj 555 305 gcanvas 80 80; + #X text 483 294 [gcanvas]; Index: outlet_order.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/outlet_order.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** outlet_order.pd 6 Apr 2006 23:56:54 -0000 1.2 --- outlet_order.pd 12 Apr 2006 14:20:34 -0000 1.3 *************** *** 1,11 **** ! #N canvas 0 22 458 308 12; ! #X text 121 112 <-- click here \,; ! #X obj 51 151 unpack float float float; #X obj 8 10 cnv 15 400 40 empty empty outlet_order 20 12 0 24 -228992 -66577 0; ! #X msg 51 112 3 2 1; ! #X obj 28 193 print último; ! #X obj 315 193 print first; ! #X obj 167 193 print nächste; #X connect 1 0 4 0; #X connect 1 1 6 0; --- 1,19 ---- ! #N canvas 298 70 628 444 12; ! #X text 198 212 <-- click here \,; ! #X obj 128 251 unpack float float float; #X obj 8 10 cnv 15 400 40 empty empty outlet_order 20 12 0 24 -228992 -66577 0; ! #X msg 128 212 3 2 1; ! #X obj 105 293 print último; ! #X obj 392 293 print first; ! #X obj 244 293 print nächste; ! #X text 18 363 There are occasional exceptions where it makes sense ! to break this convention. But you shouldn't do it unless it really ! is necessary. This will save you in the long run.; ! #X text 15 68 While there is nothing forcing you to output data to ! the outlets in any order \, Pd has a very strong convention for how ! data should be output from an object.; ! #X text 14 130 Just like the flow of programming in Pd \, the data ! should be output from right to left:; #X connect 1 0 4 0; #X connect 1 1 6 0; Index: 00.hello_world.pd =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/00.hello_world.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 00.hello_world.pd 6 Apr 2006 23:56:54 -0000 1.2 --- 00.hello_world.pd 12 Apr 2006 14:20:34 -0000 1.3 *************** *** 1,3 **** ! #N canvas 228 159 628 440 12; #X msg 235 167 Hello world!; #X text 238 216 <-- connection \, aka "cord"; --- 1,3 ---- ! #N canvas 228 159 632 444 12; #X msg 235 167 Hello world!; #X text 238 216 <-- connection \, aka "cord"; *************** *** 11,14 **** #X text 289 266 <-- object box; #X text 89 357 Now look in the Pd window to see the result.; ! #X text 374 166 <-- click here; #X connect 0 0 6 0; --- 11,15 ---- #X text 289 266 <-- object box; #X text 89 357 Now look in the Pd window to see the result.; ! #X text 359 168 <-- message box; ! #X text 101 111 Click on the box with "Hello world!" in it:; #X connect 0 0 6 0; Index: TODO =================================================================== RCS file: /cvsroot/pure-data/doc/tutorials/intro/TODO,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** TODO 6 Apr 2006 23:56:54 -0000 1.2 --- TODO 12 Apr 2006 14:20:34 -0000 1.3 *************** *** 10,11 **** --- 10,60 ---- - in pure_data_files.pd, make the patch reset itself once it finishes the clone. (remember that [pd clone] has to be the last object.) + + - make looping sequence + + File Order: + + - hello world + - basic elements + - getting help + - edit mode + - objects + - connections + - messages + - make your first Pd patch + - bang + - hot and cold inlets + - storage objects + - atoms + - atomic messages + + + Unsorted topics + + - arguments + + - guis + - gui objects + + - Example: its all just data + - Example: parazit + + - right-to-left order + - depth first + + - ordering messages + + + - math objects + - expr + + - subpatches + - inlets and outlets + - outlet order + + - loading libraries + - namespaces + - import + + - send messages to Pd + - pure data files

1 0

externals Makefile,1.51,1.52
by Hans-Christoph Steiner 12 Apr '06

12 Apr '06

Update of /cvsroot/pure-data/externals In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5300 Modified Files: Makefile Log Message: cleaned up iemlib objects target a bit and got creb compiling. Waiting on some changes from Tom before everything with creb gets ironed out Index: Makefile =================================================================== RCS file: /cvsroot/pure-data/externals/Makefile,v retrieving revision 1.51 retrieving revision 1.52 diff -C2 -d -r1.51 -r1.52 *** Makefile 11 Apr 2006 16:44:45 -0000 1.51 --- Makefile 12 Apr 2006 00:51:48 -0000 1.52 *************** *** 288,305 **** # CREB CREB_NAME=creb ! # ead* don't compile yet... ! CREB_OBJECTS := $(wildcard $(externals_src)/creb/modules/[a-df-z]*.c) # haven't figured these out yet #CREB_CXXOBJECTS := $(wildcard $(externals_src)/creb/modules++/*.cc) ! # kludge to make objects find the headers ! pre_creb: ! test -e $(externals_src)/creb/modules/extlib_util.h || \ ! ( cd $(externals_src)/creb/modules && ln -s ../include/extlib_util.h ) ! test -e $(externals_src)/creb/modules/filters.h || \ ! ( cd $(externals_src)/creb/modules && ln -s ../include/filters.h ) ! creb: pre_creb $(CREB_CXXOBJECTS:.cc=.$(EXTENSION)) \ ! $(CREB_OBJECTS:.c=.$(EXTENSION)) creb_install: creb --- 288,310 ---- # CREB CREB_NAME=creb ! # ead* are compiled separately ! CREB_OBJECTS := $(wildcard $(externals_src)/creb/modules/[a-df-z]*.c) \ ! $(externals_src)/creb/modules/eblosc.c # haven't figured these out yet #CREB_CXXOBJECTS := $(wildcard $(externals_src)/creb/modules++/*.cc) ! # these are built separately since they made from a number of files ! CREB_EA_OBJECTS = $(wildcard $(externals_src)/creb/modules/ea*.c) ! CREB_ENVELOPE_UTIL = $(externals_src)/creb/system/envelope_util.c ! $(CREB_OBJECTS:.c=.o): ! $(CREB_ENVELOPE_UTIL:.c=.o): ! $(CC) $(CFLAGS) -I$(externals_src)/creb/include -o $*.o -c $*.c ! $(patsubst %.c,%~.$(EXTENSION),$(CREB_EA_OBJECTS)): $(CREB_ENVELOPE_UTIL:.c=.o) ! $(CC) $(LDFLAGS) -o $*.$(EXTENSION) $(CREB_ENVELOPE_UTIL:.c=.o) $(LIBS) ! chmod a-x $*.$(EXTENSION) ! ! creb: $(patsubst %.c,%~.$(EXTENSION),$(CREB_EA_OBJECTS)) \ ! $(CREB_OBJECTS:.c=.$(EXTENSION)) $(CREB_CXXOBJECTS:.cc=.$(EXTENSION)) creb_install: creb *************** *** 321,330 **** creb_clean: ! -rm -f -- $(externals_src)/creb/*/*.$(EXTENSION) ! -rm -f -- $(externals_src)/creb/*/*.o -rm -f -- $(externals_src)/creb/*/*.bak -rm -f -- $(externals_src)/creb/*/*.*~ - -rm -f -- $(externals_src)/creb/modules/filters.h - -rm -f -- $(externals_src)/creb/modules/extlib_util.h --- 326,336 ---- creb_clean: ! -rm -f -- $(CREB_OBJECTS:.c=.$(EXTENSION)) ! -rm -f -- $(CREB_ENVELOPE_UTIL:.c=.$(EXTENSION)) ! -rm -f -- $(CREB_EA_OBJECTS:.c=.$(EXTENSION)) ! -rm -f -- $(CREB_OBJECTS:.c=.o) ! -rm -f -- $(CREB_ENVELOPE_UTIL:.c=.o) $(CREB_EA_OBJECTS:.c=.o) -rm -f -- $(externals_src)/creb/*/*.bak -rm -f -- $(externals_src)/creb/*/*.*~ *************** *** 667,674 **** # IEMLIB IEMLIB_NAME=iemlib ! IEMLIB_OBJECTS := $(wildcard $(externals_src)/iemlib/src/iem_t3_lib/[st]*.c) \ ! $(wildcard $(externals_src)/iemlib/src/iem_mp3/[a-hj-z]*.c) \ ! $(wildcard $(externals_src)/iemlib/src/iemlib1/[a-hj-z]*.c) \ ! $(wildcard $(externals_src)/iemlib/src/iemlib2/[a-hj-z]*.c) iemlib: $(IEMLIB_OBJECTS:.c=.$(EXTENSION)) --- 673,677 ---- # IEMLIB IEMLIB_NAME=iemlib ! IEMLIB_OBJECTS := $(wildcard $(externals_src)/iemlib/src/*/[a-hj-z]*.c) iemlib: $(IEMLIB_OBJECTS:.c=.$(EXTENSION))

1 0

pd/src desire.c,1.1.2.64,1.1.2.65
by Mathieu Bouchard 11 Apr '06

11 Apr '06

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18973 Modified Files: Tag: devel_0_39 desire.c Log Message: added canvas method object_moveto Index: desire.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v retrieving revision 1.1.2.64 retrieving revision 1.1.2.65 diff -C2 -d -r1.1.2.64 -r1.1.2.65 *** desire.c 3 Dec 2005 06:56:26 -0000 1.1.2.64 --- desire.c 11 Apr 2006 20:25:33 -0000 1.1.2.65 *************** *** 11544,11548 **** t_text *o; int i; ! if (sscanf(atom_getsymbol(argv)->s_name,"!x%lx",(long*)&o)<1) {error("gargamel was here"); return;} for (i=0; i<argc-1; i++) str[i] = atom_getfloat(argv+i+1); str[argc-1]=0; --- 11544,11549 ---- t_text *o; int i; ! t_symbol *name = atom_getsymbol(argv); ! if (sscanf(name->s_name,"!x%lx",(long*)&o)<1) {error("gargamel was here"); return;} for (i=0; i<argc-1; i++) str[i] = atom_getfloat(argv+i+1); str[argc-1]=0; *************** *** 11550,11553 **** --- 11551,11562 ---- } + static void canvas_object_moveto(t_canvas *x, t_symbol *name, t_floatarg px, t_floatarg py) { + t_text *o; + if (sscanf(name->s_name,"!x%lx",(long*)&o)<1) {error("gargamel was here"); return;} + o->te_xpix = (int)px; + o->te_ypix = (int)py; + gobj_changed(o,0); + } + void g_text_setup(void) { t_class *c; *************** *** 12884,12887 **** --- 12893,12898 ---- class_addmethod3(c,canvas_motion,"motion","fff"); class_addmethod3(c,canvas_menuclose,"menuclose","F"); + + /* should die: */ class_addmethod3(c,canvas_cut, "cut",""); class_addmethod3(c,canvas_copy, "copy",""); *************** *** 12893,12897 **** --- 12904,12911 ---- class_addmethod3(c,canvas_tidy, "tidy",""); class_addmethod3(c,canvas_texteditor,"texteditor",""); + /* end die */ + class_addmethod3(c,canvas_editmode, "editmode","F"); + class_addmethod3(c,canvas_print, "print","s"); class_addmethod3(c,canvas_menufont, "menufont",""); *************** *** 12925,12928 **** --- 12939,12945 ---- class_addmethod3(c,glist_arraydialog,"arraydialog","sfff"); class_addmethod3(c,glist_sort,"sort",""); + + // dd-specific + class_addmethod3(c,canvas_object_moveto,"object_moveto","ff"); class_addmethod3(c,canvas_text_setto,"text_setto","*"); class_setnotice(c, canvas_notice); *************** *** 12960,12965 **** int i,j=0; for(i=0; s[i] && j<MAXPDSTRING-16; i++) { ! if (index("\\\"[]$\n",s[i])) t[j++]='\\'; ! if (s[i]=='\n') t[j++]='n'; else t[j++] = s[i]; } t[j] = 0; --- 12977,12982 ---- int i,j=0; for(i=0; s[i] && j<MAXPDSTRING-16; i++) { ! if (index("\\\"[]$\n",s[i])) t[j++]='\\'; ! t[j++] = s[i]=='\n' ? 'n' : s[i]; } t[j] = 0; *************** *** 12968,12988 **** } ! void post(const char *fmt, ...) { ! char buf[MAXPDSTRING]; ! va_list ap; ! va_start(ap, fmt); vsnprintf(buf, MAXPDSTRING-1, fmt, ap); ! va_end(ap); ! strcat(buf, "\n"); ! dopost(buf); } - void startpost(const char *fmt, ...) { ! char buf[MAXPDSTRING]; ! va_list ap; ! va_start(ap, fmt); vsnprintf(buf, MAXPDSTRING-1, fmt, ap); ! va_end(ap); ! dopost(buf); } --- 12985,12997 ---- } ! void post(const char *fmt, ...) { ! char buf[MAXPDSTRING]; va_list ap; va_start(ap, fmt); vsnprintf(buf, MAXPDSTRING-1, fmt, ap); ! va_end(ap); strcat(buf, "\n"); dopost(buf); } void startpost(const char *fmt, ...) { ! char buf[MAXPDSTRING]; va_list ap; va_start(ap, fmt); vsnprintf(buf, MAXPDSTRING-1, fmt, ap); ! va_end(ap); dopost(buf); } *************** *** 12990,13001 **** void postatom(int argc, t_atom *argv) { ! char buf[MAXPDSTRING]; ! int i; ! for (i=0; i<argc; i++) { ! atom_string(argv+i,buf,MAXPDSTRING); ! poststring(buf); ! } } void postfloat(float f) {t_atom a; SETFLOAT(&a, f); postatom(1, &a);} void endpost(void) {dopost("\n");} --- 12999,13007 ---- void postatom(int argc, t_atom *argv) { ! char buf[MAXPDSTRING]; int i; ! for (i=0; i<argc; i++) {atom_string(argv+i,buf,MAXPDSTRING); poststring(buf);} } + /* what's the point? */ void postfloat(float f) {t_atom a; SETFLOAT(&a, f); postatom(1, &a);} void endpost(void) {dopost("\n");} *************** *** 13057,13062 **** if (!error_object) post("no findable error yet."); else { ! post("last trackable error:"); ! post("%s", error_string); canvas_finderror(error_object); } --- 13063,13067 ---- if (!error_object) post("no findable error yet."); else { ! post("last trackable error: %s", error_string); canvas_finderror(error_object); } *************** *** 13074,13078 **** } ! /* this isn't worked out yet. */ static const char *errobject; static const char *errstring; --- 13079,13083 ---- } ! /* this isn't worked out yet. */ static const char *errobject; static const char *errstring;

1 0

← Newer
1
...
14
15
16
17
18
19
20
...
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