level 10
@echo off
title 成电教学楼
echo 原创意来自【@hello world】的qq空间说说
echo.
echo.
set /a x=0
set /a i=0
set /p a=请输入大于1的整数,作为楼层数 (建议不要太大)
::a是楼层数
set /p b=请输入大于0的整数,作为窗户数(建议不要太大)
::b是窗户数
set /p inputc=人的位置
set /a c=%a%-%inputc%
set /a c1=%c%+1
set /a b1=%b%*2
set /a b2=%b%*2+2
set /a a1=%a%-1
::顶部
>1.txt set /p = "┌" <nul
:a
>>1.txt set /p = "─" <nul
set /a i+=1
if %i% GEQ %b1% set /a i=0 & goto b
goto a
:b
if %c% EQU %a% goto bb
echo ┐>>1.txt
goto c1
:bb
echo ┐ ╰?╯>>1.txt
::楼层
:c1
>>1.txt set /p = "│" <nul
:c
>>1.txt set /p = "┌" <nul
>>1.txt set /p = "┐" <nul
set /a i+=1
if %i% GEQ %b% set /a i=0 & goto d
goto c
:d
if %c% EQU %x% goto dd
if %c1% EQU %x% goto dd2
echo │>>1.txt
goto ddd
:dd
echo │ ╰?╯>>1.txt
goto ddd
:dd2
echo │ /)>>1.txt
:ddd
if %x% GEQ %a1% goto gnd
>>1.txt set /p = "│" <nul
:e
>>1.txt set /p = "└" <nul
>>1.txt set /p = "┘" <nul
set /a i+=1
if %i% GEQ %b% set /a i=0 & goto f
goto e
:f
if %c% EQU %x% goto ff
echo │>>1.txt
goto fff
:ff
echo │ />>1.txt
:fff
::一层楼已生成
cls
set /a x+=1
::此时x的值就是已经生成的楼层数
cls
set /a pro=%x%*100/%a%
echo 原创意来自【@hello world】的qq空间说说
echo.
echo 正在执行操作
echo.
echo.
echo 已经完成了%pro%%%
if %x% GEQ %a1% goto c1
goto c1
:gnd
>>1.txt set /p = "┴" <nul
set /a i+=1
if %i% GEQ %b2% set /a i=0 & goto end
goto gnd
:end
>>1.txt set /p = "─" <nul
>>1.txt set /p = "─" <nul
>>1.txt set /p = "─" <nul
>>1.txt set /p = "─" <nul
>>1.txt set /p = "─" <nul
>>1.txt set /p = "─" <nul
cls
echo 原创意来自【@hello world】的qq空间说说
echo.
echo successful!
echo.
echo ─ >>1.txt
echo 成电教学楼 一跃解千愁>>1.txt
echo.
type 1.txt
echo.
echo.
echo.
echo 随便按一个键都可以退出。。。
pause >nul
2015年11月13日 14点11分