mirror/sointu
1
0
Fork 0
mirror of https://github.com/vsariola/sointu.git synced 2025-11-16 14:52:49 -05:00
Code Issues Packages Projects Releases Wiki Activity

Remove trailing spaces and convert tabs to spaces.

Browse Source
This commit is contained in:
Veikko Sariola
2020-05-16 09:16:23 +03:00
parent d328431413
commit 42ebc52c96
66 changed files with 1116 additions and 1114 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/introspection.asm
View File

@ -2,11 +2,11 @@
SECT_DATA(introscn) SECT_DATA(introscn)
%ifdef SU_USE_16BIT_OUTPUT %ifdef SU_USE_16BIT_OUTPUT
EXPORT MANGLE_DATA(su_use_16bit_output) dd 1 EXPORT MANGLE_DATA(su_use_16bit_output) dd 1
%else %else
EXPORT MANGLE_DATA(su_use_16bit_output) dd 0 EXPORT MANGLE_DATA(su_use_16bit_output) dd 0
%endif %endif
%ifdef MAX_SAMPLES %ifdef MAX_SAMPLES
EXPORT MANGLE_DATA(su_max_samples) dd MAX_SAMPLES EXPORT MANGLE_DATA(su_max_samples) dd MAX_SAMPLES
%endif %endif

144
src/opcodes/arithmetic.inc
View File

@ -3,18 +3,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign ADDP_ID -1 %assign ADDP_ID -1
%macro USE_ADDP 0 %macro USE_ADDP 0
%if ADDP_ID == -1 %if ADDP_ID == -1
%assign ADDP_ID CUR_ID %assign ADDP_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_addp,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_addp,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_ADDP 1 %macro SU_ADDP 1
USE_ADDP USE_ADDP
%xdefine CMDS CMDS ADDP_ID + %1, %xdefine CMDS CMDS ADDP_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_ADDP %define INCLUDE_STEREO_ADDP
%endif %endif
%endmacro %endmacro
@ -24,19 +24,19 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign ADD_ID -1 %assign ADD_ID -1
%macro USE_ADD 0 %macro USE_ADD 0
%if ADD_ID == -1 %if ADD_ID == -1
%assign ADD_ID CUR_ID %assign ADD_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_add,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_add,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%assign ADD_ID -1 %assign ADD_ID -1
%macro SU_ADD 1 %macro SU_ADD 1
USE_ADD USE_ADD
%xdefine CMDS CMDS ADD_ID + %1, %xdefine CMDS CMDS ADD_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_ADD %define INCLUDE_STEREO_ADD
%endif %endif
%endmacro %endmacro
@ -46,18 +46,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign POP_ID -1 %assign POP_ID -1
%macro USE_POP 0 %macro USE_POP 0
%if POP_ID == -1 %if POP_ID == -1
%assign POP_ID CUR_ID %assign POP_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_pop,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_pop,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_POP 1 %macro SU_POP 1
USE_POP USE_POP
%xdefine CMDS CMDS POP_ID + %1, %xdefine CMDS CMDS POP_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_POP %define INCLUDE_STEREO_POP
%endif %endif
%endmacro %endmacro
@ -67,18 +67,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign LOADNOTE_ID -1 %assign LOADNOTE_ID -1
%macro USE_LOADNOTE 0 %macro USE_LOADNOTE 0
%if LOADNOTE_ID == -1 %if LOADNOTE_ID == -1
%assign LOADNOTE_ID CUR_ID %assign LOADNOTE_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_loadnote,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_loadnote,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_LOADNOTE 1 %macro SU_LOADNOTE 1
USE_LOADNOTE USE_LOADNOTE
%xdefine CMDS CMDS LOADNOTE_ID + %1, %xdefine CMDS CMDS LOADNOTE_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_LOADNOTE %define INCLUDE_STEREO_LOADNOTE
%endif %endif
%endmacro %endmacro
@ -88,18 +88,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign MUL_ID -1 %assign MUL_ID -1
%macro USE_MUL 0 %macro USE_MUL 0
%if MUL_ID == -1 %if MUL_ID == -1
%assign MUL_ID CUR_ID %assign MUL_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_mul,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_mul,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_MUL 1 %macro SU_MUL 1
USE_MUL USE_MUL
%xdefine CMDS CMDS MUL_ID + %1, %xdefine CMDS CMDS MUL_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_MUL %define INCLUDE_STEREO_MUL
%endif %endif
%endmacro %endmacro
@ -109,18 +109,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign MULP_ID -1 %assign MULP_ID -1
%macro USE_MULP 0 %macro USE_MULP 0
%if MULP_ID == -1 %if MULP_ID == -1
%assign MULP_ID CUR_ID %assign MULP_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_mulp,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_mulp,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_MULP 1 %macro SU_MULP 1
USE_MULP USE_MULP
%xdefine CMDS CMDS MULP_ID + %1, %xdefine CMDS CMDS MULP_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_MULP %define INCLUDE_STEREO_MULP
%endif %endif
%endmacro %endmacro
@ -130,18 +130,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign PUSH_ID -1 %assign PUSH_ID -1
%macro USE_PUSH 0 %macro USE_PUSH 0
%if PUSH_ID == -1 %if PUSH_ID == -1
%assign PUSH_ID CUR_ID %assign PUSH_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_push,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_push,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_PUSH 1 %macro SU_PUSH 1
USE_PUSH USE_PUSH
%xdefine CMDS CMDS PUSH_ID + %1, %xdefine CMDS CMDS PUSH_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_PUSH %define INCLUDE_STEREO_PUSH
%endif %endif
%endmacro %endmacro
@ -151,18 +151,18 @@
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
%assign XCH_ID -1 %assign XCH_ID -1
%macro USE_XCH 0 %macro USE_XCH 0
%if XCH_ID == -1 %if XCH_ID == -1
%assign XCH_ID CUR_ID %assign XCH_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_xch,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_xch,0),
%xdefine NUMPARAMS NUMPARAMS 0, %xdefine NUMPARAMS NUMPARAMS 0,
%endif %endif
%endmacro %endmacro
%macro SU_XCH 1 %macro SU_XCH 1
USE_XCH USE_XCH
%xdefine CMDS CMDS XCH_ID + %1, %xdefine CMDS CMDS XCH_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_XCH %define INCLUDE_STEREO_XCH
%endif %endif
%endmacro %endmacro

40
src/opcodes/effects.asm
View File

