zhouyongjun

@echo off&setlocal enabledelayedexpansion
for %%i in (abdefg kmli socsd pdxy nq ABDEFG KMLI SOCSD PDXY NQ) do (
    set/a n+=1&set _!n!=%%i
)
(for /l %%a in (1,1,10) do (
    for /l %%b in (1,1,10) do (
        set/a num=!random!%%10+1
        for %%c in (_!num!) do set/p=!%%c!<nul
    )
    echo/
))>a.txt
(for /f "delims=" %%a in (a.txt) do (
    set str=%%a&set var=!str:abdefg= abdefg !&set "cut="
    for %%b in (!var!) do (
        if /i "%%b" neq "abdefg" (
            set/p=%%b<nul
        ) else (
            if defined cut call,set str=%%str:*!cut!=%%
            if "!str:~,6!" equ "ABDEFG" (set/p=bathome<nul) else (set/p=%%b<nul)
        )
        set cut=%%b
    )
    echo/
))>b.txtCOPY