中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 大家来完成这个游戏(红白中国象棋)
作者:
标题: 大家来完成这个游戏(红白中国象棋) 上一主题 | 下一主题
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『楼 主』:  大家来完成这个游戏(红白中国象棋)

1 读盘时间30秒过长

2 最好能人机对弈

  希望大家贴出改进代码!!

[ Last edited by ZJHJ on 2008-10-2 at 12:02 ]

2008-9-17 09:49
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 2 楼』:  

@echo off
color 00 &mode con: cols=80 lines=80&echo.
set c=车
set m=马
set x=象
set s=仕
set k=将
set p=炮
set b=兵

set t=┬
set t1=┠
set t2=┨
set t3=┷
set t4=┯
set t5=┴
set t6=╠
set t7=╣
set u=┗
set u1=┛
set u2=┏
set u3=┓
set y=┼
set y2=╬
set r=※
set r*=﹡
set q1=──
set q2=━━

set h10=%c%
set h20=%m%
set h30=%x%
set h40=%s%
set h50=%k%
set h60=%s%
set h70=%x%
set h80=%m%
set h90=%c%

set h11=%c%
set h21=%m%
set h31=%x%
set h41=%s%
set h51=%k%
set h61=%s%
set h71=%x%
set h81=%m%
set h91=%c%

set h12=┠
set h13=┠
set h14=%b%
set h15=┠
set h16=┠
set h17=%b%
set h18=┠
set h19=┠

set h22=┼
set h23=%p%
set h24=┼
set h25=┬
set h26=┴
set h27=┼
set h28=%p%
set h29=┼

set h32=┼
set h33=┼
set h34=%b%
set h35=┬
set h36=┴
set h37=%b%
set h38=┼
set h39=┼

set h42=┼
set h43=┼
set h44=┼
set h45=┬
set h46=┴
set h47=┼
set h48=┼
set h49=┼

set h52=※
set h53=┼
set h54=%b%
set h55=┬
set h56=┴
set h57=%b%
set h58=┼
set h59=﹡

set h62=┼
set h63=┼
set h64=┼
set h65=┬
set h66=┴
set h67=┼
set h68=┼
set h69=┼

set h72=┼
set h73=┼
set h74=%b%
set h75=┬
set h76=┴
set h77=%b%
set h78=┼
set h79=┼

set h82=┼
set h83=%p%
set h84=┼
set h85=┬
set h86=┴
set h87=┼
set h88=%p%
set h89=┼

set h92=┨
set h93=┨
set h94=%b%
set h95=┨
set h96=┨
set h97=%b%
set h98=┨
set h99=┨

call:kh 1
echo               娱乐开心 中国象棋 制作wang wei QQ251485609 by 080916
echo.
echo         1     2     3     4     5     6     7     8     9
echo.
call:JV 0f "    0" 0
call:JV 0f "  %h10%" 0
call:JV 0f "━━" 0
call:JV 0f "%h20%" 0
call:JV 0f "━━" 0
call:JV 0f "%h30%" 0
call:JV 0f "━━" 0
call:JV 0f "%h40%" 0
call:JV 0f "━━" 0
call:JV 0f "%h50%" 0
call:JV 0f "━━" 0
call:JV 0f "%h60%" 0
call:JV 0f "━━" 0
call:JV 0f "%h70%" 0
call:JV 0f "━━" 0
call:JV 0f "%h80%" 0
call:JV 0f "━━" 0
call:JV 0f "%h90%" 0
call:JV 0f "    0" 0

call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │＼  │  ／│    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │  ＼│／  │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    9" 0
call:JV 0f "  %h19%" 0
call:JV 0f "──" 0
call:JV 0f "%h29%" 0
call:JV 0f "──" 0
call:JV 0f "%h39%" 0
call:JV 0f "──" 0
call:JV 0f "%h49%" 0
call:JV 0f "──" 0
call:JV 0f "%h59%" 0
call:JV 0f "──" 0
call:JV 0f "%h69%" 0
call:JV 0f "──" 0
call:JV 0f "%h79%" 0
call:JV 0f "──" 0
call:JV 0f "%h89%" 0
call:JV 0f "──" 0
call:JV 0f "%h99%" 0
call:JV 0f "    9" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │  ／│＼  │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │／  │  ＼│    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    8" 0
call:JV 0f "  %h18%" 0
call:JV 0f "──" 0
call:JV 0f "%h28%" 0
call:JV 0f "──" 0
call:JV 0f "%h38%" 0
call:JV 0f "──" 0
call:JV 0f "%h48%" 0
call:JV 0f "──" 0
call:JV 0f "%h58%" 0
call:JV 0f "──" 0
call:JV 0f "%h68%" 0
call:JV 0f "──" 0
call:JV 0f "%h78%" 0
call:JV 0f "──" 0
call:JV 0f "%h88%" 0
call:JV 0f "──" 0
call:JV 0f "%h98%" 0
call:JV 0f "    8" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    7" 0
call:JV 0f "  %h17%" 0
call:JV 0f "──" 0
call:JV 0f "%h27%" 0
call:JV 0f "──" 0
call:JV 0f "%h37%" 0
call:JV 0f "──" 0
call:JV 0f "%h47%" 0
call:JV 0f "──" 0
call:JV 0f "%h57%" 0
call:JV 0f "──" 0
call:JV 0f "%h67%" 0
call:JV 0f "──" 0
call:JV 0f "%h77%" 0
call:JV 0f "──" 0
call:JV 0f "%h87%" 0
call:JV 0f "──" 0
call:JV 0f "%h97%" 0
call:JV 0f "    7" 0

call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    6" 0
call:JV 0f "  %h16%" 0
call:JV 0f "──" 0
call:JV 0f "%h26%" 0
call:JV 0f "──" 0
call:JV 0f "%h36%" 0
call:JV 0f "──" 0
call:JV 0f "%h46%" 0
call:JV 0f "──" 0
call:JV 0f "%h56%" 0
call:JV 0f "──" 0
call:JV 0f "%h66%" 0
call:JV 0f "──" 0
call:JV 0f "%h76%" 0
call:JV 0f "──" 0
call:JV 0f "%h86%" 0
call:JV 0f "──" 0
call:JV 0f "%h96%" 0
call:JV 0f "    6" 0
call:JV 0100 0 1
echo        ┃　　　楚　　　　河　　　　　　　　　　　　　　┃
echo        ┃　　　　　　　　　　　　　　汉　　　　界　　　┃

