aaaaaaa                                 aaaa bbbbbb ccccccccccc dddd
aa  aaaaaaa bbbbbbbb cccccccccc ddddddddddddd eeeeeee
     aaaaaaaaaaaa bbbbbbbbbbb cccccccccccccccccccc
                aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa aa
                    aaaaaaaaaaaaaaaaaaaaaaaaaaaa bbbbbbbbbb
aaaaaaaaa        ccccccccc bbbbbbbbbbbbb               ddddddddddddddddd
复制代码

aaaaaaaaa        ccccccccc bbbbbbbbbbbbb               ddddddddddddddddd
复制代码

@echo off
set num=0
for /f "delims=" %%i in (a.txt) do  set "str=%%i"&call,set "str=%%str: =%%"&call :lp "%%i"
call,echo %%_%num%%% %num%个字符
pause>nul&goto :eof
:lp
set "str=%str:~1%"&set /a n+=1
if defined str goto lp
if %n% geq %num% set "num=%n%"&set "_%num%=%~1"
set "n=0"
复制代码

@echo off&setlocal enabledelayedexpansion
set "max=0"
for /f "delims=" %%i in (1.txt) do set "str=%%i"&echo !str: =!>>2.txt
echo end>>2.txt
for /f "tokens=1* delims=: " %%i in ('findstr /o .* 2.txt') do (
    set /a n+=1&set "_!n!=%%i"&set ".!n!=%%j"
    set /a m=n-1
　　if !m! geq 1 call :lp
)
echo.&echo 字符数最多的行为：!a%max%!
echo.&echo 　　　　字符数为：%max%个   
del /q 2.txt&pause>nul&goto :eof
:lp
set /a num=_%n%-_%m%-2
if %num% gtr %max% set "max=%num%"&set "a!max!=!.%m%!"
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
    set v=%%i
    set n=0
    set /a m+=1
    call :lp
    set _!m!=!n!#%%i
)
set max=0
call :next
for /f "tokens=1 delims=#" %%a in ("!var!") do (
        set s=%%a
        if !s! gtr %max% set max=!s!
)
call :next
for /f "tokens=1,2 delims=#" %%a in ("!var!") do (
        if %%a==%max% echo %%b
)
pause&exit/b

:next
for /l %%i in (1 1 %m%) do (
    set c=%%i
    call,set var=%%_!c!%%
)
goto :eof

:lp
    if "!v:~0,1!" neq " " set /a n+=1
    set v=!v:~1!
    if "!v!" neq "" goto lp
goto :eof
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
    set v=%%i
    set /a max=0,n=0,m+=1
    call :lp
    if !n! gtr !max! set max=!n!&set xx=%%i
)
echo %xx%&pause&exit/b

:lp
    if "!v:~0,1!" neq " " set /a n+=1
    set v=!v:~1!
    if "!v!" neq "" goto lp
goto :eof
复制代码

@echo off
for /f "delims=" %%a in (1.txt) do (
for %%b in (%%a) do call :xxx "%%b"
call :yyy
)
for /f "tokens=2,3 delims=_=" %%i in ('set l_^|sort /+4') do set msg=最长的行为:%%i  长度为:%%j
echo %msg%
pause
goto :eof


:xxx
set "lines=%lines%%~1"
goto :eof

:yyy
set /a x+=1
for /f "skip=1 delims=:" %%i in ('^(echo "%lines%"^&echo.^)^|findstr /o ".*"') do set/a l_%x%=%%i-5
set lines=
goto :eof
复制代码

@echo off
set max=0
for /f "tokens=*" %%a in (a.txt) do (
  if "%%a" neq "" call :ready "%%a"
)
echo 第 %strline% 行字数最多，共 %max% 个字符:&echo.&echo %str%&echo.
pause & exit /b

:ready
set var=%~1
set var=%var: =%
set /a n=0,line+=1

:lp
set fifteen=%var:~,15%fedcba987654321
set /a n+=0x%fifteen:~15,1%
if "%var:~15%" neq "" set "var=%var:~15%" & goto lp
if %n% gtr %max% set /a "max=n,strline=line" & set str=%~1
复制代码

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1,1,80) do set "k=!k!0"
for /f "delims=" %%a in (a.txt) do (
    set "str=%%a"&set "str=%k% !str: =!"
    set "str=!str:~-80!"&set /a n+=1
    for /f %%b in ("!str!") do set "_%%b=%%a"&set ".%%a=!n!"
)
for /f "tokens=1,2 delims==_" %%a in ('set _') do (
    set "str=%%a"&set "var=%%b"
    for /l %%i in (1,1,80) do if "!str:~%%i!" equ "" set /a num=79-%%i&goto next
)
:next 
echo 字符数是多的是!.%var%!行，共有%num%个字符。
pause>nul
复制代码

@echo off&setlocal enabledelayedexpansion
::@随风 @bbs.bathome.net @2009-04-18
for /f "delims=" %%a in (a.txt) do (
   set /a sun+=1,n=8189*2,max=1
   set s=%%a&set s=!s: =!&set "var="
   for /l %%a in (1 1 14) do (
      if defined var set /a n=var
      set /a n/=2
      for %%i in (!n!) do (
         if "!s:~%%i,1!"=="" (set /a var=n) else (
            set s=!s:~%%i!&set /a max+=%%i,var-=%%i
   )))  
   if !h! lss !max! set /a num=sun,h=max
)
echo 字符数最多的行为：!num!
echo 字符数为：!h!
pause
复制代码

 
@echo off&setlocal enabledelayedexpansion
set m=0
for /f "delims=" %%a in (a.txt) do (
    set "str=%%a"&set "str=!str: =!0"
    for %%b in (!m!) do (if "!str:~%%b,1!" neq "" call :sub "%%a")
)
echo 字符数是多的是%var%行，共有%m%个字符。
pause
goto :eof
 
:sub
set/a en=m+40
for /l %%a in (!m!,1,!en!) do (
 if "!str:~%%a,1!" equ "" (
  set/a n=%%a-1
  if !m! lss !n! set/a m=!n!,n=0&set "var=%~1"
  goto :eof
 )
)
set/a m=en
goto :sub
复制代码

@echo off&setlocal enabledelayedexpansion
set m=1
for /f "delims=" %%a in (a.txt) do (
    set "str=%%a"&set "str=!str: =!0"
    for %%b in (!m!) do (if "!str:~%%b,1!" neq "" call :sub "%%a")
)
set /a m-=1
echo 字符数是多的是%var%行，共有%m%个字符。
pause
goto :eof

:sub
set/a en=m+40
for /l %%a in (!m!,1,!en!) do (
        if "!str:~%%a,1!" equ "" (
                echo 较多: %~1
        set/a m=%%a&set "var=%~1"&goto :eof)
)
set/a m=en
goto :sub
复制代码

