批处理脚本分配不超两次随机数时出现除零错误求助

你的脚本存在几个关键问题，直接导致除零错误和逻辑失效：

1. 嵌套变量引用语法错误：if !count_%%rand%%! lss 2无法正确读取count_前缀的计数变量，条件判断失效后会意外修改总数量变量的值为0，触发for /l循环的除零错误。
2. 无效标签跳转：else goto food中的food标签不存在，导致流程混乱，后续代码执行异常。
3. 代码执行流程失控：call :assign循环结束后，脚本会继续执行:assign标签后的代码，此时%1参数为空，会错误修改总数量变量。

修复后的完整脚本如下：

@echo off
setlocal enabledelayedexpansion
set total_vars=99
:: 初始化1-50的计数为0
for /l %%i in (1,1,50) do set "count_%%i=0"
:: 为每个变量分配随机数
for /l %%i in (1,1,%total_vars%) do call :assign %%i
:: 输出结果
for /l %%i in (1,1,%total_vars%) do echo var%%i=!var%%i!
goto :eof

:assign
:: 生成1-50的随机数
set /a rand=!random! %%50 + 1
:: 检查该随机数的使用次数是否小于2
if !count_!rand!! lss 2 (
    set "var%1=!rand!"
    set /a "count_!rand!+=1"
    goto :eof
)
:: 如果次数已满，重新生成随机数
goto :assign

修复说明： #

• 变量命名优化：将原var变量改为total_vars，避免与var1-var99的变量名冲突，防止意外修改总数量变量。
• 嵌套变量修正：使用!count_!rand!!正确读取计数变量，先解析!rand!得到随机数，再读取对应count_前缀的计数。
• 循环重试逻辑：移除无效的food标签，改为直接跳回:assign重新生成随机数，直到找到可用的数值。
• 流程控制：在call循环结束后添加goto :eof，避免执行:assign标签后的代码，防止参数为空时的错误赋值。

该脚本会为99个变量分配1-50范围内的随机数，每个数值最多出现2次（50个数值各出现2次是100次，因此会有一个数值仅出现1次），完全符合需求。

内容的提问来源于stack exchange，提问作者John Davis