请求大神写个例子，文本型的

KiaPol

“天,33,213|天,132,130|地,87,135|地,185,140|”

需求1：判断是否有重复词，并得到重复的字是哪个 比如天天地地  返回天和地 知道是哪个字是重复的

需求2：得到重复的字的序号，比如天天返回  1 2  地返回3 4


想要的结果应该是这样是：
天（重复） 所在：1 2
地（重复）所在：3 4

qq261583065

不是太严谨 ,还想改一下的
你觉得可以的话就算了

KiaPol

有老哥帮帮忙吗

北冥

稍等我写个demo

KiaPol

北冥 发表于 2023-10-14 01:40
稍等我写个demo

好的哥！！！！！！

北冥

我发帖在这里了https://bbs.125.la/thread-14799089-1-1.html

蛀牙

  

输出调试文本 (取楼主返回 (“天,33,213|天,132,130|地,87,135|地,185,140|”))

子程序名	返回值类型	公开	备 注
取楼主返回	文本型
参数名	类 型	参考	可空	数组	备 注
原文本	文本型

变量名	类 型	静态	数组	备 注
a	文本型		0
b	文本型		0
i	整数型
j	节点
x	文本型
c	文本型		0
结果	文本型

a ＝ 分割文本 (原文本, “|”, )
计次循环首 (取数组成员数 (a), i)
b ＝ 分割文本 (a [i], “,”, )
如果真 (j.加入属性 (b [1], 到文本 (i)) ＝ 假)
j.取文本值 (b [1], x)
j.修改属性 (b [1], x ＋ “ ” ＋ 到文本 (i))

计次循环尾 ()
j.取全部属性名 (c)
计次循环首 (取数组成员数 (c), i)
j.取文本值 (c [i], x)
如果真 (寻找文本 (x, “ ”, , 假) ≠ -1)
结果 ＝ 结果 ＋ c [i] ＋ “(重复)所在:” ＋ x ＋ #换行符

计次循环尾 ()
返回 (结果)

i支持库列表	支持库注释
EDataStructure	数据结构支持库

.版本 2<br /> .支持库 EDataStructure<br /> <br /> 输出调试文本 (取楼主返回 (“天,33,213|天,132,130|地,87,135|地,185,140|”))<br /> <br /> .子程序 取楼主返回, 文本型<br /> .参数 原文本, 文本型<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 b, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 节点<br /> .局部变量 x, 文本型<br /> .局部变量 c, 文本型, , "0"<br /> .局部变量 结果, 文本型<br /> <br /> a ＝ 分割文本 (原文本, “|”, )<br /> .计次循环首 (取数组成员数 (a), i)<br />     b ＝ 分割文本 (a <i>, “,”, )<br />     .如果真 (j.加入属性 (b [1], 到文本 (i)) ＝ 假)<br />         j.取文本值 (b [1], x)<br />         j.修改属性 (b [1], x ＋ “ ” ＋ 到文本 (i))<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> j.取全部属性名 (c)<br /> .计次循环首 (取数组成员数 (c), i)<br />     j.取文本值 (c <i>, x)<br />     .如果真 (寻找文本 (x, “ ”, , 假) ≠ -1)<br />         结果 ＝ 结果 ＋ c <i> ＋ “(重复)所在:” ＋ x ＋ #换行符<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (结果)

补充内容 (2023-10-14 02:07):
复制代码时 [] 中括号会自动变成大于小于号，自己改回去就不会报错了~

KiaPol

蛀牙 发表于 2023-10-14 02:02
[e=1].版本 2
.支持库 EDataStructure

错误(11): 逗号（参数分隔符）处于错误位置。这个是因为啥 复制的

KiaPol

蛀牙 发表于 2023-10-14 02:02
[e=1].版本 2
.支持库 EDataStructure

好的，请问下判断是否重复 应该加在哪里

780923573

ddddddddddddddddddddddddddwwwwwwwwww