子程序 文本_均分文本换行L 望采纳，谢谢！代码中应用了...

鞠婧祎托付给

.版本 2

.子程序 文本_均分文本换行L, 文本型, 公开
.参数 欲均分的文本, 文本型
.参数 每行文本长度, 整数型
.局部变量 判断, 逻辑型
.局部变量 文本, 文本型, , "0"
.局部变量 文本总, 文本型
.局部变量 等分文本, 文本型
.局部变量 计次, 整数型

等分文本 ＝ “”
重定义数组 (文本, 假, 0)
文本总 ＝ 编码_Ansi到Unicode_文本型 (欲均分的文本)
文本 ＝ 分割文本 (文本总, “&#”, )
判断 ＝ 真
.计次循环首 (取数组成员数 (文本), 计次)
    等分文本 ＝ 等分文本 ＋ 编码_Unicode到Ansi_文本型 (“&#” ＋ 文本 [计次])
    .如果真 (取文本长度 (等分文本) ≥ 每行文本长度 且 判断 ＝ 真)
        等分文本 ＝ 等分文本 ＋ #换行符
        判断 ＝ 假
    .如果真结束
    .如果真 (判断 ＝ 假)
        .如果真 (取文本长度 (文本_取右边 (等分文本, #换行符, , )) ≥ 每行文本长度)
            等分文本 ＝ 等分文本 ＋ #换行符
        .如果真结束

    .如果真结束

.计次循环尾 ()
返回 (等分文本)

即刻先生

第一行会强制按字数，有点小bug

即刻先生

这个代码有问题，第一行会强制按长度分割，
.版本 2

    .如果真 (取文本长度 (局_返回) ≥ 每行文本长度 且 局_判断 ＝ 真)
        局_返回 ＝ 局_返回 ＋ #换行符
        局_判断 ＝ 假
    .如果真结束
    .如果真 (局_判断 ＝ 假)
应该去掉这段

旺仔牛奶糖

1111
建行卡了很久

362400aa

11111111111111