Hi,

i am using cpstuni to be able to use my own tuning system, but i cannot get
to work somehow.
Below is the csd i use.
When i use "icps    cpstuni ikey, gitwelve" or "icps    cpstuni ikey,
givife", the result is the same as you can hear here: 
http://csound.1045644.n5.nabble.com/file/n4527504/sfpreset5.ogg
sfpreset5.ogg  and 
http://csound.1045644.n5.nabble.com/file/n4527504/sfpreset12.ogg
sfpreset12.ogg 
What is happening?

TIA
Menno

 
 
; Select audio/midi flags here according to platform
-odac  -M0 ;;;realtime audio out
;-iadc    ;;;uncomment -iadc if realtime audio input is needed too
; For Non-realtime ouput leave only the line below:
; -o sfpreset5.wav -W ;;; for file output any platform
 
 

sr = 44100 
ksmps = 32
nchnls = 2
0dbfs  = 1 

massign	 0, 0	;disable triggering of all instruments on all channels, but 
massign	 1, 1	;assign instr. 1 to midi channel 1 

gitwelve ftgen 1, 0, 32, -2, 12, 2, 440, 69, 1, 16/15, 9/8, 6/5, 5/4, 4/3,
7/5, 3/2, 8/5, 5/3, 9/5, 15/8, 2 
givife   ftgen 1, 0, 16, -2, 5, 2, 261.659, 60, 1, 1.1486, 1.3195, 1.5157,
1.7411, 2.00

giSF	sfload	 "/home/menno/manual/examples/01hpschd.sf2" 
        sfplist giSF 
gipre	sfpreset 0, 0, giSF, 0 

instr 1 

	mididefault	60, p3
	midinoteonkey	p4, p5
ikey	= p4
ivel	= p5
print p4
print p5
aenv    linsegr	1, 1, 1, 1, 0
;icps    cpstuni ikey, gitwelve
icps    cpstuni	ikey, givife
iamp    = 0.001					;scale amplitude
iamp    = iamp * ivel * 1/128 			;make velocity-dependent
aL, aR	sfplay ivel, ikey, iamp, icps, gipre, 1 
aL      = aL * aenv 
aR      = aR * aenv 
        outs aL, aR 

endin 
 
 
f0 60	;play for 60 seconds

i1 0 1 60 100
i1 + 1 62 <
i1 + 1 65 <
i1 + 1 69 40

e 
 
 

--
View this message in context: http://csound.1045644.n5.nabble.com/cpstuni-question-tp4527504p4527504.html
Sent from the Csound - General mailing list archive at Nabble.com.


Send bugs reports to the Sourceforge bug tracker
            https://sourceforge.net/tracker/?group_id=81968&atid=564599
Discussions of bugs and features can be posted here
To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"

I'll have to try this and see....it *looks* correct, but sometimes
things in Csound lurk underneath the surface and cause problems.

AKJ

On Mon, Jun 27, 2011 at 3:49 AM, menno  wrote:
> Hi,
>
> i am using cpstuni to be able to use my own tuning system, but i cannot get
> to work somehow.
> Below is the csd i use.
> When i use "icps    cpstuni ikey, gitwelve" or "icps    cpstuni ikey,
> givife", the result is the same as you can hear here:
> http://csound.1045644.n5.nabble.com/file/n4527504/sfpreset5.ogg
> sfpreset5.ogg  and
> http://csound.1045644.n5.nabble.com/file/n4527504/sfpreset12.ogg
> sfpreset12.ogg
> What is happening?
>
> TIA
> Menno
>
> 
> 
> ; Select audio/midi flags here according to platform
> -odac  -M0 ;;;realtime audio out
> ;-iadc    ;;;uncomment -iadc if realtime audio input is needed too
> ; For Non-realtime ouput leave only the line below:
> ; -o sfpreset5.wav -W ;;; for file output any platform
> 
> 
>
> sr = 44100
> ksmps = 32
> nchnls = 2
> 0dbfs  = 1
>
> massign  0, 0   ;disable triggering of all instruments on all channels, but
> massign  1, 1   ;assign instr. 1 to midi channel 1
>
> gitwelve ftgen 1, 0, 32, -2, 12, 2, 440, 69, 1, 16/15, 9/8, 6/5, 5/4, 4/3,
> 7/5, 3/2, 8/5, 5/3, 9/5, 15/8, 2
> givife   ftgen 1, 0, 16, -2, 5, 2, 261.659, 60, 1, 1.1486, 1.3195, 1.5157,
> 1.7411, 2.00
>
> giSF    sfload   "/home/menno/manual/examples/01hpschd.sf2"
>        sfplist giSF
> gipre   sfpreset 0, 0, giSF, 0
>
> instr 1
>
>        mididefault     60, p3
>        midinoteonkey   p4, p5
> ikey    = p4
> ivel    = p5
> print p4
> print p5
> aenv    linsegr 1, 1, 1, 1, 0
> ;icps    cpstuni ikey, gitwelve
> icps    cpstuni ikey, givife
> iamp    = 0.001                                 ;scale amplitude
> iamp    = iamp * ivel * 1/128                   ;make velocity-dependent
> aL, aR  sfplay ivel, ikey, iamp, icps, gipre, 1
> aL      = aL * aenv
> aR      = aR * aenv
>        outs aL, aR
>
> endin
> 
> 
> f0 60   ;play for 60 seconds
>
> i1 0 1 60 100
> i1 + 1 62 <
> i1 + 1 65 <
> i1 + 1 69 40
>
> e
> 
> 
>
> --
> View this message in context: http://csound.1045644.n5.nabble.com/cpstuni-question-tp4527504p4527504.html
> Sent from the Csound - General mailing list archive at Nabble.com.
>
>
> Send bugs reports to the Sourceforge bug tracker
>            https://sourceforge.net/tracker/?group_id=81968&atid=564599
> Discussions of bugs and features can be posted here
> To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"
>
>



-- 
Aaron Krister Johnson
http://www.akjmusic.com
http://www.untwelve.org


Send bugs reports to the Sourceforge bug tracker
            https://sourceforge.net/tracker/?group_id=81968&atid=564599
Discussions of bugs and features can be posted here
To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"