@ -57,24 +57,24 @@ EXPORT MANGLE_FUNC(su_op_hold,0)
%define INCLUDE_STEREO_FILTERHELPER %define INCLUDE_STEREO_FILTERHELPER
su_op_hold_mono: su_op_hold_mono:
%endif %endif
fld dword [edx+su_hold_ports.freq] ; f x fld dword [edx+su_hold_ports.freq] ; f x
fmul st0, st0 ; f^2 x fmul st0, st0 ; f^2 x
fchs ; -f^2 x fchs ; -f^2 x
fadd dword [WRK+su_hold_wrk.phase] ; p-f^2 x fadd dword [WRK+su_hold_wrk.phase] ; p-f^2 x
fst dword [WRK+su_hold_wrk.phase] ; p <- p-f^2 fst dword [WRK+su_hold_wrk.phase] ; p <- p-f^2
fldz ; 0 p x fldz ; 0 p x
fucomip st1 ; p x fucomip st1 ; p x
fstp dword [esp-4] ; t=p, x fstp dword [esp-4] ; t=p, x
jc short su_op_hold_holding ; if (0 < p) goto holding jc short su_op_hold_holding ; if (0 < p) goto holding
fld1 ; 1 x fld1 ; 1 x
fadd dword [esp-4] ; 1+t x fadd dword [esp-4] ; 1+t x
fstp dword [WRK+su_hold_wrk.phase] ; x fstp dword [WRK+su_hold_wrk.phase] ; x
fst dword [WRK+su_hold_wrk.holdval] ; save holded value fst dword [WRK+su_hold_wrk.holdval] ; save holded value
ret ; x ret ; x
su_op_hold_holding: su_op_hold_holding:
fstp st0 ; fstp st0 ;
fld dword [WRK+su_hold_wrk.holdval] ; x fld dword [WRK+su_hold_wrk.holdval] ; x
ret ret
%endif ; HOLD_ID > -1 %endif ; HOLD_ID > -1
@ -313,15 +313,15 @@ kmDLL_func_loop:
loopne kmDLL_func_loop loopne kmDLL_func_loop
fstp st0 ; dr*x+s1+s2+s3+... fstp st0 ; dr*x+s1+s2+s3+...
; DC-filtering ; DC-filtering
sub WRK, su_delayline_wrk.size ; the reason to use the last su_delayline_wrk instead of su_delay_wrk is that su_delay_wrk is wiped by retriggering sub WRK, su_delayline_wrk.size ; the reason to use the last su_delayline_wrk instead of su_delay_wrk is that su_delay_wrk is wiped by retriggering
fld dword [WRK+su_delayline_wrk.dcout] ; o s fld dword [WRK+su_delayline_wrk.dcout] ; o s
fmul dword [c_dc_const] ; c*o s fmul dword [c_dc_const] ; c*o s
fsub dword [WRK+su_delayline_wrk.dcin] ; c*o-i s fsub dword [WRK+su_delayline_wrk.dcin] ; c*o-i s
fxch ; s c*o-i fxch ; s c*o-i
fst dword [WRK+su_delayline_wrk.dcin] ; i'=s, s c*o-i fst dword [WRK+su_delayline_wrk.dcin] ; i'=s, s c*o-i
faddp st1 ; s+c*o-i faddp st1 ; s+c*o-i
fadd dword [c_0_5] ;// add and sub small offset to prevent denormalization fadd dword [c_0_5] ;// add and sub small offset to prevent denormalization
fsub dword [c_0_5] fsub dword [c_0_5]
fst dword [WRK+su_delayline_wrk.dcout] ; o'=s+c*o-i fst dword [WRK+su_delayline_wrk.dcout] ; o'=s+c*o-i
popad popad
ret ret
@ -344,7 +344,7 @@ SECT_DATA(suconst)
%endif %endif
%ifndef C_FREQ_NORMALIZE %ifndef C_FREQ_NORMALIZE
c_freq_normalize dd 0.000092696138 ; // 220.0/(2^(69/12)) / 44100.0 c_freq_normalize dd 0.000092696138 ; // 220.0/(2^(69/12)) / 44100.0
%define C_FREQ_NORMALIZE %define C_FREQ_NORMALIZE
%endif %endif

110
src/opcodes/effects.inc
View File

@ -12,15 +12,15 @@
%endif %endif
%endmacro %endmacro
%define LOWPASS 0x40 %define LOWPASS 0x40
%define BANDPASS 0x20 %define BANDPASS 0x20
%define HIGHPASS 0x10 %define HIGHPASS 0x10
%define NEGBANDPASS 0x08 %define NEGBANDPASS 0x08
%define NEGHIGHPASS 0x04 %define NEGHIGHPASS 0x04
%macro SU_FILTER 4 %macro SU_FILTER 4
db %2 db %2
db %3 db %3
db %4 db %4
USE_FILTER USE_FILTER
%xdefine CMDS CMDS FILTER_ID + %1, %xdefine CMDS CMDS FILTER_ID + %1,
@ -44,20 +44,20 @@
%endif %endif
%endmacro %endmacro
%define FREQUENCY(val) val %define FREQUENCY(val) val
%define RESONANCE(val) val %define RESONANCE(val) val
%define FLAGS(val) val %define FLAGS(val) val
struc su_filter_ports struc su_filter_ports
.freq resd 1 .freq resd 1
.res resd 1 .res resd 1
.params .params
endstruc endstruc
struc su_filter_wrk struc su_filter_wrk
.low resd 1 .low resd 1
.high resd 1 .high resd 1
.band resd 1 .band resd 1
.size .size
endstruc endstruc
@ -75,8 +75,8 @@ endstruc
%endif %endif
%endmacro %endmacro
%macro SU_PAN 2 %macro SU_PAN 2
db %2 db %2
USE_PAN USE_PAN
%xdefine CMDS CMDS PAN_ID + %1, %xdefine CMDS CMDS PAN_ID + %1,
%if %1 == STEREO %if %1 == STEREO
@ -84,10 +84,10 @@ endstruc
%endif %endif
%endmacro %endmacro
%define PANNING(val) val %define PANNING(val) val
struc su_pan_ports struc su_pan_ports
.panning resd 1 .panning resd 1
.params .params
endstruc endstruc
@ -106,7 +106,7 @@ endstruc
%endmacro %endmacro
%macro SU_DISTORT 2 %macro SU_DISTORT 2
db %2 db %2
USE_DISTORT USE_DISTORT
%xdefine CMDS CMDS DISTORT_ID + %1, %xdefine CMDS CMDS DISTORT_ID + %1,
%if %1 == STEREO %if %1 == STEREO
@ -114,10 +114,10 @@ endstruc
%endif %endif
%endmacro %endmacro
%define DRIVE(val) val %define DRIVE(val) val
struc su_distort_ports struc su_distort_ports
.drive resd 1 .drive resd 1
.params .params
endstruc endstruc
@ -136,7 +136,7 @@ endstruc
%endmacro %endmacro
%macro SU_HOLD 2 %macro SU_HOLD 2
db %2 db %2
USE_HOLD USE_HOLD
%xdefine CMDS CMDS HOLD_ID + %1, %xdefine CMDS CMDS HOLD_ID + %1,
%if %1 == STEREO %if %1 == STEREO
@ -144,15 +144,15 @@ endstruc
%endif %endif
%endmacro %endmacro
%define HOLDFREQ(val) val %define HOLDFREQ(val) val
struc su_hold_ports struc su_hold_ports
.freq resd 1 .freq resd 1
.params .params
endstruc endstruc
struc su_hold_wrk struc su_hold_wrk
.phase resd 1 .phase resd 1
.holdval resd 1 .holdval resd 1
endstruc endstruc
@ -194,13 +194,13 @@ endstruc
%define MAX_DELAY 65536 %define MAX_DELAY 65536
%assign NUM_DELAY_LINES 0 %assign NUM_DELAY_LINES 0
%macro SU_DELAY 7 %macro SU_DELAY 7
db %2 db %2
db %3 db %3
db %4 db %4
db %5 db %5
db %6 db %6
db %7 db %7
USE_DELAY USE_DELAY
%xdefine CMDS CMDS DELAY_ID + %1, %xdefine CMDS CMDS DELAY_ID + %1,
%assign NUM_DELAY_LINES NUM_DELAY_LINES + %7 * (1+%1) %assign NUM_DELAY_LINES NUM_DELAY_LINES + %7 * (1+%1)
@ -216,7 +216,7 @@ endstruc
SECT_DATA(sudeltim) SECT_DATA(sudeltim)
EXPORT MANGLE_DATA(su_delay_times) EXPORT MANGLE_DATA(su_delay_times)
dw 0 dw 0
%endmacro %endmacro
%define SU_END_DELTIMES %define SU_END_DELTIMES
@ -229,28 +229,28 @@ endstruc
%endmacro %endmacro
%define PREGAIN(val) val %define PREGAIN(val) val
%define DRY(val) val %define DRY(val) val
%define FEEDBACK(val) val %define FEEDBACK(val) val
%define DEPTH(val) val %define DEPTH(val) val
%define DAMP(val) val %define DAMP(val) val
%define DELAY(val) val %define DELAY(val) val
%define COUNT(val) val %define COUNT(val) val
struc su_delay_ports struc su_delay_ports
.pregain resd 1 .pregain resd 1
.dry resd 1 .dry resd 1
.feedback resd 1 .feedback resd 1
.damp resd 1 .damp resd 1
.freq resd 1 .freq resd 1
.ports .ports
endstruc endstruc
struc su_delayline_wrk struc su_delayline_wrk
.time resd 1 .time resd 1
.filtstate resd 1 .filtstate resd 1
.dcin resd 1 .dcin resd 1
.dcout resd 1 .dcout resd 1
.buffer resd MAX_DELAY .buffer resd MAX_DELAY
.size .size
endstruc endstruc

52
src/opcodes/sinks.inc
View File

@ -4,26 +4,26 @@
%assign OUT_ID -1 %assign OUT_ID -1
%macro USE_OUT 0 %macro USE_OUT 0
%if OUT_ID == -1 %if OUT_ID == -1
%assign OUT_ID CUR_ID %assign OUT_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_out,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_out,0),
%xdefine NUMPARAMS NUMPARAMS 1, %xdefine NUMPARAMS NUMPARAMS 1,
%endif %endif
%endmacro %endmacro
%macro SU_OUT 2 %macro SU_OUT 2
db %2 db %2
USE_OUT USE_OUT
%xdefine CMDS CMDS OUT_ID+%1, %xdefine CMDS CMDS OUT_ID+%1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_OUT %define INCLUDE_STEREO_OUT
%endif %endif
%endmacro %endmacro
%define GAIN(val) val %define GAIN(val) val
struc su_out_ports struc su_out_ports
.gain resd 1 .gain resd 1
.params .params
endstruc endstruc
@ -33,18 +33,18 @@ endstruc
%assign SEND_ID -1 %assign SEND_ID -1
%macro USE_SEND 0 %macro USE_SEND 0
%if SEND_ID == -1 %if SEND_ID == -1
%assign SEND_ID CUR_ID %assign SEND_ID CUR_ID
%assign CUR_ID CUR_ID + 2 %assign CUR_ID CUR_ID + 2
%xdefine OPCODES OPCODES MANGLE_FUNC(su_op_send,0), %xdefine OPCODES OPCODES MANGLE_FUNC(su_op_send,0),
%xdefine NUMPARAMS NUMPARAMS 1, %xdefine NUMPARAMS NUMPARAMS 1,
%endif %endif
%endmacro %endmacro
%macro SU_SEND 3 %macro SU_SEND 3
db %2 db %2
dw %3 dw %3
USE_SEND USE_SEND
%xdefine CMDS CMDS SEND_ID + %1, %xdefine CMDS CMDS SEND_ID + %1,
%if %1 == STEREO %if %1 == STEREO
%define INCLUDE_STEREO_SEND %define INCLUDE_STEREO_SEND
%endif %endif
@ -53,14 +53,14 @@ endstruc
%endif %endif
%endmacro %endmacro
%define AMOUNT(val) val %define AMOUNT(val) val
%define PORT(unit,unittype,port) (unit*su_unit.size + su_ %+ unittype %+ _ports. %+ port + su_unit.ports)/4 %define PORT(unit,unittype,port) (unit*su_unit.size + su_ %+ unittype %+ _ports. %+ port + su_unit.ports)/4
%define GLOBALPORT(voice,unit,unittype,port) SEND_GLOBAL + (su_synth.voices+voice*su_voice.size+su_voice.workspace+unit*su_unit.size + su_ %+ unittype %+ _ports. %+ port + su_unit.ports)/4 %define GLOBALPORT(voice,unit,unittype,port) SEND_GLOBAL + (su_synth.voices+voice*su_voice.size+su_voice.workspace+unit*su_unit.size + su_ %+ unittype %+ _ports. %+ port + su_unit.ports)/4
%define OUTPORT 0 %define OUTPORT 0
%define SEND_POP 0x8000 %define SEND_POP 0x8000
%define SEND_GLOBAL 0x4000 %define SEND_GLOBAL 0x4000
struc su_send_ports struc su_send_ports
.amount resd 1 .amount resd 1
.params .params
endstruc endstruc

16
src/opcodes/sources.asm
View File

@ -83,7 +83,7 @@ EXPORT MANGLE_FUNC(su_op_noise,0)
call dword [esp] call dword [esp]
su_op_noise_mono: su_op_noise_mono:
%endif %endif
call MANGLE_FUNC(FloatRandomNumber,0) call MANGLE_FUNC(FloatRandomNumber,0)
fld dword [edx+su_noise_ports.shape] fld dword [edx+su_noise_ports.shape]
call su_waveshaper call su_waveshaper
fld dword [edx+su_noise_ports.gain] fld dword [edx+su_noise_ports.gain]
@ -136,12 +136,12 @@ su_op_oscillat_normalize_note:
su_op_oscillat_normalized: su_op_oscillat_normalized:
fadd dword [WRK+su_osc_wrk.phase] fadd dword [WRK+su_osc_wrk.phase]
fst dword [WRK+su_osc_wrk.phase] fst dword [WRK+su_osc_wrk.phase]
fadd dword [edx+su_osc_ports.phaseofs] fadd dword [edx+su_osc_ports.phaseofs]
fld1 fld1
fadd st1, st0 fadd st1, st0
fxch fxch
fprem fprem
fstp st1 fstp st1
fld dword [edx+su_osc_ports.color] ; // c p fld dword [edx+su_osc_ports.color] ; // c p
; every oscillator test included if needed ; every oscillator test included if needed
%ifdef INCLUDE_SINE %ifdef INCLUDE_SINE
@ -181,7 +181,7 @@ su_op_oscillat_gain:
SECT_DATA(suconst) SECT_DATA(suconst)
%ifndef C_FREQ_NORMALIZE %ifndef C_FREQ_NORMALIZE
c_freq_normalize dd 0.000092696138 ; // 220.0/(2^(69/12)) / 44100.0 c_freq_normalize dd 0.000092696138 ; // 220.0/(2^(69/12)) / 44100.0
%define C_FREQ_NORMALIZE %define C_FREQ_NORMALIZE
%endif %endif
c_lfo_normalize dd 0.000038 c_lfo_normalize dd 0.000038

126
src/opcodes/sources.inc
View File

@ -12,11 +12,11 @@
%endmacro %endmacro
%macro SU_ENVELOPE 6 %macro SU_ENVELOPE 6
db %2 db %2
db %3 db %3
db %4 db %4
db %5 db %5
db %6 db %6
USE_ENVELOPE USE_ENVELOPE
%xdefine CMDS CMDS ENVELOPE_ID+%1, %xdefine CMDS CMDS ENVELOPE_ID+%1,
%if %1 == STEREO %if %1 == STEREO
@ -24,32 +24,32 @@
%endif %endif
%endmacro %endmacro
%define ATTAC(val) val %define ATTAC(val) val
%define DECAY(val) val %define DECAY(val) val
%define SUSTAIN(val) val %define SUSTAIN(val) val
%define RELEASE(val) val %define RELEASE(val) val
%define GAIN(val) val %define GAIN(val) val
struc su_env_ports struc su_env_ports
.attac resd 1 .attac resd 1
.decay resd 1 .decay resd 1
.sustain resd 1 .sustain resd 1
.release resd 1 .release resd 1
.gain resd 1 .gain resd 1
.params .params
endstruc endstruc
struc su_env_work struc su_env_work
.state resd 1 .state resd 1
.level resd 1 .level resd 1
.size .size
endstruc endstruc
%define ENV_STATE_ATTAC 0 %define ENV_STATE_ATTAC 0
%define ENV_STATE_DECAY 1 %define ENV_STATE_DECAY 1
%define ENV_STATE_SUSTAIN 2 %define ENV_STATE_SUSTAIN 2
%define ENV_STATE_RELEASE 3 %define ENV_STATE_RELEASE 3
%define ENV_STATE_OFF 4 %define ENV_STATE_OFF 4
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
; OSCILLAT structs ; OSCILLAT structs
@ -64,18 +64,18 @@ endstruc
%endif %endif
%endmacro %endmacro
%define SINE 0x40 %define SINE 0x40
%define TRISAW 0x20 %define TRISAW 0x20
%define PULSE 0x10 %define PULSE 0x10
%define LFO 0x08 %define LFO 0x08
%define GATE 0x04 %define GATE 0x04
%macro SU_OSCILLAT 8 %macro SU_OSCILLAT 8
db %2 db %2
db %3 db %3
db %4 db %4
db %5 db %5
db %6 db %6
db %7 db %7
db %8 db %8
USE_OSCILLAT USE_OSCILLAT
@ -97,29 +97,29 @@ endstruc
%endif %endif
%endmacro %endmacro
struc su_osc_ports struc su_osc_ports
.transpose resd 1 .transpose resd 1
.detune resd 1 .detune resd 1
.phaseofs resd 1 .phaseofs resd 1
.color resd 1 .color resd 1
.shape resd 1 .shape resd 1
.gain resd 1 .gain resd 1
.params .params
endstruc endstruc
struc su_osc_wrk struc su_osc_wrk
.phase resd 1 .phase resd 1
.gatestate resd 1 .gatestate resd 1
.size .size
endstruc endstruc
%define TRANSPOSE(val) val %define TRANSPOSE(val) val
%define DETUNE(val) val %define DETUNE(val) val
%define PHASE(val) val %define PHASE(val) val
%define GATESLOW(val) val %define GATESLOW(val) val
%define GATESHIGH(val) val %define GATESHIGH(val) val
%define COLOR(val) val %define COLOR(val) val
%define SHAPE(val) val %define SHAPE(val) val
%define FLAGS(val) val %define FLAGS(val) val
;------------------------------------------------------------------------------- ;-------------------------------------------------------------------------------
@ -135,9 +135,9 @@ endstruc
%endif %endif
%endmacro %endmacro
%macro SU_NOISE 3 %macro SU_NOISE 3
db %2 db %2
db %3 db %3
USE_NOISE USE_NOISE
%xdefine CMDS CMDS NOISE_ID + %1, %xdefine CMDS CMDS NOISE_ID + %1,
%if %1 == STEREO %if %1 == STEREO
@ -145,9 +145,9 @@ endstruc
%endif %endif
%endmacro %endmacro
struc su_noise_ports struc su_noise_ports
.shape resd 1 .shape resd 1
.gain resd 1 .gain resd 1
.params .params
endstruc endstruc
@ -164,8 +164,8 @@ endstruc
%endif %endif
%endmacro %endmacro
%macro SU_LOAD_VAL 2 %macro SU_LOAD_VAL 2
db %2 db %2
USE_LOAD_VAL USE_LOAD_VAL
%xdefine CMDS CMDS LOAD_VAL_ID+%1, %xdefine CMDS CMDS LOAD_VAL_ID+%1,
%if %1 == STEREO %if %1 == STEREO
@ -173,13 +173,13 @@ endstruc
%endif %endif
%endmacro %endmacro
%define VALUE(val) val %define VALUE(val) val
struc su_load_val_ports struc su_load_val_ports
.value resd 1 .value resd 1
.params .params
endstruc endstruc
struc su_load_val_wrk struc su_load_val_wrk
.size .size
endstruc endstruc

80
src/sointu.inc
View File

@ -76,35 +76,35 @@
;%define SU_CLIP_OUTPUT ; // removing this skips clipping code for the final output ;%define SU_CLIP_OUTPUT ; // removing this skips clipping code for the final output
%define SU_USE_DST ; // removing this will skip DST unit %define SU_USE_DST ; // removing this will skip DST unit
%define SU_USE_DLL ; // removing this will skip DLL unit %define SU_USE_DLL ; // removing this will skip DLL unit
%define SU_USE_PAN ; // removing this will skip PAN unit %define SU_USE_PAN ; // removing this will skip PAN unit
%define SU_USE_GLOBAL_DLL ; // removing this will skip global dll processing %define SU_USE_GLOBAL_DLL ; // removing this will skip global dll processing
%define SU_USE_FSTG ; // removing this will skip global store unit %define SU_USE_FSTG ; // removing this will skip global store unit
%define SU_USE_FLD ; // removing this will skip float load unit %define SU_USE_FLD ; // removing this will skip float load unit
%define SU_USE_GLITCH ; // removing this will skip GLITCH unit %define SU_USE_GLITCH ; // removing this will skip GLITCH unit
%define SU_USE_ENV_CHECK ; // removing this skips checks if processing is needed %define SU_USE_ENV_CHECK ; // removing this skips checks if processing is needed
%define SU_USE_VCO_CHECK ; // removing this skips checks if processing is needed %define SU_USE_VCO_CHECK ; // removing this skips checks if processing is needed
%define SU_USE_VCO_PHASE_OFFSET ; // removing this will skip initial phase offset code %define SU_USE_VCO_PHASE_OFFSET ; // removing this will skip initial phase offset code
%define SU_USE_VCO_SHAPE ; // removing this skips waveshaping code %define SU_USE_VCO_SHAPE ; // removing this skips waveshaping code
%define SU_USE_VCO_GATE ; // removing this skips gate code %define SU_USE_VCO_GATE ; // removing this skips gate code
%define SU_USE_VCO_MOD_FM ; // removing this skips frequency modulation code %define SU_USE_VCO_MOD_FM ; // removing this skips frequency modulation code
%define SU_USE_VCO_MOD_DM ; // removing this skips detune modulation code %define SU_USE_VCO_MOD_DM ; // removing this skips detune modulation code
%define SU_USE_VCO_STEREO ; // removing this skips stereo code %define SU_USE_VCO_STEREO ; // removing this skips stereo code
%define SU_USE_VCF_CHECK ; // removing this skips checks if processing is needed %define SU_USE_VCF_CHECK ; // removing this skips checks if processing is needed
%define SU_USE_VCF_HIGH ; // removing this skips code for high output %define SU_USE_VCF_HIGH ; // removing this skips code for high output
%define SU_USE_VCF_BAND ; // removing this skips code for band output %define SU_USE_VCF_BAND ; // removing this skips code for band output
%define SU_USE_VCF_PEAK ; // removing this skips code for peak output %define SU_USE_VCF_PEAK ; // removing this skips code for peak output
%define SU_USE_VCF_STEREO ; // removing this skips code for stereo filter output %define SU_USE_VCF_STEREO ; // removing this skips code for stereo filter output
%define SU_USE_DST_CHECK ; // removing this skips checks if processing is needed %define SU_USE_DST_CHECK ; // removing this skips checks if processing is needed
%define SU_USE_DST_SH ; // removing this skips sample and hold code %define SU_USE_DST_SH ; // removing this skips sample and hold code
%define SU_USE_DST_STEREO ; // removing this skips stereo processing %define SU_USE_DST_STEREO ; // removing this skips stereo processing
%define SU_USE_DLL_NOTE_SYNC ; // removing this will skip delay length adjusting code (karplus strong) %define SU_USE_DLL_NOTE_SYNC ; // removing this will skip delay length adjusting code (karplus strong)
%define SU_USE_DLL_CHORUS ; // removing this will skip delay chorus/flanger code %define SU_USE_DLL_CHORUS ; // removing this will skip delay chorus/flanger code
%define SU_USE_DLL_CHORUS_CLAMP ; // removing this will skip chorus lfo phase clamping %define SU_USE_DLL_CHORUS_CLAMP ; // removing this will skip chorus lfo phase clamping
%define SU_USE_DLL_DAMP ; // removing this will skip dll damping code %define SU_USE_DLL_DAMP ; // removing this will skip dll damping code
%define SU_USE_DLL_DC_FILTER ; // removing this will skip dll dc offset removal code %define SU_USE_DLL_DC_FILTER ; // removing this will skip dll dc offset removal code
%define SU_USE_FSTG_CHECK ; // removing this skips checks if processing is needed %define SU_USE_FSTG_CHECK ; // removing this skips checks if processing is needed
%define SU_USE_WAVESHAPER_CLIP ; // removing this will skip clipping code %define SU_USE_WAVESHAPER_CLIP ; // removing this will skip clipping code
%endif %endif
%ifdef SU_USE_VCO_SHAPE %ifdef SU_USE_VCO_SHAPE
@ -136,8 +136,8 @@
; // synth defines ; // synth defines
; //---------------------------------------------------------------------------------------- ; //----------------------------------------------------------------------------------------
%define MAX_DELAY 65536 %define MAX_DELAY 65536
%define MAX_UNITS 64 %define MAX_UNITS 64
%define ABSOLUTE_MAX_VOICES 32 %define ABSOLUTE_MAX_VOICES 32
%ifndef SAMPLE_RATE %ifndef SAMPLE_RATE
@ -145,13 +145,13 @@
%endif %endif
%ifndef HLD %ifndef HLD
%define HLD 1 %define HLD 1
%endif %endif
%define TOTAL_ROWS (MAX_PATTERNS*PATTERN_SIZE) %define TOTAL_ROWS (MAX_PATTERNS*PATTERN_SIZE)
%define SAMPLES_PER_ROW (SAMPLE_RATE*4*60/(BPM*16)) %define SAMPLES_PER_ROW (SAMPLE_RATE*4*60/(BPM*16))
%define DEF_LFO_NORMALIZE 0.000038 %define DEF_LFO_NORMALIZE 0.000038
%define MAX_SAMPLES (SAMPLES_PER_ROW*TOTAL_ROWS) %define MAX_SAMPLES (SAMPLES_PER_ROW*TOTAL_ROWS)
%macro SU_BEGIN_PATCH 0 %macro SU_BEGIN_PATCH 0
SECT_DATA(params) SECT_DATA(params)
@ -163,7 +163,7 @@
SECT_DATA(sucomnds) SECT_DATA(sucomnds)
EXPORT MANGLE_DATA(su_commands) EXPORT MANGLE_DATA(su_commands)
db CMDS db CMDS
%endmacro %endmacro
%define CONCATENATE(x,y) x %+ y %define CONCATENATE(x,y) x %+ y
@ -186,11 +186,11 @@
%endif %endif
%endmacro %endmacro
%define VOICES(val) val %define VOICES(val) val
%define TRACKS(val) val %define TRACKS(val) val
%macro SU_END_INSTRUMENT 0 %macro SU_END_INSTRUMENT 0
%xdefine CMDS CMDS SU_ADVANCE_ID, %xdefine CMDS CMDS SU_ADVANCE_ID,
%endmacro %endmacro
%assign PATTERN_LENGTH -1 %assign PATTERN_LENGTH -1
@ -277,10 +277,10 @@ endstruc
; // Voice struct ; // Voice struct
; //---------------------------------------------------------------------------------------- ; //----------------------------------------------------------------------------------------
struc su_voice struc su_voice
.note resd 1 .note resd 1
.release resd 1 .release resd 1
.track resd 1 .track resd 1
.workspace resb MAX_UNITS * su_unit.size .workspace resb MAX_UNITS * su_unit.size
.size .size
endstruc endstruc
; //---------------------------------------------------------------------------------------- ; //----------------------------------------------------------------------------------------

