Board logo

标题: 据说是p处理最快循环的代码 [打印本页]
作者: electronixtar     时间: 2007-2-20 05:59    标题: 据说是p处理最快循环的代码

原帖地址：
http://groups.google.com/group/a ... ad/4cc47d72586a2e73

  Quote:
Okay, here is my final bisection thing, but it's now written
in only ONE Line.
That line is very long, exact 418 visible char long:
(if not defined Result ... goto%0

Two things are required: ".BAT" extension, and a variable
named Result must be empty.


The testing loop, in (2147483647, -33554428, 0),
would count down from 2147483647, and stop on 255.


If a loop with that same speed for each number you see, it would
have calc/found that number after more than four years. In other
words: if you run the test loop (take about 4 seconds), and then
see a message: 255. "All Done", Press any key ..., then you have
displayed the same data as would have taken more than 260 years,
So, I would say this loop is fast. Besides that, it shouldn't be
a problem for you to rewrite it for whatever, other purpose than
exit-codes/errorlevels...


Benny


@echo off
  setlocal enabledelayedexpansion
    (set Result=)
    for /L %%I in (2147483647, -33554428, 0) do (
      call :ErrMake %%I
      call :ErrFind > nul
      echo !ErrFind!.
      REM if  "!ErrFind!" neq "%%I" echo OOPS.& exit /b
    )
  endlocal
  call:_& echo All Done.& pause
goto:eof


:ErrFind
(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


:ErrMake X [norm/both/user]
  if /i "%~2"=="norm" (set errorlevel=)
  if /i "%~2"=="both" (set errorlevel=%~1)
  if /i "%~2"=="user" (
    cd.\&(set errorlevel=& if errorlevel 1 exit /b %~1
    call:_
    echo It is recognizable that a variable errorlevel
    echo have been manipulated, value is %errorlevel%.
    echo.
    echo "%~nx0" is ready to create the exit-code %~1,
    echo Please make a choice, 1...3:
    echo.
    echo 1: As requested, create an ERRORLEVEL %~1
    echo.
    echo 2: Also set the synthetic errorlevel variable
    echo.
    echo 3: Normalize/restore the synthetic errorlevel
    echo    so it is following the real DOS ERRORLEVEL
    echo.& (set /p errorlevel=?: )
    if "!errorlevel!"=="3" set errorlevel=&exit /b %~1
    if "!errorlevel!"=="2" (set errorlevel=%~1) else (
    set errorlevel=%errorlevel%))
  )
exit /b %~1
:_
for %%_ in (________________) do (echo %%_%%_%%_%%_%%_)

[ Last edited by electronixtar on 2007-2-23 at 01:46 AM ]
作者: qjbm     时间: 2007-2-20 11:39

@echo %dbg% off&setlocal enabledelayedexpansion

for /L %%I in (2147483647, -33554428, 0) do (
                                             call :errMake %%I
                                             call :errFind >NUL
                                             echo !errFind!.
                                             if  "!errFind!" neq "%%I" echo OOPS.& exit /b
                                             )
echo All Done.&pause
goto:eof


:errMake
exit /b %~1


:ErrFind
(
if not defined 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 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 H=&set/a A+=1&(
                                                                                             if not errorlevel !A! set A=!L!
                                                                                             )&set L=&set !Result!=!A!&set A=&set Result=&goto:eof
                                                              )&set L=!A!
                                                             )else set H=!A!
                                          )&goto %0
此段代码不是一般的值得学习研究,

有别于本论坛中其他所有代码的,这是代码处理问题方式的一个另类.

看上去好象只是65次循环,其实它的计算次数几乎是爆炸模式递增的,

太不可思议了.我现在在想,本段代码是否是利用了batch的某个特性??

这让我想起了下面这段代码.
type %~dpnx0>>%~dpnx0&%0
啊!我好象有点明白了.......它的计算次数不是几何递增模式的...
我再考虑考虑.......
-------------------------------
FT!就是65次!!我被骗了!
---------------------------------
ECHO %DBG% OFF

FOR /L %%I IN (2147483647,-33554428,0) DO ECHO %%I
.

[ Last edited by qjbm on 2007-2-19 at 11:48 PM ]
作者: electronixtar     时间: 2007-2-20 22:50
恩，虽然只有65次，但是代码还是值得研究的。这年头的p处理都比较BT
作者: qjbm     时间: 2007-2-21 01:30
:ErrFind 段IF嵌套的比较BT.虽看不出有何实际意义,但其嵌套手法值得学习.

----------
闲聊一下:
近来的论坛这是怎么了??
满坛尽是灌水帖!
一些朋友发起的问题也让人打不起精神,甚至感觉烦躁...重复..重复..再重复..
一天来4.5次,盼望出现个值得讨论的话题也找不到....
我来的时候willsort 就走了,现在3742668 也辞职了. "无奈何" 也见收不见尾.qzwqzw也不知道干什么去了.........
作者: electronixtar     时间: 2007-2-21 04:33


  Quote:
近来的论坛这是怎么了??
满坛尽是灌水帖!
一些朋友发起的问题也让人打不起精神,甚至感觉烦躁...重复..重复..再重复..
一天来4.5次,盼望出现个值得讨论的话题也找不到....
我来的时候willsort 就走了,现在3742668 也辞职了. "无奈何" 也见收不见尾.qzwqzw也不知道干什么去了.........

过节不说这些，呵呵，春节快乐啊。SB终究是SB，不必烦心理会。
作者: namejm     时间: 2007-2-21 04:41
　　我不删帖子已经好几天。
作者: electronixtar     时间: 2007-2-21 05:23
呵呵，论坛发展到一定程度了，大量的FAQ是不可避免的。
作者: gne3     时间: 2007-2-21 08:35
受了，研究。。。。。。。
作者: tuminghao     时间: 2007-4-26 14:57
我不顶帖子已经好多年……