Farbe in Batch

@echo off & setlocal
call :initColorPrint

call :colorPrint 0c "Das "  
call :colorPrint 0e "ist "  
call :colorPrint 09 "ein "  
call :colorPrint 0b "Test"  

call :cleanupColorPrint
exit /b

REM ####### FUNKTIONEN ##################
:colorPrint Color  Str  [/n]
setlocal
set "str=%~2"  
call :colorPrintVar %1 str %3
exit /b

:colorPrintVar  Color  StrVar  [/n]
if not defined %~2 exit /b
setlocal enableDelayedExpansion
set "str=a%DEL%!%~2:\=a%DEL%\..\%DEL%%DEL%%DEL%!"  
set "str=!str:/=a%DEL%/..\%DEL%%DEL%%DEL%!"  
set "str=!str:"=\"!"  
pushd "%temp%"  
findstr /p /A:%1 "." "!str!\..\x" nul  
if /i "%~3"=="/n" echo(  
exit /b

:initColorPrint
for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do set "DEL=%%a"  
<nul >"%temp%\x" set /p "=%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%.%DEL%"  
exit /b

:cleanupColorPrint
del "%temp%\x"  
exit /b