call:JV 0f "    5" 0
call:JV 0f "  %h15%" 0
call:JV 0f "──" 0
call:JV 0f "%h25%" 0
call:JV 0f "──" 0
call:JV 0f "%h35%" 0
call:JV 0f "──" 0
call:JV 0f "%h45%" 0
call:JV 0f "──" 0
call:JV 0f "%h55%" 0
call:JV 0f "──" 0
call:JV 0f "%h65%" 0
call:JV 0f "──" 0
call:JV 0f "%h75%" 0
call:JV 0f "──" 0
call:JV 0f "%h85%" 0
call:JV 0f "──" 0
call:JV 0f "%h95%" 0
call:JV 0f "    5" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    4" 0
call:JV 0c "  %h14%" 0
call:JV 0f "──" 0
call:JV 0f "%h24%" 0
call:JV 0f "──" 0
call:JV 0c "%h34%" 0
call:JV 0f "──" 0
call:JV 0f "%h44%" 0
call:JV 0f "──" 0
call:JV 0c "%h54%" 0
call:JV 0f "──" 0
call:JV 0f "%h64%" 0
call:JV 0f "──" 0
call:JV 0c "%h74%" 0
call:JV 0f "──" 0
call:JV 0f "%h84%" 0
call:JV 0f "──" 0
call:JV 0c "%h94%" 0
call:JV 0f "    4" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │    │    │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    3" 0
call:JV 0f "  %h13%" 0
call:JV 0f "──" 0
call:JV 0c "%h23%" 0
call:JV 0f "──" 0
call:JV 0f "%h33%" 0
call:JV 0f "──" 0
call:JV 0f "%h43%" 0
call:JV 0f "──" 0
call:JV 0f "%h53%" 0
call:JV 0f "──" 0
call:JV 0f "%h63%" 0
call:JV 0f "──" 0
call:JV 0f "%h73%" 0
call:JV 0f "──" 0
call:JV 0c "%h83%" 0
call:JV 0f "──" 0
call:JV 0f "%h93%" 0
call:JV 0f "    3" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │＼  │  ／│    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │  ＼│／  │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "    2" 0
call:JV 0f "  %h12%" 0
call:JV 0f "──" 0
call:JV 0f "%h22%" 0
call:JV 0f "──" 0
call:JV 0f "%h32%" 0
call:JV 0f "──" 0
call:JV 0f "%h42%" 0
call:JV 0f "──" 0
call:JV 0f "%h52%" 0
call:JV 0f "──" 0
call:JV 0f "%h62%" 0
call:JV 0f "──" 0
call:JV 0f "%h72%" 0
call:JV 0f "──" 0
call:JV 0f "%h82%" 0
call:JV 0f "──" 0
call:JV 0f "%h92%" 0
call:JV 0f "    2" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │  ／│＼  │    │    │    ┃" 0
call:JV 0100 0 1
call:JV 0f "       ┃    │    │    │／  │  ＼│    │    │    ┃" 0
call:JV 0100 0 1

call:JV 0f "    1" 0
call:JV 0c "  %h11%" 0
call:JV 0f "━━" 0
call:JV 0c "%h21%" 0
call:JV 0f "━━" 0
call:JV 0c "%h31%" 0
call:JV 0f "━━" 0
call:JV 0c "%h41%" 0
call:JV 0f "━━" 0
call:JV 0c "%h51%" 0
call:JV 0f "━━" 0
call:JV 0c "%h61%" 0
call:JV 0f "━━" 0
call:JV 0c "%h71%" 0
call:JV 0f "━━" 0
call:JV 0c "%h81%" 0
call:JV 0f "━━" 0
call:JV 0c "%h91%" 0
call:JV 0f "    1" 0
call:JV 0100 0 1
echo.
echo         1     2     3     4     5     6     7     8     9
echo.
set /p fsy=     请输入:


goto :eof
:JV
if %3 neq 1 (set/p=<nul>%2) else echo.>%2
findstr /a:%1 .* "%~2*"
del "%~2"
goto :eof
:kh
for /l %%a in (1 1 %1)do echo.
goto :eof

我只能完成人与人对弈，正在编辑中。

[ Last edited by ZJHJ on 2008-9-17 at 10:02 AM ]

2008-9-17 09:53
查看资料  发短消息 网志   编辑帖子  回复  引用回复
aspirer
初级用户





积分 72
发帖 35
注册 2006-11-13
状态 离线
『第 3 楼』:  

太棒了！
人机的我想即使能弄出来，也是太弱智的吧。



Novell 迷http://novell.me
2008-9-17 10:13
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 4 楼』:  

修改了一下，只提高了4秒钟
@echo off

color 00 &mode con: cols=80 lines=80&echo.
set c=车
set m=马
set x=象
set s=仕
set k=将
set p=炮
set b=兵

set t=┬
set t1=┠
set t2=┨
set t3=┷
set t4=┯
set t5=┴
set t6=╠
set t7=╣
set u=┗
set u1=┛
set u2=┏
set u3=┓
set y=┼
set y2=╬
set r=※
set r*=﹡
set q1=──
set q2=━━

set h10=%c%
set h20=%m%
set h30=%x%
set h40=%s%
set h50=%k%
set h60=%s%
set h70=%x%
set h80=%m%
set h90=%c%

set h11=%c%
set h21=%m%
set h31=%x%
set h41=%s%
set h51=%k%
set h61=%s%
set h71=%x%
set h81=%m%
set h91=%c%

set h12=┠
set h13=┠
set h14=%b%
set h15=┠
set h16=┠
set h17=%b%
set h18=┠
set h19=┠

set h22=┼
set h23=%p%
set h24=┼
set h25=┬
set h26=┴
set h27=┼
set h28=%p%
set h29=┼

set h32=┼
set h33=┼
set h34=%b%
set h35=┬
set h36=┴
set h37=%b%
set h38=┼
set h39=┼

set h42=┼
set h43=┼
set h44=┼
set h45=┬
set h46=┴
set h47=┼
set h48=┼
set h49=┼

set h52=※
set h53=┼
set h54=%b%
set h55=┬
set h56=┴
set h57=%b%
set h58=┼
set h59=﹡

set h62=┼
set h63=┼
set h64=┼
set h65=┬
set h66=┴
set h67=┼
set h68=┼
set h69=┼

set h72=┼
set h73=┼
set h74=%b%
set h75=┬
set h76=┴
set h77=%b%
set h78=┼
set h79=┼

set h82=┼
set h83=%p%
set h84=┼
set h85=┬
set h86=┴
set h87=┼
set h88=%p%
set h89=┼

set h92=┨
set h93=┨
set h94=%b%
set h95=┨
set h96=┨
set h97=%b%
set h98=┨
set h99=┨

