;Written by Iain McCurdy, 2006
;Modified for QuteCsound by René, March 2011
;Tested on Ubuntu 10.04 with csound-float 5.13.0 and QuteCsound svn rev 817
;Notes on modifications from original csd:
; Add tables for exp slider
; INIT instrument added
;my flags on Ubuntu: -odac -b1024 -B2048 -+rtaudio=alsa -+rtmidi=null -m0
sr = 44100 ;SAMPLE RATE
ksmps = 100 ;NUMBER OF AUDIO SAMPLES IN EACH CONTROL CYCLE
nchnls = 2 ;NUMBER OF CHANNELS (2=STEREO)
0dbfs = 1 ;MAXIMUM AMPLITUDE REGARDLESS OF BIT DEPTH
;TABLES FOR EXP SLIDER
giExp1 ftgen 0, 0, 129, -25, 0, 0.001, 128, 1.0
giExp2 ftgen 0, 0, 129, -25, 0, 200.0, 128, 8000.0
instr 10 ;GUI
ktrig metro 10
if (ktrig == 1) then
gkamp invalue "Amplitude"
kdettack invalue "dettack"
gkdettack tablei kdettack, giExp1, 1
outvalue "dettack_Value", gkdettack
gknum invalue "Num"
gkdamp invalue "Damp"
gkmaxshake invalue "EnergyFB"
kfreq invalue "Freq"
gkfreq tablei kfreq, giExp2, 1
outvalue "Freq_Value", gkfreq
kfreq1 invalue "Freq1"
gkfreq1 tablei kfreq1, giExp2, 1
outvalue "Freq1_Value", gkfreq1
kfreq2 invalue "Freq2"
gkfreq2 tablei kfreq2, giExp2, 1
outvalue "Freq2_Value", gkfreq2
gktimedelta invalue "DripSpeed"
endif
endin
instr 1 ;TRIGGERS RECURRENT DRIPPING
; ktrigger, kmintim, kmaxnum, kinsnum, kwhen, kdur
schedkwhen 1, gktimedelta, 0, 2, 0, -1
endin
instr 2 ;DRIPWATER INSTRUMENT
adripwater dripwater gkamp, i(gkdettack) , i(gknum), i(gkdamp) , i(gkmaxshake), i(gkfreq) , i(gkfreq1), i(gkfreq2)
outs adripwater, adripwater
endin
instr 3 ;INIT
outvalue "Amplitude" ,0.2
outvalue "dettack" ,0.34
outvalue "Num" ,10
outvalue "Damp" ,0
outvalue "EnergyFB" ,0
outvalue "Freq" ,0.22
outvalue "Freq1" ,0.298
outvalue "Freq2" ,0.359
outvalue "DripSpeed" ,.5
endin
;INSTR | START | DURATION
i 10 0 3600 ;GUI
i 3 0 0.1 ;INIT
754
232
870
385
true
241
226
185
2
2
511
380
{aa607456-d368-4d59-8497-d16d608404c3}
true
0
0
center
Liberation Sans
18
3
0
0
0
147
154
255
border
5
2
349
16
160
30
{24979132-c53f-4414-ac6b-6b4f503ecfe8}
true
0
0
event
1.00000000
Turn the Tap On/Off
/
i 1 0 -1
true
false
8
74
220
30
{640b50b7-7200-4f81-8394-89d9843ae939}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
Amplitude
8
57
500
27
{5585fa6f-0f63-4ac3-bf1b-809c2b1d9134}
true
0
0
0.00000000
1.00000000
0.20000000
lin
continuous
-1.00000000
false
Amplitude
448
74
60
30
{b731b52e-e14a-476a-a583-f3b2bd885539}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
109
220
30
{989564b0-b237-4c22-9d10-b76b7c7e4e4c}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
dettack
8
92
500
27
{84cd664e-fb67-4dd4-aac3-adbcf2c81fe6}
true
0
0
0.00000000
1.00000000
0.34000000
lin
continuous
-1.00000000
false
dettack_Value
448
109
60
30
{ba8682a6-056f-4432-946b-4e3ee82c47a1}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
143
200
30
{76044785-79c4-4202-b7ce-07aee4868219}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
Num
8
126
500
27
{0f952e77-ff9b-4621-b1af-23252bb9c2a6}
true
0
0
0.00010000
100.00000000
10.00000000
lin
continuous
-1.00000000
false
Num
448
143
60
30
{7b92c0ca-2fe8-4b4f-9ed0-f618c1b3cb5c}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
178
220
30
{ca41878c-b561-486b-9cf9-d0da6b48448b}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
Damp
8
161
500
27
{2800fb88-347a-402c-88ed-fc97af6a36be}
true
0
0
0.00000000
2.00000000
0.00000000
lin
continuous
-1.00000000
false
Damp
448
178
60
30
{5d1ba94c-536a-4178-be6c-c0d9d2f75e3d}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
213
220
30
{cdd71125-b224-471a-9c41-9c05d8d28d0c}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
EnergyFB
8
196
500
27
{7a83bb1f-f25d-47e0-bf2d-9c5c86e0756b}
true
0
0
0.00000000
1.00000000
0.00000000
lin
continuous
-1.00000000
false
EnergyFB
448
213
60
30
{7f8d2709-bf8c-46ab-83f0-36fc620b0d56}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
515
2
349
380
{74928ed2-b701-4668-9a11-74763d317e9b}
true
0
0
center
Liberation Sans
18
3
0
0
0
147
154
255
border
5
2
517
25
345
346
{d4bdb5ce-87d8-4c8c-9c64-40ec2eed6f5a}
true
0
0
left
Liberation Sans
14
3
0
0
0
255
255
255
noborder
1
1
8
16
100
30
{04d44ebe-12eb-4bb0-a3f5-9e4fd3e7830e}
true
0
0
event
1.00000000
Single Drip
/
i 2 0 -1
false
false
8
249
220
30
{ca67a321-de0d-4a0f-8efd-864d9a51098c}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
Freq
8
232
500
27
{0341fedb-6323-4661-b4c3-8207291fcd90}
true
0
0
0.00000000
1.00000000
0.22000000
lin
continuous
-1.00000000
false
Freq_Value
448
249
60
30
{3c428724-1329-4e7c-bdb5-6e1277f3c2ce}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
284
220
30
{fa0d93ef-ebd9-4f53-a86e-c3278e0a35d0}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
Freq1
8
267
500
27
{0d1e6fed-dbaa-41fb-b87e-200d37910c8b}
true
0
0
0.00000000
1.00000000
0.29800001
lin
continuous
-1.00000000
false
Freq1_Value
448
284
60
30
{91f7748f-d5d6-4b75-ae79-2c94fac05161}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
318
200
30
{f141fa04-d656-4cf2-89f7-449a21cc2b21}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
Freq2
8
301
500
27
{5f9e5340-c5e3-4362-8c84-1e09b5e9a084}
true
0
0
0.00000000
1.00000000
0.35900000
lin
continuous
-1.00000000
false
Freq2_Value
448
318
60
30
{dd63cdf2-9df5-47f4-b8bc-34d67f45c6b1}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1
8
353
220
30
{3750be8b-54c7-4fa6-8c2c-2a83071ca03a}
true
0
0
left
Liberation Sans
10
3
0
0
0
255
255
255
noborder
1
1
DripSpeed
8
336
500
27
{05fa803d-d951-4b74-8b73-889d979e519d}
true
0
0
0.10000000
2.00000000
0.50000000
lin
continuous
-1.00000000
false
DripSpeed
448
353
60
30
{2ddd60f9-274b-489c-b51b-d0be37ffdc43}
true
0
0
right
Liberation Sans
9
3
0
0
0
255
255
255
noborder
1
1