1<CsoundSynthesizer>
2
3; Id: B05_ENV05.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 -f -oB05_ENV04.wav
11</CsOptions>
12
13<CsInstruments>
14
15sr     = 192000
16kr     = 192000
17ksmps  = 1
18nchnls = 1
19
20;=============================================
21; 225.4 INTENSITY CURVES
22;=============================================
23	instr 1
24iamp	= ampdb(p4)
25
26ifile	= p5
27
28a1	diskin2 ifile, 1
29
30
31aout	=  a1*iamp
32	out aout
33
34	out aout
35	endin
36;=============================================
37
38</CsInstruments>
39<CsScore>
40t0	4572		; 76.2 cm/sec. tape speed (durations in cm)
41
42;			p4	p5
43;			iamp1	ifile
44;			[dB]
45i1	0	32.1	-25	"B03_TR04.wav"
46e
47
48</CsScore>
49</CsoundSynthesizer>