10万 三位长度数组 去重复 0.3秒 修复下 汇编寻找文本 bug 大家再看看有没去重复

cf2006a

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
g	文本型		100000
t	整数型
i	整数型
字符长度	整数型
找到位置	整数型
写入位置	整数型
结果	文本型
调试	文本型
ss	文本型		0

计次循环首 (100000, i)
g [i] ＝ 到文本 (取随机数 (1, 1000))
计次循环尾 ()
t ＝ 取启动时间 ()
结果 ＝ _数组叠加_去重复 (g, 5)
调试输出 (取启动时间 () － t, )
ss ＝ 分割文本 (结果, “  ”, )
调试输出 (取数组成员数 (ss), 结果)

子程序名	返回值类型	公开	备 注
_数组叠加_去重复	文本型
参数名	类 型	参考	可空	数组	备 注
数组文本	文本型
指定长度	整数型

变量名	类 型	静态	数组	备 注
i	整数型
返回文本	文本型
写入位置	整数型
总长度	整数型
补位文本	文本型
补位地址	整数型
文本地址	整数型

总长度 ＝ 取数组成员数 (数组文本) ＋ 指定长度
返回文本 ＝ 取空白文本 (总长度)
文本地址 ＝ 取变量数据地址 (返回文本)
计次循环首 (取数组成员数 (数组文本), i)
如果真 (_寻找文本_自编_去重复专用_ASM (返回文本, 数组文本 [i], 0) ＝ 0)
写到内存 (数组文本 [i], 文本地址 ＋ 写入位置, _取文本长度_ASM_地址 (数组文本 [i]))
写入位置 ＝ 写入位置 ＋ 指定长度

计次循环尾 ()
写到内存 ({ 0 }, 文本地址 ＋ 写入位置, 1)
返回 (返回文本)

子程序名	返回值类型	公开	备 注
_寻找文本_自编_去重复专用_ASM	整数型		纯汇编算法编写作者*F006a
参数名	类 型	参考	可空	数组	备 注
文本	文本型
要找的文本	文本型
开始位置	整数型

置入代码 ({ 139, 125, 8, 139, 93, 12, 139, 69, 16, 139, 63, 139, 27, 49, 246, 49, 210, 58, 12, 19, 116, 21, 138, 12, 7, 128, 249, 0, 116, 28, 64, 128, 249, 32, 116, 14, 49, 246, 58, 12, 19, 117, 228, 66, 128, 60, 19, 0, 116, 14, 70, 131, 254, 16, 125, 2, 235, 220, 49, 192, 201, 194, 12, 0, 49, 210, 128, 60, 7, 32, 117, 206, 41, 208, 64, 201, 194, 12, 0 })
返回 (0)

子程序名	返回值类型	公开	备 注
_取文本长度_ASM_地址	整数型		取文本型数据的长度
参数名	类 型	参考	可空	数组	备 注
文本	文本型				参数值指定欲检查其长度的文本数据。

变量名	类 型	静态	数组	备 注
文本指针	整数型

置入代码 ({ 139, 69, 8, 139, 0, 141, 112, 3, 139, 24, 131, 192, 4, 141, 139, 255, 254, 254, 254, 247, 211, 33, 217, 129, 225, 128, 128, 128, 128, 116, 233, 247, 193, 128, 128, 0, 0, 117, 6, 193, 233, 16, 131, 192, 2, 208, 225, 25, 240, 201, 194, 4, 0 })
返回 (0)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 g, 文本型, , "100000"<br /> .局部变量 t, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 字符长度, 整数型<br /> .局部变量 找到位置, 整数型<br /> .局部变量 写入位置, 整数型<br /> .局部变量 结果, 文本型<br /> .局部变量 调试, 文本型<br /> .局部变量 ss, 文本型, , "0"<br /> <br /> .计次循环首 (100000, i)<br />     g <i> ＝ 到文本 (取随机数 (1, 1000))<br /> .计次循环尾 ()<br /> t ＝ 取启动时间 ()<br /> 结果 ＝ _数组叠加_去重复 (g, 5)<br /> 调试输出 (取启动时间 () － t, )<br /> ss ＝ 分割文本 (结果, “  ”, )<br /> 调试输出 (取数组成员数 (ss), 结果)<br /> <br /> .子程序 _数组叠加_去重复, 文本型<br /> .参数 数组文本, 文本型, 数组<br /> .参数 指定长度, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 返回文本, 文本型<br /> .局部变量 写入位置, 整数型<br /> .局部变量 总长度, 整数型<br /> .局部变量 补位文本, 文本型<br /> .局部变量 补位地址, 整数型<br /> .局部变量 文本地址, 整数型<br /> <br /> 总长度 ＝ 取数组成员数 (数组文本) ＋ 指定长度<br /> 返回文本 ＝ 取空白文本 (总长度)<br /> 文本地址 ＝ 取变量数据地址 (返回文本)<br /> .计次循环首 (取数组成员数 (数组文本), i)<br />     .如果真 (_寻找文本_自编_去重复专用_ASM (返回文本, 数组文本 <i>, 0) ＝ 0)<br />         写到内存 (数组文本 <i>, 文本地址 ＋ 写入位置, _取文本长度_ASM_地址 (数组文本 <i>))<br />         写入位置 ＝ 写入位置 ＋ 指定长度<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 写到内存 ({ 0 }, 文本地址 ＋ 写入位置, 1)<br /> 返回 (返回文本)<br /> <br /> .子程序 _寻找文本_自编_去重复专用_ASM, 整数型, 公开, 纯汇编算法编写作者*F006a <br /> .参数 文本, 文本型<br /> .参数 要找的文本, 文本型<br /> .参数 开始位置, 整数型<br /> <br /> 置入代码 ({ 139, 125, 8, 139, 93, 12, 139, 69, 16, 139, 63, 139, 27, 49, 246, 49, 210, 58, 12, 19, 116, 21, 138, 12, 7, 128, 249, 0, 116, 28, 64, 128, 249, 32, 116, 14, 49, 246, 58, 12, 19, 117, 228, 66, 128, 60, 19, 0, 116, 14, 70, 131, 254, 16, 125, 2, 235, 220, 49, 192, 201, 194, 12, 0, 49, 210, 128, 60, 7, 32, 117, 206, 41, 208, 64, 201, 194, 12, 0 })<br /> 返回 (0)<br /> <br /> .子程序 _取文本长度_ASM_地址, 整数型, 公开, 取文本型数据的长度<br /> .参数 文本, 文本型, , 参数值指定欲检查其长度的文本数据。<br /> .局部变量 文本指针, 整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 0, 141, 112, 3, 139, 24, 131, 192, 4, 141, 139, 255, 254, 254, 254, 247, 211, 33, 217, 129, 225, 128, 128, 128, 128, 116, 233, 247, 193, 128, 128, 0, 0, 117, 6, 193, 233, 16, 131, 192, 2, 208, 225, 25, 240, 201, 194, 4, 0 })<br /> 返回 (0)

烂漫樱花

来学习的~·

BanBy

拿走了，谢谢

2064420883

向大佬致敬