| @echo off&setlocal enabledelayedexpansion | | mode con lines=3 | | set "s=锄禾日当午,汗滴禾下土。谁知盘中餐,粒粒皆辛苦。" | | for /l %%i in (1 1 40) do set "kg= !kg!" | | set "str=%s%%kg%" | | set "str= %str:~0,40%%s%" | | | | :loop | | set /a n+=1 | | echo !str:~%n%,40! | | for /l %%i in (1 1 800) do ver >nul | | cls | | if %n%==40 set /a n=0 | | goto:loopCOPY |
|