call:kh 1
@echo %time%
echo               娱乐开心 中国象棋 制作wang wei QQ251485609 by 080916
echo.
echo         1     2     3     4     5     6     7     8     9
echo.
call:JV 0f "    0" 0
call:JV 0f "  %h10%" 0
call:JV 0f "━━" 0
call:JV 0f "%h20%" 0
call:JV 0f "━━" 0
call:JV 0f "%h30%" 0
call:JV 0f "━━" 0
call:JV 0f "%h40%" 0
call:JV 0f "━━" 0
call:JV 0f "%h50%" 0
call:JV 0f "━━" 0
call:JV 0f "%h60%" 0
call:JV 0f "━━" 0
call:JV 0f "%h70%" 0
call:JV 0f "━━" 0
call:JV 0f "%h80%" 0
call:JV 0f "━━" 0
call:JV 0f "%h90%" 0
call:JV 0f "    0" 0

call:JV 0100 0 1
@echo        ┃    │    │    │＼  │  ／│    │    │    ┃
@echo        ┃    │    │    │  ＼│／  │    │    │    ┃

call:JV 0f "    9" 0
call:JV 0f "  %h19%" 0
call:JV 0f "──" 0
call:JV 0f "%h29%" 0
call:JV 0f "──" 0
call:JV 0f "%h39%" 0
call:JV 0f "──" 0
call:JV 0f "%h49%" 0
call:JV 0f "──" 0
call:JV 0f "%h59%" 0
call:JV 0f "──" 0
call:JV 0f "%h69%" 0
call:JV 0f "──" 0
call:JV 0f "%h79%" 0
call:JV 0f "──" 0
call:JV 0f "%h89%" 0
call:JV 0f "──" 0
call:JV 0f "%h99%" 0
call:JV 0f "    9" 0
call:JV 0100 0 1
@echo        ┃    │    │    │  ／│＼  │    │    │    ┃
@echo        ┃    │    │    │／  │  ＼│    │    │    ┃
call:JV 0f "    8" 0
call:JV 0f "  %h18%" 0
call:JV 0f "──" 0
call:JV 0f "%h28%" 0
call:JV 0f "──" 0
call:JV 0f "%h38%" 0
call:JV 0f "──" 0
call:JV 0f "%h48%" 0
call:JV 0f "──" 0
call:JV 0f "%h58%" 0
call:JV 0f "──" 0
call:JV 0f "%h68%" 0
call:JV 0f "──" 0
call:JV 0f "%h78%" 0
call:JV 0f "──" 0
call:JV 0f "%h88%" 0
call:JV 0f "──" 0
call:JV 0f "%h98%" 0
call:JV 0f "    8" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    7" 0
call:JV 0f "  %h17%" 0
call:JV 0f "──" 0
call:JV 0f "%h27%" 0
call:JV 0f "──" 0
call:JV 0f "%h37%" 0
call:JV 0f "──" 0
call:JV 0f "%h47%" 0
call:JV 0f "──" 0
call:JV 0f "%h57%" 0
call:JV 0f "──" 0
call:JV 0f "%h67%" 0
call:JV 0f "──" 0
call:JV 0f "%h77%" 0
call:JV 0f "──" 0
call:JV 0f "%h87%" 0
call:JV 0f "──" 0
call:JV 0f "%h97%" 0
call:JV 0f "    7" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    6" 0
call:JV 0f "  %h16%" 0
call:JV 0f "──" 0
call:JV 0f "%h26%" 0
call:JV 0f "──" 0
call:JV 0f "%h36%" 0
call:JV 0f "──" 0
call:JV 0f "%h46%" 0
call:JV 0f "──" 0
call:JV 0f "%h56%" 0
call:JV 0f "──" 0
call:JV 0f "%h66%" 0
call:JV 0f "──" 0
call:JV 0f "%h76%" 0
call:JV 0f "──" 0
call:JV 0f "%h86%" 0
call:JV 0f "──" 0
call:JV 0f "%h96%" 0
call:JV 0f "    6" 0
call:JV 0100 0 1
echo        ┃　　　楚　　　　河　　　　　　　　　　　　　　┃
echo        ┃　　　　　　　　　　　　　　汉　　　　界　　　┃
call:JV 0f "    5" 0
call:JV 0f "  %h15%" 0
call:JV 0f "──" 0
call:JV 0f "%h25%" 0
call:JV 0f "──" 0
call:JV 0f "%h35%" 0
call:JV 0f "──" 0
call:JV 0f "%h45%" 0
call:JV 0f "──" 0
call:JV 0f "%h55%" 0
call:JV 0f "──" 0
call:JV 0f "%h65%" 0
call:JV 0f "──" 0
call:JV 0f "%h75%" 0
call:JV 0f "──" 0
call:JV 0f "%h85%" 0
call:JV 0f "──" 0
call:JV 0f "%h95%" 0
call:JV 0f "    5" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    4" 0
call:JV 0c "  %h14%" 0
call:JV 0f "──" 0
call:JV 0f "%h24%" 0
call:JV 0f "──" 0
call:JV 0c "%h34%" 0
call:JV 0f "──" 0
call:JV 0f "%h44%" 0
call:JV 0f "──" 0
call:JV 0c "%h54%" 0
call:JV 0f "──" 0
call:JV 0f "%h64%" 0
call:JV 0f "──" 0
call:JV 0c "%h74%" 0
call:JV 0f "──" 0
call:JV 0f "%h84%" 0
call:JV 0f "──" 0
call:JV 0c "%h94%" 0
call:JV 0f "    4" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    3" 0
call:JV 0f "  %h13%" 0
call:JV 0f "──" 0
call:JV 0c "%h23%" 0
call:JV 0f "──" 0
call:JV 0f "%h33%" 0
call:JV 0f "──" 0
call:JV 0f "%h43%" 0
call:JV 0f "──" 0
call:JV 0f "%h53%" 0
call:JV 0f "──" 0
call:JV 0f "%h63%" 0
call:JV 0f "──" 0
call:JV 0f "%h73%" 0
call:JV 0f "──" 0
call:JV 0c "%h83%" 0
call:JV 0f "──" 0
call:JV 0f "%h93%" 0
call:JV 0f "    3" 0
call:JV 0100 0 1
@echo        ┃    │    │    │＼  │  ／│    │    │    ┃
@echo        ┃    │    │    │  ＼│／  │    │    │    ┃
call:JV 0f "    2" 0
call:JV 0f "  %h12%" 0
call:JV 0f "──" 0
call:JV 0f "%h22%" 0
call:JV 0f "──" 0
call:JV 0f "%h32%" 0
call:JV 0f "──" 0
call:JV 0f "%h42%" 0
call:JV 0f "──" 0
call:JV 0f "%h52%" 0
call:JV 0f "──" 0
call:JV 0f "%h62%" 0
call:JV 0f "──" 0
call:JV 0f "%h72%" 0
call:JV 0f "──" 0
call:JV 0f "%h82%" 0
call:JV 0f "──" 0
call:JV 0f "%h92%" 0
call:JV 0f "    2" 0
call:JV 0100 0 1
@echo        ┃    │    │    │  ／│＼  │    │    │    ┃
@echo        ┃    │    │    │／  │  ＼│    │    │    ┃
call:JV 0f "    1" 0
call:JV 0c "  %h11%" 0
call:JV 0f "━━" 0
call:JV 0c "%h21%" 0
call:JV 0f "━━" 0
call:JV 0c "%h31%" 0
call:JV 0f "━━" 0
call:JV 0c "%h41%" 0
call:JV 0f "━━" 0
call:JV 0c "%h51%" 0
call:JV 0f "━━" 0
call:JV 0c "%h61%" 0
call:JV 0f "━━" 0
call:JV 0c "%h71%" 0
call:JV 0f "━━" 0
call:JV 0c "%h81%" 0
call:JV 0f "━━" 0
call:JV 0c "%h91%" 0
call:JV 0f "    1" 0
call:JV 0100 0 1
echo.
echo         1     2     3     4     5     6     7     8     9
echo.
@echo %time%
set /p fsy=     请输入:


