1<CsoundSynthesizer> 2 3; Id: H06_ENV02.CSD mg (2006, rev.2009) 4; author: marco gasperini (marcogsp at yahoo dot it) 5 6; G.M. Koenig 7; ESSAY (1957) 8 9<CsOptions> 10-W -oH06_ENV02.wav 11</CsOptions> 12 13<CsInstruments> 14 15sr = 192000 16kr = 19200 17ksmps = 10 18nchnls = 1 19 20;============================================= 21; 285.2 INTENSITY CURVES 22;============================================= 23 instr 1 24iamp = ampdb(90+p4)/ 29834 25ifile = p5 26 27a1 diskin2 ifile , 1, 5.6 28 29att linen iamp , .01 , p3 , .01 30 31aout = a1* att 32 33 out aout 34 endin 35;============================================= 36 37</CsInstruments> 38<CsScore> 39t0 4572 ; 76.2 cm/sec. tape speed (durations in cm) 40 41; p4 p5 42; iamp1 ifile 43; [dB] 44i1 0 465.78 -15 "H05_REV02.wav" 45 46e 47 48</CsScore> 49</CsoundSynthesizer>