中国DOS联盟

C++
the powder toy ： jacob1
https://github.com/ThePowderToy/The-Powder-Toy

http://www.dooccn.com/cpp/

游戏构建了解与知识的联系，数学知识？
中文汉字的构建考虑
外延人概念环境的游戏副本延伸
例如事情演化的形象化，人机表达为历史预测的参考，与辦花叶的双单差不多

输入汉字和英文识别的元素，与鼠标键盘点击的选项，软件机器人下载的别人元素实验单位模块。

[ Last edited by zzz19760225 on 2017-12-1 at 08:49 ]

windows下面使用awk、sed、grep、gnuplot
http://blog.sciencenet.cn/home.php?mod=space&uid=858128&do=blog&quickforward=1&id=994394

[ Last edited by zzz19760225 on 2017-12-7 at 02:02 ]

WIN环境，
1 汉字批处理bat计算器。
算.bat
----------------------------------------
:计算器
pause
set /a var=1+1
pause
set /a var=2-1
pause
set /a var=2*2
pause
set /a var=9/3
pause
goto 计算器 (有个小问题，为什么不进行计算呢？)
---------------------------------------

---------------------------------
:1
set a=12
set b=12
pause
set /a c=a+b
pause
set /a d=a-b
pause
set /a e=a*b
pause
set /a f=a/b
pause
goto 1
---------------------------------

同一个文件中的顺序命令执行的信息提供，搜索自身外提供信息的文件

2 用批处理做象棋和其他规则的棋牌游戏，用户自制定义规则的游戏。
以兵棋推演的规则事务用户控制的逐步或全程自我逻辑进行，用户将事务变化的内容补充输入。
人生棋局游戏（对应人生信息）。
象棋不同棋子的文件名称和文件内容，文件内容包含特定的数学公式，就是走步规则。有限定义范围，与单位范围组合延伸的棋局，1~10与1~9，象棋棋盘应该在1~10，0~9范围。
1个棋子，名称和定义步子计算，其周围有没有可延伸的点位，如棋局回合内外和边界，有自身棋子或对手棋子，没有限制的可行点位。
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30
在假设的30个字符位置，其中位数为1的字符位置为变量，其他的都是常量不变，变量为棋子移动位置。
现有棋子的总量=上一回合棋子总量-选择方案里规则增减的棋子增加减少数字（悔棋和正反顺序复盘）

3 *-/\--进度条的时钟。在字符命令模式下的时间串联存在，以及天连续的记忆文本，天进程。
100年，10年，1年，1旬，1天；
24小时，15分钟刻，一分钟，秒，微秒。动态的模型考虑。

4 搜索网页翻译信息，整理信息内容为文本，对文本内容做成批处理外文翻译的资料库。


5 标准安装文件夹，文件，文件内信息，恢复初始状态，设定一个文件夹文件文件信息的方案编制，恢复到方案；自动进行文件分类归类，你要找的在这里哦，一个使用习惯或几个习惯可以选择。

6 对赌游戏，模式和积分保存。
算卦游戏。
针对两难问题的双赢设置和双输设置选择，丰富双输赢的程度，延伸到平常，减弱输赢影响，减弱结果为一切的循环习惯，增加源头起源缘起，过程实在自在，加上结果的自私私有和无私公有等等选择。
按钮制作，
按钮选择系统时间，输送到一个文本；time > t.txt
对系统时间进行单双处理，选择最后一位数字进行条件设置，奇数偶数。
获取TIME，删除非数字字符，截取最后一个数字，对数字进行逻辑转化为01，01对应输赢字符输出。

单双结果进行奖罚选择，
输出奖罚选择结果，
显示奖罚结果对应的积分，
单机多帐号积分累积。

7 年计划，季计划，月计划，旬计划，周计划，天计划的计划群循环，成功学的电脑化。收购或兴趣比较制作出的计划模版，，游戏比赛普及模版，好模版的提醒。主要是实现人的天信息连接积累，减少信息损失损耗。

8 两个批处理对话的可能，假设一方为用户的需求范围，主要是新手小白，另一个批处理综合程序对问题进行结构分析和选择回应。电脑的正确和错误信息类似，命令帮助注释，字典显示。

