[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off&setlocal enabledelayedexpansion
  2. set a=0123456789
  3. set b=
  4. set/p b=输入随机洗牌次数:
  5. :1
  6. set/a n=!random!%%10
  7. set/a b-=1
  8. if !b! equ 0 (echo 洗牌完毕&goto 2)
  9. set aa=!a:~%n%,1!
  10. set a=!aa!!a:%aa%=!
  11. echo !a!>a.txt
  12. goto 1
  13. :2
  14. for /f %%i in (a.txt) do (
  15.         set jg=%%i
  16.         set jg1=!jg:~1,4!
  17.         set jg2=!jg:~2,4!
  18.         if !jg1! gtr 999 (echo !jg1!) else (echo !jg2!
  19. ))
  20. pause&del a.txt
复制代码

TOP

  1. @echo off&setlocal enabledelayedexpansion
  2. set a=0123456789
  3. set b=10
  4. set tt=
  5. set/p tt=输入您需要的几位不重复数字:
  6. set ttt=9999999999
  7. :1
  8. set ttt=!ttt:~0,%tt%-1!
  9. set/a n=!random!%%10
  10. set/a b-=1
  11. if !b! equ 0 (echo 洗牌完毕&goto 2)
  12. set aa=!a:~%n%,1!
  13. set a=!aa!!a:%aa%=!
  14. echo !a!>a.txt
  15. goto 1
  16. :2
  17. for /f %%i in (a.txt) do (
  18. set jg=%%i
  19. set jg1=!jg:~0,%tt%!
  20. set jg2=!jg:~1,%tt%!
  21. if !jg1! gtr !ttt! (echo !jg1!) else (echo !jg2!
  22. ))
  23. pause&del a.txt
复制代码

TOP

返回列表