[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
在这里,goto 不能暂停或终止 for /l 的迭代,必须等待其完成

[ 本帖最后由 hanyeguxing 于 2010-12-17 16:53 编辑 ]
寒夜孤星:在没有说明的情况下,本人所有代码均运行在 XP SP3 下 (有问题请发贴,QQ临时会话已关闭)

TOP

  1. @echo off
  2. for /L %%i in (1,1,1000000) do (
  3.     echo %%i
  4.     call:end
  5. )
  6. :start
  7. echo 其他命令...
  8. pause&exit
  9. :end
  10. goto:start
复制代码
寒夜孤星:在没有说明的情况下,本人所有代码均运行在 XP SP3 下 (有问题请发贴,QQ临时会话已关闭)

TOP

  1. @echo off&setlocal enabledelayedexpansion
  2. for /l %%a in (2,1,2147483647) do (
  3.     set Xing=
  4.     set Han=%%a
  5.     call:han
  6.     if "!Xing!"=="*%%a" (echo %%a为质数) else echo %%a=!Xing:~1!
  7. )
  8. pause&exit
  9. :han
  10. for /l %%a in (2,1,%Han%) do call:ye %%a
  11. goto:eof
  12. :ye
  13. set/a Ye=%1,Gu=Han%%Ye
  14. if defined #%Ye% goto:xing
  15. if %Gu% neq 0 (goto:eof) else for /l %%a in (2,1,%Ye%) do call:gu %%a
  16. :gu
  17. set/a Gu=Han%%%1
  18. :xing
  19. if %Gu% neq 0 (goto:eof) else (
  20.     set/a Han=Han/Ye
  21.     set Xing=!Xing!*%Ye%
  22.     if not defined #%Ye% set #%Ye%==
  23.     goto:han
  24. )
复制代码

[ 本帖最后由 hanyeguxing 于 2010-12-21 18:57 编辑 ]
1

评分人数

寒夜孤星:在没有说明的情况下,本人所有代码均运行在 XP SP3 下 (有问题请发贴,QQ临时会话已关闭)

TOP

返回列表