24
tests/test_dll.asm
View File

@ -1,29 +1,29 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1) SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 11025 DELTIME 11025
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

28
tests/test_dll_dm_modulation.asm
View File

@ -1,31 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1) SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(32),PORT(3,delay,damp) + SEND_POP SU_SEND MONO,AMOUNT(32),PORT(3,delay,damp) + SEND_POP
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 11025 DELTIME 11025
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

28
tests/test_dll_fm_modulation.asm
View File

@ -1,31 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1) SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(32),PORT(3,delay,feedback) + SEND_POP SU_SEND MONO,AMOUNT(32),PORT(3,delay,feedback) + SEND_POP
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 11025 DELTIME 11025
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

28
tests/test_dll_im_modulation.asm
View File

@ -1,31 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1) SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(32),PORT(3,delay,dry) + SEND_POP SU_SEND MONO,AMOUNT(32),PORT(3,delay,dry) + SEND_POP
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 11025 DELTIME 11025
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

32
tests/test_dll_notetracking.asm
View File

@ -1,31 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
; %define SU_USE_UNDENORMALIZE ; // removing this skips denormalization code in the units ; %define SU_USE_UNDENORMALIZE ; // removing this skips denormalization code in the units
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(0),DECAY(0),SUSTAIN(96),RELEASE(96),GAIN(128) SU_ENVELOPE MONO,ATTAC(0),DECAY(0),SUSTAIN(96),RELEASE(96),GAIN(128)
SU_ENVELOPE MONO,ATTAC(0),DECAY(48),SUSTAIN(0),RELEASE(0),GAIN(128) SU_ENVELOPE MONO,ATTAC(0),DECAY(48),SUSTAIN(0),RELEASE(0),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(64),SHAPE(127),GAIN(64),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(64),SHAPE(127),GAIN(64),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(128),FLAGS(LOWPASS + BANDPASS + HIGHPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(128),FLAGS(LOWPASS + BANDPASS + HIGHPASS)
SU_DELAY MONO,PREGAIN(128),DRY(128),FEEDBACK(128),DAMP(16),DELAY(0),COUNT(1) SU_DELAY MONO,PREGAIN(128),DRY(128),FEEDBACK(128),DAMP(16),DELAY(0),COUNT(1)
SU_FILTER MONO,FREQUENCY(24),RESONANCE(128),FLAGS(LOWPASS + BANDPASS + HIGHPASS) SU_FILTER MONO,FREQUENCY(24),RESONANCE(128),FLAGS(LOWPASS + BANDPASS + HIGHPASS)
SU_MULP MONO SU_MULP MONO
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES

28
tests/test_dll_pm_modulation.asm
View File

@ -1,31 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1) SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(32),PORT(3,delay,pregain) + SEND_POP SU_SEND MONO,AMOUNT(32),PORT(3,delay,pregain) + SEND_POP
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 11025 DELTIME 11025
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

24
tests/test_dll_reverb.asm
View File

@ -1,29 +1,29 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(9) SU_DELAY MONO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(9)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 1116,1188,1276,1356,1422,1492,1556,1618 DELTIME 1116,1188,1276,1356,1422,1492,1556,1618
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

27
tests/test_dll_stereo.asm
View File

@ -1,30 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_DELAY STEREO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1) SU_DELAY STEREO,PREGAIN(40),DRY(128),FEEDBACK(125),DAMP(64),DELAY(1),COUNT(1)
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
SU_BEGIN_DELTIMES SU_BEGIN_DELTIMES
DELTIME 11025 DELTIME 11025
DELTIME 21025 DELTIME 21025
SU_END_DELTIMES SU_END_DELTIMES
%include "../src/sointu.asm" %include "../src/sointu.asm"

20
tests/test_dst.asm
View File

@ -1,24 +1,24 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_DISTORT MONO,DRIVE(32) SU_DISTORT MONO,DRIVE(32)
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_DISTORT MONO,DRIVE(96) SU_DISTORT MONO,DRIVE(96)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

26
tests/test_dst_modulation.asm
View File

@ -1,27 +1,27 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_DISTORT MONO,DRIVE(32) SU_DISTORT MONO,DRIVE(32)
SU_ENVELOPE MONO, ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO, ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_DISTORT MONO, DRIVE(96) SU_DISTORT MONO, DRIVE(96)
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(68),PORT(1,distort,drive) SU_SEND MONO,AMOUNT(68),PORT(1,distort,drive)
SU_SEND MONO,AMOUNT(68),PORT(3,distort,drive) + SEND_POP SU_SEND MONO,AMOUNT(68),PORT(3,distort,drive) + SEND_POP
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

10
tests/test_dst_sh.asm
View File

@ -1,10 +1,10 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
@ -13,9 +13,9 @@ SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_HOLD MONO,HOLDFREQ(3) SU_HOLD MONO,HOLDFREQ(3)
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_HOLD MONO,HOLDFREQ(3) SU_HOLD MONO,HOLDFREQ(3)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT

26
tests/test_dst_sh_modulation.asm
View File

