;
; far_end_voice_mix_stereo
; Mac-OS version

graphName far_end_voice_mix_stereo

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	Macros
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[def sampleRate 24000] ; I/O sample rate of this graph

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	I/O
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

in Input
out Output

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	Boxes
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

box InputSplitter split             1   32
box Ftcon         (aufx ftac)       32  13    ; AUFTSpatialAC
box Ausm          (aumx 3dem)       14  1     ; AUSpatialMixerV2
box Deco          (aufx decr)       1   1     ; AUDecorrelator
box Maingain      gain              1   1     ; Linear gain 
box Cfrk          (aufx cfrk)       1   1     ; Control freak

box PilotSum      sum               13  1     ; Pilot sum
box PilotGain     gain              1   1     ; Pilot gain
box PilotDelay    (aufx sdly appl)  1   1     ; Pilot delay

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	Wires
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; audio wires from input to spatial controller

wire Input InputSplitter ([sampleRate] 32)
wire (InputSplitter 0) (Ftcon 0) ([sampleRate] 1)
wire (InputSplitter 1) (Ftcon 1) ([sampleRate] 1)
wire (InputSplitter 2) (Ftcon 2) ([sampleRate] 1)
wire (InputSplitter 3) (Ftcon 3) ([sampleRate] 1)
wire (InputSplitter 4) (Ftcon 4) ([sampleRate] 1)
wire (InputSplitter 5) (Ftcon 5) ([sampleRate] 1)
wire (InputSplitter 6) (Ftcon 6) ([sampleRate] 1)
wire (InputSplitter 7) (Ftcon 7) ([sampleRate] 1)
wire (InputSplitter 8) (Ftcon 8) ([sampleRate] 1)
wire (InputSplitter 9) (Ftcon 9) ([sampleRate] 1)
wire (InputSplitter 10) (Ftcon 10) ([sampleRate] 1)
wire (InputSplitter 11) (Ftcon 11) ([sampleRate] 1)
wire (InputSplitter 12) (Ftcon 12) ([sampleRate] 1)
wire (InputSplitter 13) (Ftcon 13) ([sampleRate] 1)
wire (InputSplitter 14) (Ftcon 14) ([sampleRate] 1)
wire (InputSplitter 15) (Ftcon 15) ([sampleRate] 1)
wire (InputSplitter 16) (Ftcon 16) ([sampleRate] 1)
wire (InputSplitter 17) (Ftcon 17) ([sampleRate] 1)
wire (InputSplitter 18) (Ftcon 18) ([sampleRate] 1)
wire (InputSplitter 19) (Ftcon 19) ([sampleRate] 1)
wire (InputSplitter 20) (Ftcon 20) ([sampleRate] 1)
wire (InputSplitter 21) (Ftcon 21) ([sampleRate] 1)
wire (InputSplitter 22) (Ftcon 22) ([sampleRate] 1)
wire (InputSplitter 23) (Ftcon 23) ([sampleRate] 1)
wire (InputSplitter 24) (Ftcon 24) ([sampleRate] 1)
wire (InputSplitter 25) (Ftcon 25) ([sampleRate] 1)
wire (InputSplitter 26) (Ftcon 26) ([sampleRate] 1)
wire (InputSplitter 27) (Ftcon 27) ([sampleRate] 1)
wire (InputSplitter 28) (Ftcon 28) ([sampleRate] 1)
wire (InputSplitter 29) (Ftcon 29) ([sampleRate] 1)
wire (InputSplitter 30) (Ftcon 30) ([sampleRate] 1)
wire (InputSplitter 31) (Ftcon 31) ([sampleRate] 1)

; parameter wires from spatial controller to mixer

wireParam (Ftcon 800 2 0) (Ausm 0 1 0)  ; Azimuth element 0
wireParam (Ftcon 801 2 0) (Ausm 1 1 0)  ; Elevation element 0
wireParam (Ftcon 802 2 0) (Ausm 2 1 0)  ; Distance element 0
wireParam (Ftcon 803 2 0) (Ausm 3 1 0)  ; Gain element 0
wireParam (Ftcon 805 2 0) (Ausm 5 1 0)  ; Enable element 0
wireParam (Ftcon 808 2 0) (Ausm 8 1 0)  ; Reverb element 0

