mirror/sointu
1
0
Fork 0
mirror of https://github.com/vsariola/sointu.git synced 2026-02-05 15:20:20 -05:00
Code Issues Packages Projects Releases Wiki Activity

Implement gain and inverse gain effects, for the moments when you just need them.

Browse Source
This commit is contained in:
Veikko Sariola
2020-05-16 22:29:08 +03:00
parent e966bc0084
commit 5760f78201
11 changed files with 202 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
src/opcodes/effects.asm
View File

@ -78,6 +78,46 @@ su_op_hold_holding:
%endif ; HOLD_ID > -1
;-------------------------------------------------------------------------------
; GAIN Tick
;-------------------------------------------------------------------------------
%if GAIN_ID > -1
SECT_TEXT(sugain)
EXPORT MANGLE_FUNC(su_op_gain,0)
%ifdef INCLUDE_STEREO_GAIN
jnc su_op_gain_mono
call su_stereo_filterhelper
%define INCLUDE_STEREO_FILTERHELPER
su_op_gain_mono:
%endif
fld dword [edx+su_gain_ports.gain] ; g x
fmulp st1, st0 ; g*x
ret
%endif ; GAIN_ID > -1
;-------------------------------------------------------------------------------
; INVGAIN Tick
;-------------------------------------------------------------------------------
%if INVGAIN_ID > -1
SECT_TEXT(suingain)
EXPORT MANGLE_FUNC(su_op_invgain,0)
%ifdef INCLUDE_STEREO_INVGAIN
jnc su_op_invgain_mono
call su_stereo_filterhelper
%define INCLUDE_STEREO_FILTERHELPER
su_op_invgain_mono:
%endif
fld dword [edx+su_invgain_ports.invgain] ; g x
fdivp st1, st0 ; x/g
ret
%endif ; INVINVGAIN_ID > -1
;-------------------------------------------------------------------------------
; su_op_filter: perform low/high/band-pass filtering on the signal
;-------------------------------------------------------------------------------