1<CsoundSynthesizer>
2
3; Id: G03_TR16-2.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 -oG03_TR16-2.wav
11</CsOptions>
12
13<CsInstruments>
14
15sr     = 192000
16kr     = 192000
17ksmps  = 1
18nchnls = 1
19
20;=============================================
21; 272.16 TRANSPOSITION (RESAMPLING)
22;=============================================
23	instr 1
24itrasp	= p4
25ifile	= p5
26
27a1	diskin2 ifile, itrasp
28
29ifrq	= (sr /2) * itrasp		; anti-aliasing filter
30a1	tonex a1 , ifrq , 10
31a1	tonex a1 , ifrq , 10
32
33	out a1
34	endin
35;=============================================
36
37</CsInstruments>
38<CsScore>
39t0	4572		; 76.2 cm/sec. tape speed (durations in cm)
40
41;			p4	p5
42;			itrasp	ifile
43i1	0	1676.35	.7746	"G01.wav"	; 38.73/50
44
45e
46
47</CsScore>
48</CsoundSynthesizer>