PakTC

喜欢小一点的

@echo off
set /p= <nul>#
setlocal enabledelayedexpansion
for /l %%a in (1,1,80) do (set k= !k!)
set /a a=7,b=-6

:a
set /a ee+=1
if %a% gtr -6 (set /a a-=1,x=a*a) else (set /a b+=1,x=72-b*b)
if %b% geq 6 (set /a b=-6,a=6)
set /p a=!k:~0,%x%!<nul
findstr /a:%ee%  "#*"
echo,
ping -n 1 127.1>nul
goto :a
复制代码