Re: [PD] [Pd][Windows] Handling Paths and Visual Enhancements

2009-01-28 Thread Steffen Leve Poulsen
~/ will give you the home dir of the current user on XP with Pd-vanilla.
And you can substitute backslash with slash

mhv/SteffenLP

Ray Rashif skrev:
 Smashing day
 
 == Part 1 ==
 I'm trying to do some user-interaction and would like to use variables 
 for handling filepaths. I understand this may not be a problem with 
 Linux/Mac as we can use ~/ for the user's home directory. What would be 
 the Windows equivalent of that? I'd also like to know how to handle 
 Windows paths in general with Pd as the backslash is not recognised.
 
 == Part 2 ==
 Look at the screenshots at 
 http://digital.music.cornell.edu/kevinernste/tutorial_3_audio_input_and_recording
 
 Is that a Mac-specific look or could we patch the latest version to look 
 like that? The patches available from crca.ucsd.edu/~jsarlo/ 
 http://crca.ucsd.edu/~jsarlo/ are for an older version.
 
 Thanks for reading (:

___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] reading colors from txt file with repeat

2009-01-22 Thread Steffen Leve Poulsen

Hi Frank

Maybe look at this concept attached tab-many.pd
its more generic.

Stef


Frank Barknecht skrev:

Hallo,
Frank Barknecht hat gesagt: // Frank Barknecht wrote:


You can only store one number per index. So you either should use 3
arrays (i.e. $0-r, $0-g, $0-b) or group three values inside one table
by adjusting the indices accordingly. It's easier to show in a patch
than to tell, so just look at the attachment to see what I mean.


Actually that's nice to have as an abstraction so I made it. It's
called tabread-three and not tabread3 because of tabread4. ;)

#N canvas 27 42 393 214 10;
#X msg 25 54 0.15 0.2 0.25;
#X msg 51 81 0.85 0.8 0.75;
#N canvas 0 0 528 452 write 0;
#X obj 195 90 inlet;
#X obj 424 90 inlet;
#X obj 424 112 * 3;
#X obj 158 379 tabwrite \$0-array;
#X obj 257 353 +;
#X obj 237 136 0;
#X obj 222 294 f;
#X obj 251 293 + 1;
#X obj 195 112 t b a b;
#X obj 158 202 list;
#X obj 158 232 list split 1;
#X obj 158 258 t f b;
#X obj 158 138 3;
#X obj 158 160 until;
#X floatatom 320 178 5 0 0 0 - - -;
#X connect 0 0 8 0;
#X connect 1 0 2 0;
#X connect 2 0 4 1;
#X connect 4 0 3 1;
#X connect 5 0 6 1;
#X connect 6 0 7 0;
#X connect 6 0 4 0;
#X connect 7 0 6 1;
#X connect 8 0 12 0;
#X connect 8 1 9 1;
#X connect 8 2 5 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 1 9 1;
#X connect 11 0 3 0;
#X connect 11 1 6 0;
#X connect 12 0 13 0;
#X connect 13 0 9 0;
#X connect 14 0 12 1;
#X connect 14 0 2 1;
#X restore 25 131 pd write;
#X floatatom 70 106 5 0 0 0 - - -;
#N canvas 0 0 509 502 read 0;
#X obj 199 34 inlet;
#X obj 243 298 tabread \$0-array;
#X obj 199 64 * 3;
#X obj 259 354 list;
#X obj 294 354 t l;
#X obj 106 384 list;
#X obj 243 270 +;
#X obj 200 180 until;
#X obj 200 158 3;
#X obj 199 92 t b b f b;
#X obj 200 213 f;
#X obj 226 213 + 1;
#X obj 284 176 0;
#X floatatom 370 37 5 0 0 0 - - -;
#X text 418 37 -arg?;
#X obj 106 419 outlet;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 9 0;
#X connect 3 0 4 0;
#X connect 3 0 5 1;
#X connect 4 0 3 1;
#X connect 5 0 15 0;
#X connect 6 0 1 0;
#X connect 7 0 10 0;
#X connect 8 0 7 0;
#X connect 9 0 5 0;
#X connect 9 1 8 0;
#X connect 9 2 6 1;
#X connect 9 3 3 1;
#X connect 9 3 12 0;
#X connect 10 0 11 0;
#X connect 10 0 6 0;
#X connect 11 0 10 1;
#X connect 12 0 10 1;
#X connect 13 0 2 1;
#X connect 13 0 8 1;
#X restore 159 84 pd read;
#X msg 159 128 0 0 0;
#X msg 159 106 set \$1 \$2 \$3;
#X floatatom 159 54 5 0 0 0 - - -;
#X obj 26 17 table \$0-array;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 3 0 2 1;
#X connect 4 0 6 0;
#X connect 6 0 5 0;
#X connect 7 0 4 0;
___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] reading colors from txt file with repeat

2009-01-22 Thread Steffen Leve Poulsen

oops, attached corrected

Steffen Leve Poulsen skrev:

Hi Frank

Maybe look at this concept attached tab-many.pd
its more generic.

Stef


Frank Barknecht skrev:

Hallo,
Frank Barknecht hat gesagt: // Frank Barknecht wrote:


You can only store one number per index. So you either should use 3
arrays (i.e. $0-r, $0-g, $0-b) or group three values inside one table
by adjusting the indices accordingly. It's easier to show in a patch
than to tell, so just look at the attachment to see what I mean.


Actually that's nice to have as an abstraction so I made it. It's
called tabread-three and not tabread3 because of tabread4. ;)

#N canvas 27 42 393 214 10;
#X msg 25 54 0.15 0.2 0.25;
#X msg 51 81 0.85 0.8 0.75;
#N canvas 0 0 528 452 write 0;
#X obj 195 90 inlet;
#X obj 424 90 inlet;
#X obj 424 112 * 3;
#X obj 158 379 tabwrite \$0-array;
#X obj 257 353 +;
#X obj 237 136 0;
#X obj 222 294 f;
#X obj 251 293 + 1;
#X obj 195 112 t b a b;
#X obj 158 202 list;
#X obj 158 232 list split 1;
#X obj 158 258 t f b;
#X obj 158 138 3;
#X obj 158 160 until;
#X floatatom 320 178 5 0 0 0 - - -;
#X connect 0 0 8 0;
#X connect 1 0 2 0;
#X connect 2 0 4 1;
#X connect 4 0 3 1;
#X connect 5 0 6 1;
#X connect 6 0 7 0;
#X connect 6 0 4 0;
#X connect 7 0 6 1;
#X connect 8 0 12 0;
#X connect 8 1 9 1;
#X connect 8 2 5 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 1 9 1;
#X connect 11 0 3 0;
#X connect 11 1 6 0;
#X connect 12 0 13 0;
#X connect 13 0 9 0;
#X connect 14 0 12 1;
#X connect 14 0 2 1;
#X restore 25 131 pd write;
#X floatatom 70 106 5 0 0 0 - - -;
#N canvas 0 0 509 502 read 0;
#X obj 199 34 inlet;
#X obj 243 298 tabread \$0-array;
#X obj 199 64 * 3;
#X obj 349 381 t l;
#X obj 106 384 list;
#X obj 243 270 +;
#X obj 200 180 until;
#X obj 200 158 3;
#X obj 199 92 t b b f b;
#X obj 200 213 f;
#X obj 226 213 + 1;
#X obj 284 176 0;
#X floatatom 370 37 5 0 0 0 - - -;
#X text 418 37 -arg?;
#X obj 106 419 outlet;
#X obj 259 354 list prepend;
#X connect 0 0 2 0;
#X connect 1 0 15 0;
#X connect 2 0 8 0;
#X connect 3 0 15 1;
#X connect 4 0 14 0;
#X connect 5 0 1 0;
#X connect 6 0 9 0;
#X connect 7 0 6 0;
#X connect 8 0 4 0;
#X connect 8 1 7 0;
#X connect 8 2 5 1;
#X connect 8 3 11 0;
#X connect 8 3 15 1;
#X connect 9 0 10 0;
#X connect 9 0 5 0;
#X connect 10 0 9 1;
#X connect 11 0 9 1;
#X connect 12 0 2 1;
#X connect 12 0 7 1;
#X connect 15 0 3 0;
#X connect 15 0 4 1;
#X restore 159 84 pd read;
#X msg 159 128 0.15 0.2 0.25;
#X msg 159 106 set \$1 \$2 \$3;
#X floatatom 159 54 5 0 0 0 - - -;
#X obj 26 17 table \$0-array;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 3 0 2 1;
#X connect 4 0 6 0;
#X connect 6 0 5 0;
#X connect 7 0 4 0;
___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] how to create a lowpass filter from first principles?

2009-01-22 Thread Steffen Leve Poulsen

Hi Geoff

Yes Pd is wonderfull!

Attached shows how to do your example the naive way in Pd.
It uses [tabsend~] to get from sig~ domain to message domain.
This is not that efficient but good for testing and development.

More efficient is [z~] from zexy or [delread~] and [delwrite~].
Also look at [biquad~] and the raw filters [czero~] and [cpole~]

mvh/ SLP




Geoff skrev:

Hi
I am new to Pure Data, 
I downloaded and have played around with it for the last couple of days 
and it is rather wonderful.


I can quite happily create a basic synth inside it without too much strife.
:)

However
The reason I wanted to use Pure Data was to implement some of the maths 
that I am learning through a couple of DSP books that I am studying.



*The DSP book I have read gives a simple lowpass filter function as *

*g(n) = (f(n-1) + f(n) + f(n+1))/3*

*i.e the average value of three consecutive samples. I understand how 
this is in effect a lowpass filter.*


*How do I implement that in PD?*

I can easily connect a Oscillator (phasor) object to a lowpass filter 
object to the DAC and hear it working,
However I want to be able to create my own lowpass filter i.e. try to 
really understand how things are put together.


Therefore if in the function above I need 3 consecutive samples, I would 
have thought that I need some kind of buffer to hold and call those 
samples from, 
so that I can then call three samples average them and then output that, 
however that would have to move at the same rate/freq as the audio 
engine is set up i.e. 44100Hz . e.


So I am thinking about how to solve the problem I just seem to be 
missing how to start.


Any guidance appreciated.
geoff
#N canvas 296 218 804 451 10;
#X obj 34 150 table output 64;
#X obj 35 119 table input 64;
#X obj 35 191 tabreceive~ output;
#X obj 35 305 dac~;
#X obj 39 69 tabsend~ input;
#X obj 486 37 bang~;
#X obj 486 92 64;
#X obj 486 117 until;
#X obj 486 142 f;
#X obj 522 143 + 1;
#X obj 486 62 t b b;
#X obj 531 91 0;
#X obj 344 236 tabread input;
#X obj 344 275 list;
#X obj 344 304 list split 3;
#X obj 344 337 expr ($f1+$f2+$f3)/$f4;
#X msg 517 285 3;
#X floatatom 517 310 5 0 0 0 - - -;
#X obj 486 167 t f f;
#X obj 540 422 tabwrite output;
#X obj 39 19 noise~;
#X obj 35 264 *~ 0;
#X obj 109 245 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -204786
-1 -1 7500 1;
#X obj 106 265 dbtorms;
#X obj 589 219 loadbang;
#X connect 2 0 21 0;
#X connect 5 0 10 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 18 0;
#X connect 9 0 8 1;
#X connect 10 0 6 0;
#X connect 10 1 11 0;
#X connect 11 0 8 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 13 1;
#X connect 14 0 15 0;
#X connect 14 2 13 1;
#X connect 15 0 19 0;
#X connect 16 0 17 0;
#X connect 17 0 15 3;
#X connect 18 0 12 0;
#X connect 18 1 19 1;
#X connect 20 0 4 0;
#X connect 21 0 3 0;
#X connect 21 0 3 1;
#X connect 22 0 23 0;
#X connect 23 0 21 1;
#X connect 24 0 16 0;
___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] dc_blocker

2008-12-29 Thread Steffen Leve Poulsen

Hi all

FYI and as APOC a dc-blocker as suggested by Josh

peace/slp
#N canvas 122 23 416 538 10;
#X text 11 35 y(n) = x(n) - x(n-1) + R*y(n-1);
#X obj 18 269 outlet~;
#X obj 19 170 inlet~;
#X text 11 8 http://www.dsprelated.com/dspbooks/filters/DC_Blocker.html
;
#X obj 188 104 bang~;
#X obj 18 133 table \$0-out 64;
#X obj 17 102 table \$0-in 64;
#X obj 18 199 tabsend~ \$0-in;
#X obj 18 231 tabreceive~ \$0-out;
#X obj 188 192 until;
#X obj 188 256 f;
#X obj 220 256 + 1;
#X obj 241 157 0;
#X obj 128 363 t f f;
#X obj 126 397 -;
#X obj 126 447 +;
#X obj 158 447 * 0.995;
#X obj 188 281 t f f;
#X obj 128 321 tabread \$0-in;
#X obj 186 483 tabwrite \$0-out;
#X text 32 493 s...@2008;
#X obj 188 165 64;
#X obj 188 134 t b b;
#X connect 2 0 7 0;
#X connect 4 0 22 0;
#X connect 8 0 1 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 0 17 0;
#X connect 11 0 10 1;
#X connect 12 0 10 1;
#X connect 13 0 14 1;
#X connect 13 1 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 0 19 0;
#X connect 16 0 15 1;
#X connect 17 0 18 0;
#X connect 17 1 19 1;
#X connect 18 0 13 0;
#X connect 21 0 9 0;
#X connect 22 0 21 0;
#X connect 22 1 12 0;
___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Possible to unselect radio buttons?

2008-12-19 Thread Steffen Leve Poulsen


fixed the fire and made some explanation on how to use this concept
attached bang-matrix.pd

vh/slp

Phil Stone skrev:

Steffen,

Auto-generated matrix and everything!  By the way, [fire64] wouldn't 
instantiate, but it apparently had done its work before you saved the 
abstraction, so the matrix worked fine.


Very, very cool.


Phil

Steffen Leve Poulsen wrote:

Hi Phil

here's one attached bang-matrix.pd

mvh/steffen leve poulsen


On Thu, Dec 18, 2008 at 1:06 PM, Phil Stone pkst...@ucdavis.edu 
wrote:
 

Is there any way to make there be *no* selection displayed in a radio
button control?

If not, this would be a very useful feature in that it would allow
multiple banks of radio buttons to be tied together programatically.
I.e., imagine a set of four hradio controls, stacked on top of each
other.  Any selection in any of the four becomes the current 
selection,

but also turns off all other banks' selection indicators.

Whereas a single 64-position radio control would be awkward to deal 
with
graphically, 8 rows of 8-pos. hradio controls would be nice and 
compact.



Phil Stone
www.pkstonemusic.com








