@echo off
SetLocal EnableExtensions
echo.
echo.
For /F "delims=:" %%a in ('findstr /n /R ":\Graf" ^< "%~fs0"') do set LineN=%%a
for /f "delims=" %%a in ('find /v "" ^< "%~fs0" ^| more +%LineN%') do call :printColor "%%a"
pause >NUL
goto :eof
:printColor
set /a n+=1
call :GetGoodRandom
call :echoColor 1%Result% "%~1" \n
exit /B
:echoColor [Color] [Text] [\n]
if not defined BS for /F "tokens=1 delims=#" %%i in ('"prompt #$H#& echo on& for %%j in (.) do rem"') do set "BS=%%i"
if not exist foo set /p .=.<nul>foo
set "regex=%~2" !
set "regex=%regex:"=\"%"
findstr /a:%1 /prc:"\." "%regex%\..\foo" nul
set /p .=%BS%%BS%%BS%%BS%%BS%%BS%%BS%%BS%%BS%<nul
if "%3" neq "" echo.
exit /b
:GetGoodRandom
call :GetRandom
if %Result%==1 goto GetGoodRandom
if %Result%==9 goto GetGoodRandom
if %Result%==0 goto GetGoodRandom
Exit /B
:GetRandom
set /a r=%random% %% 17
cmd /c exit /b %r%
set Color=%=ExitCode%
set Result=%Color:~-1%
exit /B
:Graf
+######$ :* **
:###@*::$#####+ -###$ =####* ##$ $##
:#### *### +#### ++- :- -#=#: -:
:####$ =#= :####+ +###$@#@$###+
*######* +- *####==##@###* =##########$ :@##=$####+ -## ##-
@#########@* =####- ##### -####$ +###$ +####* -##* *##-
-$########### @####- *####+ =####* @#### $####
: -=####### =####= ##### ##### +####+-*$###=
@#* +####@ #####* *####+ +####+ $####=-
-###: *####- @####+ @#### ##### *####@ @$
:#####: =###* -#####@+$#@####@==: :####= *#####$==@##:
- :=$@@@=* -=@@=: *=+* $#### *=@@$+-
###= :####
*#####-###:
+@@@=-
:#####@@@@@@######=
###- *#####@
$#- :######
-######- =###$=####* *######= +######= :@##=$####+
-######: -####+ =####- =#####$- #####: +###$ *####*
@#####* *####$ +####$ @####- ##### @#### =####
$#####+ #####- =####$ -####$ *####+ +####=-*$###=
- -- =#####= $# :##### #####- $####- ##### $####$-
##$ +##- +#####$ *##: ##### =####: -####@ *####+ *##### $@
:#*#+ #####@ :=###= ####* @###+ =####: -#####=== *#####$+=@##*
*###########= :::::::::::::::::: -=@@@$+- ::::: -+=+- *=@@@+-
$#-##
##= *##:
