向文本前面填充指定文本内容

.子程序 文本_补前后符, 文本型, 公开, 快速向文本前面填充指定文本 2020-9-8
.参数 参_文本, 文本型, , 需要补位的文本
.参数 参_补符, 文本型, , ASCII编码的单字符文本
.参数 参_总长, 整数型, , 总长度
.参数 参_补位, 逻辑型, 可空, 默认补前位 真补后位
.局部变量 局_长度, 整数型
.局部变量 局_缓存, 文本型

.如果真 (参_文本 ＝ “” 或 参_补符 ＝ “” 或 参_总长 ≤ 0)
返回 (“”)
.如果真结束
局_长度 ＝ 取文本长度 (参_文本)
.如果真 (参_总长 ≤ 局_长度)
返回 (参_文本)
.如果真结束
局_缓存 ＝ 取重复文本 (参_总长, 参_补符)
置入代码 ({ 139, 69, 248, 139, 125, 8, 139, 63, 139, 85, 16, 139, 77, 252, 131, 125, 20, 0, 118, 4, 49, 210, 235, 2, 41, 202, 138, 31, 136, 28, 16, 71, 66, 226, 247, 139, 69, 248, 201, 194, 20, 0 })