一组数组排序并取行后，再生成另一数组

大风尘

断针自动补位统计.rar (912.21 KB, 下载次数: 1)

2024-12-31 18:34 上传

点击文件名下载附件
断针自动补位

逻辑思路

使用了超级列表框排序模块

目前我自己写的代码出错，达不到要求

向各位大哥求助
1、根据图1所示，从第一行时间节点的”断针号“开始，每一行进行一次排序，取第5行，并插入数组成员，生成”补针位“数组，
2、如果可以不通过超级列表框进行排序，有更更简的排序，能实现最终结果也可以


思路：
1、针号数组（10条针）与断针号数组，通过寻找文本，找到针号未断周期，然后按未断周期从大到小进行排序。
2、根据未断周期排序取第5行第一列的数（也就是针号），要从时间节点的第一行的“断针号”开始计算排序，插入数组成员生成另一数组（换针位）
3、通过”换针位“与”断针号“这两组数组进行对比，并生成补针的正确与错误的走势图。

黑咖啡

断针自动补位统计.e

是可可吖

看着头好晕

b0y

完全懵逼

cunanhai

看不懂说的是啥

xiaoyu1986

虽然我不知道你在说的是啥，但是我觉得你的思路还是挺清晰的。

大风尘

b0y 发表于 2024-12-31 19:19
完全懵逼

举一个例子，看你能不能明白
第一组数组成员数：0，1，2，3，4，5，6，7，8，9，共10 个，初始均=0次
即
0，0
1，0
3，0
4，0
5，0
6，0
7，0
8，0
9，0

第二组数组，
3，
6，
9，
3，
2，
4，
5，
7，
7，
0。
。
。
。
N

当第二组数组出现”3“时，第一组数组变化成
0，1
1，1
2，1
3，0（出现即回归到0）
4，1
5，1
6，1
7，1
8，1
9，1

当第二组数组出现”3“时，第一组数组变化成
0，1
1，1
2，1
3，0（出现即回归到0）
4，1
5，1
6，1
7，1
8，1
9，1

当第二组数组出现”3“时，第一组数组变化成
0，1
1，1
2，1
3，0（出现即回归到0）
4，1
5，1
6，1
7，1
8，1
9，1

当第二组数组出现”6“时，第一组数组变化成（累计，相等就回归0值）
0，2
1，2
2，2
3，1（未出现就开始+1）
4，2
5，2
6，0（出现即回归到0）
7，2
8，2
9，2

以此类推。。。。。。
最好是能为一次能按未出现的次数从大到小排序
能明白吗？可否指教一下代码写法，劳烦了，谢谢！

大风尘

cunanhai 发表于 2024-12-31 19:21
看不懂说的是啥

举一个例子，看你能不能明白
第一组数组成员数：0，1，2，3，4，5，6，7，8，9，共10 个，初始均=0次
即
0，0
1，0
3，0
4，0
5，0
6，0
7，0
8，0
9，0

第二组数组，
3，
6，
9，
3，
2，
4，
5，
7，
7，
0。
。
。
。
N

当第二组数组出现”3“时，第一组数组变化成
0，1
1，1
2，1
3，0（出现即回归到0）
4，1
5，1
6，1
7，1
8，1
9，1


当第二组数组出现”6“时，第一组数组变化成（累计，相等就回归0值）
0，2
1，2
2，2
3，1（未出现就开始+1）
4，2
5，2
6，0（出现即回归到0）
7，2
8，2
9，2

以此类推。。。。。。
最好是能为一次能按未出现的次数从大到小排序
能明白吗？可否指教一下代码写法，劳烦了，谢谢！

黑咖啡

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
第一组数组	文本型		10
第二组数组	文本型		0
m	整数型
n	整数型
排序文本	文本型

置随机数种子 ()
第一组数组 ＝ { “0,0”, “1,0”, “2,0”, “3,0”, “4,0”, “5,0”, “6,0”, “7,0”, “8,0”, “9,0” }
计次循环首 (取随机数 (10, 99), )  ' 随机生成第二组数组N个
加入成员 (第二组数组, 到文本 (取随机数 (0, 9)))
计次循环尾 ()
调试输出 (第一组数组)
计次循环首 (取数组成员数 (第二组数组), m)
排序文本 ＝ “”
计次循环首 (10, n)
判断 (取文本左边 (第一组数组 [n], 1) ＝ 第二组数组 [m])
排序文本 ＝ 排序文本 ＋ 取文本左边 (第一组数组 [n], 2) ＋ “0$”
排序文本 ＝ 排序文本 ＋ 取文本左边 (第一组数组 [n], 2) ＋ 到文本 (到整数 (取文本右边 (第一组数组 [n], 取文本长度 (第一组数组 [n]) － 2)) ＋ 1) ＋ “$”

