Implement AL_AIR_ABSORPTION_FACTOR source property

1 files changed, 4 insertions, 0 deletions

diff --git a/Alc/ALu.c b/Alc/ALu.c
index 7397af8f..b65070a8 100644
--- a/Alc/ALu.c
+++ b/Alc/ALu.c
@@ -378,6 +378,10 @@ static ALvoid CalcSourceParams(ALCcontext *ALContext, ALsource *ALSource,
                 break;
         }
 
+        if(ALSource->AirAbsorptionFactor > 0.0f)
+            DryGainHF *= pow(ALSource->AirAbsorptionFactor * AIRABSORBGAINHF,
+                             Distance * MetersPerUnit);
+
         *drygainhf = DryGainHF;
         *wetgainhf = WetGainHF;