标题: 如何在指定的范围内显示随机数字 [打印本页]
作者: khansky 时间: 2007-11-28 23:57 标题: 如何在指定的范围内显示随机数字
如何在指定的范围内显示随机数字，比如我想随机显示的数字为（6，7，8，9，10，11，12，14，15，16，17）为其中的一个。用批处理怎么写，还请各位高人指点。谢谢！
作者: scriptor 时间: 2007-11-29 00:17
@echo off
:l
set rn=%random:~0,1%
set rr=%random:~0,2%
if %rn% geq 6 (
if %rn% leq 9 (set n=1&echo %rn%&pause&exit /b)
)
if %rr% geq 10 (
if %rr% leq 17 (set m=1&echo %rr%&pause&exit/b)
)
if not defined m goto :l
)
pause
:l
set rn=%random:~0,1%
set rr=%random:~0,2%
if %rn% geq 6 (
if %rn% leq 9 (set n=1&echo %rn%&pause&exit /b)
)
if %rr% geq 10 (
if %rr% leq 17 (set m=1&echo %rr%&pause&exit/b)
)
if not defined m goto :l
)
pause
作者: dikex 时间: 2007-11-29 00:26
@echo off
set max=17
set min=6
set /a "a=%random%%%(%max%-%min%+1)+%min%"
echo %a%
pause
[ Last edited by dikex on 2007-11-29 at 12:30 AM ]set max=17
set min=6
set /a "a=%random%%%(%max%-%min%+1)+%min%"
echo %a%
pause
作者: zh159 时间: 2007-11-29 00:38
LS的注意，LZ的数字里面没有13，如果是n～m范围就OK，如果是指定数就不行了
需要的数字用空格分隔
@echo off
setlocal EnableDelayedExpansion
set "str=6 7 8 9 10 11 12 14 15 16 17"
set min=m
set max=0
for %%n in (%str%) do (
if %%n lss !min! set min=%%n
if %%n gtr !max! set max=%%n
)
:loop
cls
set /a n=%random%%%(%max%-%min%+1)+%min%
for %%n in (%str%) do if %n% == %%n goto end
goto loop
:end
echo %n%
pause
goto loop
setlocal EnableDelayedExpansion
set "str=6 7 8 9 10 11 12 14 15 16 17"
set min=m
set max=0
for %%n in (%str%) do (
if %%n lss !min! set min=%%n
if %%n gtr !max! set max=%%n
)
:loop
cls
set /a n=%random%%%(%max%-%min%+1)+%min%
for %%n in (%str%) do if %n% == %%n goto end
goto loop
:end
echo %n%
pause
goto loop
作者: scriptor 时间: 2007-11-29 00:45
呵呵,,我也没有仔细看~~
加一个判断就行了~~ 嘿嘿~~
再简化一下....
@echo off
:l
set rn=%random:~0,1%
set rr=%random:~0,2%
if %rn% geq 6 (
if %rn% leq 9 (echo %rn%&pause&exit /b)
)
if %rr% geq 10 (
if %rr% neq 13 ( if %rr% leq 17 (set m=1&echo %rr%&pause&exit/b) )
)
if not defined m goto :l
)
pause
:l
set rn=%random:~0,1%
set rr=%random:~0,2%
if %rn% geq 6 (
if %rn% leq 9 (echo %rn%&pause&exit /b)
)
if %rr% geq 10 (
if %rr% neq 13 ( if %rr% leq 17 (set m=1&echo %rr%&pause&exit/b) )
)
if not defined m goto :l
)
pause
作者: dikex 时间: 2007-11-29 01:29
没看清楚，看到前面自然就以为是连续的，呵呵
写了另一个利用for的tokens参数的：
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "tn=(%random%)%%(%n%)+1"
call :GET %tn%
pause
goto :EOF
:GET
for /f "usebackq tokens=%1 delims== " %%i in ('%string%') do echo %%i
goto :EOF
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "tn=(%random%)%%(%n%)+1"
call :GET %tn%
pause
goto :EOF
:GET
for /f "usebackq tokens=%1 delims== " %%i in ('%string%') do echo %%i
goto :EOF
作者: scriptor 时间: 2007-11-29 02:25
好呢~~~呵呵 ...
我只是想到了就写,哈哈~~
ps:我睡觉了~
作者: zh159 时间: 2007-11-29 02:46
| Quote: | |
|
简化：
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do set /a n+=1
set /a "n=%random%%%%n%+1"
for /f "usebackq tokens=%n% delims= " %%i in ('%string%') do echo %%i
pause
goto :EOF
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do set /a n+=1
set /a "n=%random%%%%n%+1"
for /f "usebackq tokens=%n% delims= " %%i in ('%string%') do echo %%i
pause
goto :EOF
作者: 26933062 时间: 2007-11-29 04:26
凑个热闹.
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%a in (%string%) do call set _%%random%%=%%a
for /f "tokens=2 delims==" %%a in ('set _^|sort') do set var=%%a
echo %var%
pause
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%a in (%string%) do call set _%%random%%=%%a
for /f "tokens=2 delims==" %%a in ('set _^|sort') do set var=%%a
echo %var%
pause
作者: dikex 时间: 2007-11-29 12:45
| Quote: | |
|
比较喜欢用call，这样看起来比较清楚，而且容易扩展；而%random%%%%n%这里加上两个括号也能让代码更清楚，一定程度上防止一些奇怪的错误发生:)
作者: huahua0919 时间: 2007-11-29 13:40
引用三楼:
@echo off
:l
set /p max=请输入你想要的最大值:
set /p min=请输入你想要的最小值:
set /a "a=%random%%%(%max%-%min%+1)+%min%"
echo %a%
pause >nul&goto l
作者: khansky 时间: 2007-11-29 15:22
谢谢各位兄弟的帮忙。现在运行这些脚本有以下几点看法：1）。4楼的结果虽然是对的，但要一直循环。我的目的是随机给一个变量赋值为上面数值之一，然后对该变量执行相应的操作。2）5楼兄弟的有时没有输出任何结果，6，8楼的提示The system cannot find the file ，还有一串乱码。9楼的结果都是同一个，15。
还有想问问6，8楼兄弟tn=(%random%)%%(%n%)+1，中间的2个%怎么理解。还有set "string=6 7 8 9 10 11 12 14 15 16 17"的双引号为什么不是放在6的前面尼
？usebackq 现在网上的解释比较乱。还往各位高手赐教。谢谢~~
作者: 26933062 时间: 2007-11-29 16:03
| Quote: | |
|
你说9楼的每次都是 15 ？？
你测试了没有啊？在我这里一切正常。每次都是随机数。
别人给你写了代码，你就应该好好测试，这是最起码的尊重吧？
作者: zh159 时间: 2007-11-29 16:06
| Quote: | |
|
不知道为什么，我执行后会出现：
| Quote: | |
|
将
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "tn=(%random%)%%(%n%)+1"
改为set /a "tn=(%random%)%%(%n%)+1"
for %%i in (%string%) do set /a n+=1
set /a "tn=%random% %% %n%+1"
后就正常了set /a "tn=%random% %% %n%+1"
%random%%%%n%+1 改为 %random% %% %n%+1 也能看清楚
set/? 里只说明 % 为运算符号，没有详细说明，其实是两数相除后的余数命令行用一个 % ，批处理里用2个%
再将 8 楼的改一下
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do set /a n+=1
set /a "n=%random% %% %n%+1"
for /f "tokens=%n% delims= " %%i in ("%string%") do echo %%i
pause
exit
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do set /a n+=1
set /a "n=%random% %% %n%+1"
for /f "tokens=%n% delims= " %%i in ("%string%") do echo %%i
pause
exit
作者: dikex 时间: 2007-11-29 16:16
| Quote: | |
|
我昨晚也出现过类似的情况，但是在打开了变量延迟而且string里面的数字数学多于4个的时候出现的；
现在我打开了变量延迟而且string里面的数字个数多于4个，但却不出错了……
[ Last edited by dikex on 2007-11-29 at 04:19 PM ]
作者: dikex 时间: 2007-11-29 16:32
汗，我这里出现“灵异”现象了……
下面的两个代码，第一个出错，第二个却成功了，但他们的区别只是第一个(%random%)%%(%n%)+1运算后的值赋予%tn%，而第二个则将运算后的值继续赋予%n%……
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "tn=(%random%)%%(%n%)+1"
for /f "usebackq tokens=%tn% delims= " %%i in ('%string%') do echo %%i
pause
goto :EOF
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "tn=(%random%)%%(%n%)+1"
for /f "usebackq tokens=%tn% delims= " %%i in ('%string%') do echo %%i
pause
goto :EOF
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "n=(%random%)%%(%n%)+1"
for /f "usebackq tokens=%n% delims= " %%i in ('%string%') do echo %%i
pause
goto :EOF
[ Last edited by dikex on 2007-11-29 at 04:40 PM ]set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%i in (%string%) do call set /a "n=%%n%%+1"
set /a "n=(%random%)%%(%n%)+1"
for /f "usebackq tokens=%n% delims= " %%i in ('%string%') do echo %%i
pause
goto :EOF
作者: khansky 时间: 2007-11-29 16:43
| Quote: | |
|
事实是如此！即使是变成别的数，也是连续10个左右相同的再变成别的数字。
既然提出这样的问题，就说明起码是专业的，而不是你说的“没有好好测试，不尊重之类的“我的是英文的xp。公司对系统的安全性要求比较高。
作者: dikex 时间: 2007-11-29 16:49
关于9楼的那个，我这里是测试成功的
至于楼主失败的原因，我猜想可能是那个系统里面有其他以"_"为开始的环境变量导致的，改一改看看
@echo off
set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%a in (%string%) do call set _dd_%%random%%=%%a
for /f "tokens=2 delims==" %%a in ('set _dd_^|sort') do set var=%%a
echo %var%
pause
[ Last edited by dikex on 2007-11-29 at 04:51 PM ]set "string=6 7 8 9 10 11 12 14 15 16 17"
for %%a in (%string%) do call set _dd_%%random%%=%%a
for /f "tokens=2 delims==" %%a in ('set _dd_^|sort') do set var=%%a
echo %var%
pause
作者: dikex 时间: 2007-11-29 16:58
另外关于我16楼遇到的“灵异”现象，发现set /a "tn=(%random%)%%(%n%)+1"这个语句里面被赋值的变量名称只能是一个字符的，多于一个字符也会出错（测试过，和for无关），但如果把赋值表达式两边的引号也去掉，则不会出现这个错误！
狂倒……
作者: 26933062 时间: 2007-11-29 18:20
16楼遇到的“灵异”现象好像和 usebackq 有关，不用usebackq 一切正常，用它就会提示找不到什么什么文件？还显示一些乱码，非常奇怪。
作者: scriptor 时间: 2007-11-29 18:28
| Quote: | |
|
怎么会没有结果
我这里一切正常~~
作者: terse 时间: 2007-11-29 18:51
@echo off
set /a p=%random%%%11+1
for /f "tokens=%p% delims= " %%i in ("6 7 8 9 10 11 12 14 15 16 17") do echo %%i
pause