more

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('type 1.txt') do (
   set "str=%%a"&set "n=0"
   call :count
)
echo.&pause&exit
:count
set "var=!str:~%n%,1!"
set /a "n+=1"
if not "!str:~%n%,1!"=="" (goto :count)
set /a "m=%n%/2"
set /a "mm=40-%m%"
for /l %%c in (1 1 %mm%) do (call set "kong=%%kong%% ")
echo %kong%%str%
set "kong="
复制代码

batman

我还是喜欢用纯批处理，代码先不发了，先看看别人的吧。。。

pusofalse

高~ 竟然一句搞定。^_^

[ 本帖最后由 pusofalse 于 2008-7-31 12:11 编辑 ]

Batcher

sed -e :a -e "s/^.\{1,77\}$/ & /;ta" a.txt
复制代码

sed.exe
http://rtngslin.moe.hm/cndos-up/img/561.zip