mirror of
https://github.com/vsariola/sointu.git
synced 2025-06-04 01:28:45 -04:00
The LOCALPORT and GLOBALPORT just get numeric parameters (unit, port) and (voice, unit, port), respectively, which should be now quite intuitive as most of the time the port index is one of the parameters visible in the .asm file. Only a few units have extra ports beyond transformed variables. Overall, this should make the parsing of the .asm files a lot easier.
43 lines
1.8 KiB
NASM
43 lines
1.8 KiB
NASM
%define BPM 100
|
|
|
|
%include "../src/sointu_header.inc"
|
|
|
|
BEGIN_PATTERNS
|
|
PATTERN 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 65, 65, 65, 65,
|
|
PATTERN 76, 0, 0, 0, 0, 0, 0, 0, 76, 0, 0, 0, 0, 0, 0, 0,
|
|
END_PATTERNS
|
|
|
|
BEGIN_TRACKS
|
|
TRACK VOICES(1),0 ; a very silent voice
|
|
TRACK VOICES(1),1 ; a loud one
|
|
END_TRACKS
|
|
|
|
BEGIN_PATCH
|
|
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
|
|
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(64),GAIN(16)
|
|
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(64),GAIN(16)
|
|
SU_OSCILLAT MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
|
|
SU_OSCILLAT MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
|
|
SU_MULP STEREO
|
|
SU_SEND MONO,AMOUNT(128),GLOBALPORT(2,0,0) + SEND_POP
|
|
SU_SEND MONO,AMOUNT(128),GLOBALPORT(2,0,1) + SEND_POP
|
|
END_INSTRUMENT
|
|
BEGIN_INSTRUMENT VOICES(1) ; Instrument0
|
|
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(64),GAIN(128)
|
|
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(64),GAIN(128)
|
|
SU_OSCILLAT MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
|
|
SU_OSCILLAT MONO,TRANSPOSE(88),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
|
|
SU_MULP STEREO
|
|
SU_SEND MONO,AMOUNT(128),GLOBALPORT(2,0,0) + SEND_POP
|
|
SU_SEND MONO,AMOUNT(128),GLOBALPORT(2,0,1) + SEND_POP
|
|
END_INSTRUMENT
|
|
BEGIN_INSTRUMENT VOICES(1) ; Global compressor effect
|
|
SU_RECEIVE STEREO
|
|
SU_COMPRES STEREO,ATTAC(32),RELEASE(64),INVGAIN(32),THRESHOLD(64),RATIO(96)
|
|
SU_MULP STEREO
|
|
SU_OUT STEREO, GAIN(128)
|
|
END_INSTRUMENT
|
|
END_PATCH
|
|
|
|
%include "../src/sointu_footer.inc"
|