wankoilz

无聊翻看经典帖子，发现前两段代码好像都少算了一个字符，比如第二段代码，在执行到

set $=!$!fedcba9876543210&set/aN+=0x!$:~16,1!
复制代码

的时候，变量$的长度范围应该是1-16(不考虑$长度为0)，而fedcba9876543210只能表达0-15
所以似乎应该把这一句改成这样：

set $=!$!!$!100f0e0d0c0b0a090807060504030201&set/aN+=0x!$:~32,2!
复制代码

小小疏忽，请明察

wankoilz

哦哦对的，是我自己没仔细看，在原字符串后加上一位就对了。
楼主的代码确实是简练！
不过对于我来说，不改动原字符串更容易理解 ：

:strlen <stringVarName> [retvar] 
:: 思路： 二分回溯联合查表法
:: 说明： 所求字符串大小范围 0K ~ 8K；
::    stringVarName ---- 存放字符串的变量名
::    retvar      ---- 接收字符长度的变量名
setlocal enabledelayedexpansion
set "$=!%1!"
set N=&for %%a in (4096 2048 1024 512 256 128 64 32 16)do if !$:~%%a!. NEQ . set/aN+=%%a&set $=!$:~%%a!
set $=!$!!$!100f0e0d0c0b0a090807060504030201
set/aN+=0x!$:~32,2!&set/aN+=0x!$:~16,1!
endlocal&If %2. neq . (set/a%2=%N%)else echo %N%
复制代码

wankoilz

这样的话，fedcba9876543210中的0都可以省了。
不过我还是觉得用4096  2048……更好，因为每个数字正好对应于二进制上的一位，理解和计算都更好一点。

wankoilz

对的，不好意思，手机太老了