goto :eof
:JV
if %3 neq 1 (set/p=<nul>%2) else echo.>%2
findstr /a:%1 .* "%~2*"
del "%~2"
goto :eof
:kh
for /l %%a in (1 1 %1)do echo.
goto :eof

2008-9-17 12:59
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 5 楼』:  

终于完成了，只有基本功能。
请大师解决一下读盘时间过长问题！
中国象棋.bat
@echo off
color 00 &mode con: cols=80 lines=80
set c=车
set m=马
set x=象
set s=仕
set k=将
set p=炮
set b=兵

set t=┬
set t1=┠
set t2=┨
set t3=┷
set t4=┯
set t5=┴
set t6=╠
set t7=╣
set u=┗
set u1=┛
set u2=┏
set u3=┓
set y=┼
set y2=╬
set r=※
set r*=﹡
set q1=──
set q2=━━

set h10=%c%
set h20=%m%
set h30=%x%
set h40=%s%
set h50=%k%
set h60=%s%
set h70=%x%
set h80=%m%
set h90=%c%

set h11=%c%
set h21=%m%
set h31=%x%
set h41=%s%
set h51=%k%
set h61=%s%
set h71=%x%
set h81=%m%
set h91=%c%

set h12=┠
set h13=┠
set h14=%b%
set h15=┠
set h16=┠
set h17=%b%
set h18=┠
set h19=┠

set h22=┼
set h23=%p%
set h24=┼
set h25=┬
set h26=┴
set h27=┼
set h28=%p%
set h29=┼

set h32=┼
set h33=┼
set h34=%b%
set h35=┬
set h36=┴
set h37=%b%
set h38=┼
set h39=┼

set h42=┼
set h43=┼
set h44=┼
set h45=┬
set h46=┴
set h47=┼
set h48=┼
set h49=┼

set h52=※
set h53=┼
set h54=%b%
set h55=┬
set h56=┴
set h57=%b%
set h58=┼
set h59=﹡

set h62=┼
set h63=┼
set h64=┼
set h65=┬
set h66=┴
set h67=┼
set h68=┼
set h69=┼

set h72=┼
set h73=┼
set h74=%b%
set h75=┬
set h76=┴
set h77=%b%
set h78=┼
set h79=┼

set h82=┼
set h83=%p%
set h84=┼
set h85=┬
set h86=┴
set h87=┼
set h88=%p%
set h89=┼

set h92=┨
set h93=┨
set h94=%b%
set h95=┨
set h96=┨
set h97=%b%
set h98=┨
set h99=┨
call:kh 1
@echo %time%
echo               娱乐开心 中国象棋 制作wang wei QQ251485609 by 080916
echo.
echo         1     2     3     4     5     6     7     8     9
echo.
call:JV 0f "    0" 0
call:JV 0f "  %h10%" 0
call:JV 0f "━━" 0
call:JV 0f "%h20%" 0
call:JV 0f "━━" 0
call:JV 0f "%h30%" 0
call:JV 0f "━━" 0
call:JV 0f "%h40%" 0
call:JV 0f "━━" 0
call:JV 0f "%h50%" 0
call:JV 0f "━━" 0
call:JV 0f "%h60%" 0
call:JV 0f "━━" 0
call:JV 0f "%h70%" 0
call:JV 0f "━━" 0
call:JV 0f "%h80%" 0
call:JV 0f "━━" 0
call:JV 0f "%h90%" 0
call:JV 0f "    0" 0
call:JV 0100 0 1
@echo        ┃    │    │    │＼  │  ／│    │    │    ┃
@echo        ┃    │    │    │  ＼│／  │    │    │    ┃
call:JV 0f "    9" 0
call:JV 0f "  %h19%" 0
call:JV 0f "──" 0
call:JV 0f "%h29%" 0
call:JV 0f "──" 0
call:JV 0f "%h39%" 0
call:JV 0f "──" 0
call:JV 0f "%h49%" 0
call:JV 0f "──" 0
call:JV 0f "%h59%" 0
call:JV 0f "──" 0
call:JV 0f "%h69%" 0
call:JV 0f "──" 0
call:JV 0f "%h79%" 0
call:JV 0f "──" 0
call:JV 0f "%h89%" 0
call:JV 0f "──" 0
call:JV 0f "%h99%" 0
call:JV 0f "    9" 0
call:JV 0100 0 1
@echo        ┃    │    │    │  ／│＼  │    │    │    ┃
@echo        ┃    │    │    │／  │  ＼│    │    │    ┃
call:JV 0f "    8" 0
call:JV 0f "  %h18%" 0
call:JV 0f "──" 0
call:JV 0f "%h28%" 0
call:JV 0f "──" 0
call:JV 0f "%h38%" 0
call:JV 0f "──" 0
call:JV 0f "%h48%" 0
call:JV 0f "──" 0
call:JV 0f "%h58%" 0
call:JV 0f "──" 0
call:JV 0f "%h68%" 0
call:JV 0f "──" 0
call:JV 0f "%h78%" 0
call:JV 0f "──" 0
call:JV 0f "%h88%" 0
call:JV 0f "──" 0
call:JV 0f "%h98%" 0
call:JV 0f "    8" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    7" 0
call:JV 0f "  %h17%" 0
call:JV 0f "──" 0
call:JV 0f "%h27%" 0
call:JV 0f "──" 0
call:JV 0f "%h37%" 0
call:JV 0f "──" 0
call:JV 0f "%h47%" 0
call:JV 0f "──" 0
call:JV 0f "%h57%" 0
call:JV 0f "──" 0
call:JV 0f "%h67%" 0
call:JV 0f "──" 0
call:JV 0f "%h77%" 0
call:JV 0f "──" 0
call:JV 0f "%h87%" 0
call:JV 0f "──" 0
call:JV 0f "%h97%" 0
call:JV 0f "    7" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    6" 0
call:JV 0f "  %h16%" 0
call:JV 0f "──" 0
call:JV 0f "%h26%" 0
call:JV 0f "──" 0
call:JV 0f "%h36%" 0
call:JV 0f "──" 0
call:JV 0f "%h46%" 0
call:JV 0f "──" 0
call:JV 0f "%h56%" 0
call:JV 0f "──" 0
call:JV 0f "%h66%" 0
call:JV 0f "──" 0
call:JV 0f "%h76%" 0
call:JV 0f "──" 0
call:JV 0f "%h86%" 0
call:JV 0f "──" 0
call:JV 0f "%h96%" 0
call:JV 0f "    6" 0
call:JV 0100 0 1
echo        ┃　　　楚　　　　河　　　　　　　　　　　　　　┃
echo        ┃　　　　　　　　　　　　　　汉　　　　界　　　┃

