半次元图片爬虫源码采集一键自动保存

.计次循环首 (5, y)
    text ＝ 编码_URL解码 (网页_访问S (“………………………………”, 1, “p=” ＋ 到文本 (y)), 真)
    ' 置剪辑板文本 (text)
    正则.创建 (#正则, text, , , , )
    .计次循环首 (正则.取匹配数量 (), a)
        txt ＝ 网页_访问S (“………………” ＋ 正则.取子匹配文本 (a, 1), , , )
        ' 调试输出 (正则.取子匹配文本 (a, 1), “aaaa”)
        目录 ＝ “D:\半次元\” ＋ 正则.取子匹配文本 (a, 2) ＋ “\”
        目录_创建 (目录)
        ' 调试输出 (目录)
        正则1.创建 (#图片正则, txt)
        .计次循环首 (正则1.取匹配数量 (), b)
            ' 调试输出 (正则1.取子匹配文本 (b, 1))
            pohtoh ＝ 网页_访问 (正则1.取子匹配文本 (b, 1))
            图片框1.图片 ＝ pohtoh  ' 删除 或者屏蔽  比较快些！！！
            写到文件 (目录 ＋ 到文本 (b) ＋ “.jpg”, pohtoh)
            保存进度 ＝ 四舍五入 (b ÷ 正则1.取匹配数量 () × 100, 2)
            进度条3.位置 ＝ 保存进度
            标签4.标题 ＝ 到文本 (保存进度) ＋ “%”
        .计次循环尾 ()
        采集进度 ＝ 四舍五入 (a ÷ 正则.取匹配数量 () × 100, 2)
        进度条2.位置 ＝ 采集进度
        标签3.标题 ＝ 到文本 (采集进度) ＋ “%”
        处理事件 ()
    .计次循环尾 ()
    执行进度 ＝ 四舍五入 (y ÷ 5 × 100, 2)
    进度条1.位置 ＝ 执行进度
    标签2.标题 ＝ 到文本 (执行进度) ＋ “%”
    处理事件 ()
.计次循环尾 ()