中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-09 18:01
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 批处理动画中的字符 查看 767 回复 6
楼 主 批处理动画中的字符 发表于 2008-05-24 13:21 ·  中国 江西 南昌 电信
初级用户
积分 101
发帖 39
注册 2006-11-21 22:04
19年会员
UID 71280
性别 男
状态 离线
看到一些动画中乱七八糟的字符既然显示成英文或汉字
不知道是怎么弄的知道请告诉我
如下面的2个
set c1=                  
set c2=                      
set c3=                     
set c4=                       
set c5=                          
set c6=                             
set c7=                    
显示www.verybat.cn

7-1 4-1 14-1 6-4 6-9 12-1 4-1
7-1 4-1 2-1 6-5 2-1 4-1 14-1 12-11
5-1 6-1 4-1 6-1 8-4 14-1 18-1 6-1
5-9 4-1 8-1 4-1 14-1 16-1 2-1 2-1 4-1
3-2 6-1 12-4 2-1 2-2 4-11 4-3 4-3
1-1 2-1 6-1 20-1 21-1 16-1 2-1 4-1 2-1
5-1 6-2 10-9 12-1 2-1 12-4 2-5
5-1 4-1 4-1 16-1 20-1 2-1
5-1 4-1 4-1 10-7 12-1 6-1 10-1 2-1 2-1 4-2
5-1 2-1 8-1 14-1 16-1 10-1 8-1 2-1 4-1 2-1 2-1
5-2 12-1 2-11 2-2 14-2 2-1 4-6 2-1
5-1 6-1 18-1 2-1 2-1 16-1 18-1 4-1
5-1 6-1 10-4 4-1 4-1 14-1 16-1 6-1 4-1
5-9 8-1 4-1 12-9 6-2 6-1 2-1
3-2 6-1 10-11 4-1 6-1 6-1 4-1 2-1 4-3 4-1
3-2 4-1 18-1 4-1 12-1 6-1 6-1 8-3 2-1 6-1
1-1 2-1 4-5 10-1 2-2 4-1 6-1 6-1 6-1 8-1 6-1 0-4
5-1 2-2 6-1 8-3 2-1 2-1 8-9 14-1
5-2 2-1 6-1 4-2 2-1 6-1 18-1 12-11
5-1 4-1 6-1 10-1 4-2 4-1 12-1 22-1
5-1 4-1 6-1 10-3 4-1 2-1 12-1 22-1
5-1 4-5 6-3 10-2 12-1 22-1
显示天佑中华
2 发表于 2008-05-24 17:08 ·  中国 重庆 电信
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
又见点阵动画,呵呵。
3 发表于 2008-05-24 19:13 ·  中国 江西 南昌 电信
初级用户
积分 101
发帖 39
注册 2006-11-21 22:04
19年会员
UID 71280
性别 男
状态 离线
是怎么弄的啊说下哦
怎么把汉字转成上面样的
4 发表于 2008-05-24 20:50 ·  中国 重庆 渝中区 电信
初级用户
★★
积分 198
发帖 89
注册 2007-09-06 23:22
18年会员
UID 96746
性别 男
来自 重庆
状态 离线
那个数字可以这样得到:
a.txt的内容:
       ●    ●              ●      ●●●●      ●●●●●●●●●            ●    ●
● ● ● ●●●●● ● ● ● ●●●●●●●●●●●
● ● ● ● ●●●● ● ● ●
●●●●●●●●● ● ● ● ● ● ● ● ●
●● ● ●●●● ● ●● ●●●●●●●●●●● ●●● ●●●
● ● ● ● ● ● ● ● ●
● ●● ●●●●●●●●● ● ● ●●●● ●●●●●
● ● ● ● ● ●
● ● ● ●●●●●●● ● ● ● ● ● ●●
● ● ● ● ● ● ● ● ● ● ●
●● ● ●●●●●●●●●●● ●● ●● ● ●●●●●● ●



● ● ● ● ● ● ● ●
● ● ●●●● ● ● ● ● ● ●
●●●●●●●●● ● ● ●●●●●●●●● ●● ● ●
●● ● ●●●●●●●●●●● ● ● ● ● ● ●●● ●
●● ● ● ● ● ● ● ●●● ● ●
● ● ●●●●● ● ●● ● ● ● ● ● ●●●●●
● ●● ● ●●● ● ● ●●●●●●●●● ●
●● ● ● ●● ● ● ● ●●●●●●●●●●●
● ● ● ● ●● ● ● ●
● ● ● ●●● ● ● ● ●
● ●●●●● ●●● ●● ● ●

将其转换成上述数字的代码:
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
set "str=%%i"
set flag=
for %%j in (!str!) do (set/a flag+=1&call :out ball %%j)
set "str=!str: =A!"&set "str=!str:●= !"
set flag=
for %%j in (!str!) do (set/a flag+=1&call :out space %%j)

for /l %%j in (1,1,!flag!) do set mystr=!mystr! !space%%j!-!ball%%j!
echo !mystr!&set mystr=
)
pause>nul

:out
set tmp=%2
:loop
set tmp=%tmp:~1%&set/a num+=1
if defined tmp goto loop
set %1%flag%=%num%&set num=
5 发表于 2008-05-25 00:52 ·  中国 江西 南昌 电信
初级用户
积分 101
发帖 39
注册 2006-11-21 22:04
19年会员
UID 71280
性别 男
状态 离线
我问的不怎么写代码
我是问怎么将"字" 转成那样的数字
6 发表于 2008-05-25 00:56 ·  中国 山东 淄博 联通
银牌会员
★★★
积分 1,604
发帖 646
注册 2008-04-13 23:39
18年会员
UID 115804
性别 男
状态 离线
关键是下面的数列。。。。
7-1
七个空格1个●
4-1
然后4个空格1个●
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
7 发表于 2008-05-25 13:02 ·  中国 重庆 渝中区 电信
初级用户
★★
积分 198
发帖 89
注册 2007-09-06 23:22
18年会员
UID 96746
性别 男
来自 重庆
状态 离线
我是问怎么将"字" 转成那样的数字
就是用那个代码把字转换成数字。你把“字”保存为a.txt,再运行代码就得到数字了。
论坛跳转: