中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-12 16:47

共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行

DOS批处理 & 脚本技术（批处理室） » ［求助］谁能帮我做个随机预测彩票号码的批处理？

可打印版本　963 / 7

第1楼　gcdj	发表于 2010-03-05 21:08
初级用户　发帖 57　积分 64
［求助］谁能帮我做个随机预测彩票号码的批处理？谁能帮我做个用bat随机预测彩票的文件？要求四种类类型。第一种随机 0～9 的数字要求随机显示三位数字第二种随机 0～9 数字要求随机显示四位数字第三种随机 1～31 数字要求随机显示五位数字第四种随机1～43 数字要求随机显示六位数字要求有个菜单选择1就出现3位数字，出现数字后还可以在选1，2，3，4，5，0并出现新的随机数字选择2就出现4位数字，出现数字后还可以在选1，2，3，4，5，0并出现新的随机数字选择3就出现5位数字，出现数字后还可以在选1，2，3，4，5，0并出现新的随机数字选择4就出现6位数字，出现数字后还可以在选1，2，3，4，5，0并出现新的随机数字选择5就出现1到4的全部数字，出现数字后还可以在选1，2，3，4，5，0并出现新的随机数字选择0退出。 [ Last edited by gcdj on 2010-3-5 at 21:18 ]

第2楼　Hanyeguxing	发表于 2010-03-05 21:27
银牌会员　发帖 897　积分 1,039　来自在地狱中仰望天堂
使用set /p和if 制作菜单，使用set /a%和RANDOM%求余组合随机数字

第3楼　000000000000000	发表于 2010-03-05 22:51
初级用户　发帖 42　积分 49
@echo off setlocal enabledelayedexpansion :input echo 1. 0-9, 随机三位 echo 2. 0-9, 随机四位 echo 3. 1-31, 随机五位 echo 4. 1-43, 随机六位 echo 5. 显示前四项结果 echo 0. 退出 echo; set /p i=请选择: cls if "!i!"=="0" exit if "!i!"=="1" call :n 3 10 0 if "!i!"=="2" call :n 4 10 0 if "!i!"=="3" call :n 5 31 1 if "!i!"=="4" call :n 6 43 1 if not "!i!"=="5" goto input call :n 3 10 0 call :n 4 10 0 call :n 5 31 1 call :n 6 43 1 goto input :n for /l %%a in (1 1 %1) do ( set /a n=!random! %% %2 + %3 set /p =!n! <nul ) echo; echo ======================= if %i% neq 5 goto input 直接回车, 是重复上次的选择. [ Last edited by 000000000000000 on 2010-3-5 at 23:06 ]

第4楼　HAT	发表于 2010-03-05 23:47
版主　发帖 5,017　积分 9,023
参考：福利彩票双色球自动选号器之批处理彩色版 http://bbs.bathome.net/thread-3109-1-1.html

第5楼　gcdj	发表于 2010-03-06 07:49
初级用户　发帖 57　积分 64
Originally posted by 000000000000000 at 2010-3-5 22:51: @echo off setlocal enabledelayedexpansion :input echo 1. 0-9, 随机三位 echo 2. 0-9, 随机四位 echo 3. 1-31, 随机五位 echo 4. 1-43, 随机六位 echo 5. 显示前四项结果 ... 谢谢您的代码，我试验了，不错！就是有一个问题，随机出现的数字有重复的。之前我忽略了这一点。

第6楼　gcdj	发表于 2010-03-06 08:12
初级用户　发帖 57　积分 64
Originally posted by HAT at 2010-3-5 23:47: 参考：福利彩票双色球自动选号器之批处理彩色版 http://bbs.bathome.net/thread-3109-1-1.html 这个也不错!收下啦!谢谢!

第7楼　000000000000000	发表于 2010-03-06 11:21
初级用户　发帖 42　积分 49
@echo off setlocal enabledelayedexpansion :input echo 1. 0-9, 随机三位 echo 2. 0-9, 随机四位 echo 3. 1-31, 随机五位 echo 4. 1-43, 随机六位 echo 5. 显示前四项结果 echo 0. 退出 echo; set /p i=请选择: cls if "!i!"=="0" exit if "!i!"=="1" call :n 3 10 0 if "!i!"=="2" call :n 4 10 0 if "!i!"=="3" call :n 5 31 1 if "!i!"=="4" call :n 6 43 1 if not "!i!"=="5" goto input call :n 3 10 0 call :n 4 10 0 call :n 5 31 1 call :n 6 43 1 goto input :n setlocal set loop=%1 :loop set /a n=%random% %% %2 + %3 if defined %n% goto loop set %n%=d set /p =%n% <nul set /a loop-=1 if %loop% neq 0 goto loop endlocal echo; echo ======================= if %i% neq 5 goto input

第8楼　gcdj	发表于 2010-03-09 07:50
初级用户　发帖 57　积分 64
Originally posted by 000000000000000 at 2010-3-6 11:21: @echo off setlocal enabledelayedexpansion :input echo 1. 0-9, 随机三位 echo 2. 0-9, 随机四位 echo 3. 1-31, 随机五位 echo 4. 1-43, 随机六位 echo 5. 显示前四项结果 ... 问题解决了!谢谢~~

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023