anchor.diff:  {Wrapper with fewer options for non-attenuated sounds}
   procedure TSoundLib.Play(SoundID:TSoundFX; const Volume:single=1.0);
   begin
  -  if not fIsSoundInitialized then exit;
  +  if not fIsSoundInitialized then Exit;
     Play(SoundID, KMPoint(0,0), false, Volume); //Redirect
   end;
   
  
positive.code: procedure TSoundLib.ExportSounds;
  var i:integer; S:TMemoryStream;
  begin
    if not fIsSoundInitialized then exit;
  
    CreateDir(ExeDir+'Export\');
    CreateDir(ExeDir+'Export\Sounds.dat\');
  
negative.code:     fLog.AddToLog('OpenAL warning. Context could not be made current.');
      Application.MessageBox('Context could not be made current. Please refer to Readme.txt for solution','OpenAL warning', MB_OK + MB_ICONEXCLAMATION);
      fIsSoundInitialized := false;
      Exit;
    end;
  
    CheckOpenALError;
    if not fIsSoundInitialized then Exit;
  
    //Set attenuation model
    alDistanceModel(AL_LINEAR_DISTANCE_CLAMPED);
  