@ -1,27 +1,27 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_HOLD MONO,HOLDFREQ(3) SU_HOLD MONO,HOLDFREQ(3)
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_HOLD MONO,HOLDFREQ(3) SU_HOLD MONO,HOLDFREQ(3)
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(68),PORT(1,hold,freq) SU_SEND MONO,AMOUNT(68),PORT(1,hold,freq)
SU_SEND MONO,AMOUNT(68),PORT(3,hold,freq) + SEND_POP SU_SEND MONO,AMOUNT(68),PORT(3,hold,freq) + SEND_POP
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

16
tests/test_dst_stereo.asm
View File

@ -1,22 +1,22 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE STEREO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE STEREO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_DISTORT STEREO, DRIVE(96) SU_DISTORT STEREO, DRIVE(96)
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

16
tests/test_envelope.asm
View File

@ -1,22 +1,22 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_ENVELOPE MONO,ATTAC(95),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(95),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

28
tests/test_envelope_modulation.asm
View File

@ -1,28 +1,28 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD,HLD, HLD, HLD, 0, 0, 0, 0, 0, PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD,HLD, HLD, HLD, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(120),DETUNE(64),PHASE(0),COLOR(128),SHAPE(96),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(120),DETUNE(64),PHASE(0),COLOR(128),SHAPE(96),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(68),PORT(0,env,attac) SU_SEND MONO,AMOUNT(68),PORT(0,env,attac)
SU_SEND MONO,AMOUNT(68),PORT(0,env,decay) SU_SEND MONO,AMOUNT(68),PORT(0,env,decay)
; Sustain modulation seems not to be implemented ; Sustain modulation seems not to be implemented
SU_SEND MONO,AMOUNT(68),PORT(0,env,release) SU_SEND MONO,AMOUNT(68),PORT(0,env,release)
SU_SEND MONO,AMOUNT(68),PORT(1,env,gain) + SEND_POP SU_SEND MONO,AMOUNT(68),PORT(1,env,gain) + SEND_POP
SU_OUT STEREO,GAIN(110) SU_OUT STEREO,GAIN(110)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

20
tests/test_fop_add.asm
View File

@ -1,24 +1,24 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0, PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0,
END_PATTERNS END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(32) SU_LOAD_VAL MONO,VALUE(32)
SU_LOAD_VAL MONO,VALUE(128) SU_LOAD_VAL MONO,VALUE(128)
SU_ADD MONO SU_ADD MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

26
tests/test_fop_addp.asm
View File

@ -1,27 +1,27 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(48) SU_LOAD_VAL MONO,VALUE(48)
SU_LOAD_VAL MONO,VALUE(48) SU_LOAD_VAL MONO,VALUE(48)
SU_ADDP MONO SU_ADDP MONO
SU_LOAD_VAL MONO,VALUE(80) SU_LOAD_VAL MONO,VALUE(80)
SU_LOAD_VAL MONO,VALUE(80) SU_LOAD_VAL MONO,VALUE(80)
SU_ADDP MONO SU_ADDP MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

24
tests/test_fop_addp2.asm
View File

@ -1,26 +1,26 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(0) SU_LOAD_VAL MONO,VALUE(0)
SU_LOAD_VAL MONO,VALUE(64) SU_LOAD_VAL MONO,VALUE(64)
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_ADDP STEREO SU_ADDP STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

16
tests/test_fop_loadnote.asm
View File

@ -1,22 +1,22 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0 PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOADNOTE STEREO SU_LOADNOTE STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

20
tests/test_fop_mul.asm
View File

@ -1,24 +1,24 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(32) SU_LOAD_VAL MONO,VALUE(32)
SU_LOAD_VAL MONO,VALUE(0) SU_LOAD_VAL MONO,VALUE(0)
SU_MUL MONO SU_MUL MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

27
tests/test_fop_mulp.asm
View File

@ -1,27 +1,28 @@
%define BPM 100
%define SINGLE_FILE %define BPM 100
%define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_LOAD_VAL MONO,VALUE(0) SU_LOAD_VAL MONO,VALUE(0)
SU_MULP MONO SU_MULP MONO
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_LOAD_VAL MONO,VALUE(128) SU_LOAD_VAL MONO,VALUE(128)
SU_MULP MONO SU_MULP MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

24
tests/test_fop_mulp2.asm
View File

@ -1,26 +1,26 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_LOAD_VAL MONO,VALUE(128) SU_LOAD_VAL MONO,VALUE(128)
SU_LOAD_VAL MONO,VALUE(0) SU_LOAD_VAL MONO,VALUE(0)
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_fop_pop.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(32) SU_LOAD_VAL MONO,VALUE(32)
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_LOAD_VAL MONO,VALUE(0) SU_LOAD_VAL MONO,VALUE(0)
SU_POP MONO SU_POP MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_fop_push.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(32) SU_LOAD_VAL MONO,VALUE(32)
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_PUSH MONO SU_PUSH MONO
SU_POP MONO SU_POP MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

20
tests/test_fop_xch.asm
View File

@ -1,24 +1,24 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_LOAD_VAL MONO,VALUE(32) SU_LOAD_VAL MONO,VALUE(32)
SU_XCH MONO SU_XCH MONO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

34
tests/test_globalstore.asm
View File

@ -1,31 +1,31 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(96) SU_LOAD_VAL MONO,VALUE(96)
SU_SEND MONO,AMOUNT(96),GLOBALPORT(1,3,load_val,value) + SEND_POP SU_SEND MONO,AMOUNT(96),GLOBALPORT(1,3,load_val,value) + SEND_POP
SU_LOAD_VAL MONO,VALUE(64) SU_LOAD_VAL MONO,VALUE(64)
SU_LOAD_VAL MONO,VALUE(64) SU_LOAD_VAL MONO,VALUE(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument1 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument1
SU_LOAD_VAL MONO,VALUE(32) SU_LOAD_VAL MONO,VALUE(32)
SU_SEND MONO,AMOUNT(96),GLOBALPORT(0,2,load_val,value) + SEND_POP SU_SEND MONO,AMOUNT(96),GLOBALPORT(0,2,load_val,value) + SEND_POP
SU_LOAD_VAL MONO,VALUE(64) SU_LOAD_VAL MONO,VALUE(64)
SU_LOAD_VAL MONO,VALUE(64) SU_LOAD_VAL MONO,VALUE(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

18
tests/test_load.asm
View File

@ -1,23 +1,23 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(40) SU_LOAD_VAL MONO,VALUE(40)
SU_LOAD_VAL MONO,VALUE(80) SU_LOAD_VAL MONO,VALUE(80)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

30
tests/test_multiple_instruments.asm
View File

@ -1,29 +1,29 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64,HLD,HLD,HLD,HLD,HLD,HLD,HLD, 0, 0, 0,0,0,0,0,0, PATTERN 64,HLD,HLD,HLD,HLD,HLD,HLD,HLD, 0, 0, 0,0,0,0,0,0,
PATTERN 0, 0, 0, 0, 0, 0, 0, 0,64,HLD,HLD,0,0,0,0,0, PATTERN 0, 0, 0, 0, 0, 0, 0, 0,64,HLD,HLD,0,0,0,0,0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
TRACK VOICES(1),1 TRACK VOICES(1),1
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(0) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(0)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument1 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument1
SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(80),GAIN(0) SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(80),GAIN(0)
SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

18
tests/test_panning.asm
View File

@ -1,23 +1,23 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_PAN MONO,PANNING(40) SU_PAN MONO,PANNING(40)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_polyphony.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, 68, HLD, 32, HLD, HLD, HLD, 75, HLD, 78, HLD, HLD, 0, 0, 0, PATTERN 64, HLD, 68, HLD, 32, HLD, HLD, HLD, 75, HLD, 78, HLD, HLD, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(2),0 TRACK VOICES(2),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(2) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(2) ; 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_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(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

178
tests/test_renderer.c
View File

@ -16,127 +16,127 @@ extern void __stdcall su_render();
extern int su_max_samples; extern int su_max_samples;
int main(int argc, char* argv[]) { int main(int argc, char* argv[]) {
FILE* f; FILE* f;
char filename[256]; char filename[256];
int n; int n;
int retval; int retval;
char test_name[] = TEST_NAME; char test_name[] = TEST_NAME;
char expected_output_folder[] = "expected_output/"; char expected_output_folder[] = "expected_output/";
char actual_output_folder[] = "actual_output/"; char actual_output_folder[] = "actual_output/";
long fsize; long fsize;
long bufsize; long bufsize;
boolean small_difference; boolean small_difference;
double diff; double diff;
#ifndef SU_USE_16BIT_OUTPUT #ifndef SU_USE_16BIT_OUTPUT
float* buf = NULL; float* buf = NULL;
float* filebuf = NULL; float* filebuf = NULL;
float v; float v;
bufsize = su_max_samples * 2 * sizeof(float); bufsize = su_max_samples * 2 * sizeof(float);
buf = (float*)malloc(bufsize); buf = (float*)malloc(bufsize);
#else #else
short* buf = NULL; short* buf = NULL;
short* filebuf = NULL; short* filebuf = NULL;
short v; short v;
bufsize = su_max_samples * 2 * sizeof(short); bufsize = su_max_samples * 2 * sizeof(short);
buf = (short*)malloc(bufsize); buf = (short*)malloc(bufsize);
#endif #endif
if (buf == NULL) { if (buf == NULL) {
printf("Could not allocate buffer for 4klang rendering\n"); printf("Could not allocate buffer for 4klang rendering\n");
return 1; return 1;
} }
su_render(buf); su_render(buf);
snprintf(filename, sizeof filename, "%s%s%s", expected_output_folder, test_name, ".raw"); snprintf(filename, sizeof filename, "%s%s%s", expected_output_folder, test_name, ".raw");
f = fopen(filename, "rb"); f = fopen(filename, "rb");
if (f == NULL) { if (f == NULL) {
printf("No expected waveform found!\n"); printf("No expected waveform found!\n");
goto fail; goto fail;
} }
fseek(f, 0, SEEK_END); fseek(f, 0, SEEK_END);
fsize = ftell(f); fsize = ftell(f);
fseek(f, 0, SEEK_SET); fseek(f, 0, SEEK_SET);
if (bufsize < fsize) { if (bufsize < fsize) {
printf("4klang rendered shorter wave than expected\n"); printf("4klang rendered shorter wave than expected\n");
goto fail; goto fail;
} }
if (bufsize > fsize) { if (bufsize > fsize) {
printf("4klang rendered longer wave than expected\n"); printf("4klang rendered longer wave than expected\n");
goto fail; goto fail;
} }
#ifndef SU_USE_16BIT_OUTPUT #ifndef SU_USE_16BIT_OUTPUT
filebuf = (float*)malloc(bufsize); filebuf = (float*)malloc(bufsize);
#else #else
filebuf = (short*)malloc(bufsize); filebuf = (short*)malloc(bufsize);
#endif #endif
if (filebuf == NULL) { if (filebuf == NULL) {
printf("Could not allocate buffer for file contents\n"); printf("Could not allocate buffer for file contents\n");
goto fail; goto fail;
} }
fread((void*)filebuf, su_max_samples * 2, sizeof(*filebuf), f); fread((void*)filebuf, su_max_samples * 2, sizeof(*filebuf), f);
small_difference = FALSE; small_difference = FALSE;
for (n = 0; n < su_max_samples * 2; n++) { for (n = 0; n < su_max_samples * 2; n++) {
diff = (double)(buf[n]) - (double)(filebuf[n]); diff = (double)(buf[n]) - (double)(filebuf[n]);
#ifdef SU_USE_16BIT_OUTPUT #ifdef SU_USE_16BIT_OUTPUT
diff = diff / 32768.0f; diff = diff / 32768.0f;
#endif #endif
diff = fabs(diff); diff = fabs(diff);
if (diff > 1e-3f || isnan(diff)) { if (diff > 1e-3f || isnan(diff)) {
printf("4klang rendered different wave than expected\n"); printf("4klang rendered different wave than expected\n");
goto fail; goto fail;
} }
else if (diff > 0.0f) { else if (diff > 0.0f) {
small_difference = TRUE; small_difference = TRUE;
} }
} }
if (small_difference) { if (small_difference) {
printf("4klang rendered almost correct wave, but with small errors (< 1e-3)\n"); printf("4klang rendered almost correct wave, but with small errors (< 1e-3)\n");
goto fail; goto fail;
} }
success: success:
retval = 0; retval = 0;
goto end; goto end;
fail: fail:
retval = 1; retval = 1;
end: end:
if (f != 0) { if (f != 0) {
fclose(f); fclose(f);
f = 0; f = 0;
} }
#if defined (_WIN32) #if defined (_WIN32)
CreateDirectory(actual_output_folder, NULL); CreateDirectory(actual_output_folder, NULL);
#else #else
mkdir(actual_output_folder, 0777); mkdir(actual_output_folder, 0777);
#endif #endif
snprintf(filename, sizeof filename, "%s%s%s", actual_output_folder, test_name, ".raw"); snprintf(filename, sizeof filename, "%s%s%s", actual_output_folder, test_name, ".raw");
f = fopen(filename, "wb"); f = fopen(filename, "wb");
fwrite((void*)buf, sizeof(*buf), 2 * su_max_samples, f); fwrite((void*)buf, sizeof(*buf), 2 * su_max_samples, f);
fclose(f); fclose(f);
if (buf != 0) { if (buf != 0) {
free(buf); free(buf);
buf = 0; buf = 0;
} }
if (filebuf != 0) { if (filebuf != 0) {
free(filebuf); free(filebuf);
filebuf = 0; filebuf = 0;
} }
return retval; return retval;
} }

28
tests/test_send.asm
View File

@ -1,28 +1,28 @@
%define BPM 100 %define BPM 100
%define SINGLE_FILE %define SINGLE_FILE
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0 PATTERN 64, HLD, HLD, HLD, HLD, HLD, HLD, HLD, 0, 0, 0, 0, 0, 0, 0, 0
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_LOAD_VAL MONO,VALUE(32) ; should receive -0.5 SU_LOAD_VAL MONO,VALUE(32) ; should receive -0.5
SU_SEND MONO,AMOUNT(96),PORT(5,load_val,value) ; should send -0.25 SU_SEND MONO,AMOUNT(96),PORT(5,load_val,value) ; should send -0.25
SU_SEND MONO,AMOUNT(96),PORT(6,load_val,value) + SEND_POP ; should send -0.25 SU_SEND MONO,AMOUNT(96),PORT(6,load_val,value) + SEND_POP ; should send -0.25
SU_LOAD_VAL MONO,VALUE(128) ; should receive 1 SU_LOAD_VAL MONO,VALUE(128) ; should receive 1
SU_SEND MONO,AMOUNT(96),PORT(6,load_val,value) + SEND_POP ; should send 0.5 SU_SEND MONO,AMOUNT(96),PORT(6,load_val,value) + SEND_POP ; should send 0.5
SU_LOAD_VAL MONO,VALUE(64) ; should receive -0.5 SU_LOAD_VAL MONO,VALUE(64) ; should receive -0.5
SU_LOAD_VAL MONO,VALUE(64) ; should receive 0.5 SU_LOAD_VAL MONO,VALUE(64) ; should receive 0.5
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_vcf_band.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

8
tests/test_vcf_fm_modulation.asm
View File

@ -1,19 +1,19 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128), FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128), FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS)

22
tests/test_vcf_high.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(HIGHPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(HIGHPASS)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_vcf_low.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(LOWPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(LOWPASS)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_vcf_peak.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(LOWPASS + NEGHIGHPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(LOWPASS + NEGHIGHPASS)
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

8
tests/test_vcf_rm_modulation.asm
View File

@ -1,19 +1,19 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128), FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128), FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS) SU_FILTER MONO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS)

