给高手出题，输出水晶球读心术 - 中国DOS联盟论坛

@echo off
:: code by jm modified by youxi01 2006-12-3 CMD@XP
title 读心术P处理版
mode con cols=80 lines=25
:begin
cls
setlocal enabledelayedexpansion
set str=☆★○●◎◇◆□■△▲※→←↑↓〓＠〖〗【】『』≈≡∑∈⊙∵∴¤
for /l %%i in (0,1,99) do (
    set /a random_=!random!%%32
    call set var%%i=%%str:~!random_!,1%%
)
echo.
echo      99 %var99%  79 %var79%  59 %var59%  39 %var39%  19 %var19%    ^|    ① 从10～99之间任意选择一个数
echo      98 %var98%  78 %var78%  58 %var58%  38 %var38%  18 %var81%    ^|
echo      97 %var97%  77 %var77%  57 %var57%  37 %var37%  17 %var17%    ^|    ② 把这个数的十位与个位相加
echo      96 %var96%  76 %var76%  56 %var56%  36 %var81%  16 %var16%    ^|
echo      95 %var95%  75 %var75%  55 %var55%  35 %var35%  15 %var15%    ^|    ③ 再把任意选择的数减去这个和
echo      94 %var94%  74 %var74%  54 %var81%  34 %var34%  14 %var14%    ^|
echo      93 %var93%  73 %var73%  53 %var53%  33 %var33%  13 %var13%    ^|    　　例如：你选的数是23
echo      92 %var92%  72 %var81%  52 %var52%  32 %var32%  12 %var12%    ^|
echo      91 %var91%  71 %var71%  51 %var51%  31 %var31%  11 %var11%    ^|    　　然后2+3=5，然后23-5=18
echo      90 %var90%  70 %var70%  50 %var50%  30 %var30%  10 %var10%    ^|
echo      89 %var89%  69 %var69%  49 %var49%  29 %var29%   9 %var81%    ^|    ④ 在图表中找出与差值对应的图形
echo      88 %var88%  68 %var68%  48 %var48%  28 %var28%   8 %var8%    ^|
echo      87 %var87%  67 %var67%  47 %var47%  27 %var81%   7 %var7%    ^|   　　并把这个图形牢记心中
echo      86 %var86%  66 %var66%  46 %var46%  26 %var26%   6 %var6%    ^|
echo      85 %var85%  65 %var65%  45 %var81%  25 %var25%   5 %var5%    ^|   ⑤ 然后进入下一步
echo      84 %var84%  64 %var64%  44 %var44%  24 %var24%   4 %var4%    ^|
echo      83 %var83%  63 %var81%  43 %var43%  23 %var23%   3 %var3%    ^|   ⑥ 你会发现：显示出来的图形
echo      82 %var82%  62 %var62%  42 %var42%  22 %var22%   2 %var2%    ^|
echo      81 %var81%  61 %var61%  41 %var41%  21 %var21%   1 %var1%    ^|   　　就是你刚刚心里记下的那个图形
echo      80 %var80%  60 %var60%  40 %var40%  20 %var20%   0 %var0%    ^|
echo                                           ^|
echo _______________________________________________________________________________
echo                               按任意键进入下一步...
pause>nul
cls
for /l %%i in (1,1,9) do echo.
echo                 通过心灵感应，发现这个图形正是你所想的：%var81%
for /l %%i in (1,1,9) do echo.
echo.
echo.
echo                                               按任意键再来一次...
pause>nul
goto begin
pause>nul
goto begin

第1楼　pusofalse	发表于 2008-04-25 15:03
银牌会员　发帖 646　积分 1,604
给高手出题，输出水晶球读心术那游戏不知玩过没有，没玩过的可以百度一下，刚开始时觉得很神奇，其实其中是有规律的那规律即是 11 1+1=2 11-2=9 9/9=1 23 2+3=5 23-5=18 18/9=2 15 1+5=6 15-6=9 9/9=1 10到99之间的任意一个数，其个位与十位相加得出的和，被这个数本身相减，得出的结果除以9 余数永远为0 知道这个规律之后，只要看9后面的图案是什么，就能完全知道中你脑中所想的了。。现在要求把这个游戏用批的形式输出。我自己试过，T.T 结果可想而知。。 [xy-(x+y)]%%9=0

