标题: [其他] 读心术2 批处理版(不一样的哦!) [打印本页]
作者: garyng 时间: 2011-8-29 19:44 标题: 读心术2 批处理版(不一样的哦!)
本帖最后由 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
首先,我按d并没有反映,而是继续往下执行
再有,如果我一直按y或者n也没有报错
还有,我输入yy、nn、yn、ny等等都没有报错
作者: garyng 时间: 2011-8-29 20:56
本帖最后由 garyng 于 2011-8-30 19:31 编辑
回复 2# 601997526
问题解决了~楼上已经更新~
欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |