RootOfTheNull

Colormsg Original Script

Apr 14th, 2014
772
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. @echo off
  2. setlocal EnableDelayedExpansion
  3. for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
  4.   set "DEL=%%a"
  5. )
  6.  
  7. rem Prepare a file "X" with only one dot
  8. <nul > X set /p ".=."
  9.  
  10. call :color 1a "a"
  11. call :color 1b "b"
  12. call :color 1c "^!<>&| %%%%"*?"
  13. exit /b
  14.  
  15. :color
  16. set "param=^%~2" !
  17. set "param=!param:"=\"!"
  18. findstr /p /A:%1 "." "!param!\..\X" nul
  19. <nul set /p ".=%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%"
  20. exit /b
RAW Paste Data