22
tests/test_vcf_stereo.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128) SU_ENVELOPE MONO,ATTAC(64),DECAY(64),SUSTAIN(64),RELEASE(72),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(TRISAW)
SU_MULP MONO SU_MULP MONO
SU_PAN MONO,PANNING(64) SU_PAN MONO,PANNING(64)
SU_FILTER STEREO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS) SU_FILTER STEREO,FREQUENCY(32),RESONANCE(64),FLAGS(BANDPASS)
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

10
tests/test_vco_cm_modulation.asm
View File

@ -1,4 +1,4 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
@ -8,18 +8,18 @@ SU_BEGIN_PATTERNS
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PUSH MONO SU_PUSH MONO
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE + LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE + LFO)
SU_SEND MONO,AMOUNT(68),PORT(1,osc,color) + SEND_POP SU_SEND MONO,AMOUNT(68),PORT(1,osc,color) + SEND_POP
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH

18
tests/test_vco_dm_modulation.asm
View File

@ -1,4 +1,4 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
@ -8,18 +8,18 @@ SU_BEGIN_PATTERNS
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PUSH MONO SU_PUSH MONO
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE+LFO)
SU_SEND MONO,AMOUNT(96),PORT(1,osc,detune) + SEND_POP SU_SEND MONO,AMOUNT(96),PORT(1,osc,detune) + SEND_POP
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH

22
tests/test_vco_gate.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(32),PHASE(0),GATESLOW(15),GATESHIGH(96),GAIN(128),FLAGS(GATE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(32),PHASE(0),GATESLOW(15),GATESHIGH(96),GAIN(128),FLAGS(GATE)
SU_OSCILLAT MONO,TRANSPOSE(72),DETUNE(64),PHASE(64),GATESLOW(170),GATESHIGH(64),GAIN(128),FLAGS(GATE) SU_OSCILLAT MONO,TRANSPOSE(72),DETUNE(64),PHASE(64),GATESLOW(170),GATESHIGH(64),GAIN(128),FLAGS(GATE)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

10
tests/test_vco_gm_modulation.asm
View File

@ -1,4 +1,4 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
@ -8,18 +8,18 @@ SU_BEGIN_PATTERNS
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PUSH MONO SU_PUSH MONO
SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE + LFO) SU_OSCILLAT MONO,TRANSPOSE(70),DETUNE(64),PHASE(64),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE + LFO)
SU_SEND MONO,AMOUNT(68),PORT(1,osc,gain) + SEND_POP SU_SEND MONO,AMOUNT(68),PORT(1,osc,gain) + SEND_POP
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH

22
tests/test_vco_lfo.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_OSCILLAT MONO, TRANSPOSE(90),DETUNE(64),PHASE(0),COLOR(128),SHAPE(96),GAIN(128), FLAGS(SINE + LFO) SU_OSCILLAT MONO, TRANSPOSE(90),DETUNE(64),PHASE(0),COLOR(128),SHAPE(96),GAIN(128), FLAGS(SINE + LFO)
SU_OSCILLAT MONO, TRANSPOSE(100),DETUNE(64),PHASE(0),COLOR(64),SHAPE(96),GAIN(128), FLAGS(PULSE + LFO) SU_OSCILLAT MONO, TRANSPOSE(100),DETUNE(64),PHASE(0),COLOR(64),SHAPE(96),GAIN(128), FLAGS(PULSE + LFO)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

22
tests/test_vco_noise.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_NOISE MONO, SHAPE(64),GAIN(128) SU_NOISE MONO, SHAPE(64),GAIN(128)
SU_NOISE MONO, SHAPE(96),GAIN(128) SU_NOISE MONO, SHAPE(96),GAIN(128)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

6
tests/test_vco_pm_modulation.asm
View File

@ -1,4 +1,4 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
@ -8,12 +8,12 @@ SU_BEGIN_PATTERNS
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PUSH MONO SU_PUSH MONO

22
tests/test_vco_pulse.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_OSCILLAT MONO, TRANSPOSE(64),DETUNE(32),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(PULSE) SU_OSCILLAT MONO, TRANSPOSE(64),DETUNE(32),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(PULSE)
SU_OSCILLAT MONO, TRANSPOSE(72),DETUNE(64),PHASE(64),COLOR(64),SHAPE(96),GAIN(128), FLAGS(PULSE) SU_OSCILLAT MONO, TRANSPOSE(72),DETUNE(64),PHASE(64),COLOR(64),SHAPE(96),GAIN(128), FLAGS(PULSE)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

14
tests/test_vco_sine.asm
View File

@ -1,24 +1,24 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_OSCILLAT MONO, TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(SINE) SU_OSCILLAT MONO, TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(SINE)
SU_OSCILLAT MONO, TRANSPOSE(72),DETUNE(64),PHASE(64),COLOR(64),SHAPE(96),GAIN(128), FLAGS(SINE) SU_OSCILLAT MONO, TRANSPOSE(72),DETUNE(64),PHASE(64),COLOR(64),SHAPE(96),GAIN(128), FLAGS(SINE)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH

6
tests/test_vco_sm_modulation.asm
View File

@ -1,4 +1,4 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
@ -8,12 +8,12 @@ SU_BEGIN_PATTERNS
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PUSH MONO SU_PUSH MONO

20
tests/test_vco_stereo.asm
View File

@ -1,24 +1,24 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO, ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_OSCILLAT STEREO, TRANSPOSE(64),DETUNE(32),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(SINE) SU_OSCILLAT STEREO, TRANSPOSE(64),DETUNE(32),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(SINE)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO, GAIN(128) SU_OUT STEREO, GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"

6
tests/test_vco_tm_modulation.asm
View File

@ -1,4 +1,4 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
@ -8,12 +8,12 @@ SU_BEGIN_PATTERNS
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128) SU_ENVELOPE MONO,ATTAC(80),DECAY(80),SUSTAIN(64),RELEASE(80),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(64),PHASE(0),COLOR(128),SHAPE(64),GAIN(128),FLAGS(SINE)
SU_MULP MONO SU_MULP MONO
SU_PUSH MONO SU_PUSH MONO

22
tests/test_vco_trisaw.asm
View File

@ -1,25 +1,25 @@
%define BPM 100 %define BPM 100
%define USE_SECTIONS %define USE_SECTIONS
%include "../src/sointu.inc" %include "../src/sointu.inc"
SU_BEGIN_PATTERNS SU_BEGIN_PATTERNS
PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0, PATTERN 64, 0, 68, 0, 32, 0, 0, 0, 75, 0, 78, 0, 0, 0, 0, 0,
SU_END_PATTERNS SU_END_PATTERNS
SU_BEGIN_TRACKS SU_BEGIN_TRACKS
TRACK VOICES(1),0 TRACK VOICES(1),0
SU_END_TRACKS SU_END_TRACKS
SU_BEGIN_PATCH SU_BEGIN_PATCH
SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0 SU_BEGIN_INSTRUMENT VOICES(1) ; Instrument0
SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128) SU_ENVELOPE MONO,ATTAC(32),DECAY(32),SUSTAIN(64),RELEASE(64),GAIN(128)
SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(32),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(64),DETUNE(32),PHASE(0),COLOR(96),SHAPE(64),GAIN(128), FLAGS(TRISAW)
SU_OSCILLAT MONO,TRANSPOSE(72),DETUNE(64),PHASE(64),COLOR(64),SHAPE(96),GAIN(128), FLAGS(TRISAW) SU_OSCILLAT MONO,TRANSPOSE(72),DETUNE(64),PHASE(64),COLOR(64),SHAPE(96),GAIN(128), FLAGS(TRISAW)
SU_MULP STEREO SU_MULP STEREO
SU_OUT STEREO,GAIN(128) SU_OUT STEREO,GAIN(128)
SU_END_INSTRUMENT SU_END_INSTRUMENT
SU_END_PATCH SU_END_PATCH
%include "../src/sointu.asm" %include "../src/sointu.asm"