中国DOS联盟

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

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

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

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 问下斑竹能详细解释下这段您写的逐行显示文字BAT

wfy150
初级用户

积分 82
发帖 34
注册 2008-4-29
来自江西
状态离线

『楼主』: 问下斑竹能详细解释下这段您写的逐行显示文字BAT

@echo off&setlocal ENABLEDELAYEDEXPANSION
FOR /F "DELIMS=" %%A IN ('type %1') DO (CALL;:__;"%%A")
endlocal&PAUSE&goto :EOF

::显示字符子函数————————————-
:__
      SET A="%1"
      SET B=0
      if "%A%"=="" goto end
      :BEGIN
      IF NOT "!A:~%B%,1!"=="" (
            SET/P=!A:~%B%,1!<NUL
            PING 127.1 -N 1 >NUL
            SET/A B+=1
            GOTO BEGIN
      ) else (
      :end
      echo/&echo\
      )

2008-5-4 21:05