refactor(asm&go4k): Remove double SU_SEND macros, voice(0) corresponding to local send and voice(n) corresponding to global.

This commit is contained in:
Veikko Sariola
2020-11-10 00:53:06 +02:00
parent 1c0ac08450
commit 5ceab766cc
27 changed files with 52 additions and 62 deletions

View File

@ -156,10 +156,6 @@ func ParseAsm(reader io.Reader) (*Song, error) {
case "SAMPLE":
parameters["type"] = Sample
}
} else if unittype == "send" {
if _, ok := parameters["voice"]; !ok {
parameters["voice"] = -1
}
}
unit := Unit{Type: unittype, Stereo: stereo, Parameters: parameters}
instr.Units = append(instr.Units, unit)

View File

@ -170,8 +170,8 @@ func Synth(patch go4k.Patch) (*C.Synth, error) {
values = append(values, byte(flags))
} else if unit.Type == "send" {
address := unit.Parameters["unit"]*16 + 24 + unit.Parameters["port"]
if unit.Parameters["voice"] != -1 {
address += 0x4000 + 16 + unit.Parameters["voice"]*1024 // global send, address is computed relative to synthworkspace
if unit.Parameters["voice"] > 0 {
address += 0x4000 + 16 + (unit.Parameters["voice"]-1)*1024 // global send, address is computed relative to synthworkspace
}
if unit.Parameters["sendpop"] == 1 {
address += 0x8000

View File

@ -195,7 +195,7 @@ var UnitTypes = []UnitType{
SupportsStereo: true,
Parameters: []UnitParameter{
{Name: "amount", MinValue: 0, MaxValue: 128, CanSet: true, CanModulate: true},
{Name: "voice", MinValue: -1, MaxValue: 31, CanSet: true, CanModulate: false},
{Name: "voice", MinValue: 0, MaxValue: 32, CanSet: true, CanModulate: false},
{Name: "unit", MinValue: 0, MaxValue: 63, CanSet: true, CanModulate: false},
{Name: "port", MinValue: 0, MaxValue: 7, CanSet: true, CanModulate: false},
{Name: "sendpop", MinValue: 0, MaxValue: 1, CanSet: true, CanModulate: false},

View File

@ -99,25 +99,19 @@ endstruc
%endif
%endmacro
%macro SU_SEND 5 ; local send (params: STEREO, AMOUNT, UNIT, PORT, FLAGS)
db %2
dw ((%3+1)*su_unit.size + su_unit.ports)/4 + %4 + (SENDPOPFLAG * %5)
USE_SEND
%xdefine CMDS CMDS SEND_ID + %1,
%if %1 == STEREO
%define INCLUDE_STEREO_SEND
%endif
%endmacro
%macro SU_SEND 6 ; global send (params: STEREO, AMOUNT, VOICE, UNIT, PORT, SENDPOP)
db %2
dw SEND_GLOBAL + (su_synthworkspace.voices+%3*su_voice.size+su_voice.workspace+%4*su_unit.size + su_unit.ports)/4 + %5 + (SENDPOPFLAG * %6)
%if (%3) > 0
dw SEND_GLOBAL + (su_synthworkspace.voices+(%3-1)*su_voice.size+su_voice.workspace+%4*su_unit.size + su_unit.ports)/4 + %5 + (SENDPOPFLAG * %6)
%define INCLUDE_GLOBAL_SEND
%else
dw ((%4+1)*su_unit.size + su_unit.ports)/4 + %5 + (SENDPOPFLAG * %6)
%endif
USE_SEND
%xdefine CMDS CMDS SEND_ID + %1,
%if %1 == STEREO
%define INCLUDE_STEREO_SEND
%endif
%define INCLUDE_GLOBAL_SEND
%endmacro
%define VOICE(val) val

View File

@ -19,8 +19,8 @@ BEGIN_PATCH
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(TRISAW),LFO(0),UNISON(0)
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(TRISAW),LFO(0),UNISON(0)
SU_MULP STEREO
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(1),SENDPOP(1)
END_INSTRUMENT
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTACK(64),DECAY(64),SUSTAIN(64),RELEASE(64),GAIN(128)
@ -28,8 +28,8 @@ BEGIN_PATCH
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(0),UNISON(0)
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(0),UNISON(0)
SU_MULP STEREO
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(1),SENDPOP(1)
END_INSTRUMENT
BEGIN_INSTRUMENT VOICES(1) ; Global compressor effect
SU_RECEIVE STEREO

View File

@ -19,8 +19,8 @@ BEGIN_PATCH
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(TRISAW),LFO(0),UNISON(0)
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(TRISAW),LFO(0),UNISON(0)
SU_MULP STEREO
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(1),SENDPOP(1)
END_INSTRUMENT
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTACK(64),DECAY(64),SUSTAIN(64),RELEASE(64),GAIN(128)
@ -28,8 +28,8 @@ BEGIN_PATCH
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(0),UNISON(0)
SU_OSCILLATOR MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(0),UNISON(0)
SU_MULP STEREO
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(2),UNIT(0),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(3),UNIT(0),PORT(1),SENDPOP(1)
END_INSTRUMENT
BEGIN_INSTRUMENT VOICES(1) ; Global compressor effect
SU_RECEIVE STEREO

View File

@ -19,7 +19,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(32),UNIT(3),PORT(3),SENDPOP(1)
SU_SEND MONO,AMOUNT(32),VOICE(0),UNIT(3),PORT(3),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -19,7 +19,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(32),UNIT(3),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(32),VOICE(0),UNIT(3),PORT(1),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -19,7 +19,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(32),UNIT(3),PORT(2),SENDPOP(1)
SU_SEND MONO,AMOUNT(32),VOICE(0),UNIT(3),PORT(2),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -20,7 +20,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(50),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(65),UNIT(3),PORT(5),SENDPOP(1)
SU_SEND MONO,AMOUNT(65),VOICE(0),UNIT(3),PORT(5),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -19,7 +19,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(32),UNIT(3),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(32),VOICE(0),UNIT(3),PORT(0),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -17,8 +17,8 @@ BEGIN_PATCH
SU_ENVELOPE MONO, ATTACK(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_DISTORT MONO, DRIVE(96)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(0),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),UNIT(3),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(0),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(3),PORT(0),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -15,11 +15,11 @@ BEGIN_PATCH
SU_ENVELOPE MONO,ATTACK(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_ENVELOPE MONO,ATTACK(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(120),DETUNE(64),PHASE(0),COLOR(128),SHAPE(96),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(0),PORT(0),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),UNIT(0),PORT(1),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(0),PORT(0),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(0),PORT(1),SENDPOP(0)
; Sustain modulation seems not to be implemented
SU_SEND MONO,AMOUNT(68),UNIT(0),PORT(3),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(4),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(0),PORT(3),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(4),SENDPOP(1)
SU_OUT STEREO,GAIN(110)
END_INSTRUMENT
END_PATCH

View File

@ -19,7 +19,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(32),UNIT(3),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(32),VOICE(0),UNIT(3),PORT(0),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -19,7 +19,7 @@ BEGIN_PATCH
SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(32),UNIT(3),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(32),VOICE(0),UNIT(3),PORT(1),SENDPOP(1)
END_INSTRUMENT
END_PATCH

View File

@ -17,8 +17,8 @@ BEGIN_PATCH
SU_ENVELOPE MONO,ATTACK(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_HOLD MONO,HOLDFREQ(3)
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(0),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),UNIT(3),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(0),SENDPOP(0)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(3),PORT(0),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -17,7 +17,7 @@ BEGIN_PATCH
SU_MULP MONO
SU_PUSH MONO
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(3),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(3),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -17,7 +17,7 @@ BEGIN_PATCH
SU_MULP MONO
SU_PUSH MONO
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(96),UNIT(1),PORT(1),SENDPOP(1)
SU_SEND MONO,AMOUNT(96),VOICE(0),UNIT(1),PORT(1),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -17,7 +17,7 @@ BEGIN_PATCH
SU_MULP MONO
SU_PUSH MONO
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(5),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(5),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -17,7 +17,7 @@ BEGIN_PATCH
SU_MULP MONO
SU_PUSH MONO
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(128),UNIT(1),PORT(2),SENDPOP(1)
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(1),PORT(2),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -17,7 +17,7 @@ BEGIN_PATCH
SU_MULP MONO
SU_PUSH MONO
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(4),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(4),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -17,7 +17,7 @@ BEGIN_PATCH
SU_MULP MONO
SU_PUSH MONO
SU_OSCILLATOR MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),TYPE(SINE),LFO(1),UNISON(0)
SU_SEND MONO,AMOUNT(68),UNIT(1),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(68),VOICE(0),UNIT(1),PORT(0),SENDPOP(1)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
END_PATCH

View File

@ -13,10 +13,10 @@ END_TRACKS
BEGIN_PATCH
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOADVAL MONO,VALUE(32) ; should receive -0.5
SU_SEND MONO,AMOUNT(128),UNIT(5),PORT(0),SENDPOP(0) ; should send -0.25
SU_SEND MONO,AMOUNT(128),UNIT(6),PORT(0),SENDPOP(1) ; should send -0.25
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(5),PORT(0),SENDPOP(0) ; should send -0.25
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(6),PORT(0),SENDPOP(1) ; should send -0.25
SU_LOADVAL MONO,VALUE(128) ; should receive 1
SU_SEND MONO,AMOUNT(128),UNIT(6),PORT(0),SENDPOP(1) ; should send 0.5
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(6),PORT(0),SENDPOP(1) ; should send 0.5
SU_RECEIVE MONO ; should receive -0.5
SU_RECEIVE MONO ; should receive 0.5
SU_OUT STEREO,GAIN(128)

View File

@ -13,10 +13,10 @@ END_TRACKS
BEGIN_PATCH
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOADVAL MONO,VALUE(32) ; should receive -0.5
SU_SEND MONO,AMOUNT(128),UNIT(5),PORT(1),SENDPOP(0) ; should send -0.25
SU_SEND MONO,AMOUNT(128),UNIT(5),PORT(0),SENDPOP(1) ; should send -0.25
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(5),PORT(1),SENDPOP(0) ; should send -0.25
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(5),PORT(0),SENDPOP(1) ; should send -0.25
SU_LOADVAL MONO,VALUE(128) ; should receive 1
SU_SEND MONO,AMOUNT(128),UNIT(5),PORT(0),SENDPOP(1) ; should send 0.5
SU_SEND MONO,AMOUNT(128),VOICE(0),UNIT(5),PORT(0),SENDPOP(1) ; should send 0.5
SU_RECEIVE STEREO; should receive 0.5 -0.5
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT

View File

@ -13,10 +13,10 @@ END_TRACKS
BEGIN_PATCH
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOADVAL MONO,VALUE(32) ; should receive -0.5
SU_SEND MONO,AMOUNT(96),UNIT(5),PORT(0),SENDPOP(0) ; should send -0.25
SU_SEND MONO,AMOUNT(96),UNIT(6),PORT(0),SENDPOP(1) ; should send -0.25
SU_SEND MONO,AMOUNT(96),VOICE(0),UNIT(5),PORT(0),SENDPOP(0) ; should send -0.25
SU_SEND MONO,AMOUNT(96),VOICE(0),UNIT(6),PORT(0),SENDPOP(1) ; should send -0.25
SU_LOADVAL MONO,VALUE(128) ; should receive 1
SU_SEND MONO,AMOUNT(96),UNIT(6),PORT(0),SENDPOP(1) ; should send 0.5
SU_SEND MONO,AMOUNT(96),VOICE(0),UNIT(6),PORT(0),SENDPOP(1) ; should send 0.5
SU_LOADVAL MONO,VALUE(64) ; should receive -0.5
SU_LOADVAL MONO,VALUE(64) ; should receive 0.5
SU_OUT STEREO,GAIN(128)

View File

@ -13,14 +13,14 @@ END_TRACKS
BEGIN_PATCH
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOADVAL MONO,VALUE(96)
SU_SEND MONO,AMOUNT(96),VOICE(1),UNIT(3),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(96),VOICE(2),UNIT(3),PORT(0),SENDPOP(1)
SU_LOADVAL MONO,VALUE(64)
SU_LOADVAL MONO,VALUE(64)
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT
BEGIN_INSTRUMENT VOICES(1) ; Instrument1
SU_LOADVAL MONO,VALUE(32)
SU_SEND MONO,AMOUNT(96),VOICE(0),UNIT(2),PORT(0),SENDPOP(1)
SU_SEND MONO,AMOUNT(96),VOICE(1),UNIT(2),PORT(0),SENDPOP(1)
SU_LOADVAL MONO,VALUE(64)
SU_LOADVAL MONO,VALUE(64)
SU_OUT STEREO,GAIN(128)

View File

@ -14,10 +14,10 @@ BEGIN_PATCH
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOADVAL MONO,VALUE(0)
SU_LOADVAL MONO,VALUE(0)
SU_SEND STEREO,AMOUNT(96),UNIT(6),PORT(0),SENDPOP(1)
SU_SEND STEREO,AMOUNT(96),VOICE(0),UNIT(6),PORT(0),SENDPOP(1)
SU_LOADVAL MONO,VALUE(64)
SU_LOADVAL MONO,VALUE(128)
SU_SEND STEREO,AMOUNT(128),UNIT(6),PORT(0),SENDPOP(1)
SU_SEND STEREO,AMOUNT(128),VOICE(0),UNIT(6),PORT(0),SENDPOP(1)
SU_RECEIVE STEREO; should receive 0.5 -0.5
SU_OUT STEREO,GAIN(128)
END_INSTRUMENT