无忧启动论坛

标题: 读心术批处理版 [打印本页]
作者: namejm    时间: 2007-1-16 09:39
标题: 读心术批处理版

  2. @echo off
  3. title 读心术P处理版

  5. :begin
  6. mode con cols=90 lines=30
  7. cls
  8. echo.
  9. echo 　　从10～99之间任意选择一个数，把这个数的十位与个位相加，再把任意选择的数减去这个和，
  10. echo 例如：你选的数是23，然后2+3=5，然后23-5=18，在图表中找出与差值对应的符号，并把这个符号
  11. echo 牢记心中，然后进入下一步，你会发现：显示出来的符号就是你刚刚心里记下的那个符号。
  12. echo.
  13. echo _________________________________________________________________________________________
  14. echo.

  16. set str=☆★○●◎◇◆□■△▲※→←↑↓〓＠〖〗【】『』≈≡∑∈⊙∵∴¤
  17. set begin_num=9
  18. set end_num=1
  19. set num=0
  20. setlocal enabledelayedexpansion

  22. :loop
  23. for /l %%i in (9,-1,0) do (
  24.     for /l %%j in (%begin_num%,-2,%end_num%) do (
  25.         set /a num+=1
  26.         set /a random_=!random!%%32
  27.         set /a ordinal=1%%j%%i-100
  28.         if !ordinal! lss 10 set ordinal= !ordinal!
  29.         call set var!ordinal!=%%str:~!random_!,1%%
  30.         set /a ordinal_mod=!ordinal!%%9
  31.         if !num! gtr 1 if !num! lss 100 if !ordinal_mod! equ 0 set var!ordinal!=!var18!
  32.         set /a line_mod=!num!%%5
  33.         call set var=!var! !ordinal! %%var!ordinal!%%
  34.         if !line_mod! equ 0 echo                        !var!&set var=
  35.     )
  36. )
  37. if %num% equ 100 goto end
  38. if %num% equ 50 (
  39.     set begin_num=8
  40.     set end_num=0
  41.     goto loop
  42. )

  44. :end
  45. echo _________________________________________________________________________________________
  46. echo                                                                    按任意键进入下一步...
  47. pause>nul
  48. cls
  49. mode con cols=25 lines=10
  50. echo.
  51. echo      你想要的符号是：
  52. echo        ╭────╮
  53. echo        │        │   
  54. echo        │   %var18%   │
  55. echo        │        │
  56. echo        ╰────╯
  57. echo.
  58. echo   按任意键再来一次...
  59. pause>nul
  60. goto begin
复制代码
作者: HuAnGkUn    时间: 2007-1-17 10:43
强人，这几天仔细拜读批处理文件。
作者: 阿非    时间: 2007-1-17 18:14
强
作者: 安情    时间: 2007-1-17 19:42
在这儿呀，jm
作者: 不才    时间: 2007-1-18 14:56
嘿嘿，各位强人，拜托简单地介绍一下其中的奥秘，我这正晕着呢。
作者: WittyHare    时间: 2007-2-12 12:45
不错.批处理还真不简单.
作者: lovelyxzq    时间: 2007-2-12 15:58
可否讲讲原理了？
作者: namejm    时间: 2007-2-13 06:47
　　原理：(10x+y)-(x+y)=9x，结果一定是9的倍数。
作者: bd540_2    时间: 2007-2-13 07:05
ghost ...... -fx
ghost ...... -rb
作者: mmo829    时间: 2007-2-14 15:38
學習的機會來
頂
作者: cqswat    时间: 2007-4-7 14:59
真的是太强了
作者: PPP1314    时间: 2007-4-9 22:46
我最想知道的是,   namejm   大哥,BAT 里的中文是用什么作译的,我看过些BAT里是用(TW.EXE)

而你里面的BAT 好似没有,我是初学的,请指教!!!!,
作者: czswuyou    时间: 2007-4-10 17:51
好好好
作者: magictek    时间: 2007-4-11 09:31
数字游戏，大家看9的整数倍是什么图形，最后显示的就是什么图形了
作者: longteeth    时间: 2007-6-11 16:36
有意思啊！哈哈
:D :D :D
作者: wxcwm2    时间: 2007-6-11 19:01
MODE不是内部或外部命令，也不是可用的程序或可用的批处理文件


WINPE下测试。。。出这问题
作者: hanbin530    时间: 2007-6-14 14:26
LZ 应该是10(x+y) — (x+y) = 9(x+y)吧
作者: lbnmg    时间: 2007-6-15 19:34
原帖由 namejm 于 2007-2-13 06:47 AM 发表
　　原理：(10x+y)-(x+y)=9x，结果一定是9的倍数。

有意思，以前有个扑克牌的游戏利用的是人的粗心来实现的，这个是用的是数学，好。
其实一个图多算几个就会发现当前图形的秘密了。
作者: jm6275680    时间: 2007-6-15 23:03
编这个批处理的牛人在忽悠我们！！！！

我们选的数，按照他的上面的步骤计算出来的结果都是 9 的倍数！

而 9 的倍数后面的符号都是一样的！

不过每一次9 的倍数后面的符号都变化的，这就给了我们一个“很灵”的错觉！

哈哈！

俺曾经也被忽悠了！

不过还是佩服这个作者！:)
作者: happy_star    时间: 2007-6-18 19:00
这个东西很有趣，学习了。



欢迎光临 无忧启动论坛 (http://wuyou.net./) Powered by Discuz! X3.3