call:JV 0f "    5" 0
call:JV 0f "  %h15%" 0
call:JV 0f "──" 0
call:JV 0f "%h25%" 0
call:JV 0f "──" 0
call:JV 0f "%h35%" 0
call:JV 0f "──" 0
call:JV 0f "%h45%" 0
call:JV 0f "──" 0
call:JV 0f "%h55%" 0
call:JV 0f "──" 0
call:JV 0f "%h65%" 0
call:JV 0f "──" 0
call:JV 0f "%h75%" 0
call:JV 0f "──" 0
call:JV 0f "%h85%" 0
call:JV 0f "──" 0
call:JV 0f "%h95%" 0
call:JV 0f "    5" 0
call:JV 0100 0 1
echo        ┃    │    │    │    │    │    │    │    ┃
echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    4" 0
call:JV 0c "  %h14%" 0
call:JV 0f "──" 0
call:JV 0f "%h24%" 0
call:JV 0f "──" 0
call:JV 0c "%h34%" 0
call:JV 0f "──" 0
call:JV 0f "%h44%" 0
call:JV 0f "──" 0
call:JV 0c "%h54%" 0
call:JV 0f "──" 0
call:JV 0f "%h64%" 0
call:JV 0f "──" 0
call:JV 0c "%h74%" 0
call:JV 0f "──" 0
call:JV 0f "%h84%" 0
call:JV 0f "──" 0
call:JV 0c "%h94%" 0
call:JV 0f "    4" 0
call:JV 0100 0 1
@echo        ┃    │    │    │    │    │    │    │    ┃
@echo        ┃    │    │    │    │    │    │    │    ┃
call:JV 0f "    3" 0
call:JV 0f "  %h13%" 0
call:JV 0f "──" 0
call:JV 0c "%h23%" 0
call:JV 0f "──" 0
call:JV 0f "%h33%" 0
call:JV 0f "──" 0
call:JV 0f "%h43%" 0
call:JV 0f "──" 0
call:JV 0f "%h53%" 0
call:JV 0f "──" 0
call:JV 0f "%h63%" 0
call:JV 0f "──" 0
call:JV 0f "%h73%" 0
call:JV 0f "──" 0
call:JV 0c "%h83%" 0
call:JV 0f "──" 0
call:JV 0f "%h93%" 0
call:JV 0f "    3" 0
call:JV 0100 0 1
@echo        ┃    │    │    │＼  │  ／│    │    │    ┃
@echo        ┃    │    │    │  ＼│／  │    │    │    ┃
call:JV 0f "    2" 0
call:JV 0f "  %h12%" 0
call:JV 0f "──" 0
call:JV 0f "%h22%" 0
call:JV 0f "──" 0
call:JV 0f "%h32%" 0
call:JV 0f "──" 0
call:JV 0f "%h42%" 0
call:JV 0f "──" 0
call:JV 0f "%h52%" 0
call:JV 0f "──" 0
call:JV 0f "%h62%" 0
call:JV 0f "──" 0
call:JV 0f "%h72%" 0
call:JV 0f "──" 0
call:JV 0f "%h82%" 0
call:JV 0f "──" 0
call:JV 0f "%h92%" 0
call:JV 0f "    2" 0
call:JV 0100 0 1
@echo        ┃    │    │    │  ／│＼  │    │    │    ┃
@echo        ┃    │    │    │／  │  ＼│    │    │    ┃
call:JV 0f "    1" 0
call:JV 0c "  %h11%" 0
call:JV 0f "━━" 0
call:JV 0c "%h21%" 0
call:JV 0f "━━" 0
call:JV 0c "%h31%" 0
call:JV 0f "━━" 0
call:JV 0c "%h41%" 0
call:JV 0f "━━" 0
call:JV 0c "%h51%" 0
call:JV 0f "━━" 0
call:JV 0c "%h61%" 0
call:JV 0f "━━" 0
call:JV 0c "%h71%" 0
call:JV 0f "━━" 0
call:JV 0c "%h81%" 0
call:JV 0f "━━" 0
call:JV 0c "%h91%" 0
call:JV 0f "    1" 0
call:JV 0100 0 1
echo.
echo         1     2     3     4     5     6     7     8     9
echo.
call hf操作.bat

goto :eof
:JV
if %3 neq 1 (set/p=<nul>%2) else echo.>%2
findstr /a:%1 .* "%~2*"
del "%~2"
goto :eof
:kh
for /l %%a in (1 1 %1)do echo.
goto :eof

--------

hf操作.bat


@echo off
::红方操作代码
if exist z.txt goto BF
@echo    请红方操作(输入棋子名始坐标j终坐标)  车 马 象 仕 将 炮 兵
@echo.                                        c  m  x  s  k  p  b
SET /P fsy=    请输入(重新开始cxks 退出t)：
if "%fsy%"=="cxks" goto cxks
if "%fsy%"=="t" goto tc

cd.>z.txt
set  qm=%fsy:~0,1%
set  yd=h%fsy:~1,2%
set  xd=h%fsy:~4,2%
if not exist 2b.bat copy 中国象棋.bat  kk.bat>nul 2>nul
copy 2b.bat kk.bat>nul 2>nul
type kk.bat | find "%yd%">a.txt
type kk.bat | find "%xd%">c.txt

