开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 190|回复: 5
打印 上一主题 下一主题
收起左侧

[易语言] 文本操作问题,已知的一段文本,相同条件的分在一组

[复制链接]
结帖率:63% (5/8)
跳转到指定楼层
楼主
发表于 昨天 23:13 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式   山东省济宁市
20精币
我想把这么一些文本根据条件分组。
1/1 aa*
1/2 a*a
1/3 *aa

1/1 *bb
1/2 b*b
1/3 bb*

1/1 c*c
1/2 *cc
1/3 cc*
1/4 c**

1/1 **d
1/2 d*d
1/3 dd*
1/4 *ddd

把这些位置也错乱的原文本用什么流程给让他们变成分组存放啊,分组的条件是根据前边的 1/*  后边那些字母也是随机不固定的     1/1的那些归到一组里,1/2的那些归的一组里,以此类推

我想要的结果是这样前后用括号分组:

(
1/1 aaa
1/1 bbb
1/1 ccc
1/1 ddd
)

(
1/2 aaa
1/2 bbb
1/2 ccc
1/2 ddd
)

(
1/3 aaa
1/3 bbb
1/3 ccc
1/3 ddd
)


最后结果让相同1/*条件的 分组到一起! 我弄了一下,搞的脑子有点绕晕了,麻烦大佬指点指点~~谢谢了~


回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:98% (57/58)

签到天数: 23 天

沙发
发表于 昨天 23:24 | 只看该作者   河北省廊坊市
数组.e (958.53 KB, 下载次数: 3)

补充内容 (2025-7-22 23:26):
输出文本 = 输出文本 + “}” + #换行符 + #换行符 + “{” + #换行符
这个地方改一下 没注意
回复

使用道具 举报

结帖率:100% (1/1)
板凳
发表于 昨天 23:45 | 只看该作者   浙江省温州市
可以用 节点 实现:
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
文本文本型 
正则正则表达式 
搜索结果搜索结果0
整数型 
节点节点 
前缀文本型 
字段文本型 
临时文本型 
属性名文本型0
结果文本型 
文本 = 编辑框1.内容
正则.创建 (“([0-9]+/[0-9+])[^\n]+”, )
搜索结果 = 正则.搜索全部 (文本)
计次循环首 (取数组成员数 (搜索结果), 数)
前缀 = 搜索结果 [].取子匹配文本 (文本, 1, )
字段 = 搜索结果 [].取匹配文本 (文本, )
如果真 (节点.加入属性 (前缀, 字段))
节点.取文本值 (前缀, 临时)
节点.修改属性 (前缀, 临时 + #换行符 + 字段)

计次循环尾 ()
节点.取全部属性名 (属性名)
计次循环首 (取数组成员数 (属性名), 数)
节点.取文本值 (属性名 [], 临时)
结果 = 结果 + “(”#换行符 + 临时 + #换行符“)”#换行符
计次循环尾 ()
编辑框2.内容 = 结果


i支持库列表   支持库注释   
RegEx正则表达式支持库
EDataStructure数据结构支持库

加个 "1/5 a" 也不会出错:

完整例子.zip (1.62 KB, 下载次数: 1)
回复

使用道具 举报

结帖率:100% (1/1)
地板
发表于 昨天 23:51 | 只看该作者   浙江省温州市
上面的没有排序, 需要排序改成:
  
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
文本文本型 
正则正则表达式 
搜索结果搜索结果0
整数型 
节点节点 
前缀文本型 
字段文本型 
临时文本型 
属性名文本型0
结果文本型 
文本 = 编辑框1.内容
正则.创建 (“([0-9]+/[0-9]+)[^\n]+”, )
搜索结果 = 正则.搜索全部 (文本)
计次循环首 (取数组成员数 (搜索结果), 数)
前缀 = 搜索结果 [].取子匹配文本 (文本, 1, )
字段 = 搜索结果 [].取匹配文本 (文本, )
如果真 (节点.加入属性 (前缀, 字段))
节点.取文本值 (前缀, 临时)
节点.修改属性 (前缀, 临时 + #换行符 + 字段)

计次循环尾 ()
节点.取全部属性名 (属性名)
数组_排序1 (属性名)  ' 需要使用精易模块
计次循环首 (取数组成员数 (属性名), 数)
节点.取文本值 (属性名 [], 临时)
结果 = 结果 + “(”#换行符 + 临时 + #换行符“)”#换行符
计次循环尾 ()
编辑框2.内容 = 结果


i支持库列表   支持库注释   
RegEx正则表达式支持库
EDataStructure数据结构支持库

回复

使用道具 举报

结帖率:96% (47/49)

签到天数: 5 天

地下
发表于 12 小时前 | 只看该作者   河北省秦皇岛市
原始文本按行分割存到数组,从每行中提取1/*作为分组依据,使用二维数组,以1/*为索引,将每行文本存入对应分组,按分组顺序拼接成要求格式。
  
子程序名返回值类型公开备 注
文本分组处理文本型 
参数名类 型参考可空数组备 注
原始文本文本型
变量名类 型静态数组备 注
文本行数组文本型分割后的文本行
分组数组文本型分组结果数组
分组索引整数型分组索引
当前行文本型当前处理的行
当前分组文本型当前行的分组
结果文本文本型最终结果文本
i整数型循环变量
j整数型循环变量
' 1. 将原始文本按行分割
文本行数组 = 分割文本 (原始文本, #换行符, )
' 2. 初始化分组数组(假设最多10个分组)
重定义数组 (分组数组, 假, 10)
' 3. 遍历所有行,按分组条件存储
计次循环首 (取数组成员数 (文本行数组), i)
当前行 = 文本行数组 [i]

' 跳过空行
如果真 (取文本长度 (当前行) = 0)
继续 ()

' 提取分组(前3个字符,如"1/1")
当前分组 = 子文本替换 (左子文本 (当前行, 3), "/", "_", , , )

' 将分组转换为数组索引(如"1_1" → 1)
分组索引 = 到数值 (子文本替换 (当前分组, "_", "", , , ))

' 追加到对应分组
分组数组 [分组索引] = 分组数组 [分组索引] + 当前行 + #换行符
计次循环尾 ()
' 4. 构建结果文本
结果文本 = ""
计次循环首 (10, i)
' 跳过空分组
如果真 (取文本长度 (分组数组 [i]) = 0)
继续 ()

' 添加分组括号
结果文本 = 结果文本 + " (" + #换行符
结果文本 = 结果文本 + 分组数组 [i]
结果文本 = 结果文本 + ")" + #换行符#换行符
计次循环尾 ()
返回 (结果文本)


i支持库列表   支持库注释   
spec特殊功能支持库


  
子程序名返回值类型公开备 注
_启动子程序整数型 
变量名类 型静态数组备 注
原始文本文本型 
分组结果文本型 
' 示例原始文本(模拟你的输入)
原始文本 =
"1/1 aa*" + #换行符
"1/2 a*a" + #换行符
"1/3 *aa" + #换行符
#换行符
"1/1 *bb" + #换行符
"1/2 b*b" + #换行符
"1/3 bb*" + #换行符
#换行符
"1/1 c*c" + #换行符
"1/2 *cc" + #换行符
"1/3 cc*" + #换行符
"1/4 c**" + #换行符
#换行符
"1/1 **d" + #换行符
"1/2 d*d" + #换行符
"1/3 dd*" + #换行符
"1/4 *ddd"
' 调用分组函数
分组结果 = 文本分组处理 (原始文本)
' 显示结果(可替换为保存到文件等操作)
信息框 (分组结果, 0, "分组结果")
返回 (0)


i支持库列表   支持库注释   
spec特殊功能支持库



[color=rgba(0, 0, 0, 0.85)]输入你提供的文本后,输出结果会是:
(1/1 aa*1/1 *bb1/1 c*c1/1 **d)(1/2 a*a1/2 b*b1/2 *cc1/2 d*d)(1/3 *aa1/3 bb*1/3 cc*1/3 dd*)(1/4 c**1/4 *ddd)
[color=rgba(0, 0, 0, 0.85)]如需调整格式(如删除*[color=rgba(0, 0, 0, 0.85)]),可在存入分组数组前添加处理逻辑。
[color=rgba(0, 0, 0, 0.85)]

回复

使用道具 举报

签到天数: 1 天

6
发表于 10 小时前 | 只看该作者   广东省湛江市
看看学习学习
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表