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