if "%yd%"=="h11"  echo h11^=┗>b.txt
if "%yd%"=="h12"  echo h12^=┠>b.txt
if "%yd%"=="h13"  echo h13^=┠>b.txt
if "%yd%"=="h14"  echo h14^=╠>b.txt
if "%yd%"=="h15"  echo h15^=┠>b.txt
if "%yd%"=="h16"  echo h16^=┠>b.txt
if "%yd%"=="h17"  echo h17^=╠>b.txt
if "%yd%"=="h18"  echo h18^=┠>b.txt
if "%yd%"=="h19"  echo h19^=┠>b.txt
if "%yd%"=="h10"  echo h10^=┏>b.txt

if "%yd%"=="h21"  echo h21^=┷>b.txt
if "%yd%"=="h22"  echo h22^=┼>b.txt
if "%yd%"=="h23"  echo h23^=╬>b.txt
if "%yd%"=="h24"  echo h24^=┼>b.txt
if "%yd%"=="h25"  echo h25^=┬>b.txt
if "%yd%"=="h26"  echo h26^=┴>b.txt
if "%yd%"=="h27"  echo h27^=┼>b.txt
if "%yd%"=="h28"  echo h28^=╬>b.txt
if "%yd%"=="h29"  echo h29^=┼>b.txt
if "%yd%"=="h20"  echo h20^=┯>b.txt

if "%yd%"=="h31"  echo h31^=┷>b.txt
if "%yd%"=="h32"  echo h32^=┼>b.txt
if "%yd%"=="h33"  echo h33^=┼>b.txt
if "%yd%"=="h34"  echo h34^=╬>b.txt
if "%yd%"=="h35"  echo h35^=┬>b.txt
if "%yd%"=="h36"  echo h36^=┴>b.txt
if "%yd%"=="h37"  echo h37^=╬>b.txt
if "%yd%"=="h38"  echo h38^=┼>b.txt
if "%yd%"=="h39"  echo h39^=┼>b.txt
if "%yd%"=="h30"  echo h30^=┯>b.txt

if "%yd%"=="h41"  echo h41^=┷>b.txt
if "%yd%"=="h42"  echo h42^=┼>b.txt
if "%yd%"=="h43"  echo h43^=┼>b.txt
if "%yd%"=="h44"  echo h44^=┼>b.txt
if "%yd%"=="h45"  echo h45^=┬>b.txt
if "%yd%"=="h46"  echo h46^=┴>b.txt
if "%yd%"=="h47"  echo h47^=┼>b.txt
if "%yd%"=="h48"  echo h48^=┼>b.txt
if "%yd%"=="h49"  echo h49^=┼>b.txt
if "%yd%"=="h40"  echo h40^=┯>b.txt

if "%yd%"=="h51"  echo h51^=┷>b.txt
if "%yd%"=="h52"  echo h52^=※>b.txt
if "%yd%"=="h53"  echo h53^=┼>b.txt
if "%yd%"=="h54"  echo h54^=╬>b.txt
if "%yd%"=="h55"  echo h55^=┬>b.txt
if "%yd%"=="h56"  echo h56^=┴>b.txt
if "%yd%"=="h57"  echo h57^=╬>b.txt
if "%yd%"=="h58"  echo h58^=┼>b.txt
if "%yd%"=="h59"  echo h59^=﹡>b.txt
if "%yd%"=="h50"  echo h50^=┯>b.txt

if "%yd%"=="h61"  echo h61^=┷>b.txt
if "%yd%"=="h62"  echo h62^=┼>b.txt
if "%yd%"=="h63"  echo h63^=┼>b.txt
if "%yd%"=="h64"  echo h64^=┼>b.txt
if "%yd%"=="h65"  echo h65^=┬>b.txt
if "%yd%"=="h66"  echo h66^=┴>b.txt
if "%yd%"=="h67"  echo h67^=┼>b.txt
if "%yd%"=="h68"  echo h68^=┼>b.txt
if "%yd%"=="h69"  echo h69^=┼>b.txt
if "%yd%"=="h60"  echo h60^=┯>b.txt

if "%yd%"=="h71"  echo h71^=┷>b.txt
if "%yd%"=="h72"  echo h72^=┼>b.txt
if "%yd%"=="h73"  echo h73^=┼>b.txt
if "%yd%"=="h74"  echo h74^=╬>b.txt
if "%yd%"=="h75"  echo h75^=┬>b.txt
if "%yd%"=="h76"  echo h76^=┴>b.txt
if "%yd%"=="h77"  echo h77^=╬>b.txt
if "%yd%"=="h78"  echo h78^=┼>b.txt
if "%yd%"=="h79"  echo h79^=┼>b.txt
if "%yd%"=="h70"  echo h70^=┯>b.txt

if "%yd%"=="h81"  echo h81^=┷>b.txt
if "%yd%"=="h82"  echo h82^=┼>b.txt
if "%yd%"=="h83"  echo h83^=╬>b.txt
if "%yd%"=="h84"  echo h84^=┼>b.txt
if "%yd%"=="h85"  echo h85^=┬>b.txt
if "%yd%"=="h86"  echo h86^=┴>b.txt
if "%yd%"=="h87"  echo h87^=┼>b.txt
if "%yd%"=="h88"  echo h88^=╬>b.txt
if "%yd%"=="h89"  echo h89^=┼>b.txt
if "%yd%"=="h80"  echo h80^=┯>b.txt

if "%yd%"=="h91"  echo h91^=┛>b.txt
if "%yd%"=="h92"  echo h92^=┨>b.txt
if "%yd%"=="h93"  echo h93^=┨>b.txt
if "%yd%"=="h94"  echo h94^=╣>b.txt
if "%yd%"=="h95"  echo h95^=┨>b.txt
if "%yd%"=="h96"  echo h96^=┨>b.txt
if "%yd%"=="h97"  echo h97^=╣>b.txt
if "%yd%"=="h98"  echo h98^=┨>b.txt
if "%yd%"=="h99"  echo h99^=┨>b.txt
if "%yd%"=="h90"  echo h90^=┓>b.txt

