易语言模拟哈希，实现文本按关键词分类

御风软件

这个，同样是回答一个易友的问题写的，代码有点多，也有点意义，也分享下。

一段文本：
111,abc
222,abc
333,abc
444,def
555,def

以逗号后面为关键词分类(abc,def)

分类后分别输出，如下：
输出A：
111,abc
222,abc
333,abc
输出B：
444,def
555,def

其实用哈希，实现更容易，而且效率更高
下面的代码，是我利用纯核心库写的，模拟哈希
在数据量不大的时候，应该是可以用于工作场景的

如果效率不够了，可以使用 哈希表支持库，还有快速文本对象操作。

  

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

变量名	类 型	静态	数组	备 注
N1	整数型
N2	整数型
文本数组	文本型		0
一行文本	文本型		2
哈希数组	文本型		0
目标数组	文本型		0
存在分类	逻辑型
分类索引	整数型

文本数组 ＝ 分割文本 (操作文本, #换行符, )
计次循环首 (取数组成员数 (文本数组), N1)
一行文本 ＝ 分割文本 (文本数组 [N1], “,”, 2)
如果真 (取数组成员数 (一行文本) ＝ 2)
存在分类 ＝ 假
计次循环首 (取数组成员数 (哈希数组), N2)
如果真 (哈希数组 [N2] ＝ 一行文本 [2])
分类索引 ＝ N2
存在分类 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (存在分类 ＝ 假)
加入成员 (目标数组, “”)
加入成员 (哈希数组, 一行文本 [2])
分类索引 ＝ 取数组成员数 (哈希数组)
目标数组 [分类索引] ＝ 目标数组 [分类索引] ＋ “,” ＋ 一行文本 [1]

计次循环尾 ()
计次循环首 (取数组成员数 (目标数组), N1)
目标数组 [N1] ＝ 取文本右边 (目标数组 [N1], 取文本长度 (目标数组 [N1]) － 1)
计次循环尾 ()
' 上面代码实现了关键词和数据分别存一个数组，索引相同，下面为输出效果代码
计次循环首 (取数组成员数 (哈希数组), N1)
文本数组 ＝ 分割文本 (目标数组 [N1], “,”, )
计次循环首 (取数组成员数 (文本数组), N2)
输出调试文本 (文本数组 [N2] ＋ “,” ＋ 哈希数组 [N1])
计次循环尾 ()
计次循环尾 ()

.版本 2<br /> <br /> .子程序 文本分类<br /> .参数 操作文本, 文本型<br /> .局部变量 N1, 整数型<br /> .局部变量 N2, 整数型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 一行文本, 文本型, , "2"<br /> .局部变量 哈希数组, 文本型, , "0"<br /> .局部变量 目标数组, 文本型, , "0"<br /> .局部变量 存在分类, 逻辑型<br /> .局部变量 分类索引, 整数型<br /> <br /> 文本数组 ＝ 分割文本 (操作文本, #换行符, )<br /> .计次循环首 (取数组成员数 (文本数组), N1)<br />     一行文本 ＝ 分割文本 (文本数组 [N1], “,”, 2)<br />     .如果真 (取数组成员数 (一行文本) ＝ 2)<br />         存在分类 ＝ 假<br />         .计次循环首 (取数组成员数 (哈希数组), N2)<br />             .如果真 (哈希数组 [N2] ＝ 一行文本 [2])<br />                 分类索引 ＝ N2<br />                 存在分类 ＝ 真<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />         .如果真 (存在分类 ＝ 假)<br />             加入成员 (目标数组, “”)<br />             加入成员 (哈希数组, 一行文本 [2])<br />             分类索引 ＝ 取数组成员数 (哈希数组)<br />         .如果真结束<br />         目标数组 [分类索引] ＝ 目标数组 [分类索引] ＋ “,” ＋ 一行文本 [1]<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (目标数组), N1)<br />     目标数组 [N1] ＝ 取文本右边 (目标数组 [N1], 取文本长度 (目标数组 [N1]) － 1)<br /> .计次循环尾 ()<br /> <br /> ' 上面代码实现了关键词和数据分别存一个数组，索引相同，下面为输出效果代码<br /> .计次循环首 (取数组成员数 (哈希数组), N1)<br />     文本数组 ＝ 分割文本 (目标数组 [N1], “,”, )<br />     .计次循环首 (取数组成员数 (文本数组), N2)<br />         输出调试文本 (文本数组 [N2] ＋ “,” ＋ 哈希数组 [N1])<br />     .计次循环尾 ()<br /> .计次循环尾 ()

注释后面的，都可以自己删除/修改，然后返回自己需要的东西。

renchin10025

易语言模拟哈希，实现文本按关键词分类

hkfox

感谢分享…………

2446789312

不明白什么意思

红颜脸庞仍娇俏

这玩意怎么说呢，会改别人代码的，自己应该也会写，不会改的拿到手里也用不了