本地取MP4帧宽度和帧高度

没啥技术含量，就是分析的过程稍微麻烦一丢丢而已，易语言本地取MP4帧宽度和帧高度例子。

文件号 ＝ 打开文件 (MP4文件, #读入, #无限制)
bin ＝ 读入字节集 (文件号, 1000)
index ＝ 寻找字节集 (bin, { 116, 107, 104, 100 }, )
.如果真 (index ＝ -1)
index ＝ 寻找字节集 (bin, 到字节集 (“free”), )
.如果真 (index ＝ -1)
帧信息.帧宽度 ＝ -1
帧信息.帧高度 ＝ -1
返回 (帧信息)
.如果真结束
index ＝ index ＋ 4
index ＝ 字节集转长整数 (取字节集中间 (bin, index, 4))
移动读写位置 (文件号, #文件首, index)
bin ＝ 读入字节集 (文件号, 500)
index ＝ 寻找字节集 (bin, { 116, 107, 104, 100 }, )
关闭文件 (文件号)
.如果真结束
帧信息.帧宽度 ＝ 字节集转长整数 (取字节集中间 (bin, index ＋ 80, 2))
帧信息.帧高度 ＝ 字节集转长整数 (取字节集中间 (bin, index ＋ 84, 2))