| thanks david. believe coolpro for pc no? sounds similar to sonicworx on
mac. just to be sure i haven't offended anyone, csound is certainly well
capable of filtering tasks ad infinitum. and cecilia even has some handy
dandy csound filtering modules ready to go. not to mention the fact that my
inadvertent creation of frequencies pitched below human hearing is probably
the result of my sloppy csounding in the first place -i am an avid
proponent of the slash and burn method.
moreover, csound capable of maximizing in just about any way imaginable.
just a matter of careful tweaking. suppose sounds could be analyzed to
ascertain frequencies within human hearing that are maxing out and these
could be attenuated a bit without too noticable a change in sound, followed
by a boost in gain. but sometimes you just gotta get it done fast and there
is plenty of precedent for handy dandy opcodes within csound.
so maximizing is up there on my wishlist.
tolve
>> so does anyone have a handy dandy magic bullet at the ready for this in
>
>I struggle with the problem you describe, and what I do is using my ALLTIME
>FAVOURITE sample editor :
>CoolEdit Pro !!!!!
>
>I can't recommend enough that particular program ! CoolPro is not just a
>sampleditor, if you're a creative soul, you can use
>it as a synthesizer, while it actually isn't build for that at all !
>CoolPro just has ALL the features a sounddesigner needs all packed
>in a very steady fluent environment : it has all kinds of filters, even
>arbitrary order Butterworth, Chebyshev filters etc, extensive
>Equalizing, Dynamics processing (for your problem !), Stereo Flanger,
>Stereo Delay, Stereo Echo, even REAL convolution !
>And if not enough : a 64 track non-destructive multitrack
>recorder/arranger....
>
>Coolpro is almost the perfect paintingbrush for the sound artist !
>
>After this commercial, now your problem...
>
>What I do is filtering the WHOLE finished stereo file that resulted from
>Csound on low unaudible frequencies : highpass 60Hz with
>a 15th order Butterworth, they unnecessarely occupy "space" in the -32767
>to +32767 range, so after filtering you will have
>more "room left" for boosting up volume and dynamic processing....
>
>
>David.
>
>
>
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa15228;
14 Sep 98 23:38 BST
Received: from pat.bath.ac.uk by stork.maths.Bath.AC.UK id aa13560;
14 Sep 98 23:38 BST
Received: (qmail 19073 invoked from network); 14 Sep 1998 22:38:31 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by pat.bath.ac.uk with SMTP; 14 Sep 1998 22:38:31 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (XAA19981); Mon, 14 Sep 1998 23:24:42 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Mon, 14 Sep 1998 23:24:30 +0100
Received: from mail2.sirius.com [205.134.253.132] by hermes via ESMTP (XAA06613); Mon, 14 Sep 1998 23:24:19 +0100 (BST)
Received: from [205.134.240.200] (ppp-asfm04--200.sirius.net [205.134.240.200])
by mail2.sirius.com (8.8.7/Sirius-8.8.7-97.08.12) with SMTP id PAA25798
for ; Mon, 14 Sep 1998 15:24:13 -0700 (PDT)
Message-Id: <199809142224.PAA25798@mail2.sirius.com>
Subject: Midi file/instrument mapping
Date: Mon, 14 Sep 98 15:28:30 -0700
x-sender: espiegel@pop.sirius.com
x-mailer: Claris Emailer 1.1
From: Edward Spiegel
To: csound list
Mime-Version: 1.0
Content-Type: text/plain; charset="US-ASCII"
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Am I correct in assuming that if you use a midi file as input, that
instrument 1 of the orc will be used for the first channel in the file,
instrument 2 for the second channel?
I haven't been able to find a manual or tutorial that discusses this.
Is there documentation or a tutorial which talks about midi file usage?
Thanks,
Edward
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa15770;
15 Sep 98 4:52 BST
Received: from pat.bath.ac.uk by stork.maths.Bath.AC.UK id aa10208;
15 Sep 98 4:52 BST
Received: (qmail 26012 invoked from network); 15 Sep 1998 03:52:37 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by pat.bath.ac.uk with SMTP; 15 Sep 1998 03:52:37 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (EAA20983); Tue, 15 Sep 1998 04:43:37 +0100 (BST)
From: jasonf@thei.net
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 04:43:21 +0100
Received: from thei98.ciris.net [207.51.234.98] (may be forged) by hermes via SMTP (EAA24904); Tue, 15 Sep 1998 04:43:09 +0100 (BST)
X-ROUTED: Mon, 14 Sep 1998 22:44:30 -0500
X-TCP-IDENTITY: JasonF
Received: from Dellbert.org [207.51.234.101] by cct.thei.net with smtp
id BGCLDDBC ; Mon, 14 Sep 1998 22:43:52 -0500
Message-ID:
X-Mailer: XFMail 1.3 [p0] on Linux
X-Priority: 3 (Normal)
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 8bit
MIME-Version: 1.0
In-Reply-To:
Date: Mon, 14 Sep 1998 22:40:01 -0500 (CDT)
To: csound@maths.ex.ac.uk
Subject: Re: midi orc/sco files
Cc: JasonF@ex.ac.uk
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Just Curious,
Is the following example supposed to actually work, or is it showing the basic
syntax? I saved the files as sco/orc files and executed them. When I played a
note on my keyboard, there was no sound. Csound acted like it wanted to play
something, but didn't.
Thanks,
Jason
> example
>
> f01 0 1024 10 1 ; simple sinus
> f02 0 1024 7 0 128 10 256 10 256 -10 256 -10 128 0 ;ca. square wave
> f03 0 1024 10 1 .5 .3 .2 .15 .12 ;six weighted sinusoids
> f04 0 1024 10 1 .2 .05 ;three weighted sinusoids
>
> f0 80 ;run during 80 seconds
> e
>
>
> instr 1
> ifreq cpsmidi
> asig oscili 5000, ifreq, 2
> kampenv linenr 1, 0.1, 0.2, 0.01
> out asig*kampenv
> endin
>
> And the command line should be:
> csound -odevaudio -W -dm6 -M/dev/midi midi.orc midi.sco
----------------------------------
E-Mail: jasonf@thei.net
Date: 14-Sep-98
Time: 22:36:49
This message was sent by XFMail
----------------------------------
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16017;
15 Sep 98 7:58 BST
Received: from mercury.bath.ac.uk by stork.maths.Bath.AC.UK id aa24367;
15 Sep 98 7:58 BST
Received: (qmail 16384 invoked from network); 15 Sep 1998 06:58:02 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by mercury.bath.ac.uk with SMTP; 15 Sep 1998 06:58:02 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (HAA19534); Tue, 15 Sep 1998 07:52:34 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 07:52:23 +0100
Received: from send104.yahoomail.com [205.180.60.122] by hermes via SMTP (HAA09364); Tue, 15 Sep 1998 07:52:20 +0100 (BST)
Message-ID: <19980915065253.25037.rocketmail@send104.yahoomail.com>
Received: from [193.79.128.34] by send104.yahoomail.com; Mon, 14 Sep 1998 23:52:53 PDT
Date: Mon, 14 Sep 1998 23:52:53 -0700 (PDT)
From: Koen Dejonghe
Subject: C++Sound
To: csound@maths.ex.ac.uk
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Dear all,
As a developer who programs in a variety of languages, I am baffled by
the old fashioned way of writing CSound. It is very powerfull indeed,
but so is Assembler. It is also very cumbersome to get even the least
of sounds working. (I know I'm kicking some people's shins right now.)
Is anybody working on a higher level version of CSound ? Can we expect
a C++Sound in the future ?
Thanks for reading and responding.
Kind regards,
Koen Dejonghe
==
Koen Dejonghe
QAD Service Line
Origin International Competences & Alliances
http://www.origin-it.com
+32 2 712 3668
_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16029;
15 Sep 98 7:59 BST
Received: from pat.bath.ac.uk by stork.maths.Bath.AC.UK id aa24502;
15 Sep 98 7:59 BST
Received: (qmail 29593 invoked from network); 15 Sep 1998 06:59:39 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by pat.bath.ac.uk with SMTP; 15 Sep 1998 06:59:39 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (HAA15278); Tue, 15 Sep 1998 07:55:38 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 07:55:27 +0100
Received: from send103.yahoomail.com [205.180.60.92] by hermes via SMTP (HAA15748); Tue, 15 Sep 1998 07:55:25 +0100 (BST)
Message-ID: <19980915065554.14472.rocketmail@send103.yahoomail.com>
Received: from [193.79.128.34] by send103.yahoomail.com; Mon, 14 Sep 1998 23:55:54 PDT
Date: Mon, 14 Sep 1998 23:55:54 -0700 (PDT)
From: Koen Dejonghe
Subject: Questions on NT and real-time MIDI
To: csound@maths.ex.ac.uk
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Dear all,
I have been listening to this list for a couple of months now. I've
been playing with CSound and I obtained some interesting results.
However, I still have a couple of questions.
1. Is it possible, on NT 4.0, to read from a MIDI device (using the -M
option). In other words is there a /dev/midi equivalent on NT ?
2. Can I, again on NT, send the output of CSound straight to the sound
processor in stead of first to a WAV file ?
Thanks.
Koen Dejonghe
==
Koen Dejonghe
QAD Service Line
Origin International Competences & Alliances
http://www.origin-it.com
+32 2 712 3668
_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16061;
15 Sep 98 8:24 BST
Received: from pat.bath.ac.uk by stork.maths.Bath.AC.UK id aa26413;
15 Sep 98 8:24 BST
Received: (qmail 325 invoked from network); 15 Sep 1998 07:24:46 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by pat.bath.ac.uk with SMTP; 15 Sep 1998 07:24:46 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (IAA23374); Tue, 15 Sep 1998 08:21:09 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 08:20:56 +0100
Received: from mail1.sirius.com [205.134.253.131] by hermes via ESMTP (IAA06034); Tue, 15 Sep 1998 08:20:54 +0100 (BST)
Received: from [205.134.241.126] (ppp-asfm07--126.sirius.net [205.134.241.126])
by mail1.sirius.com (8.8.8/Sirius-8.8.7-97.08.12) with SMTP id AAA13786
for ; Tue, 15 Sep 1998 00:20:51 -0700 (PDT)
Message-Id: <199809150720.AAA13786@mail1.sirius.com>
Subject: Cecilia home page?
Date: Tue, 15 Sep 98 00:25:09 -0700
x-sender: espiegel@pop.sirius.com
x-mailer: Claris Emailer 1.1
From: Edward Spiegel
To: csound list
Mime-Version: 1.0
Content-Type: text/plain; charset="US-ASCII"
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Does anyone know if there is a Cecilia home page? I have an URL that used
to work:
http://www.musique.umontreal.ca/Org/CompoElectro/CEC/
But I now get a message that the page is not found on the server.
Thanks,
Edward
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16248;
15 Sep 98 10:01 BST
Received: from pat.bath.ac.uk by stork.maths.Bath.AC.UK id aa05252;
15 Sep 98 10:01 BST
Received: (qmail 6221 invoked from network); 15 Sep 1998 09:01:57 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by pat.bath.ac.uk with SMTP; 15 Sep 1998 09:01:57 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (JAA13027); Tue, 15 Sep 1998 09:59:19 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 09:59:04 +0100
Received: from mailb.telia.com [194.22.194.6] by hermes via ESMTP (JAA24058); Tue, 15 Sep 1998 09:59:03 +0100 (BST)
Received: from d1o211.telia.com (root@d1o211.telia.com [195.204.228.241])
by mailb.telia.com (8.8.8/8.8.8) with ESMTP id KAA02010;
Tue, 15 Sep 1998 10:59:01 +0200 (CEST)
Received: from rogernt (t8o211p14.telia.com [195.204.229.194]) by d1o211.telia.com (8.8.8/8.6.12) with SMTP id KAA26876; Tue, 15 Sep 1998 10:59:00 +0200 (MET DST)
Message-ID: <001b01bde086$c9e0bbf0$0300a8c0@apas.no>
From: roger klaveness
To: csound , Edward Spiegel
Subject: Re: Cecilia home page?
Date: Tue, 15 Sep 1998 10:56:23 +0200
MIME-Version: 1.0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.0518.4
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.0518.4
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
>Does anyone know if there is a Cecilia home page?
http://www.musique.umontreal.ca/CEC/
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16310;
15 Sep 98 10:46 BST
Received: from pat.bath.ac.uk by stork.maths.Bath.AC.UK id aa08767;
15 Sep 98 10:45 BST
Received: (qmail 9771 invoked from network); 15 Sep 1998 09:45:52 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by pat.bath.ac.uk with SMTP; 15 Sep 1998 09:45:52 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (KAA20550); Tue, 15 Sep 1998 10:42:58 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 10:42:44 +0100
Received: from mail1.sirius.com [205.134.253.131] by hermes via ESMTP (KAA11251); Tue, 15 Sep 1998 10:42:42 +0100 (BST)
Received: from [205.134.240.119] (ppp-asfm03--119.sirius.net [205.134.240.119])
by mail1.sirius.com (8.8.8/Sirius-8.8.7-97.08.12) with SMTP id CAA17868
for ; Tue, 15 Sep 1998 02:42:45 -0700 (PDT)
Message-Id: <199809150942.CAA17868@mail1.sirius.com>
Subject: MidiToCsound anyone [mac]
Date: Tue, 15 Sep 98 02:47:02 -0700
x-sender: espiegel@pop.sirius.com
x-mailer: Claris Emailer 1.1
From: Edward Spiegel
To: csound list
Mime-Version: 1.0
Content-Type: text/plain; charset="US-ASCII"
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Does anyone out there use the Mac program "MidiToCsound"?
I'm finding that it's output doesn't work (the durations come out funky
and there are no instrument numbers). I'm wondering if there is a trick.
Thanks,
Edward
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16363;
15 Sep 98 11:19 BST
Received: from mercury.bath.ac.uk by stork.maths.Bath.AC.UK id aa12472;
15 Sep 98 11:19 BST
Received: (qmail 4832 invoked from network); 15 Sep 1998 10:19:11 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by mercury.bath.ac.uk with SMTP; 15 Sep 1998 10:19:11 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (LAA04105); Tue, 15 Sep 1998 11:15:09 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 11:14:55 +0100
Received: from jaguars-int.cableinet.net [193.38.113.9] by hermes via SMTP (LAA07550); Tue, 15 Sep 1998 11:14:54 +0100 (BST)
Received: (qmail 3027 invoked from network); 15 Sep 1998 10:15:00 -0000
Received: from unknown (HELO cableinet.co.uk) (194.117.146.175)
by jaguars with SMTP; 15 Sep 1998 10:15:00 -0000
Message-ID: <35FE3BC4.11BC3B9@cableinet.co.uk>
Date: Tue, 15 Sep 1998 11:04:52 +0100
From: Richard Dobson
Organization: Composers Desktop project
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
To: csound@maths.ex.ac.uk
Subject: Re: C++Sound
References: <19980915065253.25037.rocketmail@send104.yahoomail.com>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
I presume you mean the souce code, not the orc/score syntax?
I think it depends on how inportant 'fashion' is. I am writing some simple dsp
routines (quasi-opcodes) in C++ because it is easy and convenient - I can plug
bits together very quickly. However, I am under no illusions that the result
runs particularly efficiently. Despite the style of its code (which is
continually being improved, anyway) Csound runs remarkably quickly - witness the
number of users who get it to work in real-time.
There are also some platforms, such as the Atari (still very much in use!) for
which C++ is not available, and one of the most important aspects of Csound is
that the core code will compile and run on just about any platform which
supports a C compiler.
Also, from all the books I have read, a surface revamp of this sort of C code
into C++ does not usually work well, and can even introduce more problem than it
solves. A good idiomatic C++ version of Csound would almost certainly have to be
written from scratch. Although C++ has now been 'standardized' there are still
areas of uncertainty, and significant differences between implementations, which
could lead to portability problems.
Actually, there is a bit of C++ code in Csound - in the GUI part of Winsound. It
currently sits in a rather uneasy relationship with the more unix-ish parts of
the code, but it is there. And ironically, some code (the physical modelling
opcodes) has been converted from C++ to C!
It is an interesting idea, nevertheless, and if someone came up with a
base-class definitition for an opcode (complete with krate and arate methods) I
would be very glad to try it out!
Richard Dobson
Koen Dejonghe wrote:
>
> Dear all,
>
> As a developer who programs in a variety of languages, I am baffled by
> the old fashioned way of writing CSound. It is very powerfull indeed,
> but so is Assembler. It is also very cumbersome to get even the least
> of sounds working. (I know I'm kicking some people's shins right now.)
>
> Is anybody working on a higher level version of CSound ? Can we expect
> a C++Sound in the future ?
>
> Thanks for reading and responding.
>
> Kind regards,
> Koen Dejonghe
>
> ==
> Koen Dejonghe
> QAD Service Line
> Origin International Competences & Alliances
> http://www.origin-it.com
> +32 2 712 3668
>
> _________________________________________________________
> DO YOU YAHOO!?
> Get your free @yahoo.com address at http://mail.yahoo.com
Received: from stork.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa16510;
15 Sep 98 12:33 BST
Received: from mercury.bath.ac.uk by stork.maths.Bath.AC.UK id aa19849;
15 Sep 98 12:32 BST
Received: (qmail 10177 invoked from network); 15 Sep 1998 11:32:57 -0000
Received: from hermes.ex.ac.uk (HELO exeter.ac.uk) (144.173.6.14)
by mercury.bath.ac.uk with SMTP; 15 Sep 1998 11:32:57 -0000
Received: from noether [144.173.8.10] by hermes via SMTP (MAA07113); Tue, 15 Sep 1998 12:29:04 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 15 Sep 1998 12:28:50 +0100
Received: from [193.121.99.70] by hermes via ESMTP (MAA05898); Tue, 15 Sep 1998 12:28:10 +0100 (BST)
Message-Id: <199809151128.MAA05898@hermes>
Received: from turing.hogent.be ([193.190.88.183]) by hotfly.netgate.be
(post.office MTA v2.0 0813 ID# 0-32575U60) with ESMTP id AAB260
for ; Tue, 15 Sep 1998 13:35:10 +0200
From: Affective Disorder
To: Csound List
Subject: Sombient: Can anyone contribute to this orc/sco ???
Date: Tue, 15 Sep 1998 12:03:45 +0200
X-MSMail-Priority: Normal
X-Priority: 3
X-Mailer: Microsoft Internet Mail 4.70.1155
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Hello all !
I've made a sound that I like A LOT, but I don't know what to do
next.....The orc and sco are included, so check it out.
Try to run it in realtime with Maldonado's DXCsound 2.1, as there are
opcodes used only supported by DXCsound...
- Can anyone comment this sound and make suggestions what could be done for
making it more interesting ??
- Is there a way to "morph" between two function tables ????
The ORC :
;----------------------------------------------------------------;
; " Emotions of the Lost " ;
;----------------------------------------------------------------;
;---------------------------------------------------------------------------
--------
; By Affective Disorder (davids@pavell.com) Sept 1998
;---------------------------------------------------------------------------
--------
;sr = 44100
;kr = 4410
sr = 22050
kr = 2205
ksmps = 10
nchnls = 2
garevr init 0
garevl init 0
instr 2
kenv linen 1,50,p3,30
;kenv expseg 0,30,1,p3-60,1,30,0
irevgain=p4
kcut oscili 15,.1,1
asig oscil 5000,100,1
asig=asig*kenv
kbase randi 10,.1
kbase=kbase+100
as oscil 6000,kbase/1.33,1
as1 oscil 6000,kbase,1
as2 oscil 6000,kbase*1.33,1
as3 oscil 6000,kbase*2.66,1
as4 oscil 6000,kbase*3.99,1
as5 oscil 6000,kbase*4.33,1
as6 oscil 6000,kbase*5.66,1
as7 oscil 6000,kbase*6.99,1
kcut randi 500,.01
kcut=kcut+500
kasfenv randi .5,.1
kasfenv=kasfenv+.5
asf reson as,(kbase/3),1000-kcut
asum = ((asf*kasfenv)*.02)+as1+as2+as3+as4+as5+as6+as7
asfinr balance asum,asig
asfinl vdelay asfinr,20,1000
kcolf randi 500,.1
kcolf=kcolf+700
acolorr resonx asfinr,kcolf,1000-kcut,0,1
acolorl resonx asfinl,kcolf,1000-kcut,0,1
;asfinr=acolorr
;asfinl=acolorl
acolbalr balance acolorr, asig
acolball balance acolorl, asig
;outs asfinr,asfinl
outs acolbalr*1.5,acolball*1.5
garevr=(garevr+asfinr)
garevl=(garevl+asfinl)
arevrbal balance garevr,asfinr
arevlbal balance garevl,asfinl
garevr=arevrbal*irevgain
garevl=arevlbal*irevgain
endin
;-------------------
; Reverb
;-------------------
instr 100
irevtime=p4
arevr nreverb garevr,p4,0
arevl nreverb garevl,p4,0
outs arevr,arevl
garevr=0
garevl=0
endin
The SCO :
f1 0 65536 10 1 1.33 2.66 3.99 4.33 5.66 6.99
i100 0 300 20
i2 0 300 .2
e
David
|