文本左右对齐排版的批处理
作者 佚名
来源 批处理
浏览
发布时间 2013-07-09
如1.txt内容如下。复制内容到剪贴板代码: 111111111111111111111 98912 张三 222222222222222222 150020 李四四 333333333333333333333 360000 王五 444444444444444444 2332 赵六六 555555555555555555 222 田七 666666666666666666666 999999 舞吧通过批处理输出为:复制内容到剪贴板代码: 111111111111111111111 98912 张三 222222222222222222 150020 李四四 333333333333333333333 360000 王五 444444444444444444 2332 赵六六 555555555555555555 222 田七 666666666666666666666 999999 舞吧代码要求,不生成任何临时文件。 代码简洁,视思路与代码加分! ------------------------------------------------------------------------------------------ 本题只是给出一个简单的文本通过批处理排版,而要求代码的通用,正如batman版主所说,会是一个繁琐的过程,于是就题解题,不必考虑代码的通用。 浅默: 复制代码 代码如下: @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: 复制代码 代码如下: @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 more: 复制代码 代码如下: @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: 复制代码 代码如下: @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 原理:例如文本内容为: ab******1*d abc*************2********e 用for获得前面的两列 直接组合 则免去了中间的空格: ab1 abc2 直接加上80个空格 ab1***************************…… abc2***************************…… 然后保存前80位。 ab1*********……*** abc2********……*** 把空格前移 ab*********……***1 abc********……***2 这样前面的就基本对齐了。后面的第三列 就不用说了… 我觉得应该可以了……至少我自己用不上太通用的,这个代码自己也没有当工具用过 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |
你可能对下面的文章感兴趣
关于文本左右对齐排版的批处理的所有评论