[游戏娱乐] 批处理游戏：飞机躲避墙壁

zcydez

今天闲着无聊，编了一个小游戏，请大家看看；玩法：打开后移动鼠标使飞机躲避墙壁（飞机始终在最后一排，只可以左右移动）别让飞机撞到墙壁，看你能坚持多久。
各位行行好，回复回复，别让帖子沉下去。
要和Cmos.exe在一起才能玩！（在附件里）

@echo off
title 游戏
mode con:cols=22 lines=12
color f0
setlocal EnableDelayedExpansion
set js=0
set fen=0
:a
set /a js=%js%+1
set dwall=**********          **********
set /a sjs=%random%%%7+2
for %%b in (%sjs%) do (set wall=%wall%!dwall:~%%b,20!)
if not %js%==10 goto a
:b
cls
for /l %%f in (0 20 180) do (echo. !wall:~%%f,20!)
set /a x2=%x%-1
if not %x2% leq 1 (for /l %%g in (1 1 %x2%) do (set /p= <nul))
echo 
echo %fen%分
cmos 0 1 0 0 10
set /a fen=%fen%+1
set /a P=%errorlevel%
if "%p:~0,1%"=="-" set p=%p:~1,10%
set /a X=%P:~0,-3%
set /a Y=%P%-1000*%X%
set /a hg=%x%-2+180
for %%a in (%hg%) do (
if %x%==1 goto zb
if %x%==22 goto zb
if "!wall:~%%a,1!"=="*" goto death)
cls
set /a sjs=%random%%%6
for %%c in (%sjs%) do (set xwall=!dwall:~%%c,20!)
for /l %%d in (0 1 19) do (set w%%d=!xwall:~%%d,1!)
set /a sjs=%random%%%16+3
set /a sjs2=%sjs%+1
for /l %%e in (%sjs% 1 %sjs2%) do (set w%%e=*)
set xwall=%w0%%w1%%w2%%w3%%w4%%w5%%w6%%w7%%w8%%w9%%w10%%w11%%w12%%w13%%w14%%w15%%w16%%w17%%w18%%w19%
set wall=%xwall%%wall:~0,180%
goto b
:death
cls
color fc
echo 你撞墙了。
echo 得了%fen%分。
pause>nul
exit
:zb
clscolor fc
echo 作弊可恶！
pause>nul
复制代码

点击下载

battih0211

直接乱码
？

battih0211

[img][/img]为啥？？？

shenyu

c:\windows\system32\cmd.exe

Microsoft Windows [版本 6.1.7601] 版权所有 (c) 2009 Microsoft Corporation。保留所有权利。 C:\Users\admin>厉害 '厉害'    不是内部或外部命令，也不是可运行程序 或批处理文件 C:\Users\admin>

我来了

速度 太快， 只得了四分。。。
窗口太小，看的眼痛。。

下一版本 ，改进下 就更完美了。

tlf1994

真的好难！

ssdai123

一打开，窗口一闪就挂了

a19715

呵呵     喜欢游戏

HLS

发现如果按住鼠标会使游戏变得极有难度...