[文本处理] [分享]批处理逐字显示彩色字符串

Batcher

【问题描述】
批处理如何实现文字逐个显示，而且每个字有不同的颜色？

idwma

尝试让ps客串一下

echo bbs.bathome.net|powershell "$input -split ''|foreach{write-host $_ -fo $(Get-Random 15) -ba $(Get-Random 15) -no;sleep 1}"
复制代码

Batcher

【解决方案】

@echo off
setlocal enabledelayedexpansion
set "str=bbs.bathome.net"

for /f %%i in ('echo prompt $E ^| cmd') do (
    set "KeyESC=%%i"
)
set "Color0=%KeyESC%[38;2;255;0;0m"
set "Color1=%KeyESC%[38;2;0;255;0m"
set "Color2=%KeyESC%[38;2;255;255;0m"
set "n=0"
set "m=0"

:Output
set /a n+=1
set /a m=n%%3
call set /p =%%Color!m!%%!str:~,1!<nul
set "str=!str:~1!"
ping -n 2 127.1 >nul
if defined str (
    goto :Output
)
echo,%KeyESC%[0m
pause
复制代码

注：不适用于Win10以下的系统