#N canvas 4 269 668 365 10;
#X obj 109 108 bng 13 50 10 0 \$0-0-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 109 108 cnv 1 13 13 \$0-dummy \$0-0-square empty 20 12 0 14
-260818 -262144 0;
#X obj 124 108 bng 13 50 10 0 \$0-1-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 124 108 cnv 1 13 13 \$0-dummy \$0-1-square empty 20 12 0 14
-261681 -262144 0;
#X obj 139 108 bng 13 50 10 0 \$0-2-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 139 108 cnv 1 13 13 \$0-dummy \$0-2-square empty 20 12 0 14
-261681 -262144 0;
#X obj 154 108 bng 13 50 10 0 \$0-3-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 154 108 cnv 1 13 13 \$0-dummy \$0-3-square empty 20 12 0 14
-261682 -66577 0;
#X obj 169 108 bng 13 50 10 0 \$0-4-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 169 108 cnv 1 13 13 \$0-dummy \$0-4-square empty 20 12 0 14
-261681 -262144 0;
#X obj 184 108 bng 13 50 10 0 \$0-5-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 184 108 cnv 1 13 13 \$0-dummy \$0-5-square empty 20 12 0 14
-261682 -66577 0;
#X obj 199 108 bng 13 50 10 0 \$0-6-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 199 108 cnv 1 13 13 \$0-dummy \$0-6-square empty 20 12 0 14
-261682 -66577 0;
#X obj 214 108 bng 13 50 10 0 \$0-7-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 214 108 cnv 1 13 13 \$0-dummy \$0-7-square empty 20 12 0 14
-261681 -262144 0;
#X obj 109 123 bng 13 50 10 0 \$0-8-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 109 123 cnv 1 13 13 \$0-dummy \$0-8-square empty 20 12 0 14
-261682 -66577 0;
#X obj 124 123 bng 13 50 10 0 \$0-9-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 124 123 cnv 1 13 13 \$0-dummy \$0-9-square empty 20 12 0 14
-261682 -66577 0;
#X obj 139 123 bng 13 50 10 0 \$0-10-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 139 123 cnv 1 13 13 \$0-dummy \$0-10-square empty 20 12 0 14
-261682 -66577 0;
#X obj 154 123 bng 13 50 10 0 \$0-11-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 154 123 cnv 1 13 13 \$0-dummy \$0-11-square empty 20 12 0 14
-261682 -66577 0;
#X obj 169 123 bng 13 50 10 0 \$0-12-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 169 123 cnv 1 13 13 \$0-dummy \$0-12-square empty 20 12 0 14
-261682 -66577 0;
#X obj 184 123 bng 13 50 10 0 \$0-13-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 184 123 cnv 1 13 13 \$0-dummy \$0-13-square empty 20 12 0 14
-261682 -66577 0;
#X obj 199 123 bng 13 50 10 0 \$0-14-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 199 123 cnv 1 13 13 \$0-dummy \$0-14-square empty 20 12 0 14
-261682 -66577 0;
#X obj 214 123 bng 13 50 10 0 \$0-15-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 214 123 cnv 1 13 13 \$0-dummy \$0-15-square empty 20 12 0 14
-261682 -66577 0;
#X obj 109 138 bng 13 50 10 0 \$0-16-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 109 138 cnv 1 13 13 \$0-dummy \$0-16-square empty 20 12 0 14
-261682 -66577 0;
#X obj 124 138 bng 13 50 10 0 \$0-17-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 124 138 cnv 1 13 13 \$0-dummy \$0-17-square empty 20 12 0 14
-261682 -66577 0;
#X obj 139 138 bng 13 50 10 0 \$0-18-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 139 138 cnv 1 13 13 \$0-dummy \$0-18-square empty 20 12 0 14
-261682 -66577 0;
#X obj 154 138 bng 13 50 10 0 \$0-19-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 154 138 cnv 1 13 13 \$0-dummy \$0-19-square empty 20 12 0 14
-261681 -262144 0;
#X obj 169 138 bng 13 50 10 0 \$0-20-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 169 138 cnv 1 13 13 \$0-dummy \$0-20-square empty 20 12 0 14
-261682 -66577 0;
#X obj 184 138 bng 13 50 10 0 \$0-21-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 184 138 cnv 1 13 13 \$0-dummy \$0-21-square empty 20 12 0 14
-261682 -66577 0;
#X obj 199 138 bng 13 50 10 0 \$0-22-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 199 138 cnv 1 13 13 \$0-dummy \$0-22-square

Re: [PD] Possible to unselect radio buttons?

2008-12-18 Thread Steffen Leve Poulsen

Hi Phil

here's one attached bang-matrix.pd

mvh/steffen leve poulsen

Phil Stone skrev:
That's a pretty brilliant hack, Luke.  Thanks for the idea. 



Phil


Luke Iannini wrote:

Hi Phil!
I've hacked this in before by using a bunch of [moses] objects and
sending [color 1 1 1( etc. messages to the radio objects that are
supposedly not selected (which makes the radio indicator the same
color as the background so it looks like there's nothing there).

I'd be happy to dig up a patch if you want to see a demo
(but of course some way to do this built in to the IEMgui would be
much faster : ) )

Cheers
Luke

On Thu, Dec 18, 2008 at 1:06 PM, Phil Stone pkst...@ucdavis.edu wrote:
  

Is there any way to make there be *no* selection displayed in a radio
button control?

If not, this would be a very useful feature in that it would allow
multiple banks of radio buttons to be tied together programatically.
I.e., imagine a set of four hradio controls, stacked on top of each
other.  Any selection in any of the four becomes the current selection,
but also turns off all other banks' selection indicators.

Whereas a single 64-position radio control would be awkward to deal with
graphically, 8 rows of 8-pos. hradio controls would be nice and compact.


Phil Stone
www.pkstonemusic.com



#N canvas 4 269 668 365 10;
#N canvas 0 0 994 477 make 0;
#X msg 70 222 obj \$1 \$2 bng 13 50 10 0 \$0-\$3-bang \$0-dummy empty
17 7 0 10 -262144 -1 -1 \, obj \$1 \$2 cnv 1 13 13 \$0-dummy \$0-\$3-square
empty 20 12 0 14 -261682 -66577 0;
#X obj 70 287 s pd-bang-matrix.pd;
#X obj 70 185 pack f f f;
#X obj 58 32 fire 64 64;
#X obj 66 71 t f f f;
#X obj 80 138 * 15;
#X obj 40 138 * 15;
#X obj 72 4 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 80 114 div 8;
#X obj 40 114 mod 8;
#X obj 563 289 s pd-receive-bang;
#X obj 519 92 fire 64 64;
#X obj 576 131 t f f f;
#X obj 519 64 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 565 220 pack f f f;
#X obj 622 173 * 2;
#X obj 590 175 * 2;
#X obj 623 195 + 2;
#X obj 590 196 + 1;
#X msg 563 248 obj 0 0 r \$0-\$1-bang \, obj 0 0 \$1 \, connect \$2
0 \$3 0 \, connect \$3 0 0 0;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 3 1 4 0;
#X connect 4 0 9 0;
#X connect 4 1 8 0;
#X connect 4 2 2 2;
#X connect 5 0 2 1;
#X connect 6 0 2 0;
#X connect 7 0 3 0;
#X connect 8 0 5 0;
#X connect 9 0 6 0;
#X connect 11 1 12 0;
#X connect 12 0 14 0;
#X connect 12 1 16 0;
#X connect 12 2 15 0;
#X connect 13 0 11 0;
#X connect 14 0 19 0;
#X connect 15 0 17 0;
#X connect 16 0 18 0;
#X connect 17 0 14 2;
#X connect 18 0 14 1;
#X connect 19 0 10 0;
#X restore 9 15 pd make;
#X obj 109 108 bng 13 50 10 0 \$0-0-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 109 108 cnv 1 13 13 \$0-dummy \$0-0-square empty 20 12 0 14
-260818 -262144 0;
#X obj 124 108 bng 13 50 10 0 \$0-1-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 124 108 cnv 1 13 13 \$0-dummy \$0-1-square empty 20 12 0 14
-261681 -262144 0;
#X obj 139 108 bng 13 50 10 0 \$0-2-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 139 108 cnv 1 13 13 \$0-dummy \$0-2-square empty 20 12 0 14
-261681 -262144 0;
#X obj 154 108 bng 13 50 10 0 \$0-3-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 154 108 cnv 1 13 13 \$0-dummy \$0-3-square empty 20 12 0 14
-261682 -66577 0;
#X obj 169 108 bng 13 50 10 0 \$0-4-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 169 108 cnv 1 13 13 \$0-dummy \$0-4-square empty 20 12 0 14
-261681 -262144 0;
#X obj 184 108 bng 13 50 10 0 \$0-5-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 184 108 cnv 1 13 13 \$0-dummy \$0-5-square empty 20 12 0 14
-261682 -66577 0;
#X obj 199 108 bng 13 50 10 0 \$0-6-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 199 108 cnv 1 13 13 \$0-dummy \$0-6-square empty 20 12 0 14
-261682 -66577 0;
#X obj 214 108 bng 13 50 10 0 \$0-7-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 214 108 cnv 1 13 13 \$0-dummy \$0-7-square empty 20 12 0 14
-261681 -262144 0;
#X obj 109 123 bng 13 50 10 0 \$0-8-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 109 123 cnv 1 13 13 \$0-dummy \$0-8-square empty 20 12 0 14
-261682 -66577 0;
#X obj 124 123 bng 13 50 10 0 \$0-9-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 124 123 cnv 1 13 13 \$0-dummy \$0-9-square empty 20 12 0 14
-261682 -66577 0;
#X obj 139 123 bng 13 50 10 0 \$0-10-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 139 123 cnv 1 13 13 \$0-dummy \$0-10-square empty 20 12 0 14
-261682 -66577 0;
#X obj 154 123 bng 13 50 10 0 \$0-11-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 154 123 cnv 1 13 13 \$0-dummy \$0-11-square empty 20 12 0 14
-261682 -66577 0;
#X obj 169 123 bng 13 50 10 0 \$0-12-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 169 123 cnv 1 13 13 \$0-dummy \$0-12-square empty 20 12 0 14
-261682 -66577 0;
#X obj 184 123 bng 13 50 10 0 \$0-13-bang \$0-dummy empty 17 7 0 10
-262144 -1 -1;
#X obj 184 123 cnv 1 13 13 \$0-dummy \$0-13-square empty 20 12 0 14
-261682 -66577 0;
#X obj

Re: [PD] Peak envelope follower?

2008-12-01 Thread Steffen Leve Poulsen

Hi Bill,
use a comination of [tabsend~] and [tabread],
see attached.

mvh/Steffen Leve Poulsen

Bill Gribble skrev:

Is there a way within pd-extended to do the equivalent of [env~], but
following peak value rather than RMS? 


I have pulled my hair out trying to implement this with patching but I
have had no luck. 


Thanks,
Bill Gribble
#N canvas 250 160 398 474 10;
#X obj 236 105 bang~;
#X obj 175 22 table vu 64;
#X obj 18 119 tabsend~ vu;
#X obj 191 218 tabread vu;
#X obj 258 244 max;
#X obj 275 219 f;
#X obj 236 134 t b b;
#X obj 276 198 0;
#X obj 18 29 osc~ 0.1;
#X obj 258 287 vsl 15 128 0 1 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 416 1;
#N canvas 0 0 450 300 abs~ 0;
#X obj 123 5 inlet~;
#X obj 124 198 outlet~;
#X obj 124 88 max~;
#X obj 153 64 *~ -1;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 1;
#X restore 19 93 pd abs~;
#N canvas 0 0 517 448 fire 0;
#X obj 148 22 inlet;
#X obj 148 186 until;
#X obj 148 228 f;
#X obj 180 228 + 1;
#X obj 171 160 0;
#X obj 148 346 outlet;
#X obj 148 136 t f b f;
#X obj 148 109 64;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 6 0 1 0;
#X connect 6 1 4 0;
#X connect 7 0 6 0;
#X restore 191 183 pd fire 64;
#X obj 99 339 loadbang;
#X msg 99 365 \; pd dsp 1;
#X connect 0 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 9 0;
#X connect 5 0 4 1;
#X connect 6 0 11 0;
#X connect 6 1 7 0;
#X connect 7 0 5 0;
#X connect 8 0 10 0;
#X connect 10 0 2 0;
#X connect 11 0 3 0;
#X connect 12 0 13 0;


Checked by AVG - http://www.avg.com
Version: 8.0.176 / Virus Database: 270.9.12/1821 - Release Date: 30-11-2008 
17:53
___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] vanilla-knob

2008-10-01 Thread Steffen Leve Poulsen

Thanks, your right,
now the whole area changes the knob.

attached knob.pd

mvh/Stef

Hans-Christoph Steiner skrev:
Nice, I think it would be more useful if the whole area would  
actively change the knob, rather than a small area in the middle.


.hc

On Sep 28, 2008, at 6:27 PM, Steffen Leve Poulsen wrote:


Hi

Made an attemp to make a knob in Pd-vanilla.
might be usefull with endless rotary enconders.
It has a numbox underneath, so you can shiftdrag and use negatives.

mvh/Stef
#N canvas 50 375 402 315 10;
#X obj 104 161 outlet;
#N canvas 327 0 811 712 circle 0;
#X obj 194 221 t f f;
#X obj 230 258 sin;
#X obj 189 258 cos;
#X obj 189 357 i;
#X obj 230 358 i;
#X obj 195 45 t b b;
#X msg 342 44 clear;
#X obj 270 529 s pd-\$0-draw;
#X obj 230 397 pack f f f f;
#X floatatom 323 371 5 0 0 0 - - -;
#X obj 194 189 * 6.28319;
#X obj 189 293 * 20;
#X obj 230 293 * 20;
#X msg 230 426 obj \$1 \$2 cnv 0 \$4 \$4 empty empty empty 20 12 0
14 -24198 -66577 0 \;;
#N canvas 0 0 450 300 fire 0;
#X obj 148 22 inlet;
#X obj 148 186 until;
#X obj 148 228 f;
#X obj 180 228 + 1;
#X obj 171 160 0;
#X obj 148 346 outlet;
#X obj 148 286 /;
#X obj 148 136 t f b f;
#X obj 253 23 inlet;
#X obj 312 316 outlet;
#X obj 148 257 t f f;
#X obj 148 109 128;
#X obj 148 314 * 1;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 10 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 6 0 12 0;
#X connect 7 0 1 0;
#X connect 7 1 4 0;
#X connect 7 2 6 1;
#X connect 8 0 12 1;
#X connect 10 0 6 0;
#X connect 10 1 9 0;
#X connect 11 0 7 0;
#X connect 12 0 5 0;
#X restore 194 82 pd fire;
#X obj 189 323 + 24.5;
#X obj 230 323 + 24.5;
#X obj 289 260 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 290 288 5 0 0 0 - - -;
#X floatatom 283 230 5 0 0 0 - - -;
#X connect 0 0 2 0;
#X connect 0 1 1 0;
#X connect 1 0 12 0;
#X connect 2 0 11 0;
#X connect 3 0 8 0;
#X connect 4 0 8 1;
#X connect 5 0 14 0;
#X connect 5 1 6 0;
#X connect 6 0 7 0;
#X connect 8 0 13 0;
#X connect 9 0 8 3;
#X connect 10 0 0 0;
#X connect 11 0 15 0;
#X connect 12 0 16 0;
#X connect 13 0 7 0;
#X connect 14 0 10 0;
#X connect 14 1 8 2;
#X connect 15 0 3 0;
#X connect 16 0 4 0;
#X connect 17 0 5 0;
#X connect 18 0 15 1;
#X connect 18 0 16 1;
#X connect 19 0 11 1;
#X connect 19 0 12 1;
#X restore 33 32 pd circle;
#N canvas 327 7 827 728 dial 0;
#X obj 194 361 t f f;
#X obj 230 398 sin;
#X obj 189 398 cos;
#X obj 189 497 i;
#X obj 230 498 i;
#X msg 442 333 clear;
#X obj 194 329 * 6.28319;
#X obj 189 463 + 24;
#X obj 230 463 + 24;
#X obj 191 4 inlet;
#X obj 194 301 / 127;
#X obj 270 629 s pd-\$0-dial;
#X msg 90 571 obj \$1 \$2 cnv 1 \$3 \$3 empty empty empty 20 12 0 14
-24198 -66577 0 \;;
#X obj 194 224 +;
#X obj 194 270 mod 128;
#X floatatom 268 410 5 0 0 0 - - -;
#X obj 192 136 t b f b;
#X obj 179 534 pack f f 2;
#X obj 189 433 * 14;
#X obj 230 433 * 14;
#X floatatom 239 224 5 0 0 0 - - -;
#N canvas 0 0 450 300 fire 0;
#X obj 148 22 inlet;
#X obj 148 186 until;
#X obj 148 228 f;
#X obj 180 228 + 1;
#X obj 171 160 0;
#X obj 148 346 outlet;
#X obj 148 286 /;
#X obj 148 136 t f b f;
#X obj 253 23 inlet;
#X obj 312 316 outlet;
#X obj 148 257 t f f;
#X obj 148 109 10;
#X obj 148 314 * 2;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 10 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 6 0 12 0;
#X connect 7 0 1 0;
#X connect 7 1 4 0;
#X connect 7 2 6 1;
#X connect 8 0 12 1;
#X connect 10 0 6 0;
#X connect 10 1 9 0;
#X connect 11 0 7 0;
#X connect 12 0 5 0;
#X restore 155 180 pd fire;
#N canvas 0 0 450 300 speedlim 0;
#X obj 163 70 inlet;
#X obj 274 69 inlet;
#X obj 163 253 outlet;
#X obj 163 158 t a b;
#X obj 163 126 spigot 1;
#X obj 406 136 1;
#X obj 275 146 0;
#X obj 204 187 del 40;
#X connect 0 0 4 0;
#X connect 1 0 7 1;
#X connect 3 0 2 0;
#X connect 3 1 6 0;
#X connect 3 1 7 0;
#X connect 4 0 3 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 7 0 5 0;
#X restore 191 81 pd speedlim 40;
#X obj 194 247 + 32;
#X connect 0 0 2 0;
#X connect 0 1 1 0;
#X connect 1 0 19 0;
#X connect 2 0 18 0;
#X connect 3 0 17 0;
#X connect 4 0 17 1;
#X connect 5 0 11 0;
#X connect 6 0 0 0;
#X connect 7 0 3 0;
#X connect 8 0 4 0;
#X connect 9 0 22 0;
#X connect 10 0 6 0;
#X connect 12 0 11 0;
#X connect 13 0 23 0;
#X connect 14 0 10 0;
#X connect 15 0 18 1;
#X connect 15 0 19 1;
#X connect 16 0 21 0;
#X connect 16 1 13 1;
#X connect 16 2 5 0;
#X connect 17 0 12 0;
#X connect 18 0 7 0;
#X connect 19 0 8 0;
#X connect 20 0 23 1;
#X connect 21 1 13 0;
#X connect 22 0 16 0;
#X connect 23 0 14 0;
#X restore 83 192 pd dial;
#X obj 110 75 inlet;
#X obj 98 101 nbx 3 48 -1e+037 1e+037 0 0 empty empty empty 0 -8 0
10 -262144 -1 -1 0 256;
#X obj 102 101 cnv 15 49 49 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 0 486 336 \$0-draw 0;
#X obj 44 24 cnv 1 1 1 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 44 25 cnv 1 1 1 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 44 26 cnv 1 1 1 empty empty empty 20 12

[PD] vanilla-knob

2008-09-28 Thread Steffen Leve Poulsen

Hi

Made an attemp to make a knob in Pd-vanilla.
might be usefull with endless rotary enconders.
It has a numbox underneath, so you can shiftdrag and use negatives.

mvh/Stef
#N canvas 50 375 402 315 10;
#X floatatom 104 117 5 0 0 0 - - -;
#X obj 104 161 outlet;
#X obj 102 102 cnv 15 49 49 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 0 486 336 \$0-draw 0;
#X obj 43 23 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 42 23 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 42 24 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 42 25 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 42 26 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 42 27 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 42 28 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 41 29 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 41 30 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 41 31 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 40 32 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 40 33 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 39 34 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 39 34 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 38 35 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 37 36 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 37 37 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 36 37 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 35 38 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 34 39 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 34 39 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 33 40 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 32 40 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 31 41 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 30 41 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 29 41 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 28 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 27 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 26 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 25 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 24 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 23 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 22 43 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 22 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 21 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 20 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 19 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 18 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 17 42 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 16 41 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 15 41 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 14 41 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 13 40 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 12 40 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 11 39 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 11 39 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 10 38 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 9 37 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 8 37 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 8 36 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 7 35 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 6 34 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 6 34 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 5 33 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 5 32 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 4 31 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 4 30 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 4 29 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 28 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 27 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 26 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 25 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 24 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 23 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 22 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 22 cnv 1 3 3 empty empty empty 20 12 0 14 -24198 -66577 0
;
#X obj 3 21 cnv 1 3 3 

[PD] [Fwd: juhu]

2008-09-25 Thread Steffen Leve Poulsen



 Original Meddelelse 
Subject: juhu
Date: Thu, 25 Sep 2008 16:17:50 +0200
From: Steffen Leve Poulsen [EMAIL PROTECTED]
To: PD List pd-list@iem.at

Atteched is Borax.pd

#N canvas 98 22 708 608 12;
#X obj 263 27 inlet;
#X obj 322 26 inlet;
#X obj 394 26 inlet;
#X obj 86 535 outlet;
#X obj 146 535 outlet;
#X obj 206 535 outlet;
#X obj 266 535 outlet;
#X obj 326 535 outlet;
#X obj 386 535 outlet;
#X obj 446 535 outlet;
#X obj 506 535 outlet;
#X obj 566 535 outlet;
#N canvas 136 41 776 581 help 1;
#X obj 360 266 image Borax.GIF;
#X obj 1 1 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1;
#X msg 1 525 \; pd-help vis \$1 \;;
#X connect 1 0 2 0;
#X coords 0 -1 1 1 17 17 2 0 0;
#X restore 37 26 pd help;
#N canvas 0 0 1268 750 voice 0;
#X obj 268 283 f;
#X obj 306 285 + 1;
#X obj 253 33 table \$0-voicenr 128;
#X obj 153 414 select 0;
#X obj 153 447 f;
#X obj 274 251 0;
#X obj 189 595 tabwrite \$0-voicenr;
#X obj 269 312 t f f;
#X obj 149 310 del;
#X obj 149 283 bang;
#X obj 575 693 outlet;
#X obj 728 694 outlet;
#X obj 559 52 inlet;
#X obj 637 117 !=;
#X obj 545 148 list prepend;
#X obj 545 175 route 1 0;
#X obj 559 79 t f f;
#X obj 886 269 tabread \$0-voicenr;
#X obj 253 220 t b b f;
#X obj 575 597 t b b f;
#X obj 575 664 f;
#X obj 655 693 outlet;
#X obj 639 52 inlet;
#X obj 639 79 t f f;
#X obj 655 664 f;
#X obj 153 385 tabread \$0-voice-count;
#X obj 254 62 table \$0-voice-count 128;
#X obj 885 344 0;
#X obj 885 306 t b f f;
#X obj 776 378 tabwrite \$0-voice-count;
#X obj 154 476 t f f b f;
#X obj 216 548 tabwrite \$0-voice-count;
#X obj 216 522 1;
#X connect 0 0 1 0;
#X connect 0 0 7 0;
#X connect 1 0 0 1;
#X connect 3 0 4 0;
#X connect 3 1 9 0;
#X connect 4 0 30 0;
#X connect 5 0 0 1;
#X connect 7 0 25 0;
#X connect 7 1 4 1;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 16 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 15 0 18 0;
#X connect 15 1 17 0;
#X connect 16 0 14 0;
#X connect 16 1 20 1;
#X connect 17 0 28 0;
#X connect 18 0 0 0;
#X connect 18 1 5 0;
#X connect 18 2 6 1;
#X connect 19 0 20 0;
#X connect 19 1 24 0;
#X connect 19 2 11 0;
#X connect 20 0 10 0;
#X connect 22 0 23 0;
#X connect 23 0 13 0;
#X connect 23 1 24 1;
#X connect 24 0 21 0;
#X connect 25 0 3 0;
#X connect 27 0 29 0;
#X connect 28 0 27 0;
#X connect 28 1 29 1;
#X connect 28 2 19 0;
#X connect 30 0 19 0;
#X connect 30 1 6 0;
#X connect 30 2 32 0;
#X connect 30 3 31 1;
#X connect 32 0 31 0;
#X restore 74 367 pd voice nr;
#N canvas 0 0 470 320 reset 0;
#X obj 359 115 s \$0-reset;
#X obj 359 58 inlet;
#X msg 359 88 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 394 56 pd reset;
#N canvas 405 191 516 450 held 0;
#X obj 178 41 inlet;
#X obj 118 109 !=;
#X obj 39 162 select 1 0;
#X obj 250 140 r \$0-reset;
#X obj 63 220 f;
#X obj 93 220 + 1;
#X obj 133 220 f;
#X obj 163 220 + 1;
#X obj 130 284 -;
#X obj 130 252 t b f;
#X obj 309 385 outlet;
#X obj 36 36 inlet;
#X obj 214 378 f;
#X obj 214 402 outlet;
#X obj 44 378 f;
#X obj 44 402 outlet;
#X obj 181 76 t f f;
#X obj 39 78 t b f;
#X obj 44 346 t b b;
#X obj 130 311 t b f;
#X obj 39 116 f;
#X connect 0 0 16 0;
#X connect 1 0 20 1;
#X connect 2 0 4 0;
#X connect 2 1 6 0;
#X connect 3 0 6 1;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 4 1;
#X connect 6 0 7 0;
#X connect 6 0 9 0;
#X connect 7 0 6 1;
#X connect 8 0 19 0;
#X connect 9 0 8 0;
#X connect 9 1 8 1;
#X connect 11 0 17 0;
#X connect 12 0 13 0;
#X connect 14 0 15 0;
#X connect 16 0 1 0;
#X connect 16 1 12 1;
#X connect 17 0 20 0;
#X connect 17 1 14 1;
#X connect 18 0 14 0;
#X connect 18 1 12 0;
#X connect 19 0 18 0;
#X connect 19 1 10 0;
#X connect 20 0 2 0;
#X restore 77 302 pd held notes;
#N canvas 0 0 462 312 dublicate 0;
#X obj 125 47 inlet;
#X obj 125 78 t f f;
#X obj 125 144 outlet;
#X obj 258 145 outlet;
#X obj 195 47 inlet;
#X obj 195 78 t f f;
#X obj 195 144 outlet;
#X obj 328 145 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 1 7 0;
#X restore 156 252 pd dublicate;
#N canvas 0 0 526 499 complete 0;
#X obj 125 47 inlet;
#X obj 106 354 outlet;
#X obj 239 355 outlet;
#X obj 195 47 inlet;
#X obj 176 354 outlet;
#X obj 106 325 f;
#X obj 175 329 f;
#X obj 195 77 t f f;
#X obj 284 206 r \$0-reset;
#X obj 269 242 f;
#X obj 301 242 + 1;
#X obj 195 105 !=;
#X obj 180 204 select 1 0;
#X obj 181 175 f;
#X obj 125 93 t b f;
#X obj 269 271 t b f;
#X obj 114 274 t b b;
#X connect 0 0 14 0;
#X connect 3 0 7 0;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X connect 7 0 11 0;
#X connect 7 1 6 1;
#X connect 8 0 9 1;
#X connect 9 0 10 0;
#X connect 9 0 15 0;
#X connect 10 0 9 1;
#X connect 11 0 13 1;
#X connect 12 0 16 0;
#X connect 12 1 9 0;
#X connect 13 0 12 0;
#X connect 14 0 13 0;
#X connect 14 1 5 1;
#X connect 15 0 16 0;
#X connect 15 1 2 0;
#X connect 16 0 5 0;
#X connect 16 1 6 0;
#X restore 176 222 pd complete;
#N canvas 95 0 576 750 duration 0;
#X obj 145 87 inlet;
#X obj 136 614

Re: [PD] feedback stability..?

2008-09-17 Thread Steffen Leve Poulsen
Damien you know about deconvolution?

Just record a click or whatever through the system, then in the 
fft-domain reverse the kernel (play it backwards).
Use this to do convolution on your system.
So in that sense your on  the right track with your ascii diagram.


Dont know the theory behind it, but I did some experiments in pd.
It seems quite efficent in som situations.


mvh/Steffen



Damian Stewart skrev:
 hey pd,
 
 i'm trying to do feed forward in pd. i think i'm tired and not thinking 
 this through...
 
 so, i have a [blackbox~] that does stuff to the audio. it uses feedback 
 internally and is currently a bit unstable. can i make it more stable by 
 going like this:
 
 [...]   [r~ fb]
 |   |
 |   [*~ -0.1]
 | __/
 |/
 [blackbox~]
 |\__
 |   \
 |   [s~ fb]
 |
 [...]
 
 is there some funky combination of delays i can achieve this? i get the 
 feeling this only works in analog electronics because you can say that on 
 some level everything happens at exactly the same time - the delays 
 inherent in digital systems mean that this doesn't work...
 
 what alternative DSP techniques are there for damping unstable feedback loops?
 
 thanks
 d


___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] sending OSC bundles. + help files?

2008-09-12 Thread Steffen Leve Poulsen
Phil Stone skrev:
 Phil Stone wrote:
 Hans-Christoph Steiner wrote:
   
 The idea is to embed the library settings into the patch.  In  
 Pd-0.40.3-extended, if you added this to the patch, it would work for  
 any Pd-0.40.3-extended install:

 [import mrpeach]

 Or could use Miller's declare, but I don't remember what the state of  
 the declare bugs were in 0.41.4.  It would be something like:

 [declare -lib mrpeach]

 or maybe

 [declare -stdpath extra/mrpeach]

 .hc
   
Just drop a patch, I'll be glad to test it.
 
 Just to be clear, does this mean if I use [import] in a patch, it 
 becomes incompatible with vanilla Pd?  Or can [import] be um, imported 
 into vanilla Pd?
   
 
 I apologize for following-up my own post, but this is a fairly important 
 point, and I think it needs clarification.  I'm about to release an 
 abstraction, and I used [import] to eliminate a few dozen [mrpeach/...] 
 style invocations of Martin Peach's OSC objects.  Up until now, my 
 abstraction would work with vanilla Pd if a couple of externals/libs 
 were included (mrpeach being one of them).  Have I now completely 
 blocked out any vanilla Pd users by using [import]?
 
 Of course, I could use [declare], but I've seen some questions about 
 [declare] bugs on this list.
 
 Is my only choice to go back to the redundant (and rather ugly) 
 [mrpeach/routeOSC] style, in order to be compatible with vanilla Pd?
 
 Is it rude to ask why we are essentially forking a very useful object?  
 Is there any possibility of this being resolved into one, compatible object?
 
 
 Phil Stone
 www.pkstonemusic.com
 
 ___
 Pd-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 


___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Writing texture to different sides of cube in GEM

2008-08-24 Thread Steffen Leve Poulsen

Adityo Pratomo skrev:

i've tried this method yesterday, buat still found it hard to stick
the square's edge to form a cube. It still looked like a cube, but
it's not solid



try attached.

.:..:..:..:.

mvh Stef
#N canvas 513 3 538 473 10;
#X declare -lib gem;
#X obj 131 41 declare -lib gem;
#X obj 131 128 gemwin;
#X msg 141 89 0 \, destroy;
#X obj 134 164 gemhead;
#X msg 131 65 lighting 1 \, create \, 1;
#X obj 136 265 gemhead;
#X floatatom 177 298 5 0 0 0 - - -;
#X floatatom 251 299 5 0 0 0 - - -;
#X obj 136 408 square;
#X floatatom 186 387 5 0 0 0 - - -;
#N canvas 433 24 674 632 transform 0;
#X obj 75 528 outlet;
#X obj 120 6 inlet;
#X obj 173 309 unpack f f f;
#X obj 284 237 list split 3;
#X obj 75 130 gemhead;
#X obj 368 339 unpack f f f;
#X obj 75 491 rotateXYZ;
#X obj 294 309 inlet;
#X obj 492 340 inlet;
#X obj 155 113 t b l b;
#X obj 206 139 outlet;
#X obj 120 33 b;
#X floatatom 106 232 5 0 0 0 - - -;
#X msg 155 62 0 0 1 0 0 0 \, 0 0 -1 0 -180 0 \, -1 0 0 0 -90 0 \, 1
0 0 0 90 0 \, 0 1 0 -90 0 0 \, 0 -1 0 90 0 0;
#X floatatom 151 232 5 0 0 0 - - -;
#X floatatom 190 231 5 0 0 0 - - -;
#X obj 173 345 *;
#X obj 215 345 *;
#X obj 275 352 *;
#X obj 368 375 *;
#X obj 410 375 *;
#X obj 470 382 *;
#X floatatom 184 180 5 0 0 0 - - -;
#X obj 75 265 rotateXYZ 212 45 -4;
#X obj 75 391 translateXYZ;
#X obj 75 201 translateXYZ 0 0 -1;
#X connect 1 0 11 0;
#X connect 2 0 16 0;
#X connect 2 1 17 0;
#X connect 2 2 18 0;
#X connect 3 0 2 0;
#X connect 3 1 5 0;
#X connect 4 0 25 0;
#X connect 5 0 19 0;
#X connect 5 1 20 0;
#X connect 5 2 21 0;
#X connect 6 0 0 0;
#X connect 7 0 16 1;
#X connect 7 0 17 1;
#X connect 7 0 18 1;
#X connect 8 0 19 1;
#X connect 8 0 20 1;
#X connect 8 0 21 1;
#X connect 9 0 4 0;
#X connect 9 1 3 0;
#X connect 9 2 10 0;
#X connect 11 0 13 0;
#X connect 12 0 23 1;
#X connect 13 0 9 0;
#X connect 14 0 23 2;
#X connect 15 0 23 3;
#X connect 16 0 24 1;
#X connect 17 0 24 2;
#X connect 18 0 24 3;
#X connect 19 0 6 1;
#X connect 20 0 6 2;
#X connect 21 0 6 3;
#X connect 22 0 25 3;
#X connect 23 0 24 0;
#X connect 24 0 6 0;
#X connect 25 0 23 0;
#X restore 136 337 pd transform to cube;
#X obj 134 204 world_light;
#X obj 204 159 loadbang;
#X text 154 296 r *;
#X text 217 296 phi *;
#X msg 195 180 0.01 0.79 0.87;
#X msg 204 263 1;
#X connect 2 0 1 0;
#X connect 3 0 11 0;
#X connect 4 0 1 0;
#X connect 5 0 10 0;
#X connect 6 0 10 1;
#X connect 7 0 10 2;
#X connect 9 0 8 1;
#X connect 10 0 8 0;
#X connect 12 0 15 0;
#X connect 12 0 16 0;
#X connect 15 0 11 1;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] change knob width on sliders?]

