Mathematica: How to interactively display video along with waveform data and export to GIF