读心术2 批处理版（不一样的哦！）

garyng · 发表于 2011-8-29 19:44:40

本帖最后由 garyng 于 2011-8-30 19:31 编辑

哈哈~我这只菜鸟有来发代码啦～
续读心术批处理版（不一样的哦！）这个后
又在同一个原理上，写了这个与先前不同的读心术～
原理跟先前的差不多～
只是换了呈现的方式（我猜你答～）
透过大过/小过来猜测你想的数目～
原创的啦～
试试看吧～
有错误别骂我呀～
————————————————————————————————————

@echo off&setlocal ENABLEDELAYEDEXPANSION
color 0A
:main
echo ┌───────────────┐
echo │ 读心术批处理版 │
echo │ GaryNg呕心沥血制作 │
echo └───────────────┘
echo 请想一个小于1000的数...
echo 然后我会猜
echo 你只要告诉我
echo 我猜的数目大过还是小过你想的数
set 退格键=
for /l %%a in (5 -1 1) do (set /p =!退格键!%%a秒的时间... <nul&ping -n 2 127.1 >nul)
cls&set num=0&set count=1&set power=9
set /a num=1^<^<9
:loop
echo 第!count!次：我猜!num!
echo 请问我猜大了，猜小了还是我猜对了？
set /p ans=[猜大了=y，猜小了=n，猜对了！=d]
if /i "!ans!" NEQ "y" if /i "!ans!" NEQ "n" if /i "!ans!" NEQ "d" cls&goto loop
if /i "!ans!"=="d" cls&echo 你想的号码是:!num!&echo 哈哈！吓到了吧？&echo 原理想想吧~&echo 提示：还是二进制！&echo 按任意键重来...&pause>nul&cls&goto main
set /a L=!power!-1
set /a L=1^<^<L
set /a m=1^<^<power
if /i "!ans!"=="y" set /a num=!num!-!m!+!L!
if /i "!ans!"=="n" set /a num=!num!+!L!
if "!count!" NEQ "10" cls&set /a count=!count!+1&set /a power=!power!-1&goto loop

复制代码

原理：想想吧～靠二进制的～

601997526 · 发表于 2011-8-29 20:24:10

首先，我按d并没有反映，而是继续往下执行
再有，如果我一直按y或者n也没有报错
还有，我输入yy、nn、yn、ny等等都没有报错

garyng · 发表于 2011-8-29 20:56:51

本帖最后由 garyng 于 2011-8-30 19:31 编辑

回复 2# 601997526

问题解决了～楼上已经更新～

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[其他] 读心术2 批处理版（不一样的哦！）