anchor.diff:    {$IFDEF USELIBZPLAY}
     //LibZPlay has a nice SlideVolume function we can use
     ZPlayer.ResumePlayback; //Music may have been paused due to fade out
  +  if aHandleCrackling then Sleep(25);
     ZPlayer.GetPosition(StartTime);
     EndTime.ms := StartTime.ms + FADE_TIME;
     ZPlayer.GetPlayerVolume(Left, Right); //Start fade from the current volume
  
positive.code:   mciopen.lpstrElementName := pchar (filename);
    Result := mciSendCommand ($0, mci_open , mci_open_type or mci_open_element, longint (@mciopen));
    if Result <> 0 then exit;
  
    // The device opened successfully; get the device ID.
    // Check if the output port is the MIDI mapper.
    wDeviceID := mciOpen.wDeviceID;
  
negative.code:   {$ENDIF}
    {$IFDEF USEBASS}
    BASS_ChannelPlay(fBassStream, False); //Music may have been paused due to fade out
    if aHandleCrackling then Sleep(25);
    BASS_ChannelSlideAttribute(fBassStream, BASS_ATTRIB_VOL, MusicGain, FADE_TIME);
    {$ENDIF}
  end;
  