抖音主页采集工具更新

由于昨天抖音限制了网页接口的访问导致平均六次刷新只有一次能够获取到内容，而且只能展示18个视频。

文件夹名字 ＝ 文本_取出中间文本 (源码, #名字前, #名字后)
.如果 (创建目录 (取运行目录 () ＋ “/” ＋ 文件夹名字) ＝ 真)

.否则
文件夹名字 ＝ 文本_取出文本中汉字 (文件夹名字)
创建目录 (取运行目录 () ＋ “/” ＋ 文件夹名字)
.如果结束
.计次循环首 (超级列表框1.取表项数 (), i)
article ＝ 超级列表框1.取标题 (i － 1, 1)
article ＝ 文本_取出文本中汉字 (article)
.如果真 (article ＝ “”)
置随机数种子 ()
article ＝ “本视频没有标题或者没获取到” ＋ 到文本 (取随机数 (1, 99))
.如果真结束
链接 ＝ 超级列表框1.取标题 (i － 1, 2)
文件 ＝ HTTP读文件 (链接)
.判断循环首 (文件是否存在 (取运行目录 () ＋ “/” ＋ 文件夹名字 ＋ “/” ＋ article ＋ “.mp4”) ＝ 假)
写到文件 (取运行目录 () ＋ “/” ＋ 文件夹名字 ＋ “/” ＋ article ＋ “.mp4”, 文件)
.判断循环尾 ()
透明标签2.标题 ＝ 到文本 (i) ＋ “/” ＋ 到文本 (超级列表框1.取表项数 ())
.计次循环尾 ()