9 批处理的CHM字典和档案文件库，人生信息（主要是通用部分，大部分人可能会怎么选择，对个体的可能参考作用）

Linux，汉字字符文本等等
10 转化为其他操作系统的软件层面实现

电脑平台，人事物心身，群体等等
11 转化为其他硬件层面实现 ！！！

12 27字母拼音汉字的组合矩阵铺开来列表
单位点阵的铺开列表

13 拼音和汉字的翻译器，显示翻译出来的内容列表，寻找拼音准确化的可能。

14 摩斯密码滴滴声调控
莫斯1和0到GB18030中文
循环连续发声
将定义的两个字符作为指定发声规则，在数字信息结构中寻找两字符发出声音，可以写一段两字符组合，也可以针对字典编写。
定义01两字符（通常以01为内容）
编写字符文（一般由01组成）
读取
听效果
录制播放
通过声音反向转化为大概的字符文
1个滴和2个滴对应01

随时手动选择01输入对应声音

做26个字母对应的bat，第27个总的选择输入，听拼音莫斯密码的声音。
用GB18030中文字符的16进制数字，做成滴答声，输入汉字，就发出对应的音符串。

24小时滴答报时
每15分钟一刻种报一次声音^g，第一刻到第四刻的24小时听显，或者12时辰8刻。

15 内存硬盘存储等输入二进制十六进制，再取出的单字点阵字符显示和应用探索，需要用点阵字库。
存储存取实现；一个命令行显示一个单字或多个单字，或句子；定义字的定字和积累的点阵字体。

16 可以在CMD下建立一个批处理的，命令行文本编辑工具。

17 用批处理做一个屏幕提示文字的电脑工作闹钟。

18 字典文章对应序号问答器。



功能状态实现：

1 输入状态
等待输入，进行计算的内容，由里面的定义加减+ - 等组成引导。
1加1，自动将加字前后的数字进行+处理，整行的加减乘除进行先后顺序排序，再加上括号，方程式子母开方次方啥的，非常无限和小数点等浮点计算（极限数字范围）。

2 等待状态 pause
3 循环状态 :1 goto 1
4 或者选择
5 信息存入 help > 5.txt help >> 5.txt
6 信息读取 type 5.txt (?)
7 选择退出，继续
8 形成仓位的变量形式 A=X

[ Last edited by zzz19760225 on 2018-1-4 at 19:05 ]

重复执行循环
:loop
go to loop
是goto
:loop
goto loop

1.bat
--------------------
:1
dir
pause
help
pause
2.bat
goto 1
--------------------

2.bat
--------------------
:2
dir
pause
help
pause
1.bat
goto 2
--------------------
循环执行的关闭？

10.bat
-------------------
1.bat
2.bat
3.bat
4.bat
5.bat
6.bat
7.bat
8.bat
9.bat
0.bat
---------------------

@echo off
pause
set /a var=1+1
echo 1+1=
echo %var%
pause
set /a var=2-1
echo 2-1=
echo %var%
pause
set /a var=2*2
echo 2*2=
echo %var%
pause
set /a var=9/3
echo 9/3=
echo %var%
pause
goto 计算器

如何依次执行一个个常用规则文件，并输送结果为互动。1给2结果，2给3结果，，，。
1用户输入界面
2操作过程
3文本信息存取库

120年内某种时间和条件规则循环的命令文件。
提醒节假日

do %0

把时间输出到s.txt的循环
----------------------------------
:s
time >>s.txt <nul
pause
goto s
----------------------------------
!:1 goto 1 循环打开文件之间，最好加个pause暂停，否则容易搞死机器，就算调出进程窗口，也会被打开的文件挡住，不好操作。常用pause，预防麻烦以管用。在虚拟机中除外。

[ Last edited by zzz19760225 on 2017-12-17 at 14:49 ]

始终用pause间隔命令，有个回合。
pause
dir
pause
help
pause
dir > x.txt
pause
help > y.txt
pause


-----------------------------------------------------------
@echo off
:1
set /p Code=Please scan Code:
set /p output=%code%>>my.txt<nul
goto 1
----------------------------------------------------------


