- chuck-dev - lists.cs.princeton.edu

RtAudio 4.0.2
by Philippe Lamarche 13 Sep '07

13 Sep '07

Hi, I was able to replace RtAudio with the last version : RtAudio 4.02. As always, it's highly experimental, but I think it works. With version 4.02, I believe it would be possible to add channel offset (ie. use 4 channels, from 6 to 12) on the input and output. My experience so far has been that the blocking functionality is no longer is no longer supported, is this a problem? If anyone is interested, I could add something to the –channels –in –out option like –channels(channelN,offsetN) and wrap it with my ASIO build on electro-music.com. Thanks, Philippe.

2 1

Compiling 1.2.1.0 with Visual Studio 2005
by Imre Kéri 13 Sep '07

13 Sep '07

Hi! Once in July 2007 there was some discussion about STL vectors issue with Visual Studio 2005 (thread: 'Asio Build and "Debug Assertion Failed" Error.'). It seems this is still not solved, I get this runtime error whenever I want to play a file with ChucK right at startup. Also, I get a compilation error: .\ugen_xxx.cpp(2590) : error C2440: 'initializing' : cannot convert from 'const char *' to 'char *' Is it planned to fix these problems? Regards, Imre

3 3

portable serial I/O library
by Ge Wang 11 Aug '07

11 Aug '07

Greetings, Does anyone know of any compact, portable (OS X, linux, windows) library for performing serial port I/O? Google searches turn up much code and suggestions, but is there a definitive (and yet concise) library for doing cross-platform serial I/O? We are looking into adding such support in ChucK. Much appreciate any leads! Best, Ge!

3 4

Lisa behaving strangely?
by Kassen 08 Aug '07

08 Aug '07

Hi list, Hi Dan! I have a slight issue with LiSa when she's supposed to play backwards. Let's assume for a second we want to record a single piano note, then play it back *once* in reverse; ---------------------- Rhodey r => LiSa l => dac; second => l.duration; 1 => l.record; 1 => r.noteOn; second => now; 0 => l.record; 0 => l.loop; second => l.playPos; -1 => l.rate; 1 => l.play; second => now; --------------- The above looks entirely correct to me, however, it won't generate a sound. for .999::second => l.playPos; it will work just fine and it will also work fine when .loop is turned on but turning loop on for one-shot samples isn't always convenient. I believe this to be a bug, probably related to the way in which LiSa determines when she is supposed to stop playing. When you, Dan, have a moment, could you please look into this? Yours, Kas.

1 0

Minor patch for ugen_osc.cpp
by Conrad Scott 08 Jul '07

08 Jul '07

