传说中的批处理

雪风

{:4_91:}

1. 
   
2. @echo off
   
3.   setlocal enabledelayedexpansion
   
4.     (set Result=)
   
5.     for /L %%I in (2147483647, -33554428, 0) do (
   
6.       call :ErrMake %%I
   
7.       call :ErrFind > nul
   
8.       echo !ErrFind!.
   
9.       REM if  "!ErrFind!" neq "%%I" echo OOPS.& exit /b
   
10.     )
    
11.   endlocal
    
12.   call:_& echo All Done.& pause
    
13. goto:eof
    
14. 
    
15. :ErrFind
    
16. (if "!Result!"=="" set Result=%0&set Result=!Result:~1!&(if not errorlevel 1 set !Result!=0&set Result=&goto:eof)&set H=2147483647&(if errorlevel !H! set !Result!=!H!&set Result=&goto:eof)&set L=0)&set/a A=H/2+L/2&echo H:!H! A:!A! L:!L!&(if errorlevel !A! ((if !L!==!A! set/a A+=1&(if not errorlevel !A! set A=!L!)&set !Result!=!A!&set Result=&goto:eof)&set L=!A!)else set H=!A!)&goto%0
    
17. 
    
18. :ErrMake X [norm/both/user]
    
19.   if /i "%~2"=="norm" (set errorlevel=)
    
20.   if /i "%~2"=="both" (set errorlevel=%~1)
    
21.   if /i "%~2"=="user" (
    
22.     cd.\&(set errorlevel=& if errorlevel 1 exit /b %~1
    
23.     call:_
    
24.     echo It is recognizable that a variable errorlevel
    
25.     echo have been manipulated, value is %errorlevel%.
    
26.     echo.
    
27.     echo "%~nx0" is ready to create the exit-code %~1,
    
28.     echo Please make a choice, 1...3:
    
29.     echo.
    
30.     echo 1: As requested, create an ERRORLEVEL %~1
    
31.     echo.
    
32.     echo 2: Also set the synthetic errorlevel variable
    
33.     echo.
    
34.     echo 3: Normalize/restore the synthetic errorlevel
    
35.     echo    so it is following the real DOS ERRORLEVEL
    
36.     echo.& (set /p errorlevel=?: )
    
37.     if "!errorlevel!"=="3" set errorlevel=&exit /b %~1
    
38.     if "!errorlevel!"=="2" (set errorlevel=%~1) else (
    
39.     set errorlevel=%errorlevel%))
    
40.   )
    
41. exit /b %~1
    
42. :_
    
43. for %%_ in (________________) do (echo %%_%%_%%_%%_%%_)
    

复制代码

批处理爱好者可以自己研究下非常强悍！！！

ansinjay

······好久没看见雪风哥发贴了，难得呀，我在论坛找雪风大哥以前的教程，好多都是以前博客去下载的，但那个博客似乎不存在了，所以我求雪风哥以前发布过的教程，比如修改鸽子那个14课，我在论坛里面找了好久才找到了6课，是只出了6课还是什么原因我不清楚，还有就是那个修改鸽子为专用上线教程，我不想自己的DAT被别人拿去乱用，你的那个博客我去了，但好像已经不存在，打不开了，哪么多经典的教程就那样付之东流了，好可惜，所以在这里，我求雪风大哥以前发布过的所有教程，只要是你出的，不管什么，我都要，希望雪风大哥给个下载地址谢谢，黑狼和雪风我是永远支持的@！！！！！我的邮箱：kofzjf@tom.com