| Hello Csounder,
I am working on a spatializer for few months and today I have an idea but
I`m not sure how to do it or if its possible. What I want have now is 3
instr.;the first instr is the MOVER of the sound source. the second is the
DISKIN. and the 3rd is the SPATIALIZER.
The instr1(MOVER) draw global lines(x,y position) which are send to the
instr3(SPATIALIZER). The instr2(DISKIN) is also globaly send to the
SPATIALIZER. What the SPATIALIZER do is that it have MINI-SPATIA beeing
direct and the 4 first reflection occuring on the walls for each speaker.
What I want is able to do the number of call in the score that I want to
the SPATIALIZER corresponding to the number of speaker and their position.
The problem is the output. I want to have the out opcode changing depending
on the the speaker. ex:
This is not the real one:
instr 1
lines representing the x,y move of the sound source
sent by ga_movex and ga_movey
endin
instr 2
diskin
sent by ga_send
endin
instr 3
asx = ga_movex
asy = ga_movey
there is five of following MINI_SPATIA (each with different variable)
ahpgavdel = sqrt(((p5-asx)*(p5-asx))+((p6-asy)*(p6-asy)))
a2 vdelay ga_send/ahpgavdel, ahpgavdel*givit, gimax2*givit
a2 pareq a2, 4000, ampdb((-ahpgavdel*.075)+.5),sqrt(.5), 2
here is the prob
I want the OUTp4 become OUT3 for speaker 3
like with a macro
XXXXXXXXX OUTp4 a2 XXXXXXXXXX
endin
________________________________
SCORE for quad
i1 0 10 xstrt ystrt xend yend ;MOVER
i2 0 10 soundfile ;DISKIN
here what i want
instr strt dur speak# posX posY
i3 0 11 1 0 0
i3 0 11 2 0 1
i3 0 11 3 -1 0
i3 0 11 4 -1 -1
e
Received: from shaun.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa17564;
30 Aug 99 16:34 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by shaun.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LTRu-00025R-00
for jpff@maths.bath.ac.uk; Mon, 30 Aug 1999 16:34:22 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (QAA02472); Mon, 30 Aug 1999 16:31:17 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Mon, 30 Aug 1999 16:31:11 +0100
Received: from root@lix.intercom.es [194.179.21.2] by hermes via ESMTP (QAA09373); Mon, 30 Aug 1999 16:31:09 +0100 (BST)
Received: from intercom.es (iv3-178.intercom.es [195.76.131.178]) by lix.intercom.es (8.7.3/8.6.12) with ESMTP id RAA19556; Mon, 30 Aug 1999 17:39:07 +0100
Message-ID: <37CAA2BB.3467CE3F@intercom.es>
Date: Mon, 30 Aug 1999 17:26:52 +0200
From: Josep M Comajuncosas
X-Mailer: Mozilla 4.5 [es] (Win95; I)
X-Accept-Language: es
MIME-Version: 1.0
To: Jocelyn Tremblay
CC: csound@maths.ex.ac.uk
Subject: Re: Need help for ouputing my Spatializer
References: <199908301521.LAA16528@express.globetrotter.net>
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable
X-MIME-Autoconverted: from 8bit to quoted-printable by exeter.ac.uk id QAA09373
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Macros are for this, you can do something like
#define output(channel)
#out$channel a2#
$output(p4)
I=B4ve not tested it though...
Good luck!!!!!
Josep M
Jocelyn Tremblay escribi=F3:
> The problem is the output. I want to have the out opcode changing depen=
ding
> on the the speaker. ex:
>
> I want the OUTp4 become OUT3 for speaker 3
> like with a macro
> XXXXXXXXX OUTp4 a2 XXXXXXXXXX
>
>
> instr strt dur speak# posX posY
> i3 0 11 1 0 0
>
--
Josep M Comajuncosas
C/ Circumval.lacio 75 08790 Gelida - Penedes
Catalunya - SPAIN tel. 93 7792243
e-mail: gelida@intercom.es
ET Informatica de Sistemes
e-mail: jcomajuncosas@campus.uoc.es
http://members.tripod.com/csound/
Received: from wallace.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa17711;
30 Aug 99 17:32 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by wallace.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LTFP-0001UV-00
for jpff@maths.bath.ac.uk; Mon, 30 Aug 1999 16:21:27 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (RAA14109); Mon, 30 Aug 1999 17:29:18 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Mon, 30 Aug 1999 17:29:07 +0100
Received: from zit-108.irt.de [194.172.230.108] by hermes via ESMTP (RAA10573); Mon, 30 Aug 1999 17:29:05 +0100 (BST)
Received: from pctb151 (pctb151.irt.de [192.168.3.151])
by nett.irt.de (8.9.1/8.9.1) with SMTP id SAA25735
for ; Mon, 30 Aug 1999 18:29:04 +0200 (METDST)
Date: Mon, 30 Aug 1999 18:29:04 +0200 (METDST)
Message-Id: <199908301629.SAA25735@nett.irt.de>
X-Sender: groh@mail
X-Mailer: Windows Eudora Version 1.4.4
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
To: csound@maths.ex.ac.uk
From: Jens Groh
Subject: Deutschspachige Csound-Seite
Content-Transfer-Encoding: quoted-printable
X-MIME-Autoconverted: from 8bit to quoted-printable by exeter.ac.uk id RAA10573
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Hello list!
Allow me to introduce a website for the German-speaking part of the Csoun=
d
community:
http://harmonik.de/femc/themen/csndmain.html=20
...ist meine Seite zum Thema Csound. Sie ist Teil der Website des "Forums
Experimentelle Musik und Computer" in M=FCnchen. Ich hoffe, da=DF sie Gef=
allen
finden und in Zukunft an Inhalten reicher werden wird.
Thank you!
Jens Groh
Received: from shaun.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa17739;
30 Aug 99 17:43 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by shaun.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LUWz-00026m-00
for jpff@maths.bath.ac.uk; Mon, 30 Aug 1999 17:43:41 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (RAA14538); Mon, 30 Aug 1999 17:40:52 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Mon, 30 Aug 1999 17:40:42 +0100
Received: from root@[200.32.101.214] by hermes via SMTP (RAA09807); Mon, 30 Aug 1999 17:40:35 +0100 (BST)
Received: from telefax.com.ar (u196.telefax.com.ar [200.32.101.196]) by telefax.com.ar (8.6.12/8.6.9) with ESMTP id NAA04681 for ; Mon, 30 Aug 1999 13:36:31 GMT
Message-ID: <37CAB470.E89FAB9F@telefax.com.ar>
Date: Mon, 30 Aug 1999 13:42:24 -0300
From: "M. Perticone"
X-Mailer: Mozilla 4.04 [en] (Win95; I)
MIME-Version: 1.0
To: Csound List
Subject: [OT] CLM and csound
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
hello list,
if any csounder is using (or knows) Common Lisp Music would you please
tell me about its pros and cons comparing it to csound?
any insight will be very useful,
thanks in advance,
mp
Received: from wallace.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa18360;
30 Aug 99 22:19 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by wallace.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LXj0-0001cQ-00
for jpff@maths.bath.ac.uk; Mon, 30 Aug 1999 21:08:18 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (WAA09439); Mon, 30 Aug 1999 22:14:20 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Mon, 30 Aug 1999 22:14:09 +0100
Received: from exim@wallace.maths.bath.ac.uk [138.38.100.104] by hermes via ESMTP (WAA04923); Mon, 30 Aug 1999 22:14:09 +0100 (BST)
Received: from [138.38.97.36] (helo=maths.Bath.AC.UK ident=mmdf)
by wallace.maths.bath.ac.uk with smtp (Exim 2.12 #1)
id 11LXeI-0001cA-00
for csound@maths.ex.ac.uk; Mon, 30 Aug 1999 21:03:26 +0100
Date: Mon, 30 Aug 99 22:14:10 BST
From: jpff@maths.bath.ac.uk
Subject: Re: New bug generator opcode
To: csound@maths.ex.ac.uk
Message-Id:
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Message written at 30 Aug 1999 21:03:23 +0100
Thank you Rasmus (he said between clenched teeth). I have a fixed
version where there is no variable constants.
As I said in private message to him, this reminds me of the Fortran
system I used as a student which allows constants to be changed
SUBROUTINE FOO(IX, IY)
IX = 1
IY = 2
RETURN
END
CALL FOO(0,10)
WRITE(10,100) 0, 10
100 FORMAT(" 0 is now ", I3, " and 10 is now ", I3)
END
would print
0 is now 1 and 10 is now 2
It seems years since i wrote FORTRAN! Hope I remembered the syntax
correctly,
Anyway, I have a Csound which does not have that lovely bug. Will be
in 3.59
BTW, I wonder if anyone noticed 3.58?
==John ffitch
Received: from shaun.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa18372;
30 Aug 99 22:21 BST
Received: from [38.227.100.46] (helo=neptune.lyrick.com)
by shaun.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LYrW-0002Ao-00
for jpff@maths.bath.ac.uk; Mon, 30 Aug 1999 22:21:10 +0100
Received: by neptune.lyrick.com with Internet Mail Service (5.5.2448.0)
id ; Mon, 30 Aug 1999 16:21:06 -0500
Message-ID: <283AABB8FD0DD21187C200A0C995F5DEECB0C5@neptune.lyrick.com>
From: David Boothe
To: 'Csound'
Cc: 'J P Fitch'
Subject: RE: New bug generator opcode
Date: Mon, 30 Aug 1999 16:21:01 -0500
X-Mailer: Internet Mail Service (5.5.2448.0)
I didn't!
-David.
John ffitch wrote:
>BTW, I wonder if anyone noticed 3.58?
Received: from shaun.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa18381;
30 Aug 99 22:24 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by shaun.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LYur-0002Aq-00
for jpff@maths.bath.ac.uk; Mon, 30 Aug 1999 22:24:37 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (WAA05391); Mon, 30 Aug 1999 22:21:20 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Mon, 30 Aug 1999 22:21:09 +0100
Received: from neptune.lyrick.com [38.227.100.46] by hermes via ESMTP (WAA10310); Mon, 30 Aug 1999 22:21:08 +0100 (BST)
Received: by neptune.lyrick.com with Internet Mail Service (5.5.2448.0)
id ; Mon, 30 Aug 1999 16:21:06 -0500
Message-ID: <283AABB8FD0DD21187C200A0C995F5DEECB0C5@neptune.lyrick.com>
From: David Boothe
To: 'Csound'
Cc: 'J P Fitch'
Subject: RE: New bug generator opcode
Date: Mon, 30 Aug 1999 16:21:01 -0500
X-Mailer: Internet Mail Service (5.5.2448.0)
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
I didn't!
-David.
John ffitch wrote:
>BTW, I wonder if anyone noticed 3.58?
Received: from wallace.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa19249;
31 Aug 99 7:19 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by wallace.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11Lg9r-0001u5-00
for jpff@maths.bath.ac.uk; Tue, 31 Aug 1999 06:08:35 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (HAA16062); Tue, 31 Aug 1999 07:15:51 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 31 Aug 1999 07:15:40 +0100
Received: from saba.wwa.com [198.49.174.36] by hermes via ESMTP (HAA10558); Tue, 31 Aug 1999 07:15:38 +0100 (BST)
Received: from [157.238.67.104] (157-238-67-104.il.verio.net [157.238.67.104])
by saba.wwa.com (8.9.0/8.9.0) with SMTP id BAA21823
for ; Tue, 31 Aug 1999 01:15:31 -0500 (CDT)
Message-Id: <199908310615.BAA21823@saba.wwa.com>
X-Sender: integer@www.god-emil.dk (Unverified)
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Tue, 31 Aug 1999 01:20:34 -0600
To: csound@maths.ex.ac.uk
From: "17.hzV.tRL.478"
Subject: Re: csound surround module: 8chan decoding
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
>By the moment the only guy in town (for the Mac world) is SuperCollider,
>that plays ANY file around using digital and analog outputs of your card.
>The problem is that costs 250$. A bit too much. (Very good support though).
op!n!on - sc kozt = bit b! b!t 2 lou
>(Very good support though).
op!n!on - sc kozt = b t b b t 2 l u
>(Very good
op!n!on - all progresz = takex plasz at dze per!fer! [!nd!v]
Received: from shaun.maths.bath.ac.uk by omphalos.maths.Bath.AC.UK id aa19605;
31 Aug 99 11:42 BST
Received: from [144.173.6.14] (helo=exeter.ac.uk)
by shaun.maths.bath.ac.uk with esmtp (Exim 2.12 #1)
id 11LlNL-0002TM-00
for jpff@maths.bath.ac.uk; Tue, 31 Aug 1999 11:42:51 +0100
Received: from noether [144.173.8.10] by hermes via SMTP (LAA02422); Tue, 31 Aug 1999 11:40:13 +0100 (BST)
Received: from exeter.ac.uk by maths.ex.ac.uk; Tue, 31 Aug 1999 11:40:00 +0100
Received: from 0@deuro-gw.deltanet.ro [194.195.227.151] by hermes via ESMTP (LAA02172); Tue, 31 Aug 1999 11:39:54 +0100 (BST)
Received: from marte.Deuroconsult.ro (0@ns2.Deuroconsult.ro [195.179.253.164])
by deuro-gw-2.deltanet.ro (8.9.1/8.9.1) with ESMTP id NAA31641
for ; Tue, 31 Aug 1999 13:48:16 GMT
Received: from ns.viromet.ro (root@ns.Viromet.ro [195.179.253.183])
by marte.Deuroconsult.ro (8.9.3/8.9.3) with ESMTP id NAA01574
for ; Tue, 31 Aug 1999 13:35:12 +0300
Received: from st3.viromet.ro (st3.viromet.ro [192.168.1.3])
by ns.viromet.ro (8.9.3/8.9.3) with SMTP id NAA29022
for ; Tue, 31 Aug 1999 13:54:39 +0300
Message-ID: <004d01bef39d$48ec18c0$0301a8c0@viromet.ro>
From: Radu GRIGOROVICI
To: csound
References:
Subject: Re: Looking for drums
Date: Tue, 31 Aug 1999 13:40:46 +0300
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.2014.211
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2014.211
Sender: owner-csound-outgoing@maths.ex.ac.uk
Precedence: bulk
Hi,
This is some kind of bass drum for techno. My first csound instrument...
Have a nice day, Csounders!
Radu Grigorovici
ORC
====
sr=44100
kr=44100
ksmps=1
nchnls=2
gasig init 0
instr 1 ;tekno bass coded by Radu Grigorovici
idur =p3
iamp =p4
ifre =cpspch(p5)
kamp linseg 0, 0.01, p4, p3/3, p4, p3/3, p4/4, p3/3-0.1, 0
kcut linseg 10000, p3, 1000
kres linseg 880, p3, 440
kres2 linseg 220, p3, 110
asig1 oscili kamp, ifre, 1
asig2 butterlp asig1, kcut
asig3 reson asig2, kres, 110
asig4 balance asig3, asig2
asig5 =asig4/2
outs asig5, asig5
endin
instr 2 ;tekno bass drum coded by Radu Grigorovici
idur =p3
iamp =p4
kamp linseg 0, 0.001, p4, 2*p3/3, p4, p3/3-0.01, 0
kpch expseg 330, p3, 0.001
kcut expseg 440, p3, 0.001
kres expseg 440, p3, 0.001
asig0 oscili kamp, kpch+110, 1
asig1 rand kamp
asig2 =asig1+asig0
asig3 butterlp asig2, kcut*10
asig4 reson asig3, kres+440, 220
asig5 balance asig4, asig0
asig6 =asig5/2
outs asig6, asig6
endin
instr 3 ;tekno highs coded by Radu Grigorovici
idur =p3
iamp =p4
kamp linseg 0, 0.001, p4, p3-0.01, 0
kpch expseg 12000, p3, 8000
kcut expseg 12000, p3, 8000
kres expseg 12000, p3, 8000
asig1 rand kamp
asig2 =asig1
asig3 butterbp asig2, kcut, 880
asig4 reson asig3, kres, 880
asig5 balance asig4, asig1
asig6 =asig5/2
outs asig6, asig6
endin
SCO
====
f1 0 1024 8 1 256 .2 128 0 256 -.2 256 -1
t 0 144
;inst start dur amp frec
i1 0.00 0.25 14000 6.0
i1 0.50 0.25 . 7.0
i1 0.75 0.25 . 6.0
i1 1.25 0.25 . 7.0
i1 1.50 0.25 . 6.0
i1 2.00 0.25 . 7.0
i1 2.50 0.25 . 6.0
i1 3.00 0.25 . 6.10
i1 3.50 0.25 . 7.0
;inst start dur amp
i2 0.00 0.5 16000
i2 1.00 . .
i2 2.00 . .
i2 3.00 . .
;inst start dur amp
i3 0.00 0.25 16000
i3 0.50 0.5 16000
i3 1.00 0.25 16000
i3 1.50 0.5 16000
i3 2.00 0.25 16000
i3 2.25 0.25 16000
i3 2.50 0.5 16000
i3 3.00 0.25 16000
i3 3.50 0.5 16000
|