::  GetMaxCharText.cmd - 找出字符最多的文本行
::  qzwqzw - 2010-01-05
::
::  基本构思：
::      将原文本每行尾部加足够的一定数量的空格，在文本右侧形成一个不等齐空格区域
::      原文本行越长，其后的空格区域就越长，然后用sort /+n 仅对空格区域进行排序
::      因为区域内都是空格，则排序的依据就是空格的长度，也就是原行文本的长度
::
@echo off & setlocal EnableDelayedExpansion
set maxLineLen=80
set infile=%~sf0
for /l %%i in (1,1,%maxLineLen%) do set zone= !zone!
:: findstr 会忽略空行和仅含空格的行，但显示行号会跨过这些行，这是我们需要的特性
:: 将行号与行文本分别处理，是因为不对齐行号会影响行文本长度的判断
(for /f "tokens=1* delims=:" %%l in ('findstr /n /r /c:"[^ ]"  %infile%') do (
    set LineNo=         %%l
    set LineNo=!LineNo:~-10!
    set Line=%%m
    set Line=!Line: =!
    echo.!LineNo!:!Line!!zone!
))>%temp%\%~sn0~1.t~1
sort /r /+%maxLineLen% %temp%\%~sn0.t~1 > %temp%\%~sn0.t~2
set/p maxLine=< %temp%\%~sn0.t~2 >nul
::  已找到最多字符的行，以下是提取行号和原行文本，行长度因未要求而忽略
for /f "delims=: " %%i in ("%maxline%") do set maxLineIdx=%%i
::  使用find而不是findstr，是因为find够用够简单
set seekLine=find /v /n "" ^^^<%infile%^^^|find "[%maxLineIdx%]"
echo.字符最多的行第 %maxLineIdx% 行，内容为：
for /f "tokens=1* delims=[]" %%l in ('%seekLine%') do echo.%%m
for %%f in (%temp%\%~sn0.t*) do del %%f
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (a.txt) do (
     set /a t+=1
     set i=%%a
     set y!t!=!i!
     set i=!i: =!
     call:x !i!
     set /a n!t!=!num!
)
for /l %%b in (1 1 !t!) do (
if !n%%b! lss !number! (
 set /a n%%b=number
 set y%%b=!str!
)
set /a number=n%%b
set str=!y%%b!
cls
echo 字符数最多的行是：!y%%b!共有字符：!n%%b! 个
)
pause>nul&exit
:x
    set i=%1
    set num=
:loop
     set i=!i:~1!
     set /a num+=1
     if "!i!"==""  ( echo abc >nul
     )  else ( goto:loop)
复制代码

@echo off&setlocal enabledelayedexpansion
set /a $=11,n=4096
for /l %%a in (-2 1) do set $=!$!!$!!$!!$!
(copy a.txt %$%$&findstr .* %$%?>$
for %%a in (2048 1024 512 256 128 64 32 16 8 4 2 1) do sort /+100 /rec !n! $&&set /a n-=%%a,h=n-130||set /a n+=%%a)>nul 2>nul
for /f "delims=" %%a in ('sort /+%h% a.txt') do set long=%%a
echo !long!
del /f /q *$&pause
复制代码

@echo off&setlocal enabledelayedexpansion
set n=32768
(for %%a in (16384 8192 4096 2048 1024 512 256 128 64 32 16 8 4 2 1) do sort /+100 /rec !n! 1.txt&&set /a n-=%%a||set /a n+=%%a)>nul 2>nul
::很像plp兄曾转发过的折半回溯法求字符长度的函数吧？是的，这里就是对那个思路的改造，只不过我是利用sort /rec超过最长行字数时会出错的特性来进行运算的。
echo 最长行有%n%个字符
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set /a tmp=11,n=4096
::此处的tmp是用于补位的，设成任意两个字符都行，为了压缩代码，把它设成十位数
for /l %%a in (1 1 3) do set tmp=!tmp!!tmp!!tmp!!tmp!
::将tmp补足128位
copy>nul a.txt %tmp:~2%$
::将a.txt保存到一个文件名长度为127个字符的临时文件中
findstr .* %tmp:~2%?>$
::用findstr命令配合通配符实现补位，127个字符长的文件名加上“:”号，刚好128个字符，将结果输出到临时文件中
for %%a in (2048 1024 512 256 128 64 32 16 8 4 2 1) do (
   sort /+100 /rec !n! $&&set /a n-=%%a,h=n-128||set /a n+=%%a
)>nul 2>nul
::用sort /rec判断该临时文件最长行的长度
for /f "delims=" %%a in ('sort /+%h% a.txt') do set long=%%a
::因为知道了最长行的长度，所以可以直接用sort /+n来精确排序，通过for命令，很容易获得最后一行的内容(用set /p也可以，但是考虑到变量长度，还是用for保险，当然用findstr取指定行也是一个不错的选择)。
echo !long!
::不解释
del /f /q *$
::删除临时文件，销赃
pause
复制代码

endlocal
for /f "tokens=1* delims=:" %%a in ('findstr /n a.txt^|findstr 1:') do set "long=%%b"
...
复制代码

