中国DOS联盟

@echo off&color 1f&setlocal enabledelayedexpansion
set "code= abcdefghij "&set "s=┃"&set "m=0"
:begin
set /a a=%random%%%10+1,b=%random%%%10+1
set b=!code:~%b%,1!
if not defined _%a%%b% (if %m% equ 0 (set "_%a%%b%=●") else (set "_%a%%b%=○")) else (goto begin)
cls&echo ┏━━┳━━┳━━┳━━┳━━┳━━┳━━┳━━┳━━┳━━┓
for /l %%a in (1,1,10) do (
    for /l %%i in (1,1,10) do (set str=!code:~%%i,1!
        if defined _%%a!str! (call :lp %%a
           set /p=%s% !var! <nul
           ) else (
           set /p=%s%    <nul
    ))
    set /p=%s% %%a<nul&echo.
    if %%a neq 10 (
       echo ┣━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━┫
       ) else (      
       echo ┗━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┛
))
for /l %%i in (1,1,10) do set /p=   !code:~%%i,1!  <nul
echo    %a%%b%&set /a n+=1,m+=1
if %m% equ 2 set m=0
if %n% lss 100 (for /l %%i in (1,1,6000) do echo>nul&goto begin) else (pause>nul&goto :eof)
:lp
set var=!_%1%str%!

@echo off&setlocal EnableDelayedExpansion&color 1f
set "_0=○　"&set "_1=●　"
set s1=┏━━┳━━┳━━┳━━┳━━┳━━┳━━┳━━┳━━┳━━┓
set s2=┣━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━┫
set s3=┗━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┛
for /l %%i in (1,1,100) do set .%%i=%%i&set "str%%i=　　"
for /l %%i in (1,1,100) do (
    set /a rnd=!random!%%100+1
    call set tmp=%%.!rnd!%%
    set .!rnd!=!.%%i!
    set .%%i=!tmp!
)
for /f "tokens=1,2 delims=.=" %%i in ('set .') do (
  set /a w=!random!%%2
  call set str%%j=%%_!w!%%&cls
  set /a nn=0
  for /l %%a in (1 1 10) do (
    set "num%%a="
    for /l %%b in (1 1 10) do (
      set /a nn+=1
      call set num%%a=!num%%a!┃%%str!nn!%%
     )
     set num%%a=!num%%a!┃
   )
    echo !s1!
    for /l %%a in (1 1 10) do echo !num%%a!&if %%a neq 10 echo !s2!
    echo !s3!
    for /l %%a in (1 1 1200) do ver>nul
)
pause>nul