求助如何使用数组把文本格式化分类归类

学会就发了

实现图片的效果






深圳-大渔铁板烧（万丰海岸城店）
珠海-大渔铁板烧（珠海万象汇店）
深圳-大渔臻选·棠膳（宝安大悦城店）
深圳-大渔铁板烧（龙华天虹购物中心店）
深圳-大渔铁板烧（保利文化广场店）
深圳-大渔铁板烧（龙岗万达店）
深圳-大渔铁板烧（东海缤纷天地店）
深圳-大渔铁板烧（仁恒梦中心店）
深圳-大渔铁板烧（卓悦汇店）
深圳-大渔铁板烧（龙岗万科广场店）
深圳-大渔铁板烧（布吉礼信汇店）
深圳-大渔铁板烧（宝能中心环球汇店）
深圳-大渔铁板烧（喜荟城店）
深圳-大渔臻选·棠膳（罗湖益田广场店）
深圳-大渔铁板烧（佳宁娜店）

RainCharm

  

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

变量名	类 型	静态	数组	备 注
sj	文本型
sj1	文本型		0
i	整数型
wb	文本型
sj2	文本型
sj3	文本型

sj ＝ 到文本 (编码_编码转换对象 (读入文件 (取特定目录 (3) ＋ “\1.txt”), , , ))
sj1 ＝ 分割文本 (sj, #换行符, )
数组_排序 (sj1, 0, )
计次循环首 (取数组成员数 (sj1), i)
如果真 (寻找文本 (sj1 [i], “深圳”, , 假) ＝ 1) ‘深圳，两个字可以从文本中去取，这里是为了测试用
wb ＝ 文本_取出中间文本 (sj1 [i], “（”, “）”, , )
sj2 ＝ sj2 ＋ wb ＋ “·”
如果真 (寻找文本 (sj1 [i], “珠海”, , 假) ＝ 1)      ‘珠海，两个字可以从文本中去取，这里是为了测试用
wb ＝ 文本_取出中间文本 (sj1 [i], “（”, “）”, , )
sj3 ＝ sj3 ＋ wb ＋ “·”

计次循环尾 ()
调试输出 (文本_删右边 (“[深圳]·” ＋ sj2, 1))
调试输出 (文本_删右边 (“[珠海]·” ＋ sj3, 1))
* “[深圳]·保利文化广场店·宝能中心环球汇店·布吉礼信汇店·东海缤纷天地店·佳宁娜店·龙岗万达店·龙岗万科广场店·龙华天虹购物中心店·仁恒梦中心店·万丰海岸城店·喜荟城店·卓悦汇店·宝安大悦城店·罗湖益田广场店”
* “[珠海]·珠海万象汇店”
被调试易程序运行完毕

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 sj, 文本型<br /> .局部变量 sj1, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 wb, 文本型<br /> .局部变量 sj2, 文本型<br /> .局部变量 sj3, 文本型<br /> <br /> sj ＝ 到文本 (编码_编码转换对象 (读入文件 (取特定目录 (3) ＋ “\1.txt”), , , ))<br /> sj1 ＝ 分割文本 (sj, #换行符, )<br /> 数组_排序 (sj1, 0, )<br /> .计次循环首 (取数组成员数 (sj1), i)<br />     .如果真 (寻找文本 (sj1 <i>, “深圳”, , 假) ＝ 1) ‘深圳，两个字可以从文本中去取，这里是为了测试用<br />         wb ＝ 文本_取出中间文本 (sj1 <i>, “（”, “）”, , )<br />         sj2 ＝ sj2 ＋ wb ＋ “·”<br />     .如果真结束<br />     .如果真 (寻找文本 (sj1 <i>, “珠海”, , 假) ＝ 1)      ‘珠海，两个字可以从文本中去取，这里是为了测试用<br />         wb ＝ 文本_取出中间文本 (sj1 <i>, “（”, “）”, , )<br />         sj3 ＝ sj3 ＋ wb ＋ “·”<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (文本_删右边 (“[深圳]·” ＋ sj2, 1))<br /> 调试输出 (文本_删右边 (“[珠海]·” ＋ sj3, 1))<br /> <br /> * “[深圳]·保利文化广场店·宝能中心环球汇店·布吉礼信汇店·东海缤纷天地店·佳宁娜店·龙岗万达店·龙岗万科广场店·龙华天虹购物中心店·仁恒梦中心店·万丰海岸城店·喜荟城店·卓悦汇店·宝安大悦城店·罗湖益田广场店”<br /> * “[珠海]·珠海万象汇店”<br /> 被调试易程序运行完毕

这样写出没有那么繁琐，简单易懂

Ruang

  

子程序名	返回值类型	公开	备 注
功能_分类返回文本	文本型
参数名	类 型	参考	可空	数组	备 注
参_文本	文本型

变量名	类 型	静态	数组	备 注
局_品牌数组	文本型		0
局_地区数组	文本型		0
局_门店数量	整数型
局_门店	文本型
局_正则	正则表达式类
局_计次1	整数型
局_计次2	整数型
局_计次3	整数型
待返回文本	文本型

局_正则.创建 (“(.*)-(.*)（(.*)）”, 参_文本, , , , )
计次循环首 (局_正则.取匹配数量 (), 局_计次1)
加入成员 (局_品牌数组, 局_正则.取子匹配文本 (局_计次1, 2, ))
计次循环尾 ()
数组_去重复 (局_品牌数组, )
计次循环首 (取数组成员数 (局_品牌数组), 局_计次1)
待返回文本 ＝ 待返回文本 ＋ 局_品牌数组 [局_计次1] ＋ “·”
计次循环首 (局_正则.取匹配数量 (), 局_计次2)
如果真 (局_正则.取子匹配文本 (局_计次2, 2, ) ＝ 局_品牌数组 [局_计次1])
加入成员 (局_地区数组, 局_正则.取子匹配文本 (局_计次1, 1, ))

计次循环尾 ()
数组_去重复 (局_地区数组, )
待返回文本 ＝ 待返回文本 ＋ 到文本 (取数组成员数 (局_地区数组)) ＋ “座城市·”
计次循环首 (取数组成员数 (局_地区数组), 局_计次2)
局_门店 ＝ 局_门店 ＋ “【” ＋ 局_地区数组 [局_计次2] ＋ “】·”
计次循环首 (局_正则.取匹配数量 (), 局_计次3)
如果真 (局_地区数组 [局_计次2] ＝ 局_正则.取子匹配文本 (局_计次3, 1, ) 且 局_品牌数组 [局_计次1] ＝ 局_正则.取子匹配文本 (局_计次3, 2, ))
如果真 (局_计次3 ＝ 局_正则.取匹配数量 ())
局_门店 ＝ 局_门店 ＋ 局_正则.取子匹配文本 (局_计次3, 3, ) ＋ #换行符
到循环尾 ()
局_门店 ＝ 局_门店 ＋ 局_正则.取子匹配文本 (局_计次3, 3, ) ＋ “·”
局_门店数量 ＝ 局_门店数量 ＋ 1

计次循环尾 ()
待返回文本 ＝ 待返回文本 ＋ 到文本 (局_门店数量) ＋ “家门店” ＋ #换行符
待返回文本 ＝ 待返回文本 ＋ 局_门店
局_门店数量 ＝ 0
局_门店 ＝ “”
计次循环尾 ()
计次循环尾 ()
返回 (待返回文本)

.版本 2<br /> <br /> .子程序 功能_分类返回文本, 文本型<br /> .参数 参_文本, 文本型<br /> .局部变量 局_品牌数组, 文本型, , "0"<br /> .局部变量 局_地区数组, 文本型, , "0"<br /> .局部变量 局_门店数量, 整数型<br /> .局部变量 局_门店, 文本型<br /> .局部变量 局_正则, 正则表达式类<br /> .局部变量 局_计次1, 整数型<br /> .局部变量 局_计次2, 整数型<br /> .局部变量 局_计次3, 整数型<br /> .局部变量 待返回文本, 文本型<br /> <br /> 局_正则.创建 (“(.*)-(.*)（(.*)）”, 参_文本, , , , )<br /> .计次循环首 (局_正则.取匹配数量 (), 局_计次1)<br />     加入成员 (局_品牌数组, 局_正则.取子匹配文本 (局_计次1, 2, ))<br /> .计次循环尾 ()<br /> 数组_去重复 (局_品牌数组, )<br /> .计次循环首 (取数组成员数 (局_品牌数组), 局_计次1)<br />     待返回文本 ＝ 待返回文本 ＋ 局_品牌数组 [局_计次1] ＋ “·”<br />     .计次循环首 (局_正则.取匹配数量 (), 局_计次2)<br />         .如果真 (局_正则.取子匹配文本 (局_计次2, 2, ) ＝ 局_品牌数组 [局_计次1])<br />             加入成员 (局_地区数组, 局_正则.取子匹配文本 (局_计次1, 1, ))<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     数组_去重复 (局_地区数组, )<br />     待返回文本 ＝ 待返回文本 ＋ 到文本 (取数组成员数 (局_地区数组)) ＋ “座城市·”<br />     .计次循环首 (取数组成员数 (局_地区数组), 局_计次2)<br />         局_门店 ＝ 局_门店 ＋ “【” ＋ 局_地区数组 [局_计次2] ＋ “】·”<br />         .计次循环首 (局_正则.取匹配数量 (), 局_计次3)<br />             .如果真 (局_地区数组 [局_计次2] ＝ 局_正则.取子匹配文本 (局_计次3, 1, ) 且 局_品牌数组 [局_计次1] ＝ 局_正则.取子匹配文本 (局_计次3, 2, ))<br />                 .如果真 (局_计次3 ＝ 局_正则.取匹配数量 ())<br />                     局_门店 ＝ 局_门店 ＋ 局_正则.取子匹配文本 (局_计次3, 3, ) ＋ #换行符<br />                     到循环尾 ()<br />                 .如果真结束<br />                 局_门店 ＝ 局_门店 ＋ 局_正则.取子匹配文本 (局_计次3, 3, ) ＋ “·”<br />                 局_门店数量 ＝ 局_门店数量 ＋ 1<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />         待返回文本 ＝ 待返回文本 ＋ 到文本 (局_门店数量) ＋ “家门店” ＋ #换行符<br />         待返回文本 ＝ 待返回文本 ＋ 局_门店<br />         局_门店数量 ＝ 0<br />         局_门店 ＝ “”<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 返回 (待返回文本)

精易模块



补充内容 (2025-11-11 22:05):
开始准备用自定义数据类型来搞，但是太费脑子，这种已经是比较简单的写法了

补充内容 (2025-11-11 22:10):
正则也是精易模块的

补充内容 (2025-11-11 22:56):
理解错了，依次以品牌，地区归类的

zzoo1314

Ruang 发表于 2025-11-11 22:03
[e=3].版本 2

.子程序 功能_分类返回文本, 文本型

兄弟 正则速度快点吗