Csound Csound-dev Csound-tekno Search About

[Csnd] granule bug

Date2009-03-04 14:31
FromSuper Pija
Subject[Csnd] granule bug
hi all, 

the rendering of the granule opcode at 0 seconds in the score below runs ok, and the rendering of the same granule opcode at 6 seconds in the same score below, transpose the sound about an octave above, without any change in the score. For whoever doesn't have the 'sine220.aif' file of the csound book, whatever aif/wave file of a duration of 5 seconds is enough. 


sr = 44100
kr = 4410
ksmps = 10
nchnls = 2

instr 1301    ;    SIMPLE GRANULAR WITH GRANULE OPCODE

;ar    granule    xamp,    ivoice,    iratio,    imode,    ithd,    ifn,    ipshift,    igskip,igskip_os,ilength,kgap,    igap_os,kgsize,igsize_os,iatt,    idec [,iseed]    [,ipitch1]    [,ipitch2] [,ipitch3] [,ipitch4]    [,ifnenv]
a1    granule    p4,    p5,    p6,    p7,    p8,    p9,    p10,        p11,    p12,    p13,    p14,    p15,    p16,    p17,    p18,    p19,    p20,    p2l,        p22,        p23,    p24,        p25
a2    granule    p4,    p5,    p6,    p7,    p8,    p9,    p10,        p11,    p12,    p13,    p14,    p15,    p16,    p17,    p18,    p19,    p20*.9,    p2l,        p22,        p23,    p24,        p25

outs a1,a2

endin

; SOURCE FILE IS A 220 HZ SINE WAVE                                                                                                                                
f 1    0    524288    1    "sine220.aif"  0 0 0     ;aif file in csound book                                                                                                           
                                                                                                                                        
;            p4,    p5,    p6,    p7,    p8,    p9,    p10,    p11,    p12,    p13,    p14,    p15,    p16,    p17,    p18,    p19,    p20,    p2l,    p22,    p23,    p24,    p25,    p26    p27    p28    p29    p30    p31    p32    
;    granule        xamp,    ivoice,    iratio,    imode,    ithd,    ifn,    ipshift,igskip,igskip_os,ilength,kgap,    igap_os,kgsize,igsize_os,iatt,    idec,iseed,ipitch1,ipitch2,ipitch3,ipitch4,    ifnenv,|vol                                                                                
i1301    1    5    3000    1    1    1    0    1    1    0    0    5    1    0    0.003    0    50    50    0    1    1    1    1    0    
i1301    1    5    3000    1    1    1    0    1    1    0    0    5    1    50    0.003    0    50    50    0.1    1    1    1    1    0    
i1301    1    5    3000    1    1    1    0    1    1    0    0    5    1    50    0.003    0    50    50    0.12    1    1    1    1    0    
i1301    1    5    3000    1    1    1    0    1    1    0    0    5    1    50    0.003    0    50    50    0.13    1    1    1    1    0        
                                                                                                                                        
i1301    6    5    3000    1    1    1    0    1    1    0    0    5    1    0    0.003    0    50    50    0    1    1    1    1    0    
i1301    6    5    3000    1    1    1    0    1    1    0    0    5    1    50    0.003    0    50    50    0.1    1    1    1    1    0    
i1301    6    5    3000    1    1    1    0    1    1    0    0    5    1    50    0.003    0    50    50    0.12    1    1    1    1    0    
i1301    6    5    3000    1    1    1    0    1    1    0    0    5    1    50    0.003    0    50    50    0.13    1    1    1    1    0