学习批处理。编了个游戏玩（猜数游戏） (50分)

@Rem 从这里开始复制。然后保存成一个Bat文件。双击它就可以玩了
@Rem windows 2000 server 下通过，其他的windows 版本我没试过
@goto NewGame
==============================================================
功能：
系统产生一个0-100之间的随机数，游戏者输入一个数
如果此数与系统随机数相等，则赢了此次游戏。
如果不相等，则系统告诉游戏者大了还是小了
继续猜数，直到猜中为止。请用您的智慧，以最少的次数，赢得游戏
版本：1.0
作者：Netu0
创建日期：2003.09.25

:NewGame
@color 1e
@echo 欢迎使用猜数游戏
@echo.
@echo 作者：NetU0
@echo 感谢Xfocus上的朋友及Sometips上发表批处理文章的朋友
@echo.
@echo 使用说明：
@echo 系统产生一个0-100之间的随机数，游戏者输入一个数。
@echo 如果此数与系统随机数相等，则赢了此次游戏。
@echo 如果不相等，则系统告诉游戏者大了还是小了
@echo 继续猜数，直到猜中为止。请用您的智慧，以最少的次数，赢得游戏
@echo 游戏时，随时按下q可以退出
@echo.
:ReStar
@echo 1： 开始游戏
@echo 2： 退出游戏
@echo.
@set /p NewGame=输入您的选择
@if "%NewGame%"=="1" goto Star
@if "%NewGame%"=="2" goto QuitGame
@cls
@goto NewGame

:Star
@echo.
@Set GuessNum=%RANDOM%
:L
@if %GuessNum% LEQ 100 @goto c
@Set GuessNum=%RANDOM%
@if %GuessNum% GTR 100 @goto L
@set /a GuessTime=0
:c
@echo.
@set /p InputNum=请输入一个数:
@set /a GuessTime=GuessTime+1
@if "%InputNum%"=="q" @goto QuitGame
@if %InputNum% EQU %GuessNum% @goto Winner
@if %InputNum% LSS %GuessNum% @goto Lower
@if %InputNum% GTR %GuessNum% @goto upper
@goto Sub_End
:upper
@Cls
@echo.
@echo 大了
@goto c
:lower
@Cls
@echo.
@echo 小了
@goto c
:Winner
@echo 恭喜您，猜对了！
@echo 您共猜了%GuessTime%次！
@if %GuessTime% GTR 10 @echo 加油啊，老兄
@if %GuessTime% LSS 5 @echo 太棒了！！！
@echo.
@echo 再来一次？
@goto ReStar

:QuitGame
:Sub_End
@echo 再见
@Rem 复制到这里结束

好,我就是不会让用户输入的那句,以前用的是DOS6.22的那个选择命令,一直不好用,谢了!

没人玩吗？

试试看

多人接受答案了。