:multiColor Function

@echo off & setlocal enableDelayedExpansion

rem Code for color support
for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E & echo on & for %%b in (1) do rem"') do set "DEL=%%a"
<nul set /p ".=%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%" > "'"

call:multicolor "text ".0A "in ".CF "color".5d

pause & exit
rem -----------------------------------------------------------------------------------------
:multicolor
    setlocal
        (for %%a in (%*) do ( set /a "arguments+=1"
            for /f "tokens=1,2 delims=." %%0 in ("%%~a") do if "%%1" neq "" (
                    set "T[!arguments!]=%%~0"
                    set "c[!arguments!]=%%~1"
                    for /f "tokens=*" %%2 in ("T[!arguments!]") do set "%%2=!%%2:~0,-1!"
        )))
        (for /l %%a in (1,1,%arguments%) do >cp.txt ( echo=!t[%%a]!\..\') && findstr /a:!c[%%a]! /f:cp.txt ".")
        echo.
    endlocal
goto :eof