form caption("Untitled") size(400, 300), guiMode("queue") pluginId("def1")
checkbox bounds(200, 12, 36, 34) channel("mode1")
checkbox bounds(250, 12, 36, 34) channel("mode2") value(0)
-n -d
; Initialize the global variables.
ksmps = 32
nchnls = 2
0dbfs = 1
instr 1
kCheck, kValue cabbageGetValue "mode1"
cabbageSet kValue, "mode2", "value(0)"
kCheck2, kValue2 cabbageGetValue "mode2"
cabbageSet kValue2, "mode1", "value(0)"
endin
;causes Csound to run for about 7000 years...
f0 z
;starts instrument 1 and runs it for a week
i1 0 z