[游戏娱乐] 批处理彩字输出

Rank: 7 Rank: 7 Rank: 7

帖子: 881
积分: 2103
技术: 95
捐助: 55
注册时间: 2010-5-23

1楼 跳转到 » 倒序看帖

打印

字体大小: tT

发表于 2010-7-27 18:12 | 只看该作者

[游戏娱乐] 批处理彩字输出

献词一首。（水平不高，献丑了）

::-------------Welcome to www.bathome.net---------------
@mode con cols=56 lines=12 & @title 献词一首 by Broly
@echo off&setlocal enabledelayedexpansion
set m=0
set str=2367abcdef
for /f "delims=" %%i in ('more +22 "%~nx0"') do (set "t=%%i" &call :loop)
echo\ &echo                   Welcome to www.bathome.net
pause>nul & exit
:loop
if not "!t:~%m%,1!"=="" (
set /a rnd=%random%%%11
>"!t:~%m%,1!_",set /p "=   "<nul
findstr /a:0!str:~%rnd%,1! .* "!t:~%m%,1!_*" 2>nul
ping -n 1 127.1>nul
del "!t:~%m%,1!_"
set /a m+=1
goto loop)
set m=0
echo.
goto :eof

=========分=====割=====线==========
   念奴娇·赤壁怀古  苏轼
大江东去，浪淘尽，千古风流人物。
故垒西边，人道是，三国周郎赤壁。
乱石穿空，惊涛拍岸，卷起千堆雪。
江山如画，一时多少豪杰！
遥想公瑾当年，小乔初嫁了，雄姿英发。
羽扇纶巾，谈笑间，樯橹灰飞烟灭。
故国神游，多情应笑我，早生华发。
人生如梦，一樽还酹江月。
复制代码

链接: https://pan.baidu.com/s/1TR8CjbWxmqZwjaxAnanlbw?pwd=mmm7

---学无止境---

fish

中尉

Rank: 5 Rank: 5

帖子: 96
积分: 900
技术: 0
捐助: 0
注册时间: 2010-4-2

2楼

发表于 2010-7-31 00:50 | 只看该作者

水平这么高还说不高，前辈也太谦虚了吧。。。

不过在我这里运行有点小问题，希望前辈帮忙看看

Rank: 7 Rank: 7 Rank: 7

帖子: 881
积分: 2103
技术: 95
捐助: 55
注册时间: 2010-5-23

3楼

发表于 2010-7-31 09:48 | 只看该作者

回复 2楼的帖子

首先多谢你的关注。
你直接运行批处理就可以了，不要用BatProject运行，会出错。
另外，为了避免复制时会发生一些错误，我把批处理上传了

---学无止境---

fish

中尉

Rank: 5 Rank: 5

帖子: 96
积分: 900
技术: 0
捐助: 0
注册时间: 2010-4-2

4楼

发表于 2010-7-31 12:06 | 只看该作者

哇，太感谢前辈了！

好用好用，太帅了，五彩缤纷五颜六色的，还有动态效果，简直让我怀疑前辈您是不是搞美工的，强赞一个。。。

Rank: 7 Rank: 7 Rank: 7

帖子: 881
积分: 2103
技术: 95
捐助: 55
注册时间: 2010-5-23

5楼

发表于 2010-7-31 12:58 | 只看该作者

回复 4楼的帖子

呵呵，太过奖了。
其实这些知道了原理，制作这种效果不难的

---学无止境---

raymai97

中尉

Rank: 5 Rank: 5

帖子: 268
积分: 872
技术: 19
捐助: 0
注册时间: 2010-5-30

6楼

发表于 2010-10-8 00:16 | 只看该作者

回复 5楼的帖子

请教下我原理可以吗？看不明白。

Rank: 7 Rank: 7 Rank: 7

帖子: 881
积分: 2103
技术: 95
捐助: 55
注册时间: 2010-5-23

7楼

发表于 2010-10-9 17:41 | 只看该作者

回复 6楼的帖子

C:\Windows\System32>findstr /?

/A:attr 指定有十六进位数字的颜色属性。请见 "color /?"

