@echo
off
cls
rem code by ALLyeSNO:
echo 妈妈说:
echo .
set str = 幸福就是想打飞机的时候打飞机,想被飞机打得时候被飞机打!
setlocal enabledelayedexpansion
:happy
for / l %%i in ( 0 , 1 , 27 ) do (
set / p = !str:~%%i , 1 ! < nul
for / l %%i in ( 1 , 1 , 1000 ) do echo %%i > nul )
goto :happy
pause > nul
cls
rem code by ALLyeSNO:
echo 妈妈说:
echo .
set str = 幸福就是想打飞机的时候打飞机,想被飞机打得时候被飞机打!
setlocal enabledelayedexpansion
:happy
for / l %%i in ( 0 , 1 , 27 ) do (
set / p = !str:~%%i , 1 ! < nul
for / l %%i in ( 1 , 1 , 1000 ) do echo %%i > nul )
goto :happy
pause > nul
拓展代码:
转至中国DOS联盟
@echo off setlocal enabledelayedexpansion set b=/-/ /-/ ** set 速度=1 set 退格= :b for /l %%i in (0,1,200) do call :a %%i goto :b :a set/a a=%1%%10 set/a c=%a%%%4 if %a% EQU 0 set/p=▌<nul if %c% EQU 3 (set/p=^|<nul) else (set/p=!b:~%a%,1!<nul) ping/n %速度% 127.1>nul set/p=%退格%<nul goto :eof |
下载:http://allyesno.gbaopan.com/files/6ef25e0b9ece4b65bd2750138ee11362.gbp