Just started using ChucK and greatly enjoying myself. Not much music (or even noise) as yet, just learning the language for now. Not understanding the various `sync' options, I was setting a SinOsc's phase explicitly and wasn't getting what I expected. On inspection of the source there was a minor typo in CK_DLL_CTRL(osc_ctrl_phase), which I fixed. While I was there I tidied up the range checking of input parameters (including those used via `sync', which I now understand *grin*), particularly so that negative frequencies are handled cleanly. The original code contained snippets like "if( d->num <= 1.0 ) d->num += floor( d->num )" that can't of been doing what anyone wanted them to do. The same sort of changes and range checking probably ought to be done elsewhere in the code too, such as in the sndbuf ugen, but that's a job for another day. I'm also not convinced that the code to adjust the phase in CK_DLL_CTRL(osc_ctrl_sync) can be correct. It certainly should only be done if ugen->m_num_src is non-zero; but even then, I imagine pld's comment there is correct. Again, for another day. Attached is a diff patch against the current CVS version. I can't imagine you'll need any form of assignment for so small a change, but please use the attached code in anyway you want for any purpose you see fit. It comes with no warranty, but it has been compiled and vaguely tested on x86 Windows XP (under Cygwin) and PPC Mac OS X 10.4 (with a recent copy of the developers tools). Now, back to making some noise. All the best and thanks for the great system, Conrad Index: ugen_osc.cpp =================================================================== RCS file: /cvs/chuck_dev/v2/ugen_osc.cpp,v retrieving revision 1.44 diff -c -3 -p -r1.44 ugen_osc.cpp *** ugen_osc.cpp 22 Mar 2007 00:49:51 -0000 1.44 --- ugen_osc.cpp 8 Jul 2007 23:38:50 -0000 *************** CK_DLL_TICK( osc_tick ) *** 303,317 **** d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // synch phase to input else if( d->sync == 1 ) { // set phase d->phase = in; // no update inc_phase = FALSE; } --- 303,318 ---- d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // synch phase to input else if( d->sync == 1 ) { // set phase d->phase = in; + // bound it (+0 <= d->phase < 1) + if( d->phase <= 0 || d->phase >= 1 ) d->phase -= floor( d->phase ); // no update inc_phase = FALSE; } *************** CK_DLL_TICK( osc_tick ) *** 322,330 **** t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync to now // else if( d->sync == 3 ) --- 323,330 ---- t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync to now // else if( d->sync == 3 ) *************** CK_DLL_TICK( osc_tick ) *** 337,349 **** // set output to current phase *out = (SAMPLE)d->phase; ! // check if( inc_phase ) { - // step the phase. d->phase += d->num; ! // keep the phase between 0 and 1 ! if( d->phase > 1.0 ) d->phase -= 1.0; } return TRUE; --- 337,349 ---- // set output to current phase *out = (SAMPLE)d->phase; ! // advance internal phase if( inc_phase ) { d->phase += d->num; ! // bound it (+0 <= d->phase <= 1) ! if( d->phase < 0 ) d->phase += 1; ! else if( d->phase >= 1 ) d->phase -= 1; } return TRUE; *************** CK_DLL_TICK( sinosc_tick ) *** 373,387 **** d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync phase to input else if( d->sync == 1 ) { // set freq d->phase = in; inc_phase = FALSE; } // FM synthesis --- 373,389 ---- d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync phase to input else if( d->sync == 1 ) { // set freq d->phase = in; + // bound it (+0 <= d->phase < 1) + if( d->phase <= 0 || d->phase >= 1 ) d->phase -= floor( d->phase ); + // no update inc_phase = FALSE; } // FM synthesis *************** CK_DLL_TICK( sinosc_tick ) *** 391,399 **** t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync phase to now // else if( d->sync == 3 ) --- 393,400 ---- t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync phase to now // else if( d->sync == 3 ) *************** CK_DLL_TICK( sinosc_tick ) *** 406,417 **** // set output *out = (SAMPLE) ::sin( d->phase * TWO_PI ); if( inc_phase ) { - // next phase d->phase += d->num; ! // keep the phase between 0 and 1 ! if( d->phase > 1.0 ) d->phase -= 1.0; } return TRUE; --- 407,419 ---- // set output *out = (SAMPLE) ::sin( d->phase * TWO_PI ); + // advance internal phase if( inc_phase ) { d->phase += d->num; ! // bound it (+0 <= d->phase <= 1) ! if( d->phase < 0 ) d->phase += 1; ! else if( d->phase >= 1 ) d->phase -= 1; } return TRUE; *************** CK_DLL_TICK( triosc_tick ) *** 441,455 **** d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync phase to input else if( d->sync == 1 ) { // set freq d->phase = in; inc_phase = FALSE; } // FM synthesis --- 443,459 ---- d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync phase to input else if( d->sync == 1 ) { // set freq d->phase = in; + // bound it (+0 <= d->phase < 1) + if( d->phase <= 0 || d->phase >= 1 ) d->phase -= floor( d->phase ); + // no update inc_phase = FALSE; } // FM synthesis *************** CK_DLL_TICK( triosc_tick ) *** 459,467 **** t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync to now // if( d->sync == 3 ) --- 463,470 ---- t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync to now // if( d->sync == 3 ) *************** CK_DLL_TICK( triosc_tick ) *** 480,487 **** if( inc_phase ) { d->phase += d->num; ! // keep the phase between 0 and 1 ! if( d->phase > 1.0 ) d->phase -= 1.0; } return TRUE; --- 483,491 ---- if( inc_phase ) { d->phase += d->num; ! // bound it (+0 <= d->phase <= 1) ! if( d->phase < 0 ) d->phase += 1; ! else if( d->phase >= 1 ) d->phase -= 1; } return TRUE; *************** CK_DLL_TICK( pulseosc_tick ) *** 512,526 **** d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync phase to input else if( d->sync == 1 ) { // set freq d->phase = in; inc_phase = FALSE; } // FM synthesis --- 516,532 ---- d->freq = in; // phase increment d->num = d->freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync phase to input else if( d->sync == 1 ) { // set freq d->phase = in; + // bound it (+0 <= d->phase < 1) + if( d->phase <= 0 || d->phase >= 1 ) d->phase -= floor( d->phase ); + // no update inc_phase = FALSE; } // FM synthesis *************** CK_DLL_TICK( pulseosc_tick ) *** 530,538 **** t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= floor( d->num ); ! else if( d->num <= 1.0 ) d->num += floor( d->num ); } // sync to now // if( d->sync == 3 ) --- 536,543 ---- t_CKFLOAT freq = d->freq + in; // phase increment d->num = freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); } // sync to now // if( d->sync == 3 ) *************** CK_DLL_TICK( pulseosc_tick ) *** 545,556 **** // compute *out = (SAMPLE) (d->phase < d->width) ? 1.0 : -1.0; ! // move phase if( inc_phase ) { d->phase += d->num; ! // keep the phase between 0 and 1 ! if( d->phase > 1.0 ) d->phase -= 1.0; } return TRUE; --- 550,562 ---- // compute *out = (SAMPLE) (d->phase < d->width) ? 1.0 : -1.0; ! // advance internal phase if( inc_phase ) { d->phase += d->num; ! // bound it (+0 <= d->phase <= 1) ! if( d->phase < 0 ) d->phase += 1; ! else if( d->phase >= 1 ) d->phase -= 1; } return TRUE; *************** CK_DLL_CTRL( osc_ctrl_freq ) *** 572,579 **** d->freq = GET_CK_FLOAT(ARGS); // phase increment d->num = d->freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= ::floor( d->num ); // return RETURN->v_float = (t_CKFLOAT)d->freq; } --- 578,585 ---- d->freq = GET_CK_FLOAT(ARGS); // phase increment d->num = d->freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); // return RETURN->v_float = (t_CKFLOAT)d->freq; } *************** CK_DLL_CTRL( osc_ctrl_period ) *** 610,617 **** // set freq else d->freq = 1 / (period / d->srate); d->num = d->freq / d->srate; ! // bound it ! if( d->num >= 1.0 ) d->num -= ::floor( d->num ); // return RETURN->v_dur = period; } --- 616,623 ---- // set freq else d->freq = 1 / (period / d->srate); d->num = d->freq / d->srate; ! // bound it (-1 < d->num < 1) ! if( d->num <= -1 || d->num >= 1 ) d->num -= int(d->num); // return RETURN->v_dur = period; } *************** CK_DLL_CTRL( osc_ctrl_phase ) *** 649,656 **** Osc_Data * d = (Osc_Data *)OBJ_MEMBER_UINT(SELF, osc_offset_data ); // set freq d->phase = GET_CK_FLOAT(ARGS); ! //bound ( this could be set arbitrarily high or low ) ! if ( d->phase >= 1.0 || d->phase < 0.0 ) d->phase -= floor( d->num ); // return RETURN->v_float = (t_CKFLOAT)d->phase; } --- 655,662 ---- Osc_Data * d = (Osc_Data *)OBJ_MEMBER_UINT(SELF, osc_offset_data ); // set freq d->phase = GET_CK_FLOAT(ARGS); ! // bound it (+0 <= d->phase < 1) ! if( d->phase <= 0 || d->phase >= 1 ) d->phase -= floor( d->phase ); // return RETURN->v_float = (t_CKFLOAT)d->phase; } *************** CK_DLL_CTRL( osc_ctrl_width ) *** 683,689 **** Osc_Data * d = (Osc_Data *)OBJ_MEMBER_UINT(SELF, osc_offset_data ); // set freq d->width = GET_CK_FLOAT(ARGS); ! //bound ( this could be set arbitrarily high or low ) d->width = ck_max( 0.0, ck_min( 1.0, d->width ) ); // return RETURN->v_float = (t_CKFLOAT)d->width; --- 689,695 ---- Osc_Data * d = (Osc_Data *)OBJ_MEMBER_UINT(SELF, osc_offset_data ); // set freq d->width = GET_CK_FLOAT(ARGS); ! // bound ( this could be set arbitrarily high or low ) d->width = ck_max( 0.0, ck_min( 1.0, d->width ) ); // return RETURN->v_float = (t_CKFLOAT)d->width; *************** CK_DLL_CTRL( sawosc_ctrl_width ) *** 762,768 **** Osc_Data * d = (Osc_Data *)OBJ_MEMBER_UINT(SELF, osc_offset_data ); // set freq d->width = GET_CK_FLOAT(ARGS); ! //bound ( this could be set arbitrarily high or low ) d->width = ( d->width < 0.5 ) ? 0.0 : 1.0; //rising or falling // return RETURN->v_float = (t_CKFLOAT)d->width; --- 768,774 ---- Osc_Data * d = (Osc_Data *)OBJ_MEMBER_UINT(SELF, osc_offset_data ); // set freq d->width = GET_CK_FLOAT(ARGS); ! // bound ( this could be set arbitrarily high or low ) d->width = ( d->width < 0.5 ) ? 0.0 : 1.0; //rising or falling // return RETURN->v_float = (t_CKFLOAT)d->width; *************** CK_DLL_CTRL( osc_ctrl_sync ) *** 793,800 **** // we need to pre-advance the phase... // this is probably stupid. -pld d->phase += d->num; ! // keep the phase between 0 and 1 ! if( d->phase > 1.0 ) d->phase -= 1.0; } // return RETURN->v_int = (t_CKINT)d->sync; --- 799,807 ---- // we need to pre-advance the phase... // this is probably stupid. -pld d->phase += d->num; ! // bound it (0 <= phase < 1) ! if( d->phase < 0 ) d->phase += 1; ! else if( d->phase >= 1 ) d->phase -= 1; } // return RETURN->v_int = (t_CKINT)d->sync;

