例如使用Potplayer连续截图(我设置没10帧截一次), 然后利用MMA可以制作动图代码如下:
SetDirectory["D:\\Program Files\\DAUM\\PotPlayer\\Capture\\"];
images = FileNames["*.jpg"];
img = Table[Import[images[[i]]], {i, Length[images]}];
Export["波西米亚狂想曲.gif", img, ImageSize -> Scaled[.8],
"DisplayDurations" -> .15, AnimationRepetitions -> Infty]