如何把这种号分类出来

leloveying

123456
333333
4个相同或3,4,5,6个相同数字的账号分类出来

LEOONL

https://bbs.ijingyi.com/forum.ph ... =%E9%9D%93%E5%8F%B7

zainex

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型
数组	文本型		0
正则	正则表达式
数	整数型
成员	文本型
搜索结果	搜索结果

文本 ＝ “77” ＋ #换行符 ＋ “123456” ＋ #换行符 ＋ “333333”
数组 ＝ 分割文本 (文本, #换行符, )
正则.创建 (“(.)\1{3,}”, )
计次循环首 (取数组成员数 (数组), 数)
成员 ＝ 数组 [数]
搜索结果 ＝ 正则.搜索 (成员, 1, )
如果真 (搜索结果.是否为空 () ＝ 假 且 取文本长度 (搜索结果.取匹配文本 (成员, )) ≤ 6)
调试输出 (成员)

计次循环尾 ()

i支持库列表	支持库注释
RegEx	正则表达式支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 RegEx<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 正则, 正则表达式<br /> .局部变量 数, 整数型<br /> .局部变量 成员, 文本型<br /> .局部变量 搜索结果, 搜索结果<br /> <br /> 文本 ＝ “77” ＋ #换行符 ＋ “123456” ＋ #换行符 ＋ “333333”<br /> 数组 ＝ 分割文本 (文本, #换行符, )<br /> 正则.创建 (“(.)\1{3,}”, )<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     成员 ＝ 数组 [数]<br />     搜索结果 ＝ 正则.搜索 (成员, 1, )<br />     .如果真 (搜索结果.是否为空 () ＝ 假 且 取文本长度 (搜索结果.取匹配文本 (成员, )) ≤ 6)<br />         调试输出 (成员)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

开始运行被调试程序
* “333333”
被调试易程序运行完毕

花间一壶酒

(.)\1{3,6}

正则表达式

刻限

.版本 2
.支持库 e2ee

.子程序 _启动子程序, 整数型

测试 ()

返回 (0)

.子程序 处理_, , , QQ:1153707968 WX:KX115370
.参数 文本, 文本型
.参数 返回_正常账号, 文本型, 参考 可空 数组
.参数 返回_3个相同账号, 文本型, 参考 可空 数组
.参数 返回_4个相同账号, 文本型, 参考 可空 数组
.参数 返回_5个相同账号, 文本型, 参考 可空 数组
.参数 返回_6个相同账号, 文本型, 参考 可空 数组
.参数 返回_7个相同账号, 文本型, 参考 可空 数组
.局部变量 f, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 单, 文本型

f ＝ 分割文本 (文本, #换行符, )
.计次循环首 (取数组成员数 (f), i)
    单 ＝ 取文本左边 (f [i], 1)
    .判断开始 (取重复文本 (3, 单) ＝ f [i])
        加入成员 (返回_3个相同账号, f [i])
    .判断 (取重复文本 (4, 单) ＝ f [i])
        加入成员 (返回_4个相同账号, f [i])
    .判断 (取重复文本 (5, 单) ＝ f [i])
        加入成员 (返回_5个相同账号, f [i])
    .判断 (取重复文本 (6, 单) ＝ f [i])
        加入成员 (返回_6个相同账号, f [i])
    .判断 (取重复文本 (7, 单) ＝ f [i])
        加入成员 (返回_7个相同账号, f [i])
    .默认
        加入成员 (返回_正常账号, f [i])
    .判断结束

.计次循环尾 ()



.子程序 测试
.局部变量 文本, 文本型
.局部变量 正常账号, 文本型, , "0"
.局部变量 f3, 文本型, , "0"
.局部变量 f4, 文本型, , "0"
.局部变量 f5, 文本型, , "0"
.局部变量 f6, 文本型, , "0"
.局部变量 f7, 文本型, , "0"

文本 ＝ “123456” ＋ #换行符 ＋ “333” ＋ #换行符 ＋ “4444” ＋ #换行符 ＋ “55555” ＋ #换行符 ＋ “666666” ＋ #换行符 ＋ “454545” ＋ #换行符 ＋ “8888” ＋ #换行符 ＋ “98989”
输出调试 (“输入文本:” ＋ #换行符 ＋ 文本)
处理_ (文本, 正常账号, f3, f4, f5, f6, f7)
输出调试 (“输出文本-------”)

输出调试 (正常账号)
输出调试 (f3)
输出调试 (f4)
输出调试 (f5)
输出调试 (f6)
输出调试 (f7)

-------------------------以下是输出内容
* “输入文本:
123456
333
4444
55555
666666
454545
8888
98989”
* “输出文本-------”
* [数组](3){“123456”,“454545”,“98989”}
* [数组](1){“333”}
* [数组](2){“4444”,“8888”}
* [数组](1){“55555”}
* [数组](1){“666666”}
* [数组](0){}

lmy001

d.e (959.43 KB, 下载次数: 0, 售价: 1 枚 精币)

2025-8-26 16:05 上传

点击文件名下载附件
1