易语言抖音筛选在线tk号工具开发

.支持库 edroptarget
.支持库 EThread
.支持库 shell
.支持库 spec
.支持库 eGrid
.支持库 iconv
.支持库 iext
.支持库 eExcel2000
.软件打包地址：www_set2023_com

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕


标签1.背景颜色 ＝ 3157293
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())
华侨_加载皮肤_星耀炫黑 ()

加装表格参数 ()


.子程序 _按钮1_被单击




启动线程 (&开始检测_主线程, , )



' 装备 ＝ { “1111”, “2222”, “33333” }
.' 计次循环首 (取数组成员数 (装备), 变量1)
    ' 调试输出 (装备 [变量1])
.' 计次循环尾 ()


.子程序 _按钮_导入TK_被单击
.局部变量 文件路径, 文本型
.局部变量 内容, 文本型
.局部变量 数组文本内容, 文本型, , "0"
.局部变量 行数, 整数型
.局部变量 i, 整数型

文件路径 ＝ 浏览文件夹 (“找token”, 真)
内容 ＝ 到文本 (读入文件 (文件路径))
行数 ＝ 文本_分割文本 (内容, #换行符, , 数组文本内容)
.计次循环首 (行数, i)
    调试输出 (数组文本内容 [i])
    高级表格1.行数 ＝ 高级表格1.行数 ＋ 1
    ' 高级表格1.置对齐方式 (0, 0, 0, 0, 2)
    高级表格1.置数据 (i, 0, 1, i)
    高级表格1.置数据 (i, 1, 1, 数组文本内容 [i])
    i ＝ i ＋ 1
.计次循环尾 ()
高级表格1.置对齐方式 (1, 1, 高级表格1.行数, 1, 1)



.子程序 __启动窗口_将被销毁

华侨_卸载皮肤_默认窗口 ()



.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 临时文本, 字节集
.局部变量 内容, 文本型
.局部变量 行数, 整数型
.局部变量 数组文本内容, 文本型, , "0"
.局部变量 测试输出一个, 文本型
.局部变量 JSON, 类_json
.局部变量 JSON文本, 逻辑型
.局部变量 arr, 文本型, , "0"
.局部变量 昵称, 文本型
.局部变量 绑定手机号, 文本型
.局部变量 app_id, 整数型
.局部变量 account, 文本型
.局部变量 account列表, 文本型, , "0"
.局部变量 高级行数, 整数型
.局部变量 re, 正则表达式类
.局部变量 计次, 整数型
.局部变量 tk数组, 文本型, , "0"
.局部变量 去完重数组, 文本型, , "0"
.局部变量 num, 双精度小数型
.局部变量 偏移值, 整数型

高级行数 ＝ 高级表格1.行数 － 1
.计次循环首 (高级行数, j)
    高级表格1.删除行 (i)
    j ＝ j ＋ 1
.计次循环尾 ()
加装表格参数 ()
临时文本 ＝ 编码转换 (读入文件 (接收到的文件路径), #编码_UTF_8, #编码_GB18030, )
内容 ＝ 到文本 (读入文件 (接收到的文件路径))

re.创建 (“00.*?-1.0.1”, 内容)

载入 (窗口2, , 假)
窗口2.透明标签2.标题 ＝ “正在导入TK”


.计次循环首 (re.取匹配数量 (), 计次)
    高级表格1.行数 ＝ 高级表格1.行数 ＋ 1
    高级表格1.置数据 (计次, 0, 1, 计次)
    高级表格1.置数据 (计次, 1, 1, re.取匹配文本 (计次))
    num ＝ 到数值 (计次) ÷ 到数值 (re.取匹配数量 ())
    num ＝ num × 100
    窗口2.透明标签1.标题 ＝ 到文本 (四舍五入 (num, 2)) ＋ “%”
    ' i ＝ 到整数 (计次 ÷ re.取匹配数量 () × 100)
    偏移值 ＝ re.取匹配数量 () ÷ 300
    窗口2.外形框2.宽度 ＝ num ÷ 100 × (300 ＋ 偏移值)
.计次循环尾 ()

.' 计次循环首 (行数, i)
    ' 高级表格1.行数 ＝ 高级表格1.行数 ＋ 1
    ' 高级表格1.置数据 (i, 0, 1, i)
    ' 高级表格1.置数据 (i, 1, 1, 数组文本内容 [i])
    ' i ＝ i ＋ 1
.' 计次循环尾 ()
高级表格1.置对齐方式 (1, 1, 高级表格1.行数, 1, 1)
高级表格1.置对齐方式 (1, 2, 高级表格1.行数, 2, 1)
高级表格1.置对齐方式 (1, 3, 高级表格1.行数, 3, 2)
高级表格1.置对齐方式