1<CsoundSynthesizer>
2
3; Id: H02_TRSM05.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 -oH02_TRSM05.wav
11</CsOptions>
12
13<CsInstruments>
14
15sr     = 192000
16kr     = 192000
17ksmps  = 1
18nchnls = 1
19
20;====================================
21; 286.2 SPRINGERMASCHINE
22;====================================
23; NOTE
24; The functioning principles of the Springermaschine are not given in the score of Essay. The instrument used here
25; is a standard SOLA instrument.
26
27	instr 1
28isamp	= 1		; sample's function
29iwf	= 2		; window function
30
31iph	= 430866/ftlen(isamp)
32
33aph	poscil3	iph, 1/p3, 3
34
35idur	= .1
36kdurR	rand .0001, 2, 1
37kdur	= idur + kdurR
38kenv	= idur * .5
39
40adens	= 83
41
42a1	fog .6, adens, 1, aph, 0, 0, kenv, idur, kenv, 5000, isamp, iwf, p3
43
44	out a1
45	endin
46;====================================
47
48
49</CsInstruments>
50<CsScore>
51f1	0	524288	-1	"H01.wav" 0 0 0 	; sample file (430866 samples)
52f2	0	8192	20	7 1 35			; gaussian window
53f3	0	32768	27	0 0 32767 1		; pointer
54
55
56t0	4572		; 76.2 cm/sec. tape speed (durations in cm)
57
58i1	0	342					; deceleration by 1 octave
59;		171*(2^1)
60e
61
62</CsScore>
63</CsoundSynthesizer>