文本数组排序问题

胖三斤

{“帅哥来了-1.mp4”,“帅哥来了-10.mp4”,“帅哥来了-11.mp4”,“帅哥来了-12.mp4”,“帅哥来了-13.mp4”,“帅哥来了-14.mp4”,“帅哥来了-15.mp4”,“帅哥来了-2.mp4”,“帅哥来了-3.mp4”,“帅哥来了-4.mp4”,“帅哥来了-5.mp4”,“帅哥来了-6.mp4”,“帅哥来了-7.mp4”,“帅哥来了-8.mp4”,“帅哥来了-9.mp4”}

想要  1 2 3 4 5 6 ****10 11 12 13  这样排序 应该怎么写

温柔小仙女

2.e (958.15 KB, 下载次数: 14)

2025-6-15 11:12 上传

点击文件名下载附件

温柔小仙女

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
文件名数组	文本型	0

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

变量名	类 型	静态	数组	备 注
i	整数型

文件名数组 ＝ { “帅哥来了-1.mp4”, “帅哥来了-10.mp4”, “帅哥来了-11.mp4”, “帅哥来了-12.mp4”, “帅哥来了-13.mp4”, “帅哥来了-14.mp4”, “帅哥来了-15.mp4”, “帅哥来了-2.mp4”, “帅哥来了-3.mp4”, “帅哥来了-4.mp4”, “帅哥来了-5.mp4”, “帅哥来了-6.mp4”, “帅哥来了-7.mp4”, “帅哥来了-8.mp4”, “帅哥来了-9.mp4” }
自然排序文件名 (文件名数组)

子程序名	返回值类型	公开	备 注
自然排序文件名
参数名	类 型	参考	可空	数组	备 注
文件列表	文本型

变量名	类 型	静态	数组	备 注
排序数组	文本型		0
索引数组	整数型		0
i	整数型
j	整数型
临时文本	文本型
临时索引	整数型

' 提取数字并创建索引数组
计次循环首 (取数组成员数 (文件列表), i)
临时文本 ＝ 取文本右边 (文件列表 [i], 取文本长度 (文件列表 [i]) － 寻找文本 (文件列表 [i], “-”, , 假) － 1)
临时文本 ＝ 取文本左边 (临时文本, 寻找文本 (临时文本, “.”, , 假) － 1)
加入成员 (索引数组, 到整数 (临时文本))
计次循环尾 ()
' 冒泡排序
计次循环首 (取数组成员数 (文件列表) － 1, i)
计次循环首 (取数组成员数 (文件列表) － i, j)
如果真 (索引数组 [j] ＞ 索引数组 [j ＋ 1])
' 交换索引
临时索引 ＝ 索引数组 [j]
索引数组 [j] ＝ 索引数组 [j ＋ 1]
索引数组 [j ＋ 1] ＝ 临时索引
' 交换文件名
临时文本 ＝ 文件列表 [j]
文件列表 [j] ＝ 文件列表 [j ＋ 1]
文件列表 [j ＋ 1] ＝ 临时文本

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (文件列表), i)
调试输出 (文件列表 [i])
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文件名数组, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> 文件名数组 ＝ { “帅哥来了-1.mp4”, “帅哥来了-10.mp4”, “帅哥来了-11.mp4”, “帅哥来了-12.mp4”, “帅哥来了-13.mp4”, “帅哥来了-14.mp4”, “帅哥来了-15.mp4”, “帅哥来了-2.mp4”, “帅哥来了-3.mp4”, “帅哥来了-4.mp4”, “帅哥来了-5.mp4”, “帅哥来了-6.mp4”, “帅哥来了-7.mp4”, “帅哥来了-8.mp4”, “帅哥来了-9.mp4” }<br /> 自然排序文件名 (文件名数组)<br /> <br /> .子程序 自然排序文件名<br /> .参数 文件列表, 文本型, 数组<br /> .局部变量 排序数组, 文本型, , "0"<br /> .局部变量 索引数组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 临时文本, 文本型<br /> .局部变量 临时索引, 整数型<br /> <br /> ' 提取数字并创建索引数组<br /> .计次循环首 (取数组成员数 (文件列表), i)<br />     临时文本 ＝ 取文本右边 (文件列表 <i>, 取文本长度 (文件列表 <i>) － 寻找文本 (文件列表 <i>, “-”, , 假) － 1)<br />     临时文本 ＝ 取文本左边 (临时文本, 寻找文本 (临时文本, “.”, , 假) － 1)<br />     加入成员 (索引数组, 到整数 (临时文本))<br /> .计次循环尾 ()<br /> <br /> ' 冒泡排序<br /> .计次循环首 (取数组成员数 (文件列表) － 1, i)<br />     .计次循环首 (取数组成员数 (文件列表) － i, j)<br />         .如果真 (索引数组 [j] ＞ 索引数组 [j ＋ 1])<br />             ' 交换索引<br />             临时索引 ＝ 索引数组 [j]<br />             索引数组 [j] ＝ 索引数组 [j ＋ 1]<br />             索引数组 [j ＋ 1] ＝ 临时索引<br /> <br />             ' 交换文件名<br />             临时文本 ＝ 文件列表 [j]<br />             文件列表 [j] ＝ 文件列表 [j ＋ 1]<br />             文件列表 [j ＋ 1] ＝ 临时文本<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (文件列表), i)<br />     调试输出 (文件列表 <i>)<br /> .计次循环尾 ()

[JavaScript] 纯文本查看 复制代码

[ 11:06:32 ]  * Windows 10
[ 11:06:32 ]  * “帅哥来了-1.mp4”
[ 11:06:32 ]  * “帅哥来了-10.mp4”
[ 11:06:32 ]  * “帅哥来了-2.mp4”
[ 11:06:32 ]  * “帅哥来了-3.mp4”
[ 11:06:32 ]  * “帅哥来了-4.mp4”
[ 11:06:32 ]  * “帅哥来了-5.mp4”
[ 11:06:32 ]  * “帅哥来了-6.mp4”
[ 11:06:32 ]  * “帅哥来了-7.mp4”
[ 11:06:32 ]  * “帅哥来了-8.mp4”
[ 11:06:32 ]  * “帅哥来了-9.mp4”
[ 11:06:32 ]  * “帅哥来了-11.mp4”
[ 11:06:32 ]  * “帅哥来了-12.mp4”
[ 11:06:32 ]  * “帅哥来了-13.mp4”
[ 11:06:32 ]  * “帅哥来了-14.mp4”
[ 11:06:32 ]  * “帅哥来了-15.mp4”
[ 11:06:36 ]  被调试易程序运行完毕

温柔小仙女

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
文件名数组	文本型	0

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

变量名	类 型	静态	数组	备 注
i	整数型

文件名数组 ＝ { “帅哥来了-1.mp4”, “帅哥来了-10.mp4”, “帅哥来了-11.mp4”, “帅哥来了-12.mp4”, “帅哥来了-13.mp4”, “帅哥来了-14.mp4”, “帅哥来了-15.mp4”, “帅哥来了-2.mp4”, “帅哥来了-3.mp4”, “帅哥来了-4.mp4”, “帅哥来了-5.mp4”, “帅哥来了-6.mp4”, “帅哥来了-7.mp4”, “帅哥来了-8.mp4”, “帅哥来了-9.mp4” }
自然排序文件名 (文件名数组)

子程序名	返回值类型	公开	备 注
自然排序文件名
参数名	类 型	参考	可空	数组	备 注
文件列表	文本型

变量名	类 型	静态	数组	备 注
排序数组	文本型		0
索引数组	整数型		0
i	整数型
j	整数型
临时文本	文本型
临时索引	整数型

