【易语言】自定义数据类型排序
.版本 2
.子程序 自定义类型数组排序
.参数 排序组, 特殊成员, 参考 数组
.局部变量 交换, 逻辑型
.局部变量 未比数据, 整数型
.局部变量 交换变量, 特殊成员
.局部变量 N, 整数型
交换 = 真
未比数据 = 取数组成员数 (排序组)
.判断循环首 (交换 = 真)
交换 = 假
.变量循环首 (1, 未比数据 - 1, 1, N)
.如果真 (排序组 [N + 1].数量 > 排序组 [N].数量)
交换变量 = 排序组 [N]
排序组 [N] = 排序组 [N + 1]
排序组 [N + 1] = 交换变量
交换 = 真
.如果真结束
.变量循环尾 ()
未比数据 = 未比数据 - 1
.判断循环尾 ()