[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
当是小插曲吧。
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. mode con cols=25 lines=5
  4. title %date%
  5. set "cut="
  6. set "str=xxxxxxxx"
  7. :a
  8. set t=%time:~0,8%
  9. call :next
  10. ping -n 3 127.1>nul
  11. set "t=        "
  12. call :next
  13. goto :a
  14.    :next
  15.     for /l %%a in (0,1,7) do (set num%%a=%%a)
  16.     set /a aa=8
  17.     :aa
  18.      set /a rand=%random%%%aa,aa-=1
  19.      set /a x=num%rand%,xb=x+1
  20.      set str=!str:~0,%x%!!t:~%x%,1!!str:~%xb%!
  21.      set num%rand%=!num%aa%!
  22.      ping -n 1 127.1>nul
  23.      cls
  24.      echo,   %str%
  25.     if %aa% gtr 0 (goto :aa)
  26.    goto :eof
复制代码
1

评分人数

    • 基拉freedom: 代码虽短 但是做的很漂亮~ ~向你学习PB + 5
[url=][/url]

TOP

返回列表