第2楼　bat-zw	发表于 2008-04-25 15:21
金牌会员　发帖 1,276　积分 3,105
转namejm贴（批处理读心），一起学习： @echo off :: code by jm modified by youxi01 2006-12-3 CMD@XP title 读心术P处理版 mode con cols=80 lines=25 :begin cls setlocal enabledelayedexpansion set str=☆★○●◎◇◆□■△▲※→←↑↓〓＠〖〗【】『』≈≡∑∈⊙∵∴¤ for /l %%i in (0,1,99) do ( set /a random_=!random!%%32 call set var%%i=%%str:~!random_!,1%% ) echo. echo 99 %var99% 79 %var79% 59 %var59% 39 %var39% 19 %var19% ^\| ① 从10～99之间任意选择一个数 echo 98 %var98% 78 %var78% 58 %var58% 38 %var38% 18 %var81% ^\| echo 97 %var97% 77 %var77% 57 %var57% 37 %var37% 17 %var17% ^\| ② 把这个数的十位与个位相加 echo 96 %var96% 76 %var76% 56 %var56% 36 %var81% 16 %var16% ^\| echo 95 %var95% 75 %var75% 55 %var55% 35 %var35% 15 %var15% ^\| ③ 再把任意选择的数减去这个和 echo 94 %var94% 74 %var74% 54 %var81% 34 %var34% 14 %var14% ^\| echo 93 %var93% 73 %var73% 53 %var53% 33 %var33% 13 %var13% ^\| 　　例如：你选的数是23 echo 92 %var92% 72 %var81% 52 %var52% 32 %var32% 12 %var12% ^\| echo 91 %var91% 71 %var71% 51 %var51% 31 %var31% 11 %var11% ^\| 　　然后2+3=5，然后23-5=18 echo 90 %var90% 70 %var70% 50 %var50% 30 %var30% 10 %var10% ^\| echo 89 %var89% 69 %var69% 49 %var49% 29 %var29% 9 %var81% ^\| ④ 在图表中找出与差值对应的图形 echo 88 %var88% 68 %var68% 48 %var48% 28 %var28% 8 %var8% ^\| echo 87 %var87% 67 %var67% 47 %var47% 27 %var81% 7 %var7% ^\| 　　并把这个图形牢记心中 echo 86 %var86% 66 %var66% 46 %var46% 26 %var26% 6 %var6% ^\| echo 85 %var85% 65 %var65% 45 %var81% 25 %var25% 5 %var5% ^\| ⑤ 然后进入下一步 echo 84 %var84% 64 %var64% 44 %var44% 24 %var24% 4 %var4% ^\| echo 83 %var83% 63 %var81% 43 %var43% 23 %var23% 3 %var3% ^\| ⑥ 你会发现：显示出来的图形 echo 82 %var82% 62 %var62% 42 %var42% 22 %var22% 2 %var2% ^\| echo 81 %var81% 61 %var61% 41 %var41% 21 %var21% 1 %var1% ^\| 　　就是你刚刚心里记下的那个图形 echo 80 %var80% 60 %var60% 40 %var40% 20 %var20% 0 %var0% ^\| echo ^\| echo _______________________________________________________________________________ echo 按任意键进入下一步... pause>nul cls for /l %%i in (1,1,9) do echo. echo 通过心灵感应，发现这个图形正是你所想的：%var81% for /l %%i in (1,1,9) do echo. echo. echo. echo 按任意键再来一次... pause>nul goto begin pause>nul goto begin

第3楼　pusofalse	发表于 2008-04-25 15:29
银牌会员　发帖 646　积分 1,604
高~ 实在是高！

第4楼　bat-zw	发表于 2008-04-25 15:30
金牌会员　发帖 1,276　积分 3,105
其实这个批处理不难写，就是要多费点心。

第5楼　pusofalse	发表于 2008-04-25 15:33
银牌会员　发帖 646　积分 1,604
收藏了~ 膜拜~

第6楼　1397967	发表于 2008-04-25 18:10
新手上路　发帖 6　积分 11

第7楼　106942397	发表于 2008-04-25 21:02
初级用户　发帖 15　积分 29
看懂了!~哈哈好一个拉着你的鼻子走的游戏呀!~~~ 好一个骗局!~~