Draw American Flag IN Cmd


SUBMITTED BY: AlainBend

DATE: March 9, 2020, 7:42 p.m.

UPDATED: March 20, 2020, 12:08 a.m.

FORMAT: Text only

SIZE: 2.0 kB

HITS: 10043

  1. <p>@echo off<br>setlocal enabledelayedexpansion
  2. mode con cols=80 lines=25</p><p> for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
  3. set "DEL=%%a"
  4. )</p><p>for /l %%a in (1,1,5) do (
  5. for /l %%b in (1,1,6) do (
  6. call:ColorText "ÿÿÿ" "90"
  7. call:ColorText "xÿ" "9F"
  8. )
  9. for /l %%b in (1,1,30) do (
  10. call:ColorText "ÿ" "C0"
  11. )
  12. echo/
  13. for /l %%b in (1,1,6) do (
  14. call:ColorText "x" "9F"
  15. call:ColorText "ÿÿÿÿ" "90"
  16. )
  17. for /l %%b in (1,1,30) do (
  18. call:ColorText "ÿ" "F0"
  19. )
  20. echo/
  21. )
  22. for /l %%b in (1,1,3) do (
  23. for /l %%b in (1,1,60) do (
  24. call:ColorText "ÿ" "C0"
  25. )
  26. echo/
  27. for /l %%b in (1,1,60) do (
  28. call:ColorText "ÿ" "F0"
  29. )
  30. echo/
  31. )
  32. pause>nul
  33. exit/b
  34. :ColorText
  35. "%~1"
  36. findstr /v /a:%2 /R "^
  37. @echo off
  38. setlocal enabledelayedexpansion
  39. mode con cols=80 lines=25
  40. for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
  41. set "DEL=%%a"
  42. )
  43. for /l %%a in (1,1,5) do (
  44. for /l %%b in (1,1,6) do (
  45. call:ColorText "ÿÿÿ" "90"
  46. call:ColorText "xÿ" "9F"
  47. )
  48. for /l %%b in (1,1,30) do (
  49. call:ColorText "ÿ" "C0"
  50. )
  51. echo/
  52. for /l %%b in (1,1,6) do (
  53. call:ColorText "x" "9F"
  54. call:ColorText "ÿÿÿÿ" "90"
  55. )
  56. for /l %%b in (1,1,30) do (
  57. call:ColorText "ÿ" "F0"
  58. )
  59. echo/
  60. )
  61. for /l %%b in (1,1,3) do (
  62. for /l %%b in (1,1,60) do (
  63. call:ColorText "ÿ" "C0"
  64. )
  65. echo/
  66. for /l %%b in (1,1,60) do (
  67. call:ColorText "ÿ" "F0"
  68. )
  69. echo/
  70. )
  71. pause>nul
  72. exit/b
  73. :ColorText
  74. "%~1"
  75. findstr /v /a:%2 /R "^$" "%~1" nul
  76. del "%~1" > nul 2>&1
  77. exit/b
  78. ::http://www.dostips.com/forum/viewtopic.php?f=3&t=5641&hilit=Batch+circle+file
  79. quot; "%~1" nul
  80. del "%~1" > nul 2>&1
  81. exit/b
  82. ::http://www.dostips.com/forum/viewtopic.php?f=3&t=5641&hilit=Batch+circle+file</p>
  83. Copy All the Code And Save it as .bat

comments powered by Disqus