2008-07-28 Thread Steffen Leve Poulsen
Phil Stone skrev:
 Steffen Leve Poulsen wrote:
 you can make one by covering two numboxes with Canvas.
 Like attached (range.pd), drag the grey areas.

 Stef Leave
 Phil Stone skrev:
 Hello,

 Is there any message that changes the knob width on sliders?  I don't 
 see any in the help, but I'm hoping anyway.

 If not, are there any externals that have this capability?  I'm 
 trying to make a control that sets a window (start, end) on a table, 
 and a normal slider would be perfect if I could control the knob size.

 
 Ok, I see what you're both getting at (although I couldn't get your 
 patch to work Steffen - and why the number boxes?).

the leftmost grey Canvas hides a numbox that sets the beginning of the 
range.the other sets the length.
Stef




___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] change knob width on sliders?]

2008-07-26 Thread Steffen Leve Poulsen

you can make one by covering two numboxes with Canvas.
Like attached (range.pd), drag the grey areas.

Stef Leave
Phil Stone skrev:

Hello,

Is there any message that changes the knob width on sliders?  I don't 
see any in the help, but I'm hoping anyway.


If not, are there any externals that have this capability?  I'm trying 
to make a control that sets a window (start, end) on a table, and a 
normal slider would be perfect if I could control the knob size.




Phil Stone
pkstonemusic.com



#N canvas 516 67 591 474 10;
#X obj 126 351 s dollar0-fader;
#X msg 126 296 pos \$1 100;
#X msg 358 293 vis_size \$1 17;
#X obj 126 269 + 100;
#X obj 102 38 inlet;
#X floatatom 101 100 5 0 200 0 - - -;
#X floatatom 148 100 5 0 200 0 - - -;
#X obj 100 100 cnv 15 200 17 empty empty empty 20 12 0 14 -261689 -66577
0;
#X obj 166 100 cnv 1 74 17 empty dollar0-fader empty 20 12 0 14 -258699
-66577 0;
#X obj 152 102 cnv 1 35 13 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 108 102 cnv 1 35 13 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 63 210 outlet;
#X obj 63 182 pack;
#X obj 102 64 unpack;
#X obj 126 138 t b f;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 1 0;
#X connect 4 0 13 0;
#X connect 5 0 3 0;
#X connect 5 0 12 0;
#X connect 6 0 2 0;
#X connect 6 0 14 0;
#X connect 12 0 11 0;
#X connect 13 0 5 0;
#X connect 13 1 6 0;
#X connect 14 0 12 0;
#X connect 14 1 12 1;
#X coords 0 -1 1 1 200 17 2 100 100;

___
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Pd and Jack(dmp) on XP

2008-05-16 Thread Steffen Leve Poulsen
Matthew Logan skrev:
 Which Qjackctl version? 0.2.23?


JACK Audio Connection Kit - Qt GUI Interface

Version: 0.3.1.13
Build: Sep 24 2007 11:25:57
Debugging option enabled.
JACK MIDI support disabled.

Website: http://qjackctl.sourceforge.net

Copyright (C) 2003-2007, rncbc aka Rui Nuno Capela. All rights reserved.

This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License version 2 or later.

mvh/SLP

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Pd and Jack(dmp) on XP

2008-05-16 Thread Steffen Leve Poulsen
Uğur Güney skrev:
 # Hi,
 # Thanks for the info. I downloaded Jackdmp and Qjackctl. They work fine!
 # But I couldn't figure out how to connect PD to jack server. When I
 run pd nothing changes in the Connections panel. I'm using Pd
 version 0.40.3-extended-20080505 Do I have to do something to run
 jackdmp as an ASIO driver?
 -ugur-

Your welcome.

Yup. I had to give up twice to make it work.
You need a soundcard with ASIO-drivers or asio4all.

Put the content of the Qjackctl folder where you have jackdmp.exe

Then do (as stated in the readme) regsvr32.exe JackRouter.dll 
--regsvr32.exe is in c:/windows/system32. This enables your ASIO 
apps as jack clients. Now do jackdmp -d portaudio -d -l to get the name 
of your soundcard.
Restart jackdmp -R -S -d portaudio -d name_of_your_ASIO-driver
Start Qjackctl start Pd. In ASIO-options in Pd you now have JackRouter.
Select and set to 4 in 4 out. In Qjackctl Pd should show up in the 
connections menu.
Set JackRouter options in JackRoute.ini.

mvh/sLp



___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] Pd and Jack(dmp) on XP

2008-05-15 Thread Steffen Leve Poulsen
Hi, pdrs

FYI

Just tested Pd version 0.40-2, jackdmp 0.7 and Qjackctl.
Seems there now is a stable free ASIO audio server on XP.

I used Pd to monitor demoversions of Reaktor, bAbelton Live, NordModular 
G2 and Reason with little or no flaws.

You can get jackdmp herehttp://www.grame.fr/~letz/jackdmp.html

mvh/Steffen Leve Poulsen

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] flashing a bng without making it send?

2008-04-01 Thread Steffen Leve Poulsen

Steffen Leve Poulsen skrev:

matteo sisti sette skrev:

Hi,

Is there a way to make a [bng] visually flash (the same it does when
you click it or send it a bang) WITHOUT making it output/send a bang?


Hi, Mattteo

you can use:

[t a b]
||
|[visual bang here]
[route bang]


see attached!
slp
#N canvas 546 246 567 387 10;
#X obj 74 71 t a b;
#X obj 101 101 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 74 140 route bang;
#X obj 74 194 outlet;
#X obj 74 44 inlet;
#X obj 131 195 outlet;
#X connect 0 0 2 0;
#X connect 0 1 1 0;
#X connect 2 0 3 0;
#X connect 2 1 5 0;
#X connect 4 0 0 0;
#X coords 0 -1 1 1 17 17 2 100 100;
#N canvas 511 246 466 316 10;
#X obj 104 84 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 126 83 set;
#X obj 104 202 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 157 81 5 0 0 0 - - -;
#X msg 197 81 skudatest;
#X msg 267 81 1 2 7;
#X obj 149 200 print;
#X floatatom 115 183 5 0 0 0 - - -;
#X obj 189 158 bang-set;
#X obj 104 152 bang-set;
#X obj 219 158 bang-set;
#X connect 0 0 9 0;
#X connect 1 0 9 0;
#X connect 3 0 9 0;
#X connect 4 0 9 0;
#X connect 5 0 9 0;
#X connect 7 0 6 0;
#X connect 9 0 2 0;
#X connect 9 0 7 0;
#X connect 9 1 6 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] flashing a bng without making it send?

2008-03-18 Thread Steffen Leve Poulsen
matteo sisti sette skrev:
 Hi,
 
 Is there a way to make a [bng] visually flash (the same it does when
 you click it or send it a bang) WITHOUT making it output/send a bang?
 
Hi, Mattteo

you can use:

[t a b]
||
|[visual bang here]
[route bang]


mvh/ slp


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] flashing a bng without making it send?

2008-03-18 Thread Steffen Leve Poulsen

matteo sisti sette skrev:


6) Every time that you click any of the [bng]s, all other [bng]s
visually flash as well.

Now, the attached example works as described except for point (6):
when you click one bng, the message is sent to the target but the
other bngs don't flash;


ok now I understand.

Here are two solutions,classic and not so classic.
flashing the background color might be what you need. Then you can use a 
different color when you flash it from outside.



mvh/slp
#N canvas 204 194 755 304 10;
#X obj 167 79 bng 15 250 50 0 empty \$0-bang empty 17 7 0 10 -262144
-66577 -261689;
#X obj 167 112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 244 135 color \$1 2 3;
#X obj 244 87 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 166 44 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 244 164 s \$0-bang;
#X obj 244 59 del 500;
#X obj 244 110 * 16;
#X obj 480 27 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 466 199 spigot;
#X obj 480 55 t a b;
#X obj 506 79 0;
#X obj 466 81 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 466 237 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 448 145 1;
#X obj 466 116 t b b;
#X connect 0 0 1 0;
#X connect 2 0 5 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 4 0 6 0;
#X connect 6 0 3 0;
#X connect 7 0 2 0;
#X connect 8 0 10 0;
#X connect 9 0 13 0;
#X connect 10 0 12 0;
#X connect 10 1 11 0;
#X connect 11 0 9 1;
#X connect 12 0 15 0;
#X connect 14 0 9 1;
#X connect 15 0 14 0;
#X connect 15 1 9 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] hilbert~ troubles in Pd-extended?

2008-03-01 Thread Steffen Leve Poulsen
Hi Hans.

Its seems that [hilbert~] and [complex-mod~] is missing in 
Pd-0.39.3-extended for windows.

mvh/Steffen Leve Poulsen


Hans-Christoph Steiner skrev:
 Hey all,
 
 Miller just mentioned there are troubles with [hilbert~] in Pd- 
 extended.  Anyone know the details?  I just tried the help patch on  
 Pd-0.39.3-extended on Mac OS X/Intel and it seems to work fine.  But  
 I don't really know what it is supposed to do beyond make two sines  
 out of phase by a certain mount (I forget how much).
 
 .hc
 
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Problems to substract

2008-01-03 Thread Steffen Leve Poulsen

Hi Javier

You could trigger the counter with the count.
see attached

mvh Steffen Leve Poulsen


Javier Garcia skrev:

Hi,

im trying to create a patch with a counter that when i send a bang I 
substract a quantity (that i specify) to the count.



The sequence would be this for example:

1 - 2- 3 - 4 - 5 - 6 - 7 (bang) - 4 - 5 (bang) - 2 - 3 - ...

I've tried several ways, but i dont get it..

br.
GARFF


#N canvas 326 98 494 409 10;
#X obj 96 168 list split 1;
#X obj 50 206 list prepend;
#X obj 96 276 +;
#X msg 249 87 1 1 1 1 1 1 1 -4 1 1 -4;
#X obj 115 247 mod 128;
#X obj 151 19 loadbang;
#X obj 96 75 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X obj 96 133 list;
#X obj 99 305 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 96 101 metro 40;
#X msg 249 116 1 1 1 -2;
#X msg 248 144 -1 1 1 1 1 -1 -1;
#X obj 151 42 t b b;
#X connect 0 0 1 0;
#X connect 0 0 2 0;
#X connect 0 1 1 1;
#X connect 1 0 7 1;
#X connect 2 0 4 0;
#X connect 2 0 8 0;
#X connect 3 0 7 1;
#X connect 4 0 2 1;
#X connect 5 0 12 0;
#X connect 6 0 9 0;
#X connect 7 0 0 0;
#X connect 9 0 7 0;
#X connect 10 0 7 1;
#X connect 11 0 7 1;
#X connect 12 0 6 0;
#X connect 12 1 3 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Recording question

2007-12-20 Thread Steffen Leve Poulsen
tania habib skrev:
 I am sending the pd patch that I am using, Please let me know if there
 is some bug in the patch!

Hi I tried your patch its not really a stable solution.
Use [writesf~ 8] for recording then you get one 8ch-file-.wav.
Audacity can open multichannel files. From there export multiple as 
monofiles.

mvh/Stef

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] What exactly is a stack overflow ?

2007-12-20 Thread Steffen Leve Poulsen

David Schaffer skrev:
Can anyone explain me what a stack overflow error is (at least what 
it means in Pd) and what I can do about it?! Thank you


hi guys

   stand still until



attached until-haiku.pd


 mvh/Stef
#N canvas 675 -4 417 447 10;
#X obj 173 177 f;
#X obj 202 177 + 1;
#X floatatom 242 196 5 0 0 0 - - -;
#N canvas 0 0 450 300 (subpatch) 0;
#X array vu 64 float 1;
#A 0 0.046875 0.03125 0.015625 0 0.984375 0.96875 0.953125 0.9375 0.921875
0.90625 0.890625 0.875 0.859375 0.84375 0.828125 0.8125 0.796875 0.78125
0.765625 0.75 0.734375 0.71875 0.703125 0.6875 0.671875 0.65625 0.640625
0.625 0.609375 0.59375 0.578125 0.5625 0.546875 0.53125 0.515625 0.5
0.484375 0.46875 0.453125 0.4375 0.421875 0.40625 0.390625 0.375 0.359375
0.34375 0.328125 0.3125 0.296875 0.28125 0.265625 0.25 0.234375 0.21875
0.203125 0.1875 0.171875 0.15625 0.140625 0.125 0.109375 0.09375 0.078125
0.0625;
#X coords 0 1 63 0 64 64 1;
#X restore 50 106 graph;
#X obj 173 142 until;
#X floatatom 203 114 5 0 0 0 - - -;
#X obj 173 116 1;
#N canvas 460 279 458 308 scroll 0;
#X obj 208 201 list prepend 0;
#X obj 208 231 list trim;
#X obj 208 108 inlet;
#X obj 256 173 list split 64;
#X obj 208 260 s vu;
#X obj 208 146 list;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 5 1;
#X connect 3 2 5 1;
#X connect 5 0 3 0;
#X connect 5 0 0 0;
#X restore 172 258 pd scroll vu 64;
#N canvas 0 0 638 540 frame-count 0;
#X obj 266 256 bang~;
#X obj 120 73 inlet;
#X obj 266 425 outlet;
#X obj 266 286 f;
#X obj 294 288 + 1;
#X obj 120 412 switch~;
#X obj 120 253 1;
#X obj 266 314 mod;
#X obj 266 368 select 0;
#X obj 120 128 t b f;
#X obj 155 158 select 0;
#X obj 155 189 0;
#X obj 215 216 1;
#X obj 214 189 t b f b;
#X obj 265 219 0;
#X obj 40 40 loadbang;
#X obj 40 40;
#X msg 40 62 \; pd dsp 1 \;;
#X connect 0 0 3 0;
#X connect 1 0 9 0;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 6 0 5 0;
#X connect 7 0 4 0;
#X connect 7 0 8 0;
#X connect 8 0 2 0;
#X connect 9 0 6 0;
#X connect 9 1 10 0;
#X connect 10 0 11 0;
#X connect 10 1 13 0;
#X connect 11 0 6 1;
#X connect 12 0 6 1;
#X connect 13 0 12 0;
#X connect 13 1 7 1;
#X connect 13 2 14 0;
#X connect 14 0 3 1;
#X connect 15 0 17 0;
#X restore 173 82 pd frame-count;
#X floatatom 173 61 5 0 0 0 - - -;
#X obj 173 39 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 172 200 mod 64;
#X obj 172 226 / 64;
#X obj 200 36 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X connect 0 0 11 0;
#X connect 1 0 0 1;
#X connect 2 0 11 1;
#X connect 2 0 12 1;
#X connect 4 0 0 0;
#X connect 5 0 6 1;
#X connect 6 0 4 0;
#X connect 8 0 6 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X connect 11 0 1 0;
#X connect 11 0 12 0;
#X connect 12 0 7 0;
#X connect 13 0 9 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] VOSIM with a tiny bug

2007-12-12 Thread Steffen Leve Poulsen
Hi,

actually wrap~ seems really buggy. Maybe its the nature of its concept, 
anyway my fix is to wrap wrap~ into [wrap-switch~] that has a sig~ 
connected to the wrap~ inlet and then a [r wrapswitch]. Now you can 
change the wrapping on all wrap~´s just by sending 0,1 or even 2 to [r 
wrapswitch].

Maybe I´m just beeing neurotic but there is some kind of very 
incosistent bug, maybe some kind of overflow. I´ll try once more to 
track it.