1 0

Some ugens not available in C++
by dylan＠speakeasy.net 23 Jun '07

23 Jun '07

Hi, I'm new to the mailing list. I've been playing around trying to create a new Instrmnt-derived ugen in C++. I got something simple up and running fairly quickly, but then I realized that not all of the ugens are available in the C++ headers. For example, I needed a low-pass filter, but there is no LPF class (or FilterBasic_data struct) in ugen_filter.h. I was able to get around this by using the TwoPole class and calculating the coefficients. Now I need sawtooth and triangle waves, but again there are no classes for these ugens in ugen_osc.h. The existing STK instruments get sine waves using WaveLoop("special:sinewave", TRUE), but I was hoping to use sawtooth and triangle waves. This has me thinking I'm approaching this wrong. Since you can't yet create ugens in ChucK, I planned to use C++, but in C++ there's only a limited set of ugens/classes that are available. Thanks, Dylan

6 12

Asio Build and "Debug Assertion Failed" Error.
by Philippe Lamarche 23 Jun '07

23 Jun '07

Hi, I started an Asio build of the 1.2.0.8 source. For now, it can probe and play small files. However I have a problem with the build. I retried it with a fresh version with no change to the source and I still have the same problem: It seems that Chuck_Array4::zero() in chuck_oo create a "Debug Assertion Failed" Error. The Microsoft vector class is complaining about "vector subscript out of range". I am using VS2005. This code will generate the error: SinOsc s[5]; s[1] => dac; 2::second => now; Is this possible or I am making false assumptions? Thanks for the help, Philippe Lamarche.