' 提取数字并创建索引数组
计次循环首 (取数组成员数 (文件列表), i)
临时文本 ＝ 取文本右边 (文件列表 [i], 取文本长度 (文件列表 [i]) － 寻找文本 (文件列表 [i], “-”, , 假) － 1)
临时文本 ＝ 取文本左边 (临时文本, 寻找文本 (临时文本, “.”, , 假) － 1)
加入成员 (索引数组, 到整数 (临时文本))
计次循环尾 ()
' 冒泡排序
计次循环首 (取数组成员数 (文件列表) － 1, i)
计次循环首 (取数组成员数 (文件列表) － i, j)
如果真 (索引数组 [j] ＞ 索引数组 [j ＋ 1])
' 交换索引
临时索引 ＝ 索引数组 [j]
索引数组 [j] ＝ 索引数组 [j ＋ 1]
索引数组 [j ＋ 1] ＝ 临时索引
' 交换文件名
临时文本 ＝ 文件列表 [j]
文件列表 [j] ＝ 文件列表 [j ＋ 1]
文件列表 [j ＋ 1] ＝ 临时文本

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (文件列表), i)
调试输出 (文件列表 [i])
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文件名数组, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> 文件名数组 ＝ { “帅哥来了-1.mp4”, “帅哥来了-10.mp4”, “帅哥来了-11.mp4”, “帅哥来了-12.mp4”, “帅哥来了-13.mp4”, “帅哥来了-14.mp4”, “帅哥来了-15.mp4”, “帅哥来了-2.mp4”, “帅哥来了-3.mp4”, “帅哥来了-4.mp4”, “帅哥来了-5.mp4”, “帅哥来了-6.mp4”, “帅哥来了-7.mp4”, “帅哥来了-8.mp4”, “帅哥来了-9.mp4” }<br /> 自然排序文件名 (文件名数组)<br /> <br /> .子程序 自然排序文件名<br /> .参数 文件列表, 文本型, 数组<br /> .局部变量 排序数组, 文本型, , "0"<br /> .局部变量 索引数组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 临时文本, 文本型<br /> .局部变量 临时索引, 整数型<br /> <br /> ' 提取数字并创建索引数组<br /> .计次循环首 (取数组成员数 (文件列表), i)<br />     临时文本 ＝ 取文本右边 (文件列表 <i>, 取文本长度 (文件列表 <i>) － 寻找文本 (文件列表 <i>, “-”, , 假) － 1)<br />     临时文本 ＝ 取文本左边 (临时文本, 寻找文本 (临时文本, “.”, , 假) － 1)<br />     加入成员 (索引数组, 到整数 (临时文本))<br /> .计次循环尾 ()<br /> <br /> ' 冒泡排序<br /> .计次循环首 (取数组成员数 (文件列表) － 1, i)<br />     .计次循环首 (取数组成员数 (文件列表) － i, j)<br />         .如果真 (索引数组 [j] ＞ 索引数组 [j ＋ 1])<br />             ' 交换索引<br />             临时索引 ＝ 索引数组 [j]<br />             索引数组 [j] ＝ 索引数组 [j ＋ 1]<br />             索引数组 [j ＋ 1] ＝ 临时索引<br /> <br />             ' 交换文件名<br />             临时文本 ＝ 文件列表 [j]<br />             文件列表 [j] ＝ 文件列表 [j ＋ 1]<br />             文件列表 [j ＋ 1] ＝ 临时文本<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (文件列表), i)<br />     调试输出 (文件列表 <i>)<br /> .计次循环尾 ()

[ 11:06:32 ]  * Windows 10
[ 11:06:32 ]  * “帅哥来了-1.mp4”
[ 11:06:32 ]  * “帅哥来了-10.mp4”
[ 11:06:32 ]  * “帅哥来了-2.mp4”
[ 11:06:32 ]  * “帅哥来了-3.mp4”
[ 11:06:32 ]  * “帅哥来了-4.mp4”
[ 11:06:32 ]  * “帅哥来了-5.mp4”
[ 11:06:32 ]  * “帅哥来了-6.mp4”
[ 11:06:32 ]  * “帅哥来了-7.mp4”
[ 11:06:32 ]  * “帅哥来了-8.mp4”
[ 11:06:32 ]  * “帅哥来了-9.mp4”
[ 11:06:32 ]  * “帅哥来了-11.mp4”
[ 11:06:32 ]  * “帅哥来了-12.mp4”
[ 11:06:32 ]  * “帅哥来了-13.mp4”
[ 11:06:32 ]  * “帅哥来了-14.mp4”
[ 11:06:32 ]  * “帅哥来了-15.mp4”

温柔小仙女

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
文件名数组	文本型	0

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

变量名	类 型	静态	数组	备 注
i	整数型

文件名数组 ＝ { “帅哥来了-1.mp4”, “帅哥来了-10.mp4”, “帅哥来了-11.mp4”, “帅哥来了-12.mp4”, “帅哥来了-13.mp4”, “帅哥来了-14.mp4”, “帅哥来了-15.mp4”, “帅哥来了-2.mp4”, “帅哥来了-3.mp4”, “帅哥来了-4.mp4”, “帅哥来了-5.mp4”, “帅哥来了-6.mp4”, “帅哥来了-7.mp4”, “帅哥来了-8.mp4”, “帅哥来了-9.mp4” }
快速排序文件名数组 (文件名数组, 1, 取数组成员数 (文件名数组))
' 显示排序结果
计次循环首 (取数组成员数 (文件名数组), i)
调试输出 (文件名数组 [i])
计次循环尾 ()

子程序名	返回值类型	公开	备 注
快速排序文件名数组
参数名	类 型	参考	可空	数组	备 注
文件列表	文本型
左边界	整数型
右边界	整数型

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
基准值	整数型
临时文件	文本型

如果真 (左边界 ≥ 右边界)
返回 ()

i ＝ 左边界
j ＝ 右边界
基准值 ＝ 提取文件名数字 (文件列表 [ (左边界 ＋ 右边界) ＼ 2])
判断循环首 (真)
判断循环首 (提取文件名数字 (文件列表 [i]) ＜ 基准值)
i ＝ i ＋ 1
判断循环尾 ()
判断循环首 (提取文件名数字 (文件列表 [j]) ＞ 基准值)
j ＝ j － 1
判断循环尾 ()
如果真 (i ≥ j)
跳出循环 ()

' 交换元素
临时文件 ＝ 文件列表 [i]
文件列表 [i] ＝ 文件列表 [j]
文件列表 [j] ＝ 临时文件
i ＝ i ＋ 1
j ＝ j － 1
判断循环尾 ()
快速排序文件名数组 (文件列表, 左边界, i － 1)
快速排序文件名数组 (文件列表, j ＋ 1, 右边界)

子程序名	返回值类型	公开	备 注
提取文件名数字	整数型
参数名	类 型	参考	可空	数组	备 注
文件名	文本型

变量名	类 型	静态	数组	备 注
数字开始位置	整数型
数字结束位置	整数型
数字文本	文本型

数字开始位置 ＝ 寻找文本 (文件名, “-”, , 假) ＋ 1
数字结束位置 ＝ 寻找文本 (文件名, “.”, , 假)
数字文本 ＝ 取文本中间 (文件名, 数字开始位置, 数字结束位置 － 数字开始位置)
返回 (到整数 (数字文本))

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文件名数组, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> 文件名数组 ＝ { “帅哥来了-1.mp4”, “帅哥来了-10.mp4”, “帅哥来了-11.mp4”, “帅哥来了-12.mp4”, “帅哥来了-13.mp4”, “帅哥来了-14.mp4”, “帅哥来了-15.mp4”, “帅哥来了-2.mp4”, “帅哥来了-3.mp4”, “帅哥来了-4.mp4”, “帅哥来了-5.mp4”, “帅哥来了-6.mp4”, “帅哥来了-7.mp4”, “帅哥来了-8.mp4”, “帅哥来了-9.mp4” }<br /> 快速排序文件名数组 (文件名数组, 1, 取数组成员数 (文件名数组))<br /> ' 显示排序结果<br /> .计次循环首 (取数组成员数 (文件名数组), i)<br />     调试输出 (文件名数组 <i>)<br /> .计次循环尾 ()<br /> <br /> .子程序 快速排序文件名数组<br /> .参数 文件列表, 文本型, 数组<br /> .参数 左边界, 整数型<br /> .参数 右边界, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 基准值, 整数型<br /> .局部变量 临时文件, 文本型<br /> <br /> .如果真 (左边界 ≥ 右边界)<br />     返回 ()<br /> .如果真结束<br /> <br /> i ＝ 左边界<br /> j ＝ 右边界<br /> 基准值 ＝ 提取文件名数字 (文件列表 [(左边界 ＋ 右边界) ＼ 2])<br /> <br /> .判断循环首 (真)<br />     .判断循环首 (提取文件名数字 (文件列表 <i>) ＜ 基准值)<br />         i ＝ i ＋ 1<br />     .判断循环尾 ()<br />     .判断循环首 (提取文件名数字 (文件列表 [j]) ＞ 基准值)<br />         j ＝ j － 1<br />     .判断循环尾 ()<br />     .如果真 (i ≥ j)<br />         跳出循环 ()<br />     .如果真结束<br /> <br />     ' 交换元素<br />     临时文件 ＝ 文件列表 <i><br />     文件列表 <i> ＝ 文件列表 [j]<br />     文件列表 [j] ＝ 临时文件<br /> <br />     i ＝ i ＋ 1<br />     j ＝ j － 1<br /> .判断循环尾 ()<br /> <br /> 快速排序文件名数组 (文件列表, 左边界, i － 1)<br /> 快速排序文件名数组 (文件列表, j ＋ 1, 右边界)<br /> <br /> .子程序 提取文件名数字, 整数型<br /> .参数 文件名, 文本型<br /> .局部变量 数字开始位置, 整数型<br /> .局部变量 数字结束位置, 整数型<br /> .局部变量 数字文本, 文本型<br /> <br /> 数字开始位置 ＝ 寻找文本 (文件名, “-”, , 假) ＋ 1<br /> 数字结束位置 ＝ 寻找文本 (文件名, “.”, , 假)<br /> 数字文本 ＝ 取文本中间 (文件名, 数字开始位置, 数字结束位置 － 数字开始位置)<br /> 返回 (到整数 (数字文本))

