中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [已结][求助]-如何从一文本的最后行向前读取所有行

‹ « [1] [2] »

pengfei
银牌会员

积分 1218
发帖 485
注册 2006-7-21
来自湖南.娄底
状态离线

『第 16 楼』:

Quote:

Originally posted by qwe1234567 at 2006-10-16 21:52:
如果不用随机数产生乱序数字那就这样产生固定规律的数！

qwe1234567版主此言差矣, 其实系统可供我们利用的东西很多.

@echo off

setlocal ENABLEDELAYEDEXPANSION

    set str=0123456789abcdef

:start

    set /a num+=1

    set num_=%time:~-1%

    set str_=!str:~%num_%,1!!str:~-%num_%,1!

    set var=%var%%str_%

    if %num% gtr 20 goto end

    ping 127.0 -n 1 >nul 2>nul

    goto :start

:end

    echo %var%

pause

@echo off

setlocal ENABLEDELAYEDEXPANSION

    set str=0123456789abcdef

:start

    set /a num2+=1

    set /a num1=%time:~-1% 

    set str=!str:~%num1%!!str:~0,%num1%! 

    set str=%str: =%

    set var=%var%%str:~0,1%

    if %num2% gtr 100 goto next

goto :start

:next

    echo %var%

pause

[ Last edited by pengfei on 2006-10-17 at 04:23 ]

2006-10-16 22:06