wireParam (Ftcon 800 2 1) (Ausm 0 1 1)  ; Azimuth element 1
wireParam (Ftcon 801 2 1) (Ausm 1 1 1)  ; Elevation element 1
wireParam (Ftcon 802 2 1) (Ausm 2 1 1)  ; Distance element 1
wireParam (Ftcon 803 2 1) (Ausm 3 1 1)  ; Gain element 1
wireParam (Ftcon 805 2 1) (Ausm 5 1 1)  ; Enable element 1
wireParam (Ftcon 808 2 1) (Ausm 8 1 1)  ; Reverb element 1

wireParam (Ftcon 800 2 2) (Ausm 0 1 2)  ; Azimuth element 2
wireParam (Ftcon 801 2 2) (Ausm 1 1 2)  ; Elevation element 2
wireParam (Ftcon 802 2 2) (Ausm 2 1 2)  ; Distance element 2
wireParam (Ftcon 803 2 2) (Ausm 3 1 2)  ; Gain element 2
wireParam (Ftcon 805 2 2) (Ausm 5 1 2)  ; Enable element 2
wireParam (Ftcon 808 2 2) (Ausm 8 1 2)  ; Reverb element 2

wireParam (Ftcon 800 2 3) (Ausm 0 1 3)  ; Azimuth element 3
wireParam (Ftcon 801 2 3) (Ausm 1 1 3)  ; Elevation element 3
wireParam (Ftcon 802 2 3) (Ausm 2 1 3)  ; Distance element 3
wireParam (Ftcon 803 2 3) (Ausm 3 1 3)  ; Gain element 3
wireParam (Ftcon 805 2 3) (Ausm 5 1 3)  ; Enable element 3
wireParam (Ftcon 808 2 3) (Ausm 8 1 3)  ; Reverb element 3

wireParam (Ftcon 800 2 4) (Ausm 0 1 4)  ; Azimuth element 4
wireParam (Ftcon 801 2 4) (Ausm 1 1 4)  ; Elevation element 4
wireParam (Ftcon 802 2 4) (Ausm 2 1 4)  ; Distance element 4
wireParam (Ftcon 803 2 4) (Ausm 3 1 4)  ; Gain element 4
wireParam (Ftcon 805 2 4) (Ausm 5 1 4)  ; Enable element 4
wireParam (Ftcon 808 2 4) (Ausm 8 1 4)  ; Reverb element 4

wireParam (Ftcon 800 2 5) (Ausm 0 1 5)  ; Azimuth element 5
wireParam (Ftcon 801 2 5) (Ausm 1 1 5)  ; Elevation element 5
wireParam (Ftcon 802 2 5) (Ausm 2 1 5)  ; Distance element 5
wireParam (Ftcon 803 2 5) (Ausm 3 1 5)  ; Gain element 5
wireParam (Ftcon 805 2 5) (Ausm 5 1 5)  ; Enable element 5
wireParam (Ftcon 808 2 5) (Ausm 8 1 5)  ; Reverb element 5

wireParam (Ftcon 800 2 6) (Ausm 0 1 6)  ; Azimuth element 6
wireParam (Ftcon 801 2 6) (Ausm 1 1 6)  ; Elevation element 6
wireParam (Ftcon 802 2 6) (Ausm 2 1 6)  ; Distance element 6
wireParam (Ftcon 803 2 6) (Ausm 3 1 6)  ; Gain element 6
wireParam (Ftcon 805 2 6) (Ausm 5 1 6)  ; Enable element 6
wireParam (Ftcon 808 2 6) (Ausm 8 1 6)  ; Reverb element 6

wireParam (Ftcon 800 2 7) (Ausm 0 1 7)  ; Azimuth element 7
wireParam (Ftcon 801 2 7) (Ausm 1 1 7)  ; Elevation element 7
wireParam (Ftcon 802 2 7) (Ausm 2 1 7)  ; Distance element 7
wireParam (Ftcon 803 2 7) (Ausm 3 1 7)  ; Gain element 7
wireParam (Ftcon 805 2 7) (Ausm 5 1 7)  ; Enable element 7
wireParam (Ftcon 808 2 7) (Ausm 8 1 7)  ; Reverb element 7

wireParam (Ftcon 800 2 8) (Ausm 0 1 8)  ; Azimuth element 8
wireParam (Ftcon 801 2 8) (Ausm 1 1 8)  ; Elevation element 8
wireParam (Ftcon 802 2 8) (Ausm 2 1 8)  ; Distance element 8
wireParam (Ftcon 803 2 8) (Ausm 3 1 8)  ; Gain element 8
wireParam (Ftcon 805 2 8) (Ausm 5 1 8)  ; Enable element 8
wireParam (Ftcon 808 2 8) (Ausm 8 1 8)  ; Reverb element 8

wireParam (Ftcon 800 2 9) (Ausm 0 1 9)  ; Azimuth element 9
wireParam (Ftcon 801 2 9) (Ausm 1 1 9)  ; Elevation element 9
wireParam (Ftcon 802 2 9) (Ausm 2 1 9)  ; Distance element 9
wireParam (Ftcon 803 2 9) (Ausm 3 1 9)  ; Gain element 9
wireParam (Ftcon 805 2 9) (Ausm 5 1 9)  ; Enable element 9
wireParam (Ftcon 808 2 9) (Ausm 8 1 9)  ; Reverb element 9

wireParam (Ftcon 800 2 10) (Ausm 0 1 10)  ; Azimuth element 10
wireParam (Ftcon 801 2 10) (Ausm 1 1 10)  ; Elevation element 10
wireParam (Ftcon 802 2 10) (Ausm 2 1 10)  ; Distance element 10
wireParam (Ftcon 803 2 10) (Ausm 3 1 10)  ; Gain element 10
wireParam (Ftcon 805 2 10) (Ausm 5 1 10)  ; Enable element 10
wireParam (Ftcon 808 2 10) (Ausm 8 1 10)  ; Reverb element 10

wireParam (Ftcon 800 2 11) (Ausm 0 1 11)  ; Azimuth element 11
wireParam (Ftcon 801 2 11) (Ausm 1 1 11)  ; Elevation element 11
wireParam (Ftcon 802 2 11) (Ausm 2 1 11)  ; Distance element 11
wireParam (Ftcon 803 2 11) (Ausm 3 1 11)  ; Gain element 11
wireParam (Ftcon 805 2 11) (Ausm 5 1 11)  ; Enable element 11
wireParam (Ftcon 808 2 11) (Ausm 8 1 11)  ; Reverb element 11

wireParam (Ftcon 800 2 12) (Ausm 0 1 12)  ; Azimuth element 12
wireParam (Ftcon 801 2 12) (Ausm 1 1 12)  ; Elevation element 12
wireParam (Ftcon 802 2 12) (Ausm 2 1 12)  ; Distance element 12
wireParam (Ftcon 803 2 12) (Ausm 3 1 12)  ; Gain element 12
wireParam (Ftcon 805 2 12) (Ausm 5 1 12)  ; Enable element 12
wireParam (Ftcon 808 2 12) (Ausm 8 1 12)  ; Reverb element 12

wireParam (Ftcon 204 0 0) (Ausm 0 1 13)  ; Azimuth element 13 (e.g. Pilot)
wireParam (Ftcon 205 0 0) (Ausm 1 1 13)  ; Elevation element 13 (e.g. Pilot)
wireParam (Ftcon 18  0 0) (Ausm 2 1 13)  ; Distance element 13 (e.g. Pilot)
wireParam (Ftcon 19  0 0) (Ausm 8 1 13)  ; Reverb element 13 (e.g. Pilot)

