我有一个函数，可以在句子中的单词之间插入空格，这样您就可以将它分成偶数块，而不必将单词分成两半。

使用3个参数调用它：<您的串联输入>，30、330

在串联输入时，请确保在每列之间插入空格。 然后将结果分成11个30个字符的字段。

#在句子中的单词之间插入多余的空格
 #以便可以将输入分为相同长度的字段
 #一言不发
 #
 #如果单词长于字段长度，则返回null
 #
 #个参数
 #$输入varchar（1024）
 #$ FieldLength int
 #$ TotalLength int
 #局部变量
 #$ Blanks varchar（1024）-空白字符串
 #$第一个varchar（1）
 #$最后一个varchar（1）
 #$ FirstPos int
 #$ LastPos int
 #$ Output int


 $ Blanks ='';
 $ FirstPos = 1;
 while（$ FirstPos <$ Fieldlength）
     开始
     $空白= $空白||  '';
 $ FirstPos = $ FirstPos + 1;
     结束
 $ LastPos = $ FieldLength;
 $ FirstPos = $ FieldLength + 1;
 $输出= $输入;


 而（substr（$ Output，$ LastPos，$ TotalLength）<>''）
     开始
     $ Last = substr（$ Output，$ LastPos，1）;
     $ First = substr（$ Output，$ FirstPos，1）;
     while（$ Last <>''和$ First <>''）
 开始
 $ LastPos = $ LastPos-1;
 如果（$ LastPos <$ Firstpos-$ FieldLength）返回null;
 $ Last = substr（$ Output，$ LastPos，1）;
 结束
     如果（$ First =''）
 $ Output = substr（$ Output，1，$ LastPos）||  （substr（$ Output，$ FirstPos + 1，1024））;
 其他
 $ Output = substr（$ Output，1，$ LastPos-1）||  substr（$ Blanks，1，$ FirstPos-$ LastPos）||  ltrim_blanks（substr（$ Output，$ LastPos + 1，1024））;
     $ FirstPos = $ FirstPos + $ FieldLength;
 $ LastPos = $ FirstPos-1;
 结束


 返回$ Output;


 #return replace_substr（$ Output，''，'。'）;