@echo off
for /f "tokens=1* delims=:" %%i in ('findstr /n .* a.txt') do (
    if 1==%%i  set qdz=%%j
    if 2==%%i  set csh=%%j
)
cd.>b3.txt
for /f "delims=" %%a in ('findstr /n .* a.txt') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:0c=0f!
        echo.!var!>>b3.txt
        endlocal
)
for /f "tokens=1* delims=:" %%i in ('findstr /n .* b3.txt') do (
    if 2==%%i  set cgb=%%j
)
cd.>b33.txt
for /f "delims=" %%a in ('findstr /n .* c.txt') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:0f=0c!
        echo.!var!>>b33.txt
        endlocal
)
for /f "tokens=1* delims=:" %%i in ('findstr /n .* b33.txt') do (
    if 2==%%i  set jgb=%%j
)
for /f "tokens=1* delims=:" %%i in ('findstr /n .* c.txt') do (
    if 2==%%i  set gb=%%j
)
for /f  %%i in (b.txt) do echo set %%i>e3.txt
echo set %xd%=%%%qm%%%>>e3.txt
cd.>bt.txt
for /f "delims=" %%a in ('findstr /n .* kk.bat') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:%csh%=%cgb%!
if not "!var!"==""  set var=!var:%gb%=%jgb%!
        echo.!var!>>bt.txt
        endlocal
)
echo. >2s.txt
for /f "tokens=*" %%a in ('findstr  /i  /v  "\<%yd%=\>" ^bt.txt ^|^|echo  错误！') do (echo\%%a>>2s.txt)
echo. >2.txt
for /f "tokens=*" %%a in ('findstr  /i  /v  "\<%xd%=\>" ^2s.txt ^|^|echo  错误！') do (echo\%%a>>2.txt)
del 2s.txt
del a.txt
del c.txt
del b.txt
del b33.txt
del bt.txt
del b3.txt
@echo off
cls
set /a ys=40+1>nul
cd.>2b.bat
for /f "delims=" %%i in ('findstr /n .* 2.txt') do (
set /a sw=%%i 2>nul
set "v=%%i"
setlocal enabledelayedexpansion
set "v=!v:*:=!"
if !sw! EQU !ys! goto :crwj
echo.!v!>>2b.bat
endlocal
)
:crwj
more  e3.txt>>2b.bat
more  +40  2.txt>>2b.bat
del e3.txt
del 2.txt
call 2b.bat
:JV
if %3 neq 1 (set/p=<nul>%2) else echo.>%2
findstr /a:%1 .* "%~2*"
del "%~2"
goto :eof
:kh
for /l %%a in (1 1 %1)do echo.
goto :eof
:cxks
del 2b.bat
del kk.bat
del z.txt
call 中国象棋.bat
:tc
del 2b.bat
del kk.bat
del z.txt
goto eof

:BF
del z.txt
@echo off
::白方操作代码

@echo.
@echo    请白方操作(输入棋子名始坐标j终坐标)  车 马 象 仕 将 炮 兵
@echo.                                        c  m  x  s  k  p  b
SET /P fsy=    请输入(重新开始cxks 退出t)：
if "%fsy%"=="cxks" goto cxks
if "%fsy%"=="t" goto tc
set  qm=%fsy:~0,1%
set  yd=h%fsy:~1,2%
set  xd=h%fsy:~4,2%
copy 2b.bat kk.bat>nul 2>nul
type kk.bat | find "%yd%">a.txt
type kk.bat | find "%xd%">c.txt
if "%yd%"=="h11"  echo h11^=┗>b.txt
if "%yd%"=="h12"  echo h12^=┠>b.txt
if "%yd%"=="h13"  echo h13^=┠>b.txt
if "%yd%"=="h14"  echo h14^=╠>b.txt
if "%yd%"=="h15"  echo h15^=┠>b.txt
if "%yd%"=="h16"  echo h16^=┠>b.txt
if "%yd%"=="h17"  echo h17^=╠>b.txt
if "%yd%"=="h18"  echo h18^=┠>b.txt
if "%yd%"=="h19"  echo h19^=┠>b.txt
if "%yd%"=="h10"  echo h10^=┏>b.txt

if "%yd%"=="h21"  echo h21^=┷>b.txt
if "%yd%"=="h22"  echo h22^=┼>b.txt
if "%yd%"=="h23"  echo h23^=╬>b.txt
if "%yd%"=="h24"  echo h24^=┼>b.txt
if "%yd%"=="h25"  echo h25^=┬>b.txt
if "%yd%"=="h26"  echo h26^=┴>b.txt
if "%yd%"=="h27"  echo h27^=┼>b.txt
if "%yd%"=="h28"  echo h28^=╬>b.txt
if "%yd%"=="h29"  echo h29^=┼>b.txt
if "%yd%"=="h20"  echo h20^=┯>b.txt

if "%yd%"=="h31"  echo h31^=┷>b.txt
if "%yd%"=="h32"  echo h32^=┼>b.txt
if "%yd%"=="h33"  echo h33^=┼>b.txt
if "%yd%"=="h34"  echo h34^=╬>b.txt
if "%yd%"=="h35"  echo h35^=┬>b.txt
if "%yd%"=="h36"  echo h36^=┴>b.txt
if "%yd%"=="h37"  echo h37^=╬>b.txt
if "%yd%"=="h38"  echo h38^=┼>b.txt
if "%yd%"=="h39"  echo h39^=┼>b.txt
if "%yd%"=="h30"  echo h30^=┯>b.txt

if "%yd%"=="h41"  echo h41^=┷>b.txt
if "%yd%"=="h42"  echo h42^=┼>b.txt
if "%yd%"=="h43"  echo h43^=┼>b.txt
if "%yd%"=="h44"  echo h44^=┼>b.txt
if "%yd%"=="h45"  echo h45^=┬>b.txt
if "%yd%"=="h46"  echo h46^=┴>b.txt
if "%yd%"=="h47"  echo h47^=┼>b.txt
if "%yd%"=="h48"  echo h48^=┼>b.txt
if "%yd%"=="h49"  echo h49^=┼>b.txt
if "%yd%"=="h40"  echo h40^=┯>b.txt

if "%yd%"=="h51"  echo h51^=┷>b.txt
if "%yd%"=="h52"  echo h52^=※>b.txt
if "%yd%"=="h53"  echo h53^=┼>b.txt
if "%yd%"=="h54"  echo h54^=╬>b.txt
if "%yd%"=="h55"  echo h55^=┬>b.txt
if "%yd%"=="h56"  echo h56^=┴>b.txt
if "%yd%"=="h57"  echo h57^=╬>b.txt
if "%yd%"=="h58"  echo h58^=┼>b.txt
if "%yd%"=="h59"  echo h59^=﹡>b.txt
if "%yd%"=="h50"  echo h50^=┯>b.txt

if "%yd%"=="h61"  echo h61^=┷>b.txt
if "%yd%"=="h62"  echo h62^=┼>b.txt
if "%yd%"=="h63"  echo h63^=┼>b.txt
if "%yd%"=="h64"  echo h64^=┼>b.txt
if "%yd%"=="h65"  echo h65^=┬>b.txt
if "%yd%"=="h66"  echo h66^=┴>b.txt
if "%yd%"=="h67"  echo h67^=┼>b.txt
if "%yd%"=="h68"  echo h68^=┼>b.txt
if "%yd%"=="h69"  echo h69^=┼>b.txt
if "%yd%"=="h60"  echo h60^=┯>b.txt

