本為處理換行字元截斷中文字造成亂碼，不過情形太多，不易處理。
故廢棄之。



            if message_wrap >= string.len(v.text) then
            message_wrap = message_wrap - string.len(v.text)
            else
                  if 128 > string.byte (v.text,message_wrap) then
                  --Note ("1解")
                  --Note (string.sub(v.text,1,message_wrap-1))
                  --Note (string.sub(v.text,message_wrap))
                  v.text = string.sub(v.text,1,message_wrap)..'\n'..
                           string.sub(v.text,message_wrap+1)
                  else
                     for i = message_wrap,1,-1 do
                        if a then a = a + 1 else a = 1 end
                     print (i)
                     --Note (string.byte(string.sub (v.text,i,i)))
                     --Note (string.sub (v.text,i,message_wrap))

                        if 128 > string.byte(string.sub (v.text,i,i)) then
                        --print (a)
                        message_wrap = message_wrap -a+1
                           if a >= 4 then
                           a = a/2*2
                           message_wrap = message_wrap + a
                           end
                        break
                        end
                     end
                  --Note ('2解')
                  --Note (string.sub(v.text,1,message_wrap))
                  --Note (string.sub(v.text,message_wrap+1))
                  v.text = string.sub(v.text,1,message_wrap)..'\n'..
                           string.sub(v.text,message_wrap+1)
                  end
            end
            --Note (v.text)