上面的有问题，，修正下。

影纸

  

变量名	类 型	静态	数组	备 注
文本组	文本型		0
文本行组	文本型		0
i	整数型
txt	文本型

文本_取出中间文本 ( #常量1, #左引号, #右引号, , )
文本_取中间_批量 ( #常量1, #左引号, #右引号, 文本组, , , , , , , )
计次循环首 (取数组成员数 (文本组), i)
文本_分割文本 (文本组 [i], “.”, , 文本行组)
如果 (i ＝ 取数组成员数 (文本组))
txt ＝ txt ＋ 文本行组 [1] ＋ “-” ＋ 文本行组 [2]
txt ＝ txt ＋ 文本行组 [1] ＋ “-” ＋ 文本行组 [2] ＋ #换行符

计次循环尾 ()
txt ＝ 文本_分割文本排序_快速 (txt, #换行符, “-”, 2, 2, , )
调试输出 (txt)

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 文本组, 文本型, , "0"<br /> .局部变量 文本行组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 txt, 文本型<br /> <br /> 文本_取出中间文本 (#常量1, #左引号, #右引号, , )<br /> 文本_取中间_批量 (#常量1, #左引号, #右引号, 文本组, , , , , , , )<br /> .计次循环首 (取数组成员数 (文本组), i)<br />     文本_分割文本 (文本组 <i>, “.”, , 文本行组)<br /> <br />     .如果 (i ＝ 取数组成员数 (文本组))<br />         txt ＝ txt ＋ 文本行组 [1] ＋ “-” ＋ 文本行组 [2]<br />     .否则<br />         txt ＝ txt ＋ 文本行组 [1] ＋ “-” ＋ 文本行组 [2] ＋ #换行符<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> txt ＝ 文本_分割文本排序_快速 (txt, #换行符, “-”, 2, 2, , )<br /> 调试输出 (txt)

蘇中二少

新建 易程序.e (148.82 KB, 下载次数: 7)

2025-6-15 11:30 上传

点击文件名下载附件

* “{“帅哥来了-1.mp4”,“帅哥来了-2.mp4”,“帅哥来了-3.mp4”,“帅哥来了-4.mp4”,“帅哥来了-5.mp4”,“帅哥来了-6.mp4”,“帅哥来了-7.mp4”,“帅哥来了-8.mp4”,“帅哥来了-9.mp4”,“帅哥来了-10.mp4”,“帅哥来了-11.mp4”,“帅哥来了-12.mp4”,“帅哥来了-13.mp4”,“帅哥来了-14.mp4”,“帅哥来了-15.mp4”}”

温柔小仙女

修正数字10排序问题.e (959.12 KB, 下载次数: 17)

2025-6-15 11:29 上传

点击文件名下载附件