文本左右對齊排版的批處理

更新時間：2010年10月11日 07:53:04 作者：

本題只是給出一個簡單的文本通過批處理排版，而要求代碼的通用，正如batman版主所說，會是一個繁瑣的過程，于是就題解題，不必考慮代碼的通用。

如1.txt內(nèi)容如下。復(fù)制內(nèi)容到剪貼板代碼:
111111111111111111111 98912 張三
222222222222222222 150020 李四四
333333333333333333333 360000 王五
444444444444444444 2332 趙六六
555555555555555555 222 田七
666666666666666666666 999999 舞吧通過批處理輸出為：復(fù)制內(nèi)容到剪貼板代碼:

111111111111111111111 98912 張三
222222222222222222 150020 李四四
333333333333333333333 360000 王五
444444444444444444 2332 趙六六
555555555555555555 222 田七
666666666666666666666 999999 舞吧代碼要求，不生成任何臨時文件。
代碼簡潔，視思路與代碼加分！
------------------------------------------------------------------------------------------
本題只是給出一個簡單的文本通過批處理排版，而要求代碼的通用，正如batman版主所說，會是一個繁瑣的過程，于是就題解題，不必考慮代碼的通用。
淺默：

復(fù)制代碼代碼如下:

 
@echo off 
Setlocal Enabledelayedexpansion 
set n=0 
for /f "tokens=1,2*" %%i in (1.txt) do ( 
set "ke=%%i %%j" 
set m=0 
call :1 
) 
for /f "tokens=1,2*" %%i in (1.txt) do ( 
set "ke1=%%i %%j" 
set ke2=%%i 
set m1=0 
call :2 
echo !ke2! %%j %%k 
) 
pause 
goto :eof 
:1 
if not "!ke:~%m%,1!"=="" set /a m+=1&goto 1 
if %m% gtr %n% set n=%m% 
goto :eof 

:2 
if not "!ke1:~%m1%,1!"=="" set /a m1+=1&goto 2 
set /a dd=n-m1 
for /l %%a in (1,1,%dd%) do set "ke2=!ke2! " 
goto :eof 

　

　

batman：

復(fù)制代碼代碼如下:

 
@echo off&setlocal enabledelayedexpansion 
set "kong= " 
for /f "delims=" %%a in (1.txt) do ( 
for %%i in (%%a) do ( 
set "str=%%i"&set /a n+=1 
if !n! equ 2 ( 
set "str=%kong%!str!" 
set /p=!str:~-10! <nul 
) else ( 
set "str=!str!%kong%" 
set /p=!str:~,20! <nul 
)) 
set "n=0"&echo. 
) 
pause>nul 

復(fù)制代碼代碼如下:

 
@echo off 
setlocal enabledelayedexpansion 
for /f "tokens=1,2*" %%a in ('type temp.txt') do ( 
set "mo=%%a"&set "niu=%%b"&set "m=0"&set "n=0"&set "very=" 
call :ming0 %%a %%b %%c 
) 
echo.&pause&exit 
:ming0 
if not "!mo:~%m%,1!"=="" (set "momo=!mo:~%m%,1!"&set /a "m+=1"&goto :ming0) 
:ming1 
if not "!niu:~%n%,1!"=="" (set "niuniu=!niu:~%n%,1!"&set /a "n+=1"&goto :ming1) 
set /a "ming=30-%m%-%n%" 
for /l %%i in (1 1 %ming%) do set "very=!very! " 
echo %1 %very% %2 %3 

　

523066680：

復(fù)制代碼代碼如下:

 
@echo off 
mode con cols=100 lines=20 
setlocal enabledelayedexpansion 
for /l %%a in (1,1,80) do set kong= !kong! 
for /f "eol= tokens=1,2,3" %%a in ('type 1.txt') do ( 
set lie1-2=%%a%%b%kong% 
set lie1-2=!lie1-2:~0,80! 
set lie1-2=%%a!lie1-2:%%a%%b=!%%b 
echo,!lie1-2! %%c 
) 
pause 

原理：例如文本內(nèi)容為：
ab******1*d
abc*************2********e
用for獲得前面的兩列
直接組合則免去了中間的空格：
ab1
abc2
直接加上80個空格
ab1***************************……
abc2***************************……
然后保存前80位。
ab1*********……***
abc2********……***
把空格前移
ab*********……***1
abc********……***2
這樣前面的就基本對齊了。后面的第三列就不用說了…
我覺得應(yīng)該可以了……至少我自己用不上太通用的，這個代碼自己也沒有當(dāng)工具用過

您可能感興趣的文章: