用批处理帮我修改下我写的

来源：百度知道 编辑：UC知道 时间：2024/07/02 19:03:17
@echo off
setlocal enabledelayedexpansion
color 2f
set a= 欢迎光临，火炬工作室！
for /l %%i in (1,1,30) do (
cls
echo !a:~12,%%i!
ping 127.0.0.1 -n 1 >nul
)
pause
echo.
echo.
for /f "skip=14 delims= " %%a in ('type %0') do (
set "a=%%a"
for /l %%b in (0,1,50) do (
echo !a:~1,%%a!
ping/n 127.1 >nul
echo ---------------------------------------
登高 杜埔
飞来山上天寻塔，闻说鸡鸣见日升。
不畏浮云遮望眼，自缘身在最高层。

pause >nul
主要是修改下半部分的，有什么办法让他一个字一个字的输出，就和我上面的一样。我现在运行不了下半部分。

@echo off
setlocal enabledelayedexpansion
color 2f
set a= 欢迎光临，火炬工作室！
for /l %%i in (1,1,15) do (
cls
echo !a:~0,%%i!
ping 127.0.0.1 -n 1 >nul
)
pause
cls
echo.
echo ---------------------------------------
for /f "skip=23 delims=," %%a in ('type %0') do (
set "a=%%a"
for /l %%b in (0,1,15) do (
set /p nn=!a:~%%b,1!<nul
ping -n 1 127.1 >nul
)
echo.
)
echo ---------------------------------------
pause&exit
登高 杜甫

飞来山上天寻塔，闻说鸡鸣见日升。
不畏浮云遮望眼，自缘身在最高层。