endlocal
for /f "tokens=1* delims=:" %%a in ('sort /r /+%h% a.txt^|findstr /n .*^|findstr /b 1:') do set "long=%%b"
...
复制代码

@echo off & Setlocal EnableDelayedExpansion
set n=0
::本以为变量不定义，用时值就自动是零，这里不定义n，后面就会出错。
For /f "delims=" %%i in (a.txt) do (
	Set "a=%%i"
	Set a1=!a: =!
	Set str=0
	Call :hello
)
echo %max%
pause 
Goto :eof
:hello
If Not "!a1:~%str%,1!"=="" Set /a str+=1 & Goto hello
::此句用来计算字符串长度
If %str% gtr %n% Set n=%str%&Set max=%a%
Goto :eof
复制代码

@echo off&setlocal enabledelayedexpansion
set "tmp= 0 9 8 7 6 5 4 3 2 1"
for /l %%a in (0 1 4) do set var=!tmp: =%%a!!var!
for /f "delims=" %%a in (a.txt) do (
	set str=%%a
	set m=!str: =!!str: =!!var!
	if "1!m:~100,2!" gtr "1!max!" (
		set max=!m:~100,2!
		set text=%%a
	)
)
echo !text!
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1 1 5) do set a=!a!0987654321
for /l %%a in (0 1 4) do set b=%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a!b!
for /f "delims=" %%a in (a.txt) do (
	set str=%%a
	set m=!str: =!!a!
	set n=!str: =!!b!
	if "1!n:~50,1!!m:~50,1!" gtr "1!max!" (
		set max=!n:~50,1!!m:~50,1!
		set text=%%a
	)
)
echo !text!
pause
复制代码

set m=0
      call :1                  
) 
echo %wang%
pause 
goto :eof 
:1
  if not "!ke1:~%m%,1!"=="" set /a m+=1&goto 1
  if %m% gtr %n% set n=%m%&set wang=%ke%
  goto :eof
复制代码

gawk "{str=$0;gsub(/ /,\"\",str);count=length(str);if(max<count){max=count;strOut=$0;}}END{print strOut}" test.txt
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2 delims=:" %%a in ('findstr /n . a.txt') do (
    set str=%%b
    set str=!str: =!
    for /l %%c in (0,1,100) do (
        set str2=!str:~%%c,1!
        if not "!str2!"=="" set /a "#%%a+=1"&set "_%%a=%%b"
 )
)
for /f "tokens=1,2 delims==" %%a in ('set #') do set num=!num! %%b
set num=!num:~1!
for /l %%a in (1,1,100) do (
    for %%b in (!num!) do (
	if %%a==%%b set shuzi=%%b
 )
)
for /f "tokens=1,2 delims==" %%a in ('set #') do (
	set zimu=%%a
	if %%b==!shuzi! set zimu=!zimu:~1!
)
call,echo;%%_!zimu!%%
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set w=0&set "e="

for /f "tokens=*" %%i in (a.txt) do (set q=%%i
  call :m !q: =!
  set/a r=w-l
if "!r:~0,1!"=="-" (set w=!l!&set e=%%i))
echo;%e%
pause&exit

:m
set m=%1&set l=0
for /l %%i in (0,1,1024) do (if "!m:~%%i,1!"=="" (set/a l=%%i-1&goto :eof))
复制代码

"""
python3
找出字符数最多的行
2016年5月2日 03:56:13 codegay
"""
with open("a.txt") as f:
    kv={''.join(r.split()).__len__():r for r in f}
    print(kv[max(kv)])
            
            
复制代码

@echo off
set firstline=true
set m=0
setlocal enabledelayedexpansion
for /f "delims=" %%a in (test2.txt) do (
    set "str1=%%a"
    set "str2=!str1: =!
    if "%firstline%"=="true" (
        set firstline=false
        call :o
    ) else (
        for %%b in ("!m!") do if not "!str2:~%%b!"=="" call :o
    )
)
echo %longestline%
echo %m%
pause
goto :eof
:o
if not "!str2:~%m%!"=="" set /a m+=1&set longestline=%str1%&goto :o
goto :eof
复制代码