level 12
严文思逸
楼主
RT,这是楼主见过的最神奇的Bat!
求大神帮忙分析下,楼主已经不知道怎么形容这个Bat了。
附件发不了,只好发云盘了。
艹,云盘都跪了,还是直接复制粘贴吧,反正也不大。
::Bat内容如下。
{
@echo off
title --读 心 术
:: 版本二:
:dxsbegin
color 5F
mode con cols=90 lines=30
cls
echo.
echo 从10~99之间任意选择一个数,把这个数的十位与个位相加,再把任意选择的数减去这个和,
echo 例如:你选的数是23,然后2
+3
=5,然后23-5=18,在图表中找出与差值对应的符号,并把这个符号
echo 牢记心中,然后进入下一步,你会发现:显示出来的符号就是你刚刚心里记下的那个符号。
echo.
echo _________________________________________________________________________________________
echo.
set str=☆★○●◎◇◆□■△▲※→←↑↓〓@〖〗【】〖〗≈≡∑∈⊙∵∴¤
set dxsbegin_num=9
set end_num=1
set num=0
setlocal enabledelayedexpansion
:loop
for /l %%i in (9,-1,0) do (
for /l %%j in (%dxsbegin_num%,-2,%end_num%) do (
set /a num+=1
set /a random_=!random!%%32
set /a ordinal=1%%j%%i-100
if !ordinal! lss 10 set ordinal= !ordinal!
call set var!ordinal!=%%str:~!random_!,1%%
set /a ordinal_mod=!ordinal!%%9
if !num! gtr 1 if !num! lss 100 if !ordinal_mod! equ 0 set var!ordinal!=!var18!
set /a line_mod=!num!%%5
call set var=!var! !ordinal! %%var!ordinal!%%
if !line_mod! equ 0 echo !var!&set var=
)
)
if %num% equ 100 goto end000
if %num% equ 50 (
set dxsbegin_num=8
set end_num=0
goto loop
)
:end000
echo ________________________________________________________________________________________
echo 按任意键进入下一步...
pause>nul
cls
mode con cols=25 lines=10
echo.
echo. 你想要的符号是:
echo.
echo.
echo. %var18%
echo.
echo.
echo.
echo. 按任意键退出...
pause>nul
exit
}
至于度娘是否吞空格之类的,我也没办法。
2015年07月19日 05点07分
1
求大神帮忙分析下,楼主已经不知道怎么形容这个Bat了。
附件发不了,只好发云盘了。
艹,云盘都跪了,还是直接复制粘贴吧,反正也不大。
::Bat内容如下。
{
@echo off
title --读 心 术
:: 版本二:
:dxsbegin
color 5F
mode con cols=90 lines=30
cls
echo.
echo 从10~99之间任意选择一个数,把这个数的十位与个位相加,再把任意选择的数减去这个和,
echo 例如:你选的数是23,然后2
+3
=5,然后23-5=18,在图表中找出与差值对应的符号,并把这个符号
echo 牢记心中,然后进入下一步,你会发现:显示出来的符号就是你刚刚心里记下的那个符号。
echo.
echo _________________________________________________________________________________________
echo.
set str=☆★○●◎◇◆□■△▲※→←↑↓〓@〖〗【】〖〗≈≡∑∈⊙∵∴¤
set dxsbegin_num=9
set end_num=1
set num=0
setlocal enabledelayedexpansion
:loop
for /l %%i in (9,-1,0) do (
for /l %%j in (%dxsbegin_num%,-2,%end_num%) do (
set /a num+=1
set /a random_=!random!%%32
set /a ordinal=1%%j%%i-100
if !ordinal! lss 10 set ordinal= !ordinal!
call set var!ordinal!=%%str:~!random_!,1%%
set /a ordinal_mod=!ordinal!%%9
if !num! gtr 1 if !num! lss 100 if !ordinal_mod! equ 0 set var!ordinal!=!var18!
set /a line_mod=!num!%%5
call set var=!var! !ordinal! %%var!ordinal!%%
if !line_mod! equ 0 echo !var!&set var=
)
)
if %num% equ 100 goto end000
if %num% equ 50 (
set dxsbegin_num=8
set end_num=0
goto loop
)
:end000
echo ________________________________________________________________________________________
echo 按任意键进入下一步...
pause>nul
cls
mode con cols=25 lines=10
echo.
echo. 你想要的符号是:
echo.
echo.
echo. %var18%
echo.
echo.
echo.
echo. 按任意键退出...
pause>nul
exit
}
至于度娘是否吞空格之类的,我也没办法。