| Hi All,
i have same problem. With this csd using -j option give me noise output (glitches?)
To test You will need a audio sample.
Thanks,
ciao,
francesco
; NOISES OUTPUT
-odac -+rtaudio=jack -d -m0 -j2 -b 8192 -B 16284 --realtime
; OK
;-odac -+rtaudio=jack -d -m0 -b 8192 -B 16284
sr = 44100
ksmps = 256
nchnls = 2
0dbfs = 1
gaInput init 0
gamincer init 0
; durata della registrazione della nota
giNoteDur = 3
gkNoteNumber init 0
giTableLen = sr*giNoteDur
; tavola per il tempo di mincer
gifntime ftgen 0, 0, 4096, -7, giNoteDur*0.3, 2048, giNoteDur*0.9, 2048, giNoteDur*0.3
opcode Trigger, kk, a
ainput xin
iThresh = 0.1
iWait = kr*giNoteDur
kTimer init kr*giNoteDur + 1
kRms rms ainput, 20
iSampTim = 0.01
kRmsPrev delayk kRms, iSampTim
kChange = kRms - kRmsPrev
if(kTimer>iWait) then
if kChange > iThresh then
kTrig = 1
gkNoteNumber += 1
else
kTrig = 0
endif
kTimer = kTrig == 1 ? 0 : kTimer
else
kTimer += 1
kTrig = 0
endif
xout kTrig, gkNoteNumber
endop
instr 1
gaInput diskin2 "guitar_C.wav", p4
endin
schedule(1, 0, 5, 1)
schedule(1, 6, 5, 0.5)
schedule(1, 12, 5, 1.5)
schedule(1, 18, 5, 1.75)
instr 11
ktrig, knote Trigger gaInput
schedkwhen ktrig, 0, 0, 12, 0, giNoteDur, knote
endin
instr 12
iTableNum = p4
iTable ftgen iTableNum, 0, giTableLen, 2, 0
andx line 0, p3, giTableLen
tablew gaInput, andx, iTable
event_i "i", 20, 0, 120, iTable
endin
; MINCER
instr 20
ifn = p4
ilock = 0
atime poscil 1, 0.03, gifntime
audio mincer atime, 1, 1, ifn, ilock
kenv linsegr 0, 6, 1, p3 - 6, 1, 10, 0
gamincer += audio*kenv
endin
; OUTPUT
instr 1000
outs gamincer, gamincer
gamincer = 0
endin
i 11 0 300
i 1000 0 300
Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here
|