| This is another problem, csd below (csound checkout Mar 18 2011 on
ubuntu 10.10).
Best -
joachim
Parsing successful!
Creating boolean expression
goto types L P 0
Creating boolean expression
goto types L P 0
ELSEIF case
Creating boolean expression
goto types L P 0
SETTING 0DBFS: 1.000000
KeyOnce : Counter
Counter : Counter
Csound tidy up: Segmentation fault
-odac
sr = 44100
ksmps = 32
nchnls = 1
0dbfs = 1
opcode Counter, k, kkio
;adds (subtracts) istep to the current value (beginning at istart)
whenever kup (kdown) is 1
kup, kdown, istep, istart xin
kcount init istart
kchange changed kup, kdown
if kchange == 1 then
if kup == 1 then
kcount = kcount+istep
elseif kdown == 1 then
kcount = kcount-istep
endif
endif
xout kcount
endop
opcode KeyOnce, kk, kkk
;returns '1' just in the k-cycle a certain key has been pressed (kdown)
or released (kup)
key, kd, kascii xin ;sensekey output and ascii code of the key (e.g.
32 for space)
knew changed key
kdown = (key == kascii && knew == 1 && kd == 1 ? 1 : 0)
kup = (key == kascii && knew == 1 && kd == 0 ? 1 : 0)
xout kdown, kup
endop
instr 1 ;counts up or down for the "+" or "-" key
key,kd sensekey
kup,k0 KeyOnce key, kd, 43
kdown,k0 KeyOnce key, kd, 45
kcount Counter kup, kdown, 1, 0
printk2 kcount
endin
i 1 0 1000
------------------------------------------------------------------------------
Benefiting from Server Virtualization: Beyond Initial Workload
Consolidation -- Increasing the use of server virtualization is a top
priority.Virtualization can reduce costs, simplify management, and improve
application availability and disaster protection. Learn more about boosting
the value of server virtualization. http://p.sf.net/sfu/vmware-sfdev2dev
_______________________________________________
Csound-devel mailing list
Csound-devel@lists.sourceforge.net |