set /p 多出2個字符，求解 ：Lying
http://www.cn-dos.net/forum/viewthread.php?tid=52524&sid=USPLKx

[ Last edited by zzz19760225 on 2017-12-9 at 11:12 ]

set /a var=x+y
set /a var=x-y
set /a var=x*y
set /a var=x/y

x加y
x减y
x乘y
x除y

x+y=
x-y=
x*y=
x/y=

算.bat 作为计算中心，复制其他计算文件内容（其他文件没必要bat，作为bat可以考虑并行计算）
加.bat
减.bat
乘.bat
除.bat

用户选择 ---> 用户输入 ---> x=? y=? ---> x+y=z ---> z=?

输入内容，收集到一个文本作为信息仓库，等待取用。
--------------------------------------------
:1
@echo off
set /p Code=写:
echo %code% >>my.txt
goto 1
--------------------------------------------

[ Last edited by zzz19760225 on 2017-12-11 at 17:47 ]

批处理莫斯密码发声调控
----------------------------
:1
^g
pause
goto 1
---------------------------

---------------------------
:1
^g
pause
echo g
goto 2
:2
^g^g
pause
goto 3
:3
echo g
echo g
goto 4
:4
^g^g^g
pause
goto 1
-----------------------------
输入等待：
z
if z=1 >>z.txt do %x
if z=0 >>z.txt do %y
x=^6
y=无

或者输入选择
选1，选0

1.bat
----------------------------
:1
pause
start 2.bat
pause
start 2.bat
start 2.bat
pause
pause
goto 1
---------------------------

2.bat
------------------
^g & exit
------------------

-------------------------------------------v
:1
for /l %%i in (1 1 2) do (
ping -n 2 localhost >nul
call echo %%time%%
)
^g
for /l %%i in (1 1 2) do (
ping -n 2 localhost >nul
call echo %%time%%
)
^g^g
for /l %%i in (1 1 2) do (
ping -n 2 localhost >nul
call echo %%time%%
)
^g^g^g
goto 1

-------------------------------------------^
type 1.txt (1.txt 为^g)
1111 ^g^g ^g^g ^g^g ^g^g
0000 ^g ^g ^g ^g

两个滴之外的为标点符号分割音。
0=* 1=. 隔离=， 3 文章句号=。 4 (防止数字冲突空格隔离，段落隔离，文章结束句号)
* * * * / . . . . / * . * . / . * . * / * * . . / . . * * / * * * . / . . . * / . * * * / * . . . / 。
约定俗成和墨守陈规的数学矩阵间距，1~10的诗句断句，四字，五字，不足位数的空白，用三个滴代替。

批处理能做摩斯代码转换吗？ :DOS2BAT
http://www.cn-dos.net/forum/viewthread.php?tid=52224&fpage=1&highlight=%E6%91%A9%E6%96%AF
【挑战】批处理实现摩尔斯码加解密 :batman
http://bbs.bathome.net/thread-6467-1-2.html

(^g需要在命令行中输入ctrl+g产生，换成文本就是一个小黑点，一个文本1.txt，命令行输入echo ^g > 1.txt ，然后打开1.txt ，复制那个黑点，间隔修改为2，听起来有效果)

0000 0111 7 07 BEL ␇ 响铃

523066680关于时钟的批处理

见一个名字叫^g.bat的文件。（！不行 ？）

一个音，调节-n后面的数字，变化时间间隔。
3.bat
--------
^g
-----------------------------------
:1
type 3.bat
ping -n 2 localhost >nul
goto 1
-----------------------------------

两个按键，一个是执行1次，一个是执行2次，每个后面跟一个时间空档的调节。
用start抛出声音

输入1为一个单位，输入2为2个单位，需要不加上回车键
-----------------------------------
:x
set /p a=
if %a%==1 goto 1
if %a%==2 goto 2
goto end
:1
echo 1
^g
goto end
:2
echo 2
^g^g
:end
goto x
------------------------------------

加上@echo off，就从两个音转为一个音。
直接
--------
^g
exit
-------
放再多音还是只有一个。

-----------------------------------
@echo off
:1
^g
ping -n 2 localhost >nul
goto 1
-----------------------------------

[ Last edited by zzz19760225 on 2017-12-26 at 22:31 ]

1 一小时一个提示弹窗，并显示几点
显示，直接显示系统时间，或用专门文本显示
若系统时间等于8：00，则弹出一个提示符窗口。
if time =x8 start & echo x8 & pause
x=x1;x2;x3;x4;x5;x6;x7;x8;x9;x10;x11;x12
x1=1:00
x2=2:00
------------------------------------------------------------------------------------------
刻15分
半小时30分
1小时60分
1时辰120分

读取系统时间
规则计划表
规则计划表中的变量文字单位，作息表，日程表需要显示提示的内容
计划的循环周期节奏范围，百年，十年，年，季，月，周，天，辰，时，半，刻，分


-------------------------------------------------------------------------------------------

huahua0919：

@echo off
for /l %%i in (1 1 20) do (
ping -n 2 localhost >nul
call echo %%time%%
)

sea1112：

@echo off
:s
title %date:~0,10% %time%&goto s

如何在bat执行过程中 动态显示系统时间 ：rs369007
http://www.cn-dos.net/forum/viewthread.php?tid=44741&fpage=1&highlight=%E6%98%BE%E7%A4%BA%E7%B3%BB%E7%BB%9F%E6%97%B6%E9%97%B4


-------------------------------------------------------------------------------------------------------
@echo off
title 动态时钟
mode con cols=20 lines=8 & color 1f
echo.
echo 珍惜时间
echo.
echo %date%
echo %time:~0,-3%
ping -n 2 127.0.0.1 > nul
cls
%0

百度经验：批处理命令 如何用批处理命令做动态时钟 ： princerat
https://jingyan.baidu.com/article/73c3ce28edf592e50343d9e4.html
-------------------------------------------------------------------------------------------------------
453625978：

hello
start "" "c:\client.exe"
connect
ping 127.0 /n 60>nul
goto hello
rem /n后面可以设置时间，以上保存为bat

ffihy：

你的问题不太清楚不好给你做，那就告诉你方法你自己做吧。
1 在win7下有一个命令是timeout
TIMEOUT timeout
描述:
这个工具接受超时参数，等候一段指定的时间(秒)或等按任意键。它还接受
一个参数，忽视按键。
参数列表:
/T timeout 指定等候的秒数。有效范围从 -1 到 99999 秒。
/NOBREAK 忽略按键并等待指定的时间。
/? 显示此帮助消息。
注意: 超时值 -1 表示无限期地等待按键。
示例:
TIMEOUT /?
TIMEOUT /T 10
TIMEOUT /T 300 /NOBREAK
TIMEOUT /T -1
2 通用的就是ping命令了
ping 127.1 -n 60 >nul
上面那句就是ping自己60次 ping自己一次是一秒钟 60次就是一分钟
在写p的时候只要循环运行的代码中加入这一句就有延迟效果

百度知道：如何做写一个批处理文件，能每隔一定的时间自动运行同样的命令 ：new12345671
https://zhidao.baidu.com/question/206203396.html?fr=exp_relate
---------------------------------------------------------------------------------------------------------

@echo off
for /l %%i in (1 1 1) do (
ping -n 2 localhost >nul
call echo %%time%% >> 1.txt
)

[ Last edited by zzz19760225 on 2017-12-17 at 15:09 ]

文章字典问答显示批处理

1文章字典文本
千字文和新华字典，或者大百科全书

千字文.txt
qianziwen.txt
qzw.txt

2问的文字范围文本



3批处理的问种类


自动回复的邮件规则代表
一个字典文字搜索 ?

[ Last edited by zzz19760225 on 2018-1-4 at 20:04 ]

dosemu下循环bat批处理文件如何退出？ ctrl+c (进入yes or no 的询问，按y就可以了)
dosemu下不断弹出start新窗口会怎么样呢？

[ Last edited by zzz19760225 on 2018-1-18 at 20:31 ]

1

1

523066680：
『第 27 楼』: 个人写的记事工具

CODE:
@echo off
::::::::::::::::::::::::::::::::::::::::::::::::::
:: 临时记事,code by 523066680@cn-dos.net
::
:: 参数: add 记事内容 添加记事内容到记事列表
:: 参数: del 编号1 编号2 .... 删除指定编号的记事
:: 参数为空 直接读取记事文本
::::::::::::::::::::::::::::::::::::::::::::::::::
setlocal enabledelayedexpansion
set notebook=notebook.x
set arg_del=del
set arg_add=add
set arg_=type

if not exist "%notebook%" (
echo %notebook% 不存在，将建立
type nul>>notebook.x
exit /b
)

if not defined arg_%1 (
echo 指令 %1 不存在
exit /b
) else (
if "%1"=="" (goto :func_)
)

:read_it
::如果参数不为空就来到这里，增加项目编号和删除项目，都要先读取文本信息
::text format: $number $date $note , range of number :
set /a note_n=0
for /f "tokens=1,2,*" %%a in ('type %notebook%') do (
set note_info_#%%a=%%b %%c
set /a note_n+=1
)
::然后才跳转到功能块
goto :func_%1


:func_
type %notebook%
exit /b

:func_del
set /a x=-1
if "%2"=="" (echo arg2 = NULL &exit /b)
if not defined note_info_#%2 (echo no this item. &exit /b)
::假设删除一个以上项目，参数以空格的方式隔开，以总参数为字符串，用于判断
for /f "tokens=1,*" %%a in ("%*") do (set note_items=%%b)
::像10这样的，删除的是0,单纯替换0以后也会变化，后面判断将进行删除，所以是危险的，增加判断因素
set note_items=#%note_items: =#%#
echo,>%notebook%
for /f "tokens=2,* delims==#" %%a in ('set note_info_#') do (
if "!note_items:#%%a#=!"=="!note_items!" (
set /a x+=1
set xnum= !x!
set xnum=!xnum:~-2!
echo !xnum! %%b>>%notebook%
) else (
echo 删除项 - %%a %%b
)
)
echo %notebook% 重新排列 , 现状 :
type %notebook%
exit /b
:func_add
if "%2"=="" (echo 附加信息为空 &exit /b)
set xnum= %note_n%
set xnum=!xnum:~-2!
set strnow=%*
::::cut string - "add "
set strnow=%strnow:~4%
(echo %xnum% %date:~0,10% %strnow%)>>%notebook%
echo %notebook% 现状 :
type %notebook%
exit /b
测试：

Quote:
c:\test>note add 这是个测试项
notebook.x 现状 :

0 2010-06-08 快递代收货款未到
1 2010-06-08 物料未清点
2 2010-06-09 制作一份供应商地址电话信息表
3 2010-06-09 这是个测试项

c:\test>note del 1 2
删除项 - 1 2010-06-08 物料未清点
删除项 - 2 2010-06-09 制作一份供应商地址电话信息表
notebook.x 重新排列 , 现状 :

0 2010-06-08 快递代收货款未到
1 2010-06-09 这是个测试项

c:\test>

http://www.cn-dos.net/forum/viewthread.php?tid=46146&fpage=0&highlight=&page=2

[ Last edited by zzz19760225 on 2017-12-26 at 13:38 ]

26933062:

@echo off&mode con: cols=100 lines=30
echo.&color 1f&title 天佑中华
set var=abcdef
set /p= <nul>●
setlocal enabledelayedexpansion
for /f "skip=22 delims=" %%a in ('type "%~0"') do (
set /a m+=1
call :loop %%a
echo.
if !m! equ 11 echo.&echo.&echo.
)
pause>nul&exit
:loop
if "%1"=="" goto :eof
set /a w=%random%%%5+1
set h=!var:~%w%,1!
for /f "tokens=1,2 delims=-" %%a in ("%~1") do (
for /l %%l in (1 1 %%a) do set /p= <nul
for /l %%l in (1 1 %%b) do findstr /a:%h% . ●*
)
shift
goto loop
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

--------------------------------------------------------------------------------------------------------
eddf：
怎样用点阵列数字样本显示当前的系统时间，请教高手解答，用批处理实现。以下是点阵列数字样本的批处理文本。

@echo off
cls
echo.
rem 根据黄金分割比，此程序的每个数字的宽乘以高为10×16个点阵列。
color 0E
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo. ████
echo. ████
echo. ████
echo. ████
echo.
echo.
echo.
echo. ████
echo. ████
echo. ████
echo. ████
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██████████
echo. ██████████
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██
echo. ███
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ██
echo. ████
echo. ████
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo. ██████████
echo. ██████████
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██ ██
echo. ██████████
echo. ██████████
echo.
echo.
echo.
echo.
pause

批处理日历、时钟3.0版（2010-05-02更新） ：zcydez
http://www.bathome.net/thread-7077-1-1.html

[ Last edited by zzz19760225 on 2017-12-17 at 14:18 ]

http://www.cn-dos.net/forum/search.php?searchid=382218&orderby=lastpost&ascdesc=desc&searchsubmit=yes&sid=1zvpF9


bat-zw：

@echo off&color 9f&mode con cols=90 lines=15&setlocal EnableDelayedExpansion
:begin
set tu=★★★★★★★★★★★★★★★■■■■■■■■■■■■■■■
for /l %%a in (1,1,30) do (
call :delay %%a
)
cls&echo.&echo 原始图案为：%tu%
echo.&echo 注意前面有15个五角星后面有15个方块,等下记得数一下哦！
echo.&echo 为了方便重复练习没有设置退出,要退出请直接关闭窗口。&ping -n 4 127.1 >nul
:choice
cls&echo.&set /p select=请选择(默认回车为1)? (1.从前往后截取　2.从后向前截取)
if "%select%"=="" goto choice1
if "%select%"=="1" goto choice1
if "%select%"=="2" goto choice3
if not "%select%"=="1" goto p
if not "%select%"=="2" goto p
:choice1
cls&echo.&set /p var1=请输入从前面第几位开始截取(请输入0~29内的数字,默认回车为1):
if "%var1%"=="" set var1=1
if %var1% gtr 29 goto p1
:choice2
cls&echo.&set /p var2=请输入往后截取几位(请输入1~30内的数字,默认回车为1):
if "%var2%"=="" set var2=1
if %var2% gtr 30 goto p2
if %var2% lss 1 goto p2
cls&echo.&echo 通过你的输入生成字符截取命令为：%%tu:~%var1%,%var2%%%
echo.&echo 从第%var1%位向后截取%var2%位后的图案为：
echo.&echo !tu:~%var1%,%var2%!&pause
goto begin
:choice3
cls&echo.&set /p var1=请输入从后向前截取几位(请输入1~30内的数字,默认回车为30):
if "%var1%"=="" set var1=30
if %var1% gtr 30 goto p3
if %var1% lss 1 goto p3
:choice4
cls&echo.&set /p var2=请输入丢弃后面几位(请输入0~29内并小于前面输入的数字,默认回车为1):
if "%var2%"=="" set var2=1
if %var2% gtr %var1% goto p4
if %var2% gtr 29 goto p4
cls&echo.&echo 通过你的输入生成字符截取命令为：%%tu:~-%var1%,-%var2%%%
echo.&echo 从后面向前截取%var1%位并丢弃后面%var2%位后的图案为：
echo.&echo !tu:~-%var1%,-%var2%!&pause
goto begin
:p
cls&echo.&echo 数字输入无效，请重新输入!&ping -n 2 127.1 >nul&cls&goto choice
:p1
cls&echo.&echo 数字输入无效，请重新输入!&ping -n 2 127.1 >nul&cls&goto choice1
:p2
cls&echo.&echo 数字输入无效，请重新输入!&ping -n 2 127.1 >nul&cls&goto choice2
:p3
cls&echo.&echo 数字输入无效，请重新输入!&ping -n 2 127.1 >nul&cls&goto choice3
:p4
cls&echo.&echo 数字输入无效，请重新输入!&ping -n 2 127.1 >nul&cls&goto choice4
:delay
cls&echo.&echo 原始图案为：!tu:~0,%1!&ping -n 1 127.1 >nul&cls
goto :eof

[ Last edited by zzz19760225 on 2017-12-6 at 02:45 ]