keen

我是新手，刚从新手训练营出来。
我从新手训练营出来后，就迷失方向了，不知道怎么继续学批处理了，我把论坛挨个翻了一遍，又发现在这一块，有好多题。
我就继续练下去。
请batman多多指教！

keen

只能优化成3楼的了：

@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
复制代码

batman

回复楼上：
兄弟看来是特有求知欲和动手欲的，这么老的练习贴子也让你翻到了，还做了解答，呵呵，加油。。。

keen

太复杂了，想办法优化：

@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
复制代码

batman

原帖由 namejm 于 2008-7-30 10:59 发表
　　可以考虑 findstr /o 方案。

思路是对的，但实施起来还真的有点麻烦：

@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%!"
复制代码

namejm

　　可以考虑 findstr /o 方案。

/O        在每个匹配行前打印字符偏移量。

batman

确实如此，粗心了，谢谢兄弟指出。

pusofalse

原帖由 batman 于 2008-7-26 08:19 发表
下面给出本人的方案一：@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  ...

有一点小错误，加完分才看出来。变量%%_%num%%是字符数最多的行，没有进行条件约束而每次都赋值给它，导致输出的字符数正确，行的内容却每次都是最后的那一行。

batman

下面给出本人的方案一：

@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"
复制代码

[ 本帖最后由 batman 于 2008-7-26 18:25 编辑 ]

浅默

@echo off
Setlocal Enabledelayedexpansion
set n=0
for /f "delims=" %%i in (a.txt) do (
      set "ke=%%i"
      set ke1=!ke: =!
      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

pusofalse

这题还要输出最多的字符在第几行吗？
如果是，包含空行吗？