anchor.diff:      if InRange(aVolume, 0, 4) and (aRadius >= MIN_SOUND_AT_LOC_RADIUS) and gTerrain.TileInMapCoords(aX,aY) then
         Result := gScriptSounds.AddSound(aPlayer, aFileName, afOgg, KMPoint(aX,aY), True, aVolume, aRadius, False, False)
       else
  -      LogParamWarning('Actions.PlayWAVAtLocation: ' + UnicodeString(aFileName), [aX, aY]);
  +      LogParamWarning('Actions.PlayOGGAtLocation: ' + UnicodeString(aFileName), [aX, aY]);
     except
       gScriptEvents.ExceptionOutsideScript := True; //Don't blame script for this exception
       raise;
  
positive.code: procedure TKMScriptActions.StopSound(aSoundIndex: Integer);
  begin
    try
      gScriptSounds.RemoveSound(aSoundIndex);
    except
      gScriptEvents.ExceptionOutsideScript := True; //Don't blame script for this exception
      raise;
  
negative.code: procedure TKMScriptActions.StopLoopedOGG(aSoundIndex: Integer);
  begin
    try
      if aSoundIndex > 0 then
        gScriptSounds.RemoveLoopSoundByUID(aSoundIndex)
      else
        LogParamWarning('Actions.StopLoopedOGG', [aSoundIndex]);
    except
      gScriptEvents.ExceptionOutsideScript := True; //Don't blame script for this exception
      raise;
  