[文本处理] 16种颜色值 让它们随机而不冲突 大神能来精减优化一下吗(已解决)

@echo off&SetLocal EnableDelayedExpansion
set Str=0123456789abcdef
for /l %%a in (1 1 2) do (set /a n = !random! %% 16
for %%n in (!n!) do set Out=!Str:~%%n,1!)
for /f "tokens=1* delims=%Out%" %%a in ("%Str%") do (set "Sta=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 15
for %%n in (!n!) do set Oua=!Sta:~%%n,1!)
for /f "tokens=1* delims=%Oua%" %%a in ("%Sta%") do (set "Stb=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 14
for %%n in (!n!) do set Oub=!Stb:~%%n,1!)
for /f "tokens=1* delims=%Oub%" %%a in ("%Stb%") do (set "Stc=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 13
for %%n in (!n!) do set Ouc=!Stc:~%%n,1!)
for /f "tokens=1* delims=%Ouc%" %%a in ("%Stc%") do (set "Std=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 12
for %%n in (!n!) do set Oud=!Std:~%%n,1!)
for /f "tokens=1* delims=%Ouf%" %%a in ("%Std%") do (set "Ste=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 11
for %%n in (!n!) do set Oue=!Ste:~%%n,1!)
for /f "tokens=1* delims=%Oue%" %%a in ("%Ste%") do (set "Stf=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 10
for %%n in (!n!) do set Ouf=!Stf:~%%n,1!)
for /f "tokens=1* delims=%Ouf%" %%a in ("%Stf%") do (set "Stg=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 9
for %%n in (!n!) do set Oug=!Stg:~%%n,1!)
for /f "tokens=1* delims=%Oug%" %%a in ("%Stg%") do (set "Sth=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 8
for %%n in (!n!) do set Ouh=!Sth:~%%n,1!)
for /f "tokens=1* delims=%Ouh%" %%a in ("%Sth%") do (set "Sti=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 7
for %%n in (!n!) do set Oui=!Sti:~%%n,1!)
for /f "tokens=1* delims=%Oui%" %%a in ("%Sti%") do (set "Stj=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 6
for %%n in (!n!) do set Ouj=!Stj:~%%n,1!)
for /f "tokens=1* delims=%Ouj%" %%a in ("%Stj%") do (set "Stk=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 5
for %%n in (!n!) do set Ouk=!Stk:~%%n,1!)
for /f "tokens=1* delims=%Ouk%" %%a in ("%Stk%") do (set "Stl=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 4
for %%n in (!n!) do set Oul=!Stl:~%%n,1!)
for /f "tokens=1* delims=%Oul%" %%a in ("%Stl%") do (set "Stm=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 3
for %%n in (!n!) do set Oum=!Stm:~%%n,1!)
for /f "tokens=1* delims=%Oum%" %%a in ("%Stm%") do (set "Stn=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 2
for %%n in (!n!) do set Oun=!Stn:~%%n,1!)
for /f "tokens=1* delims=%Oun%" %%a in ("%Stn%") do (set "Sto=%%a%%b")
for /l %%a in (1 1 2) do (set /a n = !random! %% 1
for %%n in (!n!) do set Ouo=!Sto:~%%n,1!)
echo %Out%
echo %Oua%
echo %Oub%
echo %Ouc%
echo %Oud%
echo %Oue%
echo %Ouf%
echo %Oug%
echo %Ouh%
echo %Oui%
echo %Ouj%
echo %Ouk%
echo %Oul%
echo %Oum%
echo %Oun%
echo %Ouo%
color !Out!!Oua!
Tools\ctext {!Out!!Oua!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oub!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Ouc!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oud!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oue!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Ouf!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oug!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Ouh!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oui!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Ouj!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Ouk!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oul!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oum!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Oun!} 1.截屏到桌面{\n}
Tools\ctext {!Out!!Ouo!} 1.截屏到桌面{\n}
pause
复制代码