神奇的读心术之P处理版

一脸萌比 · 发表于 2017-8-8 11:07:05

@echo off
title 读心术P处理版
:begin
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 begin_num=9
set end_num=1
set num=0
setlocal enabledelayedexpansion
:loop
for /l %%i in (9,-1,0) do (
for /l %%j in (%begin_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 end
if %num% equ 50 (
set begin_num=8
set end_num=0
goto loop
)
:end
echo _________________________________________________________________________________________
echo 按任意键进入下一步...
pause>nul
cls
mode con cols=25 lines=10
echo.
echo 你想要的符号是：
echo ╭────╮
echo │ │
echo │ %var18% │
echo │ │
echo ╰────╯
echo.
echo 按任意键再来一次...
pause>nul
goto begin

复制代码

520 · 发表于 2017-8-8 15:02:16

66666666

好几个8 · 发表于 2017-8-8 16:57:05

看看是用了神魔之术

demon · 发表于 2017-8-8 19:13:01

噗，领位币。

Cute · 发表于 2017-8-8 19:13:19

路过看看

Kuni7wa · 发表于 2017-9-18 14:55:57

这也可以，这魔术软件6了

小清新 · 发表于 2017-9-18 21:10:23

好久没来，路过水1帖。

QAQ · 发表于 2017-9-29 18:05:37

瞅瞅肿么读。

CNWTEPRG · 发表于 2017-10-15 22:03:25

看看啥玩意了。

朵朵 · 发表于 2019-4-9 18:58:05

我知道是啥玩意

帐号		自动登录	找回密码
密码			注册已关闭

[批处理源码开源] 神奇的读心术之P处理版

评分

相关帖子

回帖奖励 +5

回帖奖励 +5

回帖奖励 +5

回帖奖励 +5

回帖奖励 +5