中国DOS联盟

@echo off
mode con cols=34 lines=25
color f9
title 猜数字 by tadonis
:begin
cls
set/a pp=%random%%%100
set a=1
set/a num=5
set b=100
echo **********************************
echo * *
echo * 猜数字(1-100) *
echo * *
echo **********************************
:start
echo 你还有%num%次机会
set/p p=输入你所猜的数字（%a%-%b%)
if "%p%"=="" echo 请输入数字&goto start
if %p% gtr %b% goto error
if %p% lss %a% goto error
set/a bb=%b%-%a%
if %p% gtr %pp% set/a b=%p%
if %p% lss %pp% set/a a=%p%
if %p% equ %pp% goto succeed
set/a num-=1
if %num% gtr 0 (goto start) else goto fail
:succeed
set/a c=6-%num%
echo 你共猜了%c%次
if %c% leq 3 echo you are so clever
echo 再来一次？？
set /p choice=
if /i "%choice%"=="Y" goto begin
if /i "%choice%"=="N" goto exit
:error
color d0
ping /n 1 127.0.0.1>nul
echo Are you stupid??
echo wrong number !!
ping /n 1 127.0.0.1>nul
color f9
goto :start
:fail
echo 正确答案是%pp%
echo 你太菜了!!!!
echo 再来一次？？
set /p choice=?
if /i "%choice%"=="Y" goto begin
if /i "%choice%"=="N" goto exit
:exit
exit

[ Last edited by tadonis on 2008-5-23 at 12:54 AM ]

这时我编的小游戏,请各位大虾多多指教

代码需简化，但仍鼓励并加分。

@echo off&mode con cols=34 lines=10&color f9

title 猜数字 by tadonis

:begin

cls&set/a pp=%random%%%100+1

set a=1&set num=5&set b=100&set n=0&set p=

echo **********************************

echo *                                                        *

echo *     猜数字(1-100)                                *

echo *                                                        *

echo **********************************

:start

set /a n+=1

cls&echo.&echo.&echo 你共有5次机会，还剩%num%次!

set/p p=输入你所猜的数字（%a%-%b%)

if "%p%"=="" goto start

if %p% gtr %b% goto start

if %p% lss %a% goto start

if %p% gtr %pp% set b=%p%

if %p% lss %pp% set a=%p%

set/a num-=1

if %p% equ %pp% goto succeed

if %num% gtr 0 (

  goto start

  ) else (

  cls&echo.&echo.&echo 正确答案是%pp%&echo 你太菜了!!!!&goto again

)

:succeed

cls&echo.&echo.&echo 你共猜了%n%次

if %n% leq 3 echo you are so clever

:again

echo 再来一次？？(退出直接回车)

set /p choice= 

if /i "%choice%"=="Y" goto begin

[ Last edited by zw19750516 on 2008-5-23 at 01:59 AM ]