[ 本帖最后由 broly 于 2010-10-9 17:42 编辑 ]

---学无止境---

Batcher

管理员

Rank: 12

帖子: 14932
积分: 46139
技术: 857
捐助: 745
注册时间: 2008-6-9

8楼

发表于 2010-10-9 19:44 | 只看该作者

回复 6楼的帖子

批处理在CMD里显示彩色文字
http://bbs.bathome.net/thread-1852-1-1.html

批处理单行输出彩色字符
http://bbs.bathome.net/thread-1853-1-1.html

批处理单行显示多种颜色字符
http://bbs.bathome.net/thread-1854-1-1.html

批处理显示彩色字符的原理及其中退格符的作用
http://bbs.bathome.net/viewthread.php?tid=1331#pid11864

我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

shujia

列兵

Rank: 1

帖子: 6
积分: 27
技术: 0
捐助: 0
注册时间: 2010-10-24

9楼

发表于 2010-10-24 12:02 | 只看该作者

原帖由 Batcher 于 2010-10-9 19:44 发表
批处理在CMD里显示彩色文字
http://bbs.bathome.net/thread-1852-1-1.html

批处理单行输出彩色字符
http://bbs.bathome.net/thread-1853-1-1.html

批处理单行显示多种颜色字符
http://bbs.bathome.net/thre ...

lz真是热心人

Rank: 7 Rank: 7 Rank: 7

帖子: 1107
积分: 4218
技术: 37
捐助: 0
注册时间: 2010-6-8

10楼

发表于 2010-10-26 13:35 | 只看该作者

“set /p "= "<nul”有些不理解，这里面退格符的作用是什么啊？

Rank: 7 Rank: 7 Rank: 7

帖子: 881
积分: 2103
技术: 95
捐助: 55
注册时间: 2010-5-23

11楼

发表于 2010-10-26 22:23 | 只看该作者

回复 10楼的帖子

批处理显示彩色字符的原理及其中退格符的作用
http://bbs.bathome.net/viewthread.php?tid=1331#pid11864

---学无止境---

Rank: 7 Rank: 7 Rank: 7

帖子: 1107
积分: 4218
技术: 37
捐助: 0
注册时间: 2010-6-8

12楼

发表于 2010-10-26 22:54 | 只看该作者

这个看过了，但还是不能理解，能不能说一下这里它的用途啊，我仅仅明白像这样的

set /p=234567 <nul
echo wc
复制代码

但这样的理解太过局限了，无法应用到实战啊（最近在网吧上网，连@ECHO OFF都不好使了，所以无法实验，请谅解）

Rank: 7 Rank: 7 Rank: 7

帖子: 1107
积分: 4218
技术: 37
捐助: 0
注册时间: 2010-6-8

13楼

发表于 2010-11-4 09:51 | 只看该作者

经过了几天的艰熬，终于明白了一些了

Rank: 7 Rank: 7 Rank: 7

帖子: 881
积分: 2103
技术: 95
捐助: 55
注册时间: 2010-5-23

14楼

发表于 2010-11-4 18:21 | 只看该作者

回复 13楼的帖子

其实原理就在那里，呵呵

---学无止境---

Rank: 7 Rank: 7 Rank: 7

帖子: 1107
积分: 4218
技术: 37
捐助: 0
注册时间: 2010-6-8

15楼

发表于 2010-11-4 18:28 | 只看该作者

回复 14楼的帖子

只不过我有点笨了点，一开始理解的太狭隘了，经过反复的实验，问题出现在这吧

set /a rnd=%random%%%11
>"!t:~%m%,1!_",set /p "=   "<nul
复制代码

这里的">“前一定要在行首，但不知道为什么，我做了以下实验

@echo off&setlocal enabledelayedexpansion
cd.
>"1_",set /p "=  "<nul
findstr /a:2a .* "1_*"
pause
复制代码

结果是一样的，虽然时间漫长了点，但可算是能应用退格符了。呵呵

[ 本帖最后由 wc726842270 于 2010-11-5 23:02 编辑 ]