anchor.diff:    {$IFDEF USEBASS}
     BASS_ChannelSetAttribute(fBassOtherStream, BASS_ATTRIB_VOL, fOtherVolume); //0=silent, 1=max
     {$ENDIF}
  -
  -  Result := True;
   end;
   
   
  
positive.code:   {$ENDIF}
  
    SetVolume(fVolume); //Need to reset music volume after starting playback
    Result := True;
  end;
  
  
  function TKMMusicLib.PlayOtherFile(const FileName: UnicodeString): Boolean;
  {$IFDEF USEBASS}
  var
    errorCode: Integer;
  {$ENDIF}
  begin
    Result := False;
    if not fIsInitialized then exit;
  
    //Cancel previous sound
  
negative.code:     fToPlayAfterFade: UnicodeString;
      fFadedToPlayOther: Boolean;
      fOtherVolume: Single;
      procedure PlayFile(const FileName: UnicodeString);
      procedure PlayOtherFile(const FileName: UnicodeString);
      procedure ScanTracks(const aPath: UnicodeString);
      procedure ShuffleSongs; //should not be seen outside of this class
      procedure UnshuffleSongs;
  