Advertisement
BAT_Player

Batch File Program Color Text #8

Feb 10th, 2018
113
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 1.20 KB | None | 0 0
  1. 1.Açın Notepad.exe
  2. 2.Aşağıdakı Kodu Notepad'a Yazın
  3. 3.Farklı Kaydedin Sonra (İstediğiniz Ad).bat Yazıb Enter Tuşuna Basın
  4. ----------------------------------------------------------------------
  5.  
  6. @echo off
  7. title Color Text
  8. msg * Coder By BAT_Player
  9. SETLOCAL EnableDelayedExpansion
  10. for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
  11.   set "DEL=%%a"
  12. )
  13.  
  14. call :ColorText a "message"
  15. echo(
  16. echo(
  17. call :ColorText c "message"
  18. echo(
  19. echo(
  20. call :ColorText f "message"
  21. echo(
  22. echo(
  23. call :ColorText e "message"
  24. echo(
  25. echo(
  26. call :ColorText d "message"
  27. echo(
  28. echo(
  29. call :ColorText b "message"
  30. echo(
  31. echo(
  32. call :ColorText 8 "message"
  33. echo(
  34. echo(
  35. call :ColorText 9 "message"
  36. echo(
  37. echo(
  38. call :ColorText 6 "message"
  39. echo(
  40. echo(
  41. call :ColorText 7 "message"
  42. echo(
  43. echo(
  44. call :ColorText 5 "message"
  45. echo(
  46. echo(
  47. call :ColorText 4 "message"
  48. echo(
  49. echo(
  50. call :ColorText 3 "message"
  51. echo(
  52. echo(
  53. call :ColorText 2 "message"
  54. echo(
  55. echo(
  56. call :ColorText 1 "message"
  57. echo(
  58. echo(
  59.  
  60. goto :Color
  61.  
  62. :ColorText
  63. echo off
  64. <nul set /p ".=%DEL%" > "%~2"
  65. findstr /v /a:%1 /R "^$" "%~2" nul
  66. del "%~2" > nul 2>&1
  67. goto :eof
  68.  
  69. :Color
  70.  
  71. pause >nul
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement