File: Stereo2Mono

package info (click to toggle)
cecilia 2.0.5-2.2
  • links: PTS
  • area: main
  • in suites: squeeze, wheezy
  • size: 4,452 kB
  • ctags: 833
  • sloc: tcl: 9,786; sh: 1,097; makefile: 69; csh: 13
file content (35 lines) | stat: -rw-r--r-- 461 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
<info>
Piche, Fri Oct 15 19:06:44  1999
New Module
</info>
<tk_interface>
cfilein name -label "Sound to convert"
cpopup type -label "Include which channel?" -value "Left Right Both"
</tk_interface>
<mono>
instr 1 

asig,asid	diskin	"[name]",1

if gktype = 1 goto right
if gktype = 2 goto both
	a1 = asig
	goto outer
right:
	a1 = asid
	goto outer
both:
	a1 = (asig+asid)*.5
outer:
	out	a1
	endin
</mono>
<stereo>

</stereo>
<quad>

</quad>
<score>
#min
</score>