文本打乱

ye347549299

距离  文本=AAAAABBBBB   把文本打乱   无限制的例如10000个AB都能打乱

憨憨问号

文本_逐字分割（）
把文本分割成数组，然后打乱数组
不重复随机打乱数组
https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14846472
(出处: 精易论坛)

Suky

你想怎么打乱？要乱成什么效果？是否需要还原的？
这些都要先明确，不然你这就是个无效问题

普通玩家

随机打乱

  

子程序名	返回值类型	公开	备 注
文本_打乱顺序	文本型
参数名	类 型	参考	可空	数组	备 注
要打乱的文本	文本型

变量名	类 型	静态	数组	备 注
字符数组	文本型		0
i	整数型
随机位置	整数型
临时字符	文本型
长度	整数型
结果	文本型

长度 ＝ 取文本长度 (要打乱的文本)
如果真 (长度 ≤ 1)
返回 (要打乱的文本)

重定义数组 (字符数组, 假, 长度)
计次循环首 (长度, i)
字符数组 [i] ＝ 取文本中间 (要打乱的文本, i, 1)
计次循环尾 ()
置随机数种子 ()
变量循环首 (长度, 2, -1, i)
随机位置 ＝ 取随机数 (1, i)
临时字符 ＝ 字符数组 [i]
字符数组 [i] ＝ 字符数组 [随机位置]
字符数组 [随机位置] ＝ 临时字符
变量循环尾 ()
结果 ＝ “”
计次循环首 (长度, i)
结果 ＝ 结果 ＋ 字符数组 [i]
计次循环尾 ()
返回 (结果)

.版本 2<br /> <br /> .子程序 文本_打乱顺序, 文本型<br /> .参数 要打乱的文本, 文本型<br /> .局部变量 字符数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 随机位置, 整数型<br /> .局部变量 临时字符, 文本型<br /> .局部变量 长度, 整数型<br /> .局部变量 结果, 文本型<br /> <br /> 长度 ＝ 取文本长度 (要打乱的文本)<br /> <br /> <br /> .如果真 (长度 ≤ 1)<br />     返回 (要打乱的文本)<br /> .如果真结束<br /> <br /> <br /> 重定义数组 (字符数组, 假, 长度)<br /> .计次循环首 (长度, i)<br />     字符数组 <i> ＝ 取文本中间 (要打乱的文本, i, 1)<br /> .计次循环尾 ()<br /> <br /> 置随机数种子 ()<br /> <br /> .变量循环首 (长度, 2, -1, i)<br />     随机位置 ＝ 取随机数 (1, i)<br />     临时字符 ＝ 字符数组 <i><br />     字符数组 <i> ＝ 字符数组 [随机位置]<br />     字符数组 [随机位置] ＝ 临时字符<br /> .变量循环尾 ()<br /> <br /> <br /> 结果 ＝ “”<br /> .计次循环首 (长度, i)<br />     结果 ＝ 结果 ＋ 字符数组 <i><br /> .计次循环尾 ()<br /> 返回 (结果)