计次循环尾 ()
文本_分割文本排序_快速 (排序文本, “$”, “,”, 2, 2, 假, 第一组数组)  ' 从小到大
调试输出 (第一组数组)
计次循环尾 ()
返回 (0)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 第一组数组, 文本型, , "10"<br /> .局部变量 第二组数组, 文本型, , "0"<br /> .局部变量 m, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 排序文本, 文本型<br /> <br /> 置随机数种子 ()<br /> 第一组数组 ＝ { “0,0”, “1,0”, “2,0”, “3,0”, “4,0”, “5,0”, “6,0”, “7,0”, “8,0”, “9,0” }<br /> .计次循环首 (取随机数 (10, 99), )  ' 随机生成第二组数组N个<br />     加入成员 (第二组数组, 到文本 (取随机数 (0, 9)))<br /> .计次循环尾 ()<br /> 调试输出 (第一组数组)<br /> .计次循环首 (取数组成员数 (第二组数组), m)<br />     排序文本 ＝ “”<br />     .计次循环首 (10, n)<br />         .判断开始 (取文本左边 (第一组数组 [n], 1) ＝ 第二组数组 [m])<br />             排序文本 ＝ 排序文本 ＋ 取文本左边 (第一组数组 [n], 2) ＋ “0$”<br />         .默认<br />             排序文本 ＝ 排序文本 ＋ 取文本左边 (第一组数组 [n], 2) ＋ 到文本 (到整数 (取文本右边 (第一组数组 [n], 取文本长度 (第一组数组 [n]) － 2)) ＋ 1) ＋ “$”<br />         .判断结束<br /> <br />     .计次循环尾 ()<br />     文本_分割文本排序_快速 (排序文本, “$”, “,”, 2, 2, 假, 第一组数组)  ' 从小到大<br />     调试输出 (第一组数组)<br /> .计次循环尾 ()<br /> 返回 (0)

黑咖啡

黑咖啡 发表于 2025-1-1 00:39

  

[/quote]
[e=1]* 数组:10{“0,0”,“1,0”,“2,0”,“3,0”,“4,0”,“5,0”,“6,0”,“7,0”,“8,0”,“9,0”}
* 数组:10{“3,0”,“0,1”,“1,1”,“2,1”,“4,1”,“5,1”,“6,1”,“7,1”,“8,1”,“9,1”}
* 数组:10{“3,0”,“0,2”,“1,2”,“2,2”,“4,2”,“5,2”,“6,2”,“7,2”,“8,2”,“9,2”}
* 数组:10{“2,0”,“3,1”,“0,3”,“1,3”,“4,3”,“5,3”,“6,3”,“7,3”,“8,3”,“9,3”}
* 数组:10{“2,0”,“3,2”,“0,4”,“1,4”,“4,4”,“5,4”,“6,4”,“7,4”,“8,4”,“9,4”}
* 数组:10{“9,0”,“2,1”,“3,3”,“0,5”,“1,5”,“4,5”,“5,5”,“6,5”,“7,5”,“8,5”}
* 数组:10{“6,0”,“9,1”,“2,2”,“3,4”,“0,6”,“1,6”,“4,6”,“5,6”,“7,6”,“8,6”}
* 数组:10{“2,0”,“6,1”,“9,2”,“3,5”,“0,7”,“1,7”,“4,7”,“5,7”,“7,7”,“8,7”}
* 数组:10{“5,0”,“2,1”,“6,2”,“9,3”,“3,6”,“0,8”,“1,8”,“4,8”,“7,8”,“8,8”}
被调试易程序运行完毕

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

.版本 2<br /> .支持库 spec</blockquote></div><br /> [e=1]* 数组:10{“0,0”,“1,0”,“2,0”,“3,0”,“4,0”,“5,0”,“6,0”,“7,0”,“8,0”,“9,0”}<br /> * 数组:10{“3,0”,“0,1”,“1,1”,“2,1”,“4,1”,“5,1”,“6,1”,“7,1”,“8,1”,“9,1”}<br /> * 数组:10{“3,0”,“0,2”,“1,2”,“2,2”,“4,2”,“5,2”,“6,2”,“7,2”,“8,2”,“9,2”}<br /> * 数组:10{“2,0”,“3,1”,“0,3”,“1,3”,“4,3”,“5,3”,“6,3”,“7,3”,“8,3”,“9,3”}<br /> * 数组:10{“2,0”,“3,2”,“0,4”,“1,4”,“4,4”,“5,4”,“6,4”,“7,4”,“8,4”,“9,4”}<br /> * 数组:10{“9,0”,“2,1”,“3,3”,“0,5”,“1,5”,“4,5”,“5,5”,“6,5”,“7,5”,“8,5”}<br /> * 数组:10{“6,0”,“9,1”,“2,2”,“3,4”,“0,6”,“1,6”,“4,6”,“5,6”,“7,6”,“8,6”}<br /> * 数组:10{“2,0”,“6,1”,“9,2”,“3,5”,“0,7”,“1,7”,“4,7”,“5,7”,“7,7”,“8,7”}<br /> * 数组:10{“5,0”,“2,1”,“6,2”,“9,3”,“3,6”,“0,8”,“1,8”,“4,8”,“7,8”,“8,8”}<br /> 被调试易程序运行完毕