; property wires from spatial controller to spatial mixer
; In Mac OS we do not wire orientation control from controller -->mixer

; audio wires from spatial controller to Pilot tone sum

wire (Ftcon 0) (PilotSum 0) ([sampleRate] 1)
wire (Ftcon 1) (PilotSum 1) ([sampleRate] 1)
wire (Ftcon 2) (PilotSum 2) ([sampleRate] 1)
wire (Ftcon 3) (PilotSum 3) ([sampleRate] 1)
wire (Ftcon 4) (PilotSum 4) ([sampleRate] 1)
wire (Ftcon 5) (PilotSum 5) ([sampleRate] 1)
wire (Ftcon 6) (PilotSum 6) ([sampleRate] 1)
wire (Ftcon 7) (PilotSum 7) ([sampleRate] 1)
wire (Ftcon 8) (PilotSum 8) ([sampleRate] 1)
wire (Ftcon 9) (PilotSum 9) ([sampleRate] 1)
wire (Ftcon 10) (PilotSum 10) ([sampleRate] 1)
wire (Ftcon 11) (PilotSum 11) ([sampleRate] 1)
wire (Ftcon 12) (PilotSum 12) ([sampleRate] 1)

; audio wire from Pilot tone sum to Pilot tone gain

wire PilotSum PilotGain ([sampleRate] 1)

; audio wire from Pilot tone gain to Pilot tone delay

wire PilotGain PilotDelay ([sampleRate] 1)

; audio wires to spatial mixer

wire (Ftcon 0) (Ausm 0) ([sampleRate] 1)
wire (Ftcon 1) (Ausm 1) ([sampleRate] 1)
wire (Ftcon 2) (Ausm 2) ([sampleRate] 1)
wire (Ftcon 3) (Ausm 3) ([sampleRate] 1)
wire (Ftcon 4) (Ausm 4) ([sampleRate] 1)
wire (Ftcon 5) (Ausm 5) ([sampleRate] 1)
wire (Ftcon 6) (Ausm 6) ([sampleRate] 1)
wire (Ftcon 7) (Ausm 7) ([sampleRate] 1)
wire (Ftcon 8) (Ausm 8) ([sampleRate] 1)
wire (Ftcon 9) (Ausm 9) ([sampleRate] 1)
wire (Ftcon 10) (Ausm 10) ([sampleRate] 1)
wire (Ftcon 11) (Ausm 11) ([sampleRate] 1)
wire (Ftcon 12) (Ausm 12) ([sampleRate] 1)
wire PilotDelay (Ausm 13) ([sampleRate] 1)

; parameter wires from spatial controller to decorrelator

wireParam (Ftcon 400 0 0) (Deco 1 0 0) ; decorrelation control for left channel
wireParam (Ftcon 401 0 0) (Deco 2 0 0) ; decorrelation control for right channel

; audio wires from mixer to decorrelator & output

wire Ausm Deco                  ([sampleRate] 2)
wire Deco Maingain              ([sampleRate] 2)
wire Maingain Cfrk              ([sampleRate] 2)
wire Cfrk Output                ([sampleRate] 2)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	Properties
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

property spmd in

wireGraphProperty spmd (Ftcon 5000 0)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;	Graph params
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
param stec 1 out
param ecr2 2 out
param ecr3 3 out
param u1sw 0 in

; wire Ftcon 2nd and 3rd EC ref control params to graph params
wireGraphParam stec (Ftcon 404 0 0)  
wireGraphParam ecr2 (Ftcon 404 0 0)
wireGraphParam ecr3 (Ftcon 405 0 0)    
wireGraphParam u1sw (Ftcon 33 0)

property rids in
wireGraphProperty rids (Ftcon 6000 0)

property spht in
wireGraphProperty spht (Ausm 3233 0)
property shte in
wireGraphProperty shte (Ausm 3111 0)
property shtp in
wireGraphProperty shtp (Ftcon 0 0)