Board logo

标题: [其他] 读心术2 批处理版(不一样的哦!) [打印本页]

作者: garyng    时间: 2011-8-29 19:44     标题: 读心术2 批处理版(不一样的哦!)

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

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

————————————————————————————————————
  1. @echo off&setlocal ENABLEDELAYEDEXPANSION
  2. color 0A
  3. :main
  4. echo                              ┌───────────────┐
  5. echo                              │      读心术批处理版          │
  6. echo                              │    GaryNg呕心沥血制作        │
  7. echo                              └───────────────┘
  8. echo 请想一个小于1000的数...
  9. echo 然后我会猜
  10. echo 你只要告诉我
  11. echo 我猜的数目大过还是小过你想的数
  12. set 退格键=
  13. for /l %%a in (5 -1 1) do (set /p =!退格键!%%a秒的时间... <nul&ping -n 2 127.1 >nul)
  14. cls&set num=0&set count=1&set power=9
  15. set /a num=1^<^<9
  16. :loop
  17. echo 第!count!次:我猜!num!
  18. echo 请问我猜大了,猜小了还是我猜对了?
  19. set /p ans=[猜大了=y,猜小了=n,猜对了!=d]
  20. if /i "!ans!" NEQ "y" if /i "!ans!" NEQ "n" if /i "!ans!" NEQ "d" cls&goto loop
  21. if /i "!ans!"=="d" cls&echo 你想的号码是:!num!&echo 哈哈!吓到了吧?&echo 原理想想吧~&echo 提示:还是二进制!&echo 按任意键重来...&pause>nul&cls&goto main
  22. set /a L=!power!-1
  23. set /a L=1^<^<L
  24. set /a m=1^<^<power
  25. if /i "!ans!"=="y" set /a num=!num!-!m!+!L!
  26. if /i "!ans!"=="n" set /a num=!num!+!L!
  27. 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://www.bathome.net/) Powered by Discuz! 7.2