1<CsoundSynthesizer>
2
3; Id: H05_RM05.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 -oH05_RM05.wav
11</CsOptions>
12
13<CsInstruments>
14
15sr     = 192000
16kr     = 192000
17ksmps  = 1
18nchnls = 1
19
20
21
22;====================================
23; 281.5 RING MODULATION
24;====================================
25	instr 1
26ifreq	= p4
27ifile	= p5
28
29a1	diskin2 ifile , 1
30
31arm	oscili a1, ifreq , 1
32
33aout	= (a1*.5) + (arm*.6)
34	out aout*.95
35	endin
36;====================================
37
38</CsInstruments>
39<CsScore>
40f1 0 8192 10 1		; sinusoid
41
42t0	4572		; 76.2 cm/sec. tape speed (durations in cm)
43
44;			p4	p5
45;			ifreq	ifile
46;			[Hz]
47i1	0	483.6	800 	"H04_TR05.wav"
48
49e
50
51</CsScore>
52</CsoundSynthesizer>