- @echo off
- setlocal enabledelayedexpansion
- title 幽灵:我在批处理之家待很久了,你没发现吗?
- rem Author: if_exist / 523066680
- for /l %%a in (1,1,79) do (set spc= !spc!)
- for /l %%a in (1,1,21) do (set line%%a=%spc%)
- set /a x=1,tmpy=-10,xb=x+1,a=1
- set /a xadd=1,yadd=1,xaddadd=1
-
- :a
- if defined do[%a%] (!do[%a%]!)
- if defined do[%a%] (
- set line%cuty%=!line%cuty%:~0,%cutx%! !line%cuty%:~%cutxb%!
- )
- set line%y%=!line%y%:~0,%x%!*!line%y%:~%xb%!
- cls
- for /l %%a in (1,1,21) do (echo,!line%%a!)
- set /a i=0,x+=xadd,tmpy+=yadd,y=tmpy+10,xadd+=xaddadd,xb=x+1
- set "do[%a%]=set /a cutx=%x%,cuty=%y%,cutxb=%xb%"
- if %a% leq 9 (set /a a+=1) else (set /a a=1)
- if %xadd:-=% gtr 7 (set /a xaddadd=-xaddadd)
- if %tmpy:-=% gtr 10 (set /a yadd=-yadd)
- ping -n 1 127.0.0.1>nul
- goto :a
- pause
复制代码
|