[游戏娱乐] 批处理以彩色输出你输入的字符

基拉freedom

在代码咨询区问了问题 但还是自己解决掉了 虽然办法很拙........
这个是要求输入的 等下会做个直接输入文件的...~ ~
好久没练手了  如果觉得做得差就提出来 好让我改正
http://hi.baidu.com/fair_jm是我空间

::code by Fair_Jm@http://hi.baidu.com/fair_Jm
@echo off&setlocal EnableDelayedExpansion
title 彩色逐字输出您输入的字符 made by Fair_Jm
color F8
set /p z=输入一句话:
:begin
set /a x=%random%%%9+1
set "o=!z:~0,1!"
set o=!o:^<= !
set o=!o:^>= !
set o=!o:^.= !
set o=!o:^|= !
set o=!o:^&= !
set o=!o:^:= !
set o=!o:^\= !
set o=!o:^/= !
set o=!o:^"= !
set o=!o:t= !
if "!o!"==" " set /p= !z:~0,1!<nul&goto :next
set /p= <nul>"!z:~0,1!" 2>nul&findstr /a:F!x! .* *!z:~0,1! 2>nul&del "!z:~0,1!" 2>nul
:next
set z=!z:~1!
ping /n 1 127.1 >nul
if defined z goto :begin
pause>nul
exit
复制代码

基拉freedom

然后是输入文件的..在原基础上改很容易~ ~

::code by Fair_Jm@http://hi.baidu.com/fair_Jm
@echo off&setlocal EnableDelayedExpansion
title 彩色逐字输出您文件内的字符 made by Fair_Jm
color F8
:new
cls
set op=jm
set /p op=请将文本直接拖入：
cls
if "%op%"=="jm" echo 无文本&ping /n 2 127.1 >nul&goto new
for /f "delims=" %%i in ('findstr /n .* "%op%"') do (
    set "z=%%i"
    setlocal enabledelayedexpansion
    set z=!z:*:=!
    call :begin
    endlocal
    echo.
)
echo.&echo.
echo 显示完毕 按回车键重新开始
pause>nul
goto new
:begin
if not defined z (goto :eof)
set /a x=%random%%%9+1
set "o=!z:~0,1!"
set o=!o:^<= !
set o=!o:^>= !
set o=!o:^.= !
set o=!o:^|= !
set o=!o:^&= !
set o=!o:^:= !
set o=!o:^"= !
set o=!o:^\= !
set o=!o:^/= !
set o=!o:t= !
if "!o!"==" " set /p= !z:~0,1!<nul&goto :next
set /p= <nul>"!z:~0,1!" 2>nul&findstr /a:F!x! .* *!z:~0,1! 2>nul&del "!z:~0,1!" 2>nul
:next
set z=!z:~1!
ping /n 1 127.1 >nul
goto :begin
复制代码

[ 本帖最后由 基拉freedom 于 2009-8-23 20:02 编辑 ]

基拉freedom

特殊字符可以输出 但是没有颜色 如果不是特殊字符 就以颜色输出 在电脑上测试过了 应该没问题了吧 也许是漏了几个特殊字符 出现问题的请提供下

特殊字符以颜色输出感觉好像不太可能.....用findstr必须建立文件 但文件名绝不可能是特殊字符 所以只好把特殊字符按原来的输出了 还有t这个字母(**t)这个也一定要按原来的输出
实际情况就变成这样了 汗....:

基拉freedom

不好意思 以后用png或gif...

基拉freedom

恩
楼上的代码是如何实现的 能发下地址或看看代码吗？

基拉freedom

不知是不是我哪里没有想明白......
command /cecho !z:~0,1! 貌似不支持变量？？ 还有用的是echo 除非全部在同一行用[ 否则会换行？就不能有逐字输出的效果......
先说说想法
我再去想想

基拉freedom

还有我在cn-dos那里复制了代码 把里面的一些字母改成<或者^<均无法显示 难道这个command /cecho不支持吗？