中国DOS联盟

@echo off
set str=^-^|^/^-^|^/
set f=1
set /a i=1
cls
setlocal enabledelayedexpansion
:test
     ping /n 1 127.1>nul
     if "%f%" == "1" (
       set/p=!str:~%i%,1!<nul 
       set f=0
       if "%i%" == "6" (set/a i=0) else (set/a i+=1)
       goto :test
      ) 
     :: echo %f% &pause
     set/p=<nul 
     set f=1
     goto :test
pause>nul

@echo off
rem qwe1234567 字符动画

setlocal enabledelayedexpansion
set b=\^|/-\^|/-
set 速度=1

rem ASCII码的08就是退格特殊控制符
set 退格=


:b
for /l %%i in (0,1,200) do call :a %%i
goto :b
:a
set/a a=%1%%4
set/p=!b:~%a%,1!<nul
ping/n %速度% 127.1>nul
set/p=%退格%<nul
goto :eof