if "%yd%"=="h71"  echo h71^=┷>b.txt
if "%yd%"=="h72"  echo h72^=┼>b.txt
if "%yd%"=="h73"  echo h73^=┼>b.txt
if "%yd%"=="h74"  echo h74^=╬>b.txt
if "%yd%"=="h75"  echo h75^=┬>b.txt
if "%yd%"=="h76"  echo h76^=┴>b.txt
if "%yd%"=="h77"  echo h77^=╬>b.txt
if "%yd%"=="h78"  echo h78^=┼>b.txt
if "%yd%"=="h79"  echo h79^=┼>b.txt
if "%yd%"=="h70"  echo h70^=┯>b.txt

if "%yd%"=="h81"  echo h81^=┷>b.txt
if "%yd%"=="h82"  echo h82^=┼>b.txt
if "%yd%"=="h83"  echo h83^=╬>b.txt
if "%yd%"=="h84"  echo h84^=┼>b.txt
if "%yd%"=="h85"  echo h85^=┬>b.txt
if "%yd%"=="h86"  echo h86^=┴>b.txt
if "%yd%"=="h87"  echo h87^=┼>b.txt
if "%yd%"=="h88"  echo h88^=╬>b.txt
if "%yd%"=="h89"  echo h89^=┼>b.txt
if "%yd%"=="h80"  echo h80^=┯>b.txt

if "%yd%"=="h91"  echo h91^=┛>b.txt
if "%yd%"=="h92"  echo h92^=┨>b.txt
if "%yd%"=="h93"  echo h93^=┨>b.txt
if "%yd%"=="h94"  echo h94^=╣>b.txt
if "%yd%"=="h95"  echo h95^=┨>b.txt
if "%yd%"=="h96"  echo h96^=┨>b.txt
if "%yd%"=="h97"  echo h97^=╣>b.txt
if "%yd%"=="h98"  echo h98^=┨>b.txt
if "%yd%"=="h99"  echo h99^=┨>b.txt
if "%yd%"=="h90"  echo h90^=┓>b.txt
@echo off
for /f "tokens=1* delims=:" %%i in ('findstr /n .* a.txt') do (
    if 1==%%i  set qdz=%%j
    if 2==%%i  set csh=%%j
)
cd.>b3.txt
for /f "delims=" %%a in ('findstr /n .* a.txt') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:0c=0f!
        echo.!var!>>b3.txt
        endlocal
)
for /f "tokens=1* delims=:" %%i in ('findstr /n .* b3.txt') do (
    if 2==%%i  set cgb=%%j
)
cd.>b33.txt
for /f "delims=" %%a in ('findstr /n .* c.txt') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:0c=0f!
        echo.!var!>>b33.txt
        endlocal
)
for /f "tokens=1* delims=:" %%i in ('findstr /n .* b33.txt') do (
    if 2==%%i  set jgb=%%j
)
for /f "tokens=1* delims=:" %%i in ('findstr /n .* c.txt') do (
    if 2==%%i  set gb=%%j
)
for /f  %%i in (b.txt) do echo set %%i>e3.txt
echo set %xd%=%%%qm%%%>>e3.txt
cd.>bt.txt
for /f "delims=" %%a in ('findstr /n .* kk.bat') do (
        set "var=%%a"
        setlocal enabledelayedexpansion
        set var=!var:*:=!
if not "!var!"==""  set var=!var:%csh%=%cgb%!
if not "!var!"==""  set var=!var:%gb%=%jgb%!
        echo.!var!>>bt.txt
        endlocal
)
echo. >2s.txt
for /f "tokens=*" %%a in ('findstr  /i  /v  "\<%yd%=\>" ^bt.txt ^|^|echo  错误！') do (echo\%%a>>2s.txt)
echo. >2.txt
for /f "tokens=*" %%a in ('findstr  /i  /v  "\<%xd%=\>" ^2s.txt ^|^|echo  错误！') do (echo\%%a>>2.txt)
del 2s.txt
del a.txt
del c.txt
del b.txt
del b33.txt
del bt.txt
del b3.txt
@echo off
cls
set /a ys=40+1>nul
cd.>2b.bat
for /f "delims=" %%i in ('findstr /n .* 2.txt') do (
set /a sw=%%i 2>nul
set "v=%%i"
setlocal enabledelayedexpansion
set "v=!v:*:=!"
if !sw! EQU !ys! goto :crwj
echo.!v!>>2b.bat
endlocal
)
:crwj
more  e3.txt>>2b.bat
more  +40  2.txt>>2b.bat
del e3.txt
call 2b.bat
:JV
if %3 neq 1 (set/p=<nul>%2) else echo.>%2
findstr /a:%1 .* "%~2*"
del "%~2"
goto :eof
:kh
for /l %%a in (1 1 %1)do echo.
goto :eof

   此帖被 +4 点积分     点击查看详情   
评分人：【 lxmxn 】分数： +4  时间：2008-9-21 09:01


2008-9-18 22:19
查看资料  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 6 楼』:  

创意不错，不过重复的命令太多了，可以用for命令来精简一下set的赋值语句。

在别的论坛见过别人用sed写的象棋对战，用批处理应该也成。

2008-9-21 09:00
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
llrrqq
初级用户




积分 139
发帖 20
注册 2004-10-20
状态 离线
『第 7 楼』:  

下来收藏,试一试怎么样?

2008-9-21 11:26
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 8 楼』:  

顶一下

2008-9-27 21:25
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ygrzzz
初级用户





积分 62
发帖 24
注册 2008-9-17
状态 离线
『第 9 楼』:  

小P做这样的工程恐怕力不从心吧
不过楼主的显示红方的很独特啊，能解释下一下显示红白相间的原理吗
没作延迟处理就显示这么慢吗

2008-9-28 22:57
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
path
初级用户





积分 55
发帖 25
注册 2007-5-11
状态 离线
『第 10 楼』:  

厉害的人太了,佩服....

2008-9-29 00:58
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
xinyi
新手上路





积分 12
发帖 6
注册 2007-12-28
状态 离线
『第 11 楼』:  

牛，支持一下

2008-10-1 01:22
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 12 楼』:  

请大家改进

2008-10-2 12:10
查看资料  发短消息 网志   编辑帖子  回复  引用回复
zuiwangqiuyue
新手上路





积分 19
发帖 19
注册 2008-8-16
状态 离线
『第 13 楼』:  

哇,眼都花了,我什么时候才能达到这种水平呀

2008-11-11 00:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
77720666
初级用户





积分 59
发帖 46
注册 2007-4-10
状态 离线
『第 14 楼』:  

除了说牛B说不出啥了~~

2008-11-11 00:46
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023