@echo off &setlocal enabledelayedexpansion
title CodeBy523066680
for /l %%x in (5,-1,1) do (
for /f "delims== tokens=1" %%a in ('set') do (set %%a=)
set "k=                    "
for /l %%a in (1,1,15) do (set l%%a=!k!)
for /f "delims=x" %%a in (%~snx0) do (
  if "%%a"==":%%xend" (set "yes=")
  if defined yes (set /a "n+=1" &set S!n!=%%a)
  if "%%a"==":%%x" (set /a yes=1,n=0)
)
for /l %%a in (1,1,12) do (
   for /l %%b in (0,1,15) do (
   if "!S%%a:~%%b,1!"=="*" (set x_!random!_%%a_%%b_x=x)
   )
)
for /f "delims=_ tokens=3,4" %%a in ('set x_') do (
   set /a x=%%b+1
   call set l%%a=!l%%a:~0,%%b!*%%l%%a:~!x!%%
   call :a 50
   cls
   for /l %%a in (1,1,15) do (echo,!l%%a!)
)
call :a 800
)
pause
exit
:a
for /l %%a in (1,1,%1) do (echo,>nul)
goto :eof
:5
***************
***************
***
***
***
***************
***************
            ***
            ***
            ***
***************
***************
:5end
:4
***         ***
***         ***
***         ***
***         ***
***         ***
***************
***************
            ***
            ***
            ***
            ***
            ***
:4end
:3
***************
***************
            ***
            ***
            ***
***************
***************
            ***
            ***
            ***
***************
***************
:3end
:2
***************
***************
            ***
            ***
            ***
***************
***************
***
***
***
***************
***************
:2end
:1
      ***
      ***
      ***
      ***
      ***
      ***
      ***
      ***
      ***
      ***
      ***
      ***
:1end
复制代码