2 1

Patching core files to provide VST support.
by Robin Davies 31 May '07

31 May '07

So, I'm wondering... I don't image that the external Ugens have been fixed yet, have they? If not, would you be interested in taking a patch that re-enables them? My own personal burning desire: support for VST in chuck. My personal feeling about chuck right now: the fixed list of audio-rate ugens is constraining, wonderful as STK is. Chuck sequencing and precision in conjunction with commercial-grade VSTs would be a killer combination. And to that end, I'm willing to contribute some effort to bring up the external ugens. For licensing reasons, you wouldn't want VSTs to be internally implemented, I think, because you'd pick up the Steinberg licensing requirements. Pieces of work that I'd see as being necessary. (I've reviewed the relevant sources in about the 1.2.0.4 timeframe, and I'm guessing that the general gist of the sources remains the same). - Rework the audio processing spine to allow for block processing of audio between successive events. (One sample at a time incurrs a massive performance hit when interacting with VSTs: 10x + in common cases, and the same would be true of external ugens, generally. The alternative would be buffering, but I'd like to push for gold). The general idea: circular dependencies in the audio-rate connections would cause a fall-back to sample-at-a-time processing; non-circular references would allow a mixture of block-based and sample-based processing. - Resurrect and re-enable the external ugen code. It appears to be mostly there, and probably fixable, but missing access from the language itself. I can provide coverage and test cases for for Win32/Visual studio and cygwin/g++ compiles. - Publish an opensource implementation of an external VST ugen. That's a fairly modest bundle of work, but will touch a passel of core files. How stable are the core sources right now? If I take a week or two to do this what are my chances of facing a merge nightmare once I'm done? Is now a good time to do this kind of thing? Are you interested? Is this more of a help than a hindrance at the present time?

2 2

Patch TiltSensor on linux
by Cédric Krier 20 May '07

20 May '07

Hi, here is a patch that allow to use TiltSensor on a macbook with linux. Cédric Krier

2 2

Stereo ugens (again)
by Imre Kéri 28 Feb '07

28 Feb '07

Hi, I would like to have real stereo (or multi-channel) UGens in ChucK which can compute multichannel output and not just setting a pan or like that (like it is now??). The tick() function of an UGen should operate on array of samples (one sample on each channel) and produce also one sample for each channel as output. The audio engine should convert the channels if two ugens of different output/input channels are chucked together. Each UGen should either have a fixed number of in/out channels, or the user could specify the number of in/out channels for an UGen at construction time (to avoid extra multichannel processing when unnecessary). It would be not needed to access the individual channels of an UGen as UGens (this can be emulated e.g. by mono-to-stereo "split" UGens and stereo-to-mono "channel-select" UGens). I would like to implement something like this for myself because I think it is unconvenient that we don't have stereo ugens and some effects in which the channels are dependent of each other are not even possible to realize otherwise. Have you any other suggestions, advices how to implement multichannel ugens? It would be the best to have a solution which is good for everyone and which can be part of the official ChucK code. Or do I still not understand how multi-channel UGens work? Imre Kéri

2 4