国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > BAT > 正文

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

2020-06-09 14:18:06
字體:
來源:轉載
供稿:網友
如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
)
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 通化县| 昆明市| 沙洋县| 柘荣县| 江陵县| 启东市| 屏边| 城口县| 防城港市| 湖南省| 资源县| 综艺| 家居| 遂川县| 吉水县| 阿勒泰市| 白沙| 东乡县| 大埔区| 石门县| 乳山市| 高州市| 金坛市| 阳谷县| 莫力| 威远县| 于田县| 高碑店市| 承德市| 和林格尔县| 宜阳县| 巴林左旗| 江川县| 贵南县| 墨竹工卡县| 乌兰浩特市| 扎囊县| 农安县| 绍兴县| 米易县| 泾川县|