mvh/the other Steffen (Leve Poulsen)
on XP Pd version 0.40-2

Frank Barknecht skrev:
 Hallo,
 Claude Heiland-Allen hat gesagt: // Claude Heiland-Allen wrote:
 
 Hmm, isn't the second [wrap~] redundant anyway?
 Theoretically yes, but practically it seems that adding the second
 wrap~ after wrap~ is exactly what fixes the problem!
 http://lists.puredata.info/pipermail/pd-list/2007-05/049886.html

 Hope this helps...
 
 Ah, it's that one. Okay, I'll add one then. 
 
 Ciao


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] segmented patchcords (was Re: PD MAX)

2007-12-05 Thread Steffen Leve Poulsen
Hi guys

As usual a little slow here.
I use a segmented patchcord from time to time, its a dummy [sg] object 
with one inlet and one outlet inserted at the segmentpoint.
With PD 0.40-2 you can set the props to 4x4pix and hide objectname and 
arguments.

There's a png (120k)here http://steffen.menneske.dk/img/segments.PNG

mvh Stef

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] unit impulse without [dirac~]

2007-11-17 Thread Steffen Leve Poulsen

Andy Farnell skrev:

The [dirac~] object generates a unit impulse (at the sample position given by
its input)

I'm trying to think of simple ways to do it in plain vanilla. Frank gave a one 
way before,
differentiating a step impulse with [rzero~], can anyone think of other ways (I'm sure 
there's more than one)


cheers,

Andy



I end up doing something like this.
just add convolution
mvhStef
#N canvas 229 64 494 513 12;
#X obj 131 202 tabplay~ dirac;
#X obj 126 30 table dirac 64;
#X msg 144 139 \; dirac const 0 \, \$1 1;
#X floatatom 131 85 5 0 64 0 - - -;
#N canvas 0 0 450 300 (subpatch) 0;
#X array vu 64 float 0;
#X coords 0 1 63 -1 200 140 1;
#X restore 129 305 graph;
#X obj 131 175 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 107 231 tabwrite~ vu;
#X connect 0 0 6 0;
#X connect 3 0 2 0;
#X connect 3 0 5 0;
#X connect 5 0 0 0;
#X connect 5 0 6 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Documents on trapezoid~ ?

2007-11-14 Thread Steffen Leve Poulsen

Patrice Colet skrev:

...


You could replace [!- 1] by [* -1]_[+ 1] ...


Also, you obviously know the usage of trapezoid~ as it is in
action right in your patch. Can you please tell me if you know
of any resources describing the usage for each of the inoutlets?


in attached other test, I've illustrated inlets/outlet


I am assuming it is documented in the Max/MSP manual.
The latest I could find online was for version 4.5 and did not
contain notes on trapezoid~ (and actually pong~ too...)


I don't know yet about pong~...




Hi, here are some more ways to do it.
mvh/Stef



#N canvas 40 55 1049 371 10;
#N canvas 255 52 1029 720 crossfade 0;
#X obj 242 638 outlet~;
#X obj 416 378 trapezoid~ 0.2 0.8;
#X obj 241 596 *~;
#X obj 75 620 *~;
#X obj 76 295 inlet~;
#X obj 75 374 *~ 0;
#X obj 241 360 *~ 0;
#X obj 74 396 tabread4~ 1-n;
#X obj 96 343 r \$0-size-in-samples;
#X obj 240 388 tabread4~ 2-n;
#X obj 416 346 wrap~;
#X obj 439 304 sig~;
#X obj 415 247 phasor~;
#X obj 415 31 r \$0-size-in-hz;
#X obj 454 222 r resync;
#X obj 415 202 * 1;
#X floatatom 430 139 5 0 0 0 - - -;
#X obj 430 110 pow -1;
#X floatatom 430 86 5 0 0 0 - - -;
#X msg 522 264 1 \$1;
#X obj 522 290 -;
#X obj 522 221 inlet;
#X floatatom 440 286 5 0 0 0 - - -;
#X obj 565 222 inlet;
#X obj 369 321 sig~ 1;
#X obj 430 166 t b f;
#X msg 489 105 \; resync 0;
#X obj 522 346 line~;
#X obj 469 346 line~;
#X obj 418 540 cos~;
#X obj 417 491 *~ 0.5;
#X obj 90 573 *~ -1;
#X obj 382 468 *~;
#X obj 430 429 == 0;
#X obj 481 407 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
1;
#X text 510 409 0 equal amplitude x-fade;
#X text 510 428 1 linear x-fade;
#X obj 91 596 +~ 1;
#X obj 418 566 *~;
#X obj 90 538 +~;
#X obj 418 516 +~ 0.75;
#X connect 1 0 32 0;
#X connect 1 0 30 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 9 0;
#X connect 7 0 3 0;
#X connect 8 0 5 1;
#X connect 8 0 6 1;
#X connect 9 0 2 0;
#X connect 10 0 1 0;
#X connect 11 0 10 0;
#X connect 12 0 10 0;
#X connect 13 0 15 0;
#X connect 14 0 12 1;
#X connect 15 0 12 0;
#X connect 16 0 25 0;
#X connect 17 0 16 0;
#X connect 18 0 17 0;
#X connect 19 0 20 0;
#X connect 20 0 27 0;
#X connect 21 0 19 0;
#X connect 21 0 28 0;
#X connect 22 0 11 0;
#X connect 23 0 22 0;
#X connect 24 0 10 0;
#X connect 25 0 15 0;
#X connect 25 1 15 1;
#X connect 27 0 1 2;
#X connect 28 0 1 1;
#X connect 29 0 38 0;
#X connect 30 0 40 0;
#X connect 31 0 37 0;
#X connect 32 0 39 0;
#X connect 33 0 32 1;
#X connect 34 0 33 0;
#X connect 34 0 38 1;
#X connect 37 0 3 1;
#X connect 38 0 39 0;
#X connect 39 0 31 0;
#X connect 39 0 2 1;
#X connect 40 0 29 0;
#X restore 528 230 pd crossfade;
#X obj 529 139 phasor~;
#X floatatom 529 97 5 0 0 0 - - -;
#X obj 132 195 table 1-n;
#X obj 197 195 table 2-n;
#X obj 529 322 dac~;
#X obj 130 75 openpanel;
#X obj 130 138 soundfiler;
#X obj 130 44 bng 15 250 50 0 empty empty empty 0 -6 0 10 -262144 -1
-1;
#X obj 130 165 s \$0-size-in-samples;
#X obj 130 222 r \$0-size-in-samples;
#X floatatom 562 207 5 0 0 0 - - -;
#X text 102 17 load a sound first;
#X msg 130 243 \; trapez resize \$1 \; phasor resize \$1 \;;
#N canvas 0 0 450 300 size-in-ms 0;
#X obj 189 129 r \$0-size-in-samples;
#X obj 329 156 samplerate~;
#X obj 235 192 expr $f1/($f2/1000);
#X obj 340 126 loadbang;
#X obj 398 124 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 228 252 s \$0-size-in-ms;
#X connect 0 0 2 0;
#X connect 1 0 2 1;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X restore 132 291 pd size-in-ms;
#X msg 11 45 \; pd dsp 1;
#X obj 11 21 loadbang;
#X obj 529 286 *~ 0.5;
#X floatatom 558 265 5 0 1 0 - - -;
#X obj 289 142 openpanel;
#X obj 289 90 bng 15 250 50 0 empty empty empty 0 -6 0 10 -262144 -1
-1;
#X msg 130 106 read -resize \$1 1-n 2-n;
#N canvas 0 0 458 308 metro 0;
#X obj 145 133 metro 1000;
#N canvas 0 0 450 300 size-in-ms 0;
#X obj 228 252 outlet;
#X obj 248 224 r \$0-size-in-ms;
#X connect 1 0 0 0;
#X restore 198 88 pd size-in-ms;
#X obj 143 180 s \$0-startloop;
#X obj 141 90 inlet;
#X connect 0 0 2 0;
#X connect 1 0 0 1;
#X connect 3 0 0 0;
#X restore 12 114 pd metro;
#N canvas 162 310 454 304 size-in-hz 0;
#X obj 189 129 r \$0-size-in-samples;
#X obj 329 156 samplerate~;
#X obj 340 126 loadbang;
#X obj 398 124 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 235 192 expr $f2/$f1;
#X obj 228 252 s \$0-size-in-hz;
#X connect 0 0 4 0;
#X connect 1 0 4 1;
#X connect 2 0 1 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X restore 131 311 pd size-in-hz;
#X obj 529 43 r \$0-size-in-hz;
#X obj 289 205 soundfiler;
#X obj 12 92 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1 1
;
#X text 216 32 crossfaded sound (not resized);
#X text 232 49 choose one with same length;
#X text 247 66 for avoiding pitching;
#X msg 289 174 read \$1 2-n;
#X msg 597 136 0.25;
#X msg 637 136 0.5;
#X msg 673 135 0.75;
#X obj 573 112 r resync;
#X floatatom 792 216 5 0 0 0 - - -;
#X msg 827 145 0.25;
#X msg 867 145 

Re: [PD] IRC in the Help menu

2007-10-12 Thread Steffen Leve Poulsen
Hans-Christoph Steiner skrev:
 
 On Oct 11, 2007, at 5:51 PM, Steffen Leve Poulsen wrote:
 
 Hans-Christoph Steiner skrev:
 Hehe, yeah, try the latest nightly build, either 0.40 or 0.39:
 http://autobuild.puredata.info/auto-build/2007-10-11/
 I am interested to hear if it works on Windows and GNU/Linux.
 .hc

 On WinXP
 Latest  autobuild


 The Links to firefox are working.
 IRC opens (mIRC?) but

 * Connecting to \\irc.freenode.net\dataflow (6667)
 -
 * Unable to resolve server
 -

 Connecting manually to dataflow works OK

I'mean. opened mIRC manually and connected



 mvh/Stef
 
 Hmm, it looks like Pd is converting // to \\ on Windows, 

yes

but funny that
 it works fine with http://. 

yes, strange


  Can you open using the IRC URL from the
 command line somehow?
 
 irc://irc.freenode.net/dataflow

Yes, from Run-
No, from cmd.exe

 Could you file a bug report?
 
 http://puredata.org/dev/bugtracker

Done


Mvh/Stef



___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] [complex-mod~], [hilbert~]

2007-10-11 Thread Steffen Leve Poulsen
[complex-mod~] and [hilbert~]...are part of PD-vanilla.
Theire missing in PDXtended?

mvh/Stef

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] [complex-mod~], [hilbert~]

2007-10-11 Thread Steffen Leve Poulsen
Steffen Juul skrev:
 
 On 11/10/2007, at 12.32, Steffen Leve Poulsen wrote:
 
 [complex-mod~] and [hilbert~]...are part of PD-vanilla.
 Theire missing in PDXtended?
 
 Not here. Version 0.39.3-extended-rc5. What version do you use?

Ahh, sorry.

This is in

Pd version 0.40.3-extended-20070920-win32

mvh/Stef

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] IRC in the Help menu

2007-10-11 Thread Steffen Leve Poulsen
Hans-Christoph Steiner skrev:
 Hehe, yeah, try the latest nightly build, either 0.40 or 0.39:
 
 http://autobuild.puredata.info/auto-build/2007-10-11/
 
 I am interested to hear if it works on Windows and GNU/Linux.
 
 .hc

On WinXP
Latest  autobuild


The Links to firefox are working.
IRC opens (mIRC?) but

* Connecting to \\irc.freenode.net\dataflow (6667)
-
* Unable to resolve server
-

Connecting manually to dataflow works OK

mvh/Stef

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] fundamental hot/cold midi question

2007-10-01 Thread Steffen Leve Poulsen
Yves Degoyon skrev:
 ola,
 
 anyway, there's not only programming in life, hopefully,
  

  a programmer is someone who has the illusion of making the machine behave
 as a human brain one day, all he is achieving for now is
 to make the human brains behave like machines.
 
 this to tell programmers not to feel so superior..
 i program but that's not the only thing i do.
 
 sevy
 
 __
Whatncannthenprogrammerntrancendntoon?
Howncannthenprogrammerndecentn?n

pulsed

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] [?slider]-resolution and number altering

2007-09-30 Thread Steffen Leve Poulsen
Yes, you're iterating over common issues.
It's a very nice filter once you get to know it.
.this.slider..thing

mvh/Stef

Steffen skrev:
 Hey Pd'ers
 
 I long ago had some troubles with a patch that used the (iem) gui 
 slider. The patch was buggy and i couldn't figure why till i fund that 
 the slider somehow altered the number sent through it.
 
 Today i looked a tad more into it. The results are documented in the 
 attached patch. - If i'm repeating something i'd like to know what and 
 where it is. Other feedback also most welcome.
 
 
 
 
 
 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 
 
 
 No virus found in this incoming message.
 Checked by AVG Free Edition. 
 Version: 7.5.488 / Virus Database: 269.13.35/1039 - Release Date: 29-09-2007 
 21:46


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Midi Clock and Syncing Strategies

2007-09-14 Thread Steffen Leve Poulsen

Hi, this is what I got working on LooseXP

and BTW IMO MIDI is always kinda soft-rough,
I use it but Idont xpect too much.

mvh/ Steffen Leve Poulsen

Si Mills skrev:

Hello List

I was wondering what the current state of play is with regard to  
syncing to midiclock on OSX? (and windows I guess too). I have  
managed to either generate a midi timecode or read it using  
[midirealtimein] over the IAC bus and using [alternate] and [timer]  
to create the clock in PD. (incidently [midirealtimein] shouldn't  
work on OSX but it outputs something akin to 24pulse/quarter note!).  
However, jitter makes it simply unusable for anything serious. I  
suspect there needs to be some sort of lower level support as midi  
over iac is not timetagged and relatively low priority in the OS.


I have seen a number of objects such as  [midiclkin] or  
[midirealtimein] but they either seem to be incomplete or supported  
on one platform. What is the currently the best strategy to syncing  
to either other apps, or hardware for that matter? If one of the  
developers could shed some light on this that would be much appreciated.


Many thanks

Si

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list




#N canvas 486 41 565 560 12;
#X obj 112 10 midirealtimein;
#X obj 112 96 timer;
#X obj 112 125 select 0;
#X obj 147 357 spigot;
#X obj 191 263 del 500;
#X obj 190 289 1;
#X obj 112 67 t b b;
#X obj 147 445 f;
#X msg 220 470 0;
#X obj 165 499 + 1;
#X obj 217 217 0;
#X obj 147 471 moses 95;
#X obj 273 465 select 0 24 48 72;
#X obj 166 191 t b b b;
#X obj 166 379 24;
#X obj 217 337 t f f;
#X obj 292 133 /;
#X floatatom 292 73 5 0 0 0 - - -;
#X msg 292 105 6 \$1;
#X obj 273 505 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 305 505 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 338 505 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 371 505 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 341 73 -set to master BPM;
#X text 276 432 MIDIClock is 96 tics per bar;
#X obj 323 200 cpu;
#N canvas 0 0 534 580 comments 1;
#X text 56 29 This is working on winXP with \;;
#X text 116 97 - PD-Puckette 0.40-2;
#X text 56 141 It's a workaround \, since [midirealtimein] doesn't
;
#X text 159 357 start: 250 (FA);
#X text 158 379 clock-tick: 248 (F8);
#X text 158 401 stop: 252 (FC);
#X text 157 423 continue: 251 (FB);
#X text 111 70 - MIDI-yoke and! MIDI-oxe;
#X text 60 164 give you standart MIDI-Clock-messages \, only timing.
;
#X text 403 16 december 2006;
#X text 53 207 So the startmessage and first tick appears as time 0
[select 0] \, wait one beat \, start counting.;
#X text 135 328 MIDI-Clock-messages are \;;
#X text 37 533 Steffen Leve Poulsen slagmark at worldonline dot dk
;
#X restore 8 9 pd comments;
#X connect 0 0 6 0;
#X connect 1 0 2 0;
#X connect 2 0 13 0;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 3 1;
#X connect 6 0 1 0;
#X connect 6 1 1 1;
#X connect 6 1 3 0;
#X connect 7 0 11 0;
#X connect 7 0 12 0;
#X connect 8 0 7 1;
#X connect 9 0 7 1;
#X connect 10 0 15 0;
#X connect 11 0 9 0;
#X connect 11 1 8 0;
#X connect 12 0 19 0;
#X connect 12 1 20 0;
#X connect 12 2 21 0;
#X connect 12 3 22 0;
#X connect 13 0 14 0;
#X connect 13 1 4 0;
#X connect 13 2 10 0;
#X connect 14 0 7 1;
#X connect 15 0 7 0;
#X connect 15 1 3 1;
#X connect 16 0 4 1;
#X connect 17 0 18 0;
#X connect 18 0 16 0;
#N canvas 275 199 454 304 12;
#X obj 211 53 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 211 177 midiout;
#X obj 102 80 select 0 1;
#X msg 102 114 252;
#X msg 139 114 250;
#X msg 211 107 248;
#X obj 211 77 metro 20.8333;
#X floatatom 309 49 5 0 0 0 - - -;
#X obj 266 24 expr (6/$f1/24);
#X floatatom 264 1 5 0 0 0 - - -;
#X text 207 0 BPM--;
#X connect 0 0 2 0;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 2 1 4 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 5 0;
#X connect 7 0 6 1;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] my first extension, FINISHED

2007-09-12 Thread Steffen Leve Poulsen

Hi Atte

attached patch should do it.

mvh/Steffen Leve Poulsen

Atte André Jensen skrev:

Chris McCormick wrote:

In this particular case of Andre's legato object, 


The name is Atte :-)


I see no positive
reason whatsoever for it being an external. I see several positive
reasons for it being an abstraction:


I made it because I needed it and I couldn't find a similar functionality.

The reason I made it as an external was:

1) Being new to PD I simply couldn't figure out how to do it as an 
abstraction. All the little logics involved made me feel like building a 
ship in a bottle with PD. In C (or any full blown language), it's quite 
easy.


2) I wanted to try my hands on an external.

But I'm looking forward to seeing your implementation as an abstraction, 
  it will help me understand PD more!


Thanks in advance...



#N canvas 361 0 640 675 10;
#X obj 60 41 notein;
#X obj 60 283 phasor~;
#X obj 60 254 mtof;
#X obj 60 365 *~;
#X obj 78 483 dbtorms;
#X obj 81 459 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 61 311 -~ 0.5;
#X obj 58 532 dac~;
#X obj 59 507 *~ 1;
#X obj 239 142 f;
#X obj 189 82 select 0;
#X obj 189 104 - 1;
#X msg 232 105 1;
#X obj 209 142 +;
#X obj 209 182 moses 1;
#X obj 60 149 stripnote;
#X obj 189 294 adsr 1 5 500 50 500;
#X connect 0 0 15 0;
#X connect 0 1 10 0;
#X connect 0 1 15 1;
#X connect 1 0 6 0;
#X connect 2 0 1 0;
#X connect 3 0 8 0;
#X connect 4 0 8 1;
#X connect 5 0 4 0;
#X connect 6 0 3 0;
#X connect 8 0 7 0;
#X connect 8 0 7 1;
#X connect 9 0 13 1;
#X connect 10 0 11 0;
#X connect 10 1 12 0;
#X connect 11 0 13 0;
#X connect 12 0 13 0;
#X connect 13 0 9 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 15 0 2 0;
#X connect 15 1 16 0;
#X connect 16 0 3 1;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] my first extension, FINISHED

2007-09-12 Thread Steffen Leve Poulsen

same as previous, but only trigger at the beginning of phrase.

Steffen Leve Poulsen

Steffen Leve Poulsen skrev:

Hi Atte

attached patch should do it.

mvh/Steffen Leve Poulsen

Atte André Jensen skrev:
But I'm looking forward to seeing your implementation as an 
abstraction,   it will help me understand PD more!


Thanks in advance...
#N canvas 361 0 644 679 10;
#X obj 60 41 notein;
#X obj 60 283 phasor~;
#X obj 60 254 mtof;
#X obj 60 365 *~;
#X obj 78 483 dbtorms;
#X obj 81 459 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 61 311 -~ 0.5;
#X obj 58 532 dac~;
#X obj 59 507 *~ 1;
#X obj 239 142 f;
#X obj 189 82 select 0;
#X obj 189 104 - 1;
#X msg 232 105 1;
#X obj 209 142 +;
#X obj 209 182 moses 1;
#X obj 60 149 stripnote;
#X obj 189 294 adsr 1 5 500 50 500;
#N canvas 0 0 454 304 once 0;
#X obj 147 47 inlet;
#X obj 207 47 inlet;
#X obj 147 105 spigot;
#X obj 147 136 t a b;
#X obj 225 115 0;
#X obj 207 79 1;
#X obj 147 224 outlet;
#X connect 0 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 1 4 0;
#X connect 4 0 2 1;
#X connect 5 0 2 1;
#X restore 116 220 pd once;
#X obj 153 199 b;
#X connect 0 0 15 0;
#X connect 0 1 10 0;
#X connect 0 1 15 1;
#X connect 1 0 6 0;
#X connect 2 0 1 0;
#X connect 3 0 8 0;
#X connect 4 0 8 1;
#X connect 5 0 4 0;
#X connect 6 0 3 0;
#X connect 8 0 7 0;
#X connect 8 0 7 1;
#X connect 9 0 13 1;
#X connect 10 0 11 0;
#X connect 10 1 12 0;
#X connect 11 0 13 0;
#X connect 12 0 13 0;
#X connect 13 0 9 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 14 0 18 0;
#X connect 15 0 2 0;
#X connect 15 1 17 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 17 1;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] my first extension, FINISHED

2007-09-12 Thread Steffen Leve Poulsen
OK I havent tried your external.
Can you describe it's functionality.
Or send me the DLL.

mvh Steffen Leve Poulsen


Atte André Jensen skrev:
 Steffen Leve Poulsen wrote:
 same as previous, but only trigger at the beginning of phrase.
 
 It doesn't seem to work as I expected. Should I do something special to 
 get it to play first note when releasing the second?
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] my first extension, FINISHED

2007-09-12 Thread Steffen Leve Poulsen

Attached has the basics of mode 0.
It's a very good idea you got, great fun to play with.

mvh /Steffen Leve Poulsen


Atte André Jensen skrev:

Steffen Leve Poulsen wrote:

OK I havent tried your external.
Can you describe it's functionality.


[legato] transforms output from [notein]
inlet 1: note
inlet 2: velocity
inlet 3: mode:
0: last note hit priority (default)
1: low note priority
2: high note priority

outlet 1: note
outlet 2: velocity (non re-triggered)
outlet 3: velocity (re-triggered)

Notice: outlets only output values when they actually change. FOr 
instance if two notes are played legato, the socond note will not make 
outlet 2 (velocity) transmit a new value for velocity.


Example: Play (and hold) note 1, note 1 will sound. Play (and hold) note 
2, note 2 will sound. Release note 2,  note 1 will sound. This works for 
unlimited depth (actually 200) and any combination of press/release 
order. This description is valid for mode 0. So basically: when more 
than one note is pressed, the latest one pressed will sound.





#N canvas 556 21 365 683 10;
#X obj 60 57 notein;
#X obj 60 283 phasor~;
#X obj 60 254 mtof;
#X obj 60 365 *~;
#X obj 78 483 dbtorms;
#X obj 81 459 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 9500 1;
#X obj 61 311 -~ 0.5;
#X obj 58 532 dac~;
#X obj 105 313 adsr 1 5 500 50 500;
#X obj 189 85 table memo-\$0 12346;
#X obj 59 507 *~ 0.1;
#N canvas 257 64 437 609 legato 0;
#X obj 93 28 inlet;
#X obj 180 39 inlet;
#X obj 221 164 f;
#X obj 180 61 select 0;
#X obj 175 126 - 1;
#X msg 223 97 1;
#X obj 191 164 +;
#X obj 118 292 tabwrite memo-\$0;
#X obj 93 260 t b f;
#X obj 93 355 tabread memo-\$0;
#X obj 93 334 f;
#X obj 242 385 outlet;
#X obj 93 385 outlet;
#X obj 191 195 moses 1;
#X obj 191 241 t f f f;
#X obj 242 355 change;
#X obj 134 247 0;
#X obj 93 63 stripnote;
#X obj 157 95 t b b b;
#X obj 303 390 outlet;
#X obj 242 326 f;
#X connect 0 0 17 0;
#X connect 1 0 3 0;
#X connect 1 0 17 1;
#X connect 2 0 6 1;
#X connect 3 0 18 0;
#X connect 3 1 5 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 6 0 13 0;
#X connect 8 0 10 0;
#X connect 8 1 7 0;
#X connect 9 0 12 0;
#X connect 10 0 9 0;
#X connect 13 0 20 0;
#X connect 13 1 14 0;
#X connect 14 0 10 1;
#X connect 14 1 7 1;
#X connect 14 2 20 0;
#X connect 15 0 11 0;
#X connect 16 0 7 0;
#X connect 17 0 8 0;
#X connect 18 0 10 0;
#X connect 18 1 4 0;
#X connect 18 2 16 0;
#X connect 20 0 15 0;
#X connect 20 0 19 0;
#X restore 60 85 pd legato mode 0;
#X connect 0 0 11 0;
#X connect 0 1 11 1;
#X connect 1 0 6 0;
#X connect 2 0 1 0;
#X connect 3 0 10 0;
#X connect 4 0 10 1;
#X connect 5 0 4 0;
#X connect 6 0 3 0;
#X connect 8 0 3 1;
#X connect 10 0 7 0;
#X connect 10 0 7 1;
#X connect 11 0 2 0;
#X connect 11 1 8 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Minimizing MIDI Latency

2007-08-31 Thread Steffen Leve Poulsen
You could start with the -noaudio option.

mvh/ Steffen Leve Poulsen


Ryan Supak skrev:
 Hi list,
 
 I use PD as a MIDI pre-processor for Ableton Live on OSX, and have 
 done so for several years.
 
 Something I've always wondered about: how to minimize MIDI latency?  As 
 far as I can tell (though I've never done a scientific test) MIDI 
 throughput latency is locked with audio latency.  I've also noticed that 
 if I disable audio entirely that I run into strange problems.
 
 So, since I use PD MIDI-only, I've ended up setting the audio latency to 
 1ms and disabling audio outputs -- but not disabling audio entirely.
 
 Is this more or less the standard approach?  Thanks in advance for any 
 thoughts!
 rs

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] message to open subpatch window (some gop stuff too)

2007-08-24 Thread Steffen Leve Poulsen
Mathieu Bouchard skrev:
 On Thu, 23 Aug 2007, Steffen Leve Poulsen wrote:
 
 As [namecanvas] is deprecated
 
 What about deprecating the deprecation now??

OK, obsolete then..


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] message to open subpatch window (some gop stuff too)

2007-08-23 Thread Steffen Leve Poulsen
Patrice Colet skrev:
As [namecanvas] is deprecated you could also use

[vis 1;(
|
[s pd-name_of_subwindow]

or

[s pd-name_of_abstraction.pd]


mvh/ Steffen Leve Poulsen

http://myspace.com/pulsed444



 Hi again,
  also you might be interested about attached patch.
 
 Martin Dupras a écrit :
 Hi,

 Is there a way to send a message to open (or close) a window, such as 
 an abstraction or subpatch?

 Cheers,

 - martin


 

 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 
 
 
 No virus found in this incoming message.
 Checked by AVG Free Edition. 
 Version: 7.5.484 / Virus Database: 269.12.2/967 - Release Date: 22-08-2007 
 18:51


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] message to open subpatch window (some gop stuff too)

2007-08-23 Thread Steffen Leve Poulsen
Martin Dupras skrev:
 Thanks for both answers. Very useful.
 
 Where is all this documented?

http://pure-data.cvs.sourceforge.net/pure-data/doc/additional/pd-msg/

mvh Steffen Leve Poulsen


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] wanna get drunk?

2007-08-03 Thread Steffen Leve Poulsen
Hi all

This is not like the max/msp object drunk.
I think its more flexible/usefull like this, just a basic random walk.

http://puredata.info/Members/pulsed/abs/drunk.pd/

mvh/ Steffen Leve Poulsen

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] wanna get drunk?

2007-08-03 Thread Steffen Leve Poulsen
OK what about [walk] ?

Mathieu Bouchard skrev:
 On Fri, 3 Aug 2007, Frank Barknecht wrote:
 Steffen Leve Poulsen hat gesagt: // Steffen Leve Poulsen wrote:
 This is not like the max/msp object drunk.
 I would suggest to give it a different name then, as there already is
 a max-compatible external [drunk] in Cyclone.
 
 depends. if Steffen does it the Miller way, it may have precedence on 
 any kind of MAX compatibility:
 
   http://www.themillerway.com/images/logo.jpg
   http://www.facogel.it/public/576.jpg
   http://images.businessweek.com/ss/06/05/miller_products/image/lite.jpg
 
  _ _ __ ___ _  _ _ ...
 | Mathieu Bouchard - tél:+1.514.383.3801, Montréal QC Canada

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] wanna get drunk?

2007-08-03 Thread Steffen Leve Poulsen
Tak for all your lovly response.
I'll settle on [pd_drunk] (thanks Frank) though it seems like maxed out 
since it*s already PD!

kh/Steffen Leve Poulsen

http://steffen.menneske.dk
http://myspace.com/pulsed444
http://www.google.dk/search?q=%22o-o

Charles Henry skrev:
 hillarious
 I like that a lot :)
 
 On 8/4/07, Andy Farnell [EMAIL PROTECTED] wrote:

 I had a few ideas on this Chuck, perhaps you can distil some
 algorithms out of them,

 [tipsy bang x y]

 Increasing but non-monotonic, [tipsy] behaves like a regular counter but
 occasionally jumps backwards or forwards from one bar to another by x with
 a probability y

 [stumble bang x y]

 [stumble] Increasing but gin and tonic. Behaves like a regular counter but
 occasionally lurches forwards at an increased rate after passing a bar, by
 factor x with probability y - sometimes sings in the street


 [leary slap x y z]

 Follows the attractor (mimsy) value x staggering around with probability y 
 and
 leariness z. The leariness factor sets the probability that it is within the
 vacinity of x attempting to find a saddle point on x's curves - slapping
 throws it out of the current bar, but it never gets banged.

 [sozzled bang x y]

 Spends most of its time on the floor x, but gets up and moves to the next 
 bar with
 probability y


 [shitfaced bang x y ]

 Tries to start fight with x, falls on floor y, performs brownian motion in
 its pants, vomits. Doesn't move after that.




 On Fri, 3 Aug 2007 11:51:24 -0500
 Charles Henry [EMAIL PROTECTED] wrote:

 On 8/3/07, chris clepper [EMAIL PROTECTED] wrote:
 On 8/3/07, Steffen Leve Poulsen [EMAIL PROTECTED] wrote:
 OK what about [walk] ?
 [stagger]
 [stumble]
 [tipsy]
 [blotto]

 LOL
 I never did care much for the term drunkard's walk.  It's pretty old
 fashioned.  Also, not descriptive enough.  We're talking about Markov
 processes or Brownian motion, here and there are differences... I
 would recommend addressing the technical specs with a concise/accurate
 abstraction name, and then wrap it up into a more-user-friendly name,
 like [blotto], that can handle the best default values, and is more
 memorable than say d_markov_walk or c_brownian
 e.g.
 Is it discrete (integer based) or continuous (real/rational)?

 maybe there should be distinctions or a parameter to tell the difference?

 d_walk  -- discrete random walk
 c_walk  -- continuous random walk

 walk d
 walk c

 etc

 Chuck

 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Newbie question: Highest number

2007-07-31 Thread Steffen Leve Poulsen

attached min_max.pd
Merry patching
Steffen Leve Poulsen

IOhannes m zmoelnig skrev:

Alex Lucas wrote:

Hi all,

I've been looking for an object or abstraction which gives the highest
and lowest value from a stream of numbers. If anyone has any suggestions
it would be great to hear from you.



[max] and [min] are your friends here.
just feed the output of the object back to its right input.
the only remaining problem is how to initialize the objects.
a fool-proof approach is the first element of the stream.

when you are using lists instead of streams, there are also specialised
objects (if you don't want to serialize the list into single atoms),
e.g. [minmax] in zexy, but i am sure there is an internal-only solution
in the list-abs by fbar.

fmgasdr
IOhannes

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list




#N canvas 455 155 592 509 10;
#X obj 125 47 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 64 104 random 567;
#X obj 119 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 64 77 metro 23;
#X text 139 127 - reset;
#X floatatom 64 220 5 0 0 0 - - -;
#X floatatom 119 222 5 0 0 0 - - -;
#X floatatom 304 377 5 0 0 0 - - -;
#X floatatom 384 380 5 0 0 0 - - -;
#X obj 334 127 t l b;
#X obj 310 212 t l;
#X msg 334 91 4 7 34 46 1 45 103 2 26;
#X obj 254 242 list split 1;
#X msg 312 57 63 44 21 56 81 4 27 15 111;
#X obj 290 310 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 0 462 312 min_max 0;
#X obj 111 60 inlet;
#X obj 258 89 inlet;
#X obj 111 264 outlet;
#X obj 191 261 outlet;
#X obj 111 214 min;
#X obj 147 212 f;
#N canvas 0 0 458 308 first 0;
#X obj 181 8 inlet;
#X obj 181 255 outlet;
#X obj 181 149 spigot 1;
#X obj 226 126 1;
#X obj 181 46 route float bang;
#X obj 181 181 t f b;
#X obj 251 150 0;
#X connect 0 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 2 1;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 1 0;
#X connect 5 1 6 0;
#X connect 6 0 2 1;
#X restore 258 117 pd first;
#X obj 222 215 f;
#X obj 191 214 max;
#X obj 111 100 t f f;
#X connect 0 0 9 0;
#X connect 1 0 6 0;
#X connect 4 0 5 0;
#X connect 4 0 2 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 6 0 8 1;
#X connect 7 0 8 1;
#X connect 8 0 7 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X connect 9 0 8 0;
#X connect 9 1 6 0;
#X restore 304 332 pd min_max;
#X obj 47 153 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577
0;
#N canvas 0 0 458 308 min_max 0;
#X obj 111 60 inlet;
#X obj 258 89 inlet;
#X obj 111 264 outlet;
#X obj 191 261 outlet;
#X obj 111 214 min;
#X obj 147 212 f;
#N canvas 0 0 466 316 first 0;
#X obj 181 8 inlet;
#X obj 181 255 outlet;
#X obj 181 149 spigot 1;
#X obj 226 126 1;
#X obj 181 46 route float bang;
#X obj 181 181 t f b;
#X obj 251 150 0;
#X connect 0 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 2 1;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 1 0;
#X connect 5 1 6 0;
#X connect 6 0 2 1;
#X restore 258 117 pd first;
#X obj 222 215 f;
#X obj 191 214 max;
#X obj 111 100 t f f;
#X connect 0 0 9 0;
#X connect 1 0 6 0;
#X connect 4 0 5 0;
#X connect 4 0 2 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 6 0 8 1;
#X connect 7 0 8 1;
#X connect 8 0 7 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X connect 9 0 8 0;
#X connect 9 1 6 0;
#X restore 64 172 pd min_max;
#X connect 0 0 3 0;
#X connect 1 0 17 0;
#X connect 2 0 17 1;
#X connect 3 0 1 0;
#X connect 9 0 12 0;
#X connect 9 1 15 1;
#X connect 10 0 12 0;
#X connect 11 0 9 0;
#X connect 12 0 15 0;
#X connect 12 1 10 0;
#X connect 13 0 9 0;
#X connect 15 0 7 0;
#X connect 15 1 8 0;
#X connect 17 0 5 0;
#X connect 17 1 6 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] OSC between win and mac

2007-07-26 Thread Steffen Leve Poulsen
Mojn,
mind the portnumbers.

UDP is like a scream/stream, just broadcasting on the whole network for 
anyone to listen on that port. TCP/IP does handshake on two channels
(eg port  and 4445) involving al kinds of are you ready, oh, I 
didnt get that, messages.

If you want to connect both ways with UDP select two different 
portnumbers for the two senders ( ).

Make shure these ports are free, on win do Run/netstat -a 30 to see.
on mac I don't know.

And as Martin says: Mind the networkfiltering (firewalls), these ports 
need to be open for network traffic.

Good luck

mvh/Steffen Leve Poulsen







Marko Timlin skrev:
 Moi, 
 where can I find martin's net/osc objects mentioned below by IOhannes?
 
 and why do I have to set up the machines to pass udp packets on port 7000? is 
 there a reason why port 7000 and not any other port???
 
 thanks,
 m.
 
 [EMAIL PROTECTED] wrote:
 
 Be sure that both machines are set up to pass udp packets on port 7000.
 
 e.g. be sure to configure your firewalls correctly when dealing with
 network traffic (the sender computer must allow outgoing udp-traffic on
 the specified port, the receiving computer must allow incoming
 udp-traffic on the port and all intermediate firewalls have to act
 accordingly).
 
 and connect a [print] directly to [dumpOSC] so you can see whether you
 receive anyhing.
 
 and watch the console, whether it bails out on either the sending or the
 receiving side.
 
 mfga.sdf
 IOhannes
 
 PS: and use martin's net/osc objects, they are better...
 
 Martin


 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] some music my PD made

2007-07-14 Thread Steffen Leve Poulsen
Hi PD'ers

trax @ http://steffen.menneske.dk/ether/


-CordicTripod.mp3
-deepGreen.mp3
-fsatEddie.mp3
-roughGuideToPeace.mp3

playlist ether.m3u


mvh Steffen Leve Poulsen aka pulsed

o-o



http://steffen.menneske.dk
http://www.myspace.com/pulsed444

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] self-centering random walk

2007-05-13 Thread Steffen Leve Poulsen

Hi Claude.

Thanks for sharing this innovative concept I think its very usefull.
Cant wait to hear how you use it

Attached patch is my way of making centered random.


mhv/ (kind regards) Steffen Leve Poulsen

Claude Heiland-Allen skrev:
Here's an example of a random walk that is biased towards the middle of 
its range and is guaranteed not exceed its bounds.


Hope someone finds it useful, I'm using it for melodies in a generative 
piece (I'll publish the full patch in a couple of weeks).


Any statisticians want to analyse it further than I have?
Anyone have any suggestions for improvements?


Claude


#N canvas 108 44 738 515 10;
#X obj 46 163 tabwrite vu;
#X obj 46 136 + 1;
#X obj 46 98 tabread vu;
#X obj 46 64 t f f;
#N canvas 0 0 450 300 (subpatch) 0;
#X array vu 1000 float 2;
#X coords 0 99 1000 0 200 140 1;
#X restore 398 177 graph;
#X obj 46 -25 until;
#X msg 106 -53 \; vu const 0;
#X obj 46 21 expr (random(1000 \, 0)+random(1000 \, 0)+random(1000
\, 0))/3;
#X msg 46 -53 10;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 3 1 0 1;
#X connect 5 0 7 0;
#X connect 7 0 3 0;
#X connect 8 0 5 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] up-down-counter.pd

2007-05-06 Thread Steffen Leve Poulsen

To Kyle

mvh Steffen Leve Poulsen
#N canvas 254 194 637 394 12;
#X obj 240 147 f;
#X obj 275 146 + 1;
#X obj 240 176 mod;
#X obj 240 241 -;
#X obj 240 268 abs;
#X floatatom 240 309 5 0 0 0 - - -;
#X obj 240 35 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X floatatom 403 76 5 0 0 0 - - -;
#X obj 403 156 * 2;
#X obj 240 63 metro 234;
#X obj 306 305 print;
#X obj 502 35 16;
#X obj 502 9 loadbang;
#X connect 0 0 2 0;
#X connect 1 0 0 1;
#X connect 2 0 1 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 10 0;
#X connect 6 0 9 0;
#X connect 7 0 3 1;
#X connect 7 0 8 0;
#X connect 7 0 0 1;
#X connect 8 0 2 1;
#X connect 9 0 0 0;
#X connect 11 0 7 0;
#X connect 12 0 11 0;
#X connect 12 0 9 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] 4 video and audio problem

2007-04-23 Thread Steffen Leve Poulsen
Peter Forde skrev:
 Hey guys and gals,
 
 I've mostly been using Gem with PD and so have not the best understanding of 
 the audio use.
 I have set up a patch that uses the mouse to fade between the video and 
 audio of 4 selected pieces. My computer can almost achieve this but I get 
 audio drop outs and with longer clips it slows down.
 The videos are squashed to 360x288 with no compression or audio. The audio 
 is wav format at 44100.
 
 I am using a a Windows XP Toshiba with 1.83GHz  processor and 0.99 GB RAM. 
 Could someone check my patch to see if there is any obvious way of speeding 
 it up or will my computer just not accept this. I plan on having four 5 
 minute vid and audio pieces to fade between.

Maybe if you preload the audio you'll get a better result.
Take a look at [tabplay~]-help.

mvh/ Steffen Leve Poulsen

http://steffen.menneske.dk

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] list without spaces

2007-04-19 Thread Steffen Leve Poulsen

see attachment

tjers

Steffen Leve Poulsen

gottlieb skrev:

dear List,

This is a pretty basic query, I think.
I am trying to make a sample-scrambler where I can nbavigate through a 
large database of samples.  I'm using soundfiler to load all the samples 
and tabplay~ .  I named all the samples array# (array1,array2,etc) I am 
trying to use list to allow me to shift the numeric value at the end of 
the array message, but how can I get rid of the space between 'array' 
and the new number?  Or, is there another way to do this?


thanks

BG



#N canvas 318 125 454 304 10;
#X obj 147 171 print;
#X obj 147 117 makefilename array%d.wav;
#X msg 147 143 open \$1;
#X floatatom 147 94 5 0 0 0 - - -;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Wiimote

2007-04-19 Thread Steffen Leve Poulsen
You should use midi yoke nt as loopback, install their midi-oxe as well.
Remeber to update directX once in a while.

I have GlovePIE running with latest version of both pd-vanilla/xtended.
Just for a short test.

mvh Steffen Leve Poulsen

Patco skrev:
 Mike Wozniewski a écrit :
 I think that the easiest way is to use GlovePIE, and route wiimote 
 messages to MIDI, keypresses, etc.

 see: http://carl.kenner.googlepages.com/glovepie_download

 -Mike

   
  Anyone has been able to connect pd and glovepie with a virtualmidi port?
 I've tried with mapple driver and pd extended 0.39-RC1, pd crashes when 
 I open it if I do use the same MIDI input port as glovepie midi output 
 device, and pd-vanilla gives a PortMidi: `Host error' message
 
 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


[PD] Osc--music made with PD

2007-04-14 Thread Steffen Leve Poulsen
Hi all,

Here- http://steffen.menneske.dk/ocs/ -is some live performed music, 
made with PD.


Enjoy

mvh/ Steffen Leve Poulsen

___
[EMAIL PROTECTED] mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] curve object not working right

2007-04-03 Thread Steffen Leve Poulsen
You could use several [curve] objects

mvh/ Steffen Leve Poulen

[EMAIL PROTECTED] skrev:
 hello,
 When I use the curve object it wont render past 10 inputs.  For example 
 [curve 10] works but [curve 11] 
 or above doesnt.  Is this normal and if it is not what do /i do to fix it.  
 It is the latest gem running on either 
 PD .39.2 or .40.2 os 10.4.9.
 
 Thanks,
 Alain
 
 
 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] invisible pyext on windows

2007-04-02 Thread Steffen Leve Poulsen
hi Martin, Thomas

I tried to get the py ext to work many times, now I finally made it work 
, on winxp and pd 040-2 vanilla. Pyext from
http://g.org/ext/py/py-bin-0.2.0-pd-win.zip, python 2.4.4..

Follow the instructions in the readme.txt
If you dont set the path to the scripts, the strange things occur
(you could also just copy the scripts to the examples folder).

BTW the sig examples are not working, but the rest are OK.

This is really great, thank you Thomas.

mvh/ Stefffen Leve Poulsen


Martin Peach skrev:
 I was hoping to try python with pd but ran into this, which has been 
 mentioned before:
 http://lists.puredata.info/pipermail/pd-list/2006-11/044535.html
 
 I find that the [pyext]s occasionally do appear but usually they don't. 
 It doesn't seem to matter if they are top level or not.
 This is on WinXp, Miller's pd040-2, pyext from 
 http://g.org/ext/py/py-bin-0.2.0-pd-win.zip, python 2.4.4.
 You can see an example here:
 http://132.205.142.12/screenshot.PNG
 
 Martin
 
 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] invisible pyext on windows

2007-04-02 Thread Steffen Leve Poulsen
Thomas Grill skrev:
 Hi,
 
 BTW the sig examples are not working, but the rest are OK.

 
 Not working in which way?

first
they just crash pd

then I installed numpy-1.0.1.win32-py2.4.exe
now I can see the patch but also the wincrashmenu

 I'm not really sure if it's a good idea to use signals in Python  
 anyway, because it's a real CPU-hog.

OK I wasn't planning on using pyext~

 greetings,
 Thomas
 
 --
 Thomas Grill
 http://g.org
 
 
 
 ___
 PD-list@iem.at mailing list
 UNSUBSCRIBE and account-management - 
 http://lists.puredata.info/listinfo/pd-list
 
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Cymatics/Chladni figures simulation

2007-03-31 Thread Steffen Leve Poulsen
Interesting project.

Here is a Gem version of the basics.

Also I'm trying to make one with [pix_sig2pix~]

mhv/ Steffen Leve Poulsen


Carl Knott skrev:
 I'd like to write a simulation of a Cymatic Tonoscope.
 
 I plan to create a physical model of a circular membrane, sand will
 be sprinkled on top of it. When a person speaks into a microphone
 the membrane will vibrate causing the sand to form standing wave patterns.
 
 Obviously this will be done in real time.
 
 Any ideas guys? I really want to write this :)
 
 All the best,
 
 Carl.
 
 


___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Cymatics/Chladni figures simulation

2007-03-31 Thread Steffen Leve Poulsen

ooos

attached Chladni.pd

Carl Knott skrev:

I'd like to write a simulation of a Cymatic Tonoscope.

I plan to create a physical model of a circular membrane, sand will
be sprinkled on top of it. When a person speaks into a microphone
the membrane will vibrate causing the sand to form standing wave patterns.

Obviously this will be done in real time.

Any ideas guys? I really want to write this :)

All the best,

Carl.

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list




#N canvas 518 5 629 456 10;
#X obj 376 149 v m;
#X obj 424 151 v n;
#X text 24 16 
http://local.wasp.uwa.edu.au/~pbourke/surfaces_curves/chladni/index.html
;
#N canvas 506 26 778 737 calc 0;
#X obj 98 111 v L;
#X obj 43 160 v pi;
#X obj 98 41 loadbang;
#X obj 304 362 expr cos(n*pi*x/L)*cos(m*pi*y/L)-cos(m*pi*x/L)*cos(n*pi*y/L)
;
#X obj 43 78 1;
#X obj 304 171 until;
#X obj 425 255 + 1;
#X obj 339 232 v x;
#X obj 425 325 + 1;
#X obj 339 326 v y;
#X obj 419 149 v x;
#X obj 304 143 4096;
#X obj 279 40 inlet;
#X obj 279 100 t b b b;
#X obj 349 530 t l;
#X obj 240 519 list;
#X obj 304 502 list;
#X obj 240 599 outlet;
#X obj 240 566 list trim;
#X obj 215 362 t b b;
#X obj 449 149 v y;
#X obj 304 201 t b b;
#X obj 279 67 del 100;
#X obj 253 65 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 0 0 454 304 pi 0;
#X obj 76 79 inlet;
#X obj 76 153 outlet;
#X obj 76 102 atan;
#X obj 76 127 * 4;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X restore 43 99 pd pi;
#X obj 339 277 t f f;
#X obj 98 80 64;
#X obj 339 255 mod 64;
#X obj 339 303 select 0;
#X obj 419 117 0;
#X connect 2 0 4 0;
#X connect 2 0 26 0;
#X connect 3 0 16 0;
#X connect 4 0 24 0;
#X connect 5 0 21 0;
#X connect 6 0 7 0;
#X connect 7 0 27 0;
#X connect 8 0 9 0;
#X connect 9 0 8 0;
#X connect 11 0 5 0;
#X connect 12 0 22 0;
#X connect 13 0 19 0;
#X connect 13 1 11 0;
#X connect 13 2 29 0;
#X connect 14 0 16 1;
#X connect 15 0 18 0;
#X connect 16 0 14 0;
#X connect 16 0 15 1;
#X connect 18 0 17 0;
#X connect 19 0 16 1;
#X connect 19 1 15 0;
#X connect 21 0 3 0;
#X connect 21 1 7 0;
#X connect 22 0 13 0;
#X connect 23 0 13 0;
#X connect 24 0 1 0;
#X connect 25 0 28 0;
#X connect 25 1 6 0;
#X connect 26 0 0 0;
#X connect 27 0 25 0;
#X connect 28 0 9 0;
#X connect 29 0 20 0;
#X connect 29 0 10 0;
#X restore 352 220 pd calc;
#X floatatom 376 127 5 0 0 0 - - -;
#X floatatom 424 128 5 0 0 0 - - -;
#X obj 279 220 gemhead;
#X obj 196 223 loadbang;
#X msg 196 246 grey;
#X obj 279 263 pix_set 64 64;
#X obj 279 297 pix_texture;
#X obj 30 128 gemwin;
#X obj 352 199 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 279 319 square;
#X msg 42 101 0 \, destroy;
#X msg 30 72 create \, 1;
#X obj 376 91 unpack;
#X msg 376 56 5 2;
#X msg 406 56 3 2;
#X msg 437 55 4 3;
#X text 104 72 - 1;
#X text 312 56 2 -;
#X msg 463 55 5 1;
#X msg 196 272 repeat 0;
#X msg 491 54 13 11;
#N canvas 0 0 454 304 (subpatch) 0;
#X text 167 33 Chladni implementation;
#X text 170 59 by Steffen Leve Poulen 2007;
#X restore 32 163 pd;
#X connect 3 0 9 1;
#X connect 4 0 0 0;
#X connect 4 0 12 0;
#X connect 5 0 1 0;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 23 0;
#X connect 9 0 10 0;
#X connect 10 0 13 0;
#X connect 12 0 3 0;
#X connect 14 0 11 0;
#X connect 15 0 11 0;
#X connect 16 0 4 0;
#X connect 16 1 5 0;
#X connect 17 0 16 0;
#X connect 18 0 16 0;
#X connect 19 0 16 0;
#X connect 22 0 16 0;
#X connect 23 0 10 0;
#X connect 24 0 16 0;
___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Binary - integer conversion

2007-03-19 Thread Steffen Leve Poulsen

list of any length or ints of any size.
Here is xor.pd and help-xor.pd (already a classic).

You should tjek out how xor.pd is constructed. I think this is the way 
to go when its bitwise. You can easily change the int size (list length).


God Luck
Steffen Leve Poulsen

David Powers skrev:



Ah this is interesting - and proof that it's really time I learn
dynamic patching ... your approach is probably more efficient, but on
the other hard, my approach allows for lists of any length. (Although,
I doubt that I'd be doing patterns longer than 64 very often.) Anyway,
my point is that with dynamic patching perhaps it would be possible to
use your approach, without knowing the length of the list in advance.
~David

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list




#N canvas 300 28 797 737 12;
#X obj 87 4 inlet;
#X obj 263 619 outlet;
#X obj 147 227 until;
#X msg 147 168 16;
#X obj 147 194 t f b;
#X msg 282 214 0;
#X obj 147 259 f;
#X obj 181 260 + 1;
#X obj 298 576 f;
#X obj 263 575 +;
#X obj 199 457 pow;
#X msg 199 429 2 \$1;
#X obj 143 392 f;
#X obj 103 392 f;
#X obj 103 555 *;
#X obj 103 488 ;
#X obj 143 488 ;
#X obj 148 287 t b b f;
#X obj 103 525 !=;
#X obj 162 352 inlet;
#X obj 87 128 t b f;
#X text 272 69 XOR does bitwise xor intersection of two 16 bit integers
;
#X text 458 136 XOR:;
#X text 429 169 1 xor 1 = 0;
#X text 429 199 0 xor 0 = 0;
#X text 429 229 1 xor 0 = 1;
#X text 429 259 0 xor 1 = 1;
#X text 106 669 Steffen Leve Poulsen 2007;
#X text 107 689 steffen at menneske dot dk;
#X obj 87 36 t b f;
#X obj 87 67 del 100;
#X obj 87 97 f;
#X connect 0 0 29 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 2 0;
#X connect 4 1 5 0;
#X connect 5 0 6 1;
#X connect 5 0 9 1;
#X connect 6 0 7 0;
#X connect 6 0 17 0;
#X connect 7 0 6 1;
#X connect 8 0 9 1;
#X connect 9 0 8 0;
#X connect 9 0 1 0;
#X connect 10 0 16 1;
#X connect 10 0 15 1;
#X connect 10 0 14 1;
#X connect 11 0 10 0;
#X connect 12 0 16 0;
#X connect 13 0 15 0;
#X connect 14 0 9 0;
#X connect 15 0 18 0;
#X connect 16 0 18 1;
#X connect 17 0 13 0;
#X connect 17 1 12 0;
#X connect 17 2 11 0;
#X connect 18 0 14 0;
#X connect 19 0 12 1;
#X connect 20 0 3 0;
#X connect 20 1 13 1;
#X connect 29 0 30 0;
#X connect 29 1 31 1;
#X connect 30 0 31 0;
#X connect 31 0 20 0;
#N canvas 177 35 1060 501 12;
#X obj 753 241 until;
#X obj 753 206 unpack f f;
#X msg 753 179 256 0;
#X obj 753 270 f;
#X obj 780 270 + 1;
#X obj 753 302 t f f;
#X obj 753 424 tabwrite vu;
#N canvas 0 0 450 300 (subpatch) 0;
#X array vu 256 float 0;
#X coords 0 256 255 0 200 140 1;
#X restore 442 208 graph;
#X obj 913 90 f;
#X obj 959 90 + 1;
#X obj 913 119 mod 256;
#X msg 913 33 40;
#X msg 952 34 0;
#X obj 913 61 metro;
#N canvas 0 0 512 223 tobin 0;
#X obj 417 44  1;
#X obj 377 44  2;
#X obj 337 44  4;
#X obj 297 44  8;
#X floatatom 269 103 5 0 0 0 - - -;
#X obj 247 44  16;
#X obj 200 44  32;
#X obj 157 44  64;
#X obj 107 44  128;
#X obj 104 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
128;
#X obj 124 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
64;
#X obj 144 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
32;
#X obj 164 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
16;
#X obj 184 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
8;
#X obj 204 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 4
4;
#X obj 224 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 2
2;
#X obj 244 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 269 134 outlet;
#X obj 343 102 inlet;
#X connect 0 0 16 0;
#X connect 1 0 15 0;
#X connect 2 0 14 0;
#X connect 3 0 13 0;
#X connect 4 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 1 0;
#X connect 4 0 0 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 4 0 8 0;
#X connect 4 0 17 0;
#X connect 5 0 12 0;
#X connect 6 0 11 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 18 0 4 0;
#X coords 0 -1 1 1 222 23 2 100 100;
#X restore 31 43 pd tobin;
#N canvas 0 0 543 205 tobin 0;
#X obj 417 44  1;
#X obj 377 44  2;
#X obj 337 44  4;
#X obj 297 44  8;
#X floatatom 269 103 5 0 0 0 - - -;
#X obj 247 44  16;
#X obj 200 44  32;
#X obj 157 44  64;
#X obj 107 44  128;
#X obj 104 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
128;
#X obj 124 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
64;
#X obj 144 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 32
32;
#X obj 164 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
16;
#X obj 184 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
8;
#X obj 204 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 4
4;
#X obj 224 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
2;
#X obj 244 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 269 134 outlet;
#X obj 343 102 inlet;
#X connect 0 0 16 0;
#X connect 1 0 15 0;
#X connect 2 0 14 0;
#X connect 3 0 13 0;
#X

Re: [PD] Binary - integer conversion

2007-03-19 Thread Steffen Leve Poulsen

Just a small correction

Stffn

Steffen Leve Poulsen skrev:

list of any length or ints of any size.
Here is xor.pd and help-xor.pd (already a classic).

You should tjek out how xor.pd is constructed. I think this is the way 
to go when its bitwise. You can easily change the int size (list length).


God Luck
Steffen Leve Poulsen

David Powers skrev:



Ah this is interesting - and proof that it's really time I learn
dynamic patching ... your approach is probably more efficient, but on
the other hard, my approach allows for lists of any length. (Although,
I doubt that I'd be doing patterns longer than 64 very often.) Anyway,
my point is that with dynamic patching perhaps it would be possible to
use your approach, without knowing the length of the list in advance.
~David
#N canvas 177 35 1060 501 12;
#X obj 753 241 until;
#X obj 753 206 unpack f f;
#X msg 753 179 256 0;
#X obj 753 270 f;
#X obj 780 270 + 1;
#X obj 753 302 t f f;
#X obj 753 424 tabwrite vu;
#N canvas 0 0 450 300 (subpatch) 0;
#X array vu 256 float 0;
#X coords 0 256 255 0 200 140 1;
#X restore 442 208 graph;
#X obj 913 90 f;
#X obj 959 90 + 1;
#X obj 913 119 mod 256;
#X msg 913 33 40;
#X msg 952 34 0;
#X obj 913 61 metro;
#N canvas 0 0 512 223 tobin 0;
#X obj 417 44  1;
#X obj 377 44  2;
#X obj 337 44  4;
#X obj 297 44  8;
#X floatatom 269 103 5 0 0 0 - - -;
#X obj 247 44  16;
#X obj 200 44  32;
#X obj 157 44  64;
#X obj 107 44  128;
#X obj 104 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
128;
#X obj 124 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
64;
#X obj 144 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
32;
#X obj 164 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
16;
#X obj 184 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
8;
#X obj 204 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 4
4;
#X obj 224 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 2
2;
#X obj 244 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 269 134 outlet;
#X obj 343 102 inlet;
#X connect 0 0 16 0;
#X connect 1 0 15 0;
#X connect 2 0 14 0;
#X connect 3 0 13 0;
#X connect 4 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 1 0;
#X connect 4 0 0 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 4 0 8 0;
#X connect 4 0 17 0;
#X connect 5 0 12 0;
#X connect 6 0 11 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 18 0 4 0;
#X coords 0 -1 1 1 222 23 2 100 100;
#X restore 31 43 pd tobin;
#N canvas 0 0 543 205 tobin 0;
#X obj 417 44  1;
#X obj 377 44  2;
#X obj 337 44  4;
#X obj 297 44  8;
#X floatatom 269 103 5 0 0 0 - - -;
#X obj 247 44  16;
#X obj 200 44  32;
#X obj 157 44  64;
#X obj 107 44  128;
#X obj 104 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
128;
#X obj 124 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
64;
#X obj 144 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 32
32;
#X obj 164 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
16;
#X obj 184 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
8;
#X obj 204 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 4
4;
#X obj 224 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
2;
#X obj 244 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 269 134 outlet;
#X obj 343 102 inlet;
#X connect 0 0 16 0;
#X connect 1 0 15 0;
#X connect 2 0 14 0;
#X connect 3 0 13 0;
#X connect 4 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 1 0;
#X connect 4 0 0 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 4 0 8 0;
#X connect 4 0 17 0;
#X connect 5 0 12 0;
#X connect 6 0 11 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 18 0 4 0;
#X coords 0 -1 1 1 222 23 2 100 100;
#X restore 50 91 pd tobin;
#N canvas 0 0 587 245 tobin 0;
#X obj 417 44  1;
#X obj 377 44  2;
#X obj 337 44  4;
#X obj 297 44  8;
#X floatatom 269 103 5 0 0 0 - - -;
#X obj 247 44  16;
#X obj 200 44  32;
#X obj 157 44  64;
#X obj 107 44  128;
#X obj 104 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
128;
#X obj 124 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
64;
#X obj 144 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 32
32;
#X obj 164 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
16;
#X obj 184 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
8;
#X obj 204 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
4;
#X obj 224 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 2
2;
#X obj 244 104 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 269 134 outlet;
#X obj 343 102 inlet;
#X connect 0 0 16 0;
#X connect 1 0 15 0;
#X connect 2 0 14 0;
#X connect 3 0 13 0;
#X connect 4 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 1 0;
#X connect 4 0 0 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 4 0 8 0;
#X connect 4 0 17 0;
#X connect 5 0 12 0;
#X connect 6 0 11 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 18 0 4 0;
#X coords 0 -1 1 1 222 23 2 100 100;
#X restore 31

Re: [PD] midi strange problem

2006-12-18 Thread Steffen Leve Poulsen


Hi,
Try to install MIDI-oxe as well, it appears to make MIDI-yoke more reliable.

Also the soundcard-drivers might be an 
issue,  try to use MMIO on WinXP when using MIDI with several apps.



tjers/ Steffen Leve Poulsen

 o-o

At 08:20 18-12-2006, you wrote:


David Powers a écrit :

You think that's bad ... I can't get my midi input back into PD at
all. Yet it goes out, because in my monitoring program it's visible.
I'm using Midi-yoke on winXP. I guess this is some PD-extended
problem.
And it goes in with physical midiIn, but here 
too midiYoke, maple driver, doesn't work on pd 
while it works on other softwares.



___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Fwd: Re: [pd] [noise~],[expr~], questions

2006-12-12 Thread Steffen Leve Poulsen



Date: Tue, 12 Dec 2006 16:10:08 +0100
To: hard off [EMAIL PROTECTED]
From: Steffen Leve Poulsen [EMAIL PROTECTED]
Subject: Re: [pd] [noise~],[expr~], questions

for more info on [expr]


http://crca.ucsd.edu/~syadegar/expr.html

also look at the sourcecode.
 Steffen Leve Poulssen



___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] metro type of object

2006-11-27 Thread Steffen Leve Poulsen

Hi Timon
I use this (attached) alot to make fills and cut up beats.
It is a simple chaos game algorithmn.
Hope its usefull
mvh Steffen Leve Poulsen
At 23:32 26-11-2006, you wrote:


Hi, Im looking for an object that receives one bang and outputs a
variable number of bangs, over variable time (like [drip]). I know
this will be similar to metro, but It simplifies greatly what I want
to achieve. Anyone know of such object?

Thanks,
Timon.
#N canvas 512 186 647 395 12;
#X obj 81 100 random 16;
#X obj 81 187 t b f;
#X obj 81 216 del;
#X obj 81 130 / 16;
#X obj 81 74 metro 1000;
#X obj 81 49 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X obj 81 159 * 1000;
#X obj 81 241 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 51 241 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 271 140 random 16;
#X obj 271 170 / 16;
#X obj 271 44 metro 1000;
#X obj 271 19 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 271 199 * 1000;
#X obj 256 286 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 241 286 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 271 114 until;
#X obj 271 256 pipe;
#X obj 271 227 t f f;
#X obj 271 89 3;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 1 1 2 1;
#X connect 2 0 7 0;
#X connect 3 0 6 0;
#X connect 4 0 0 0;
#X connect 4 0 8 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 9 0 10 0;
#X connect 10 0 13 0;
#X connect 11 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 11 0;
#X connect 13 0 18 0;
#X connect 16 0 9 0;
#X connect 17 0 14 0;
#X connect 18 0 17 0;
#X connect 18 1 17 1;
#X connect 19 0 16 0;
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.409 / Virus Database: 268.14.15/550 - Release Date: 24-11-2006

___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list


Re: [PD] Using csoundapi~

2006-11-07 Thread Steffen Leve Poulsen



Hi Mike

I keep PD and samplerate in *.csd the same.
Also it seems to be more stable to:

eg  [csoundapi~ 2] ( 2in/2out),

and then open *.csd


The help file is in : \Csound\examples\csoundapi_tilde\csoundapi.pd

Good Luck

Steffen Leve Poulsen

o-o




Hi all,

I was checking out the csoundapi~ external, and was wondering if there
was any updates to the help files. Basically, I got a copy of the
external from the Csound5 distribution (there was no help file with
it, contrary to what is in the manual), and the help file that I did
find was from the 4.2xxx version. There seems to be a difference from
what that version expects. The 'csd' file linked in the pd-instance
doesn't seem to recognize that it is a stereo patch, and only creates
a single audio channel. I did notice that when I changed it to
[csoundapi~ 2 test.csd] that it created a stereo object.

Anyway, I have not had a chance to test weather or not the other
messages work with the csoundapi~ object, as I can't get the orchestra
file to load.

Anyone got any ideas?


Thanks,

Mike


--
Help the Environment, Plant a Bush back in Texas!



___
PD-list@iem.at mailing list
UNSUBSCRIBE and account-management - 
http://lists.puredata.info/listinfo/pd-list