中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-05 22:22
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 我的cmd运行效果!代码! 查看 784 回复 1
楼 主 我的cmd运行效果!代码! 发表于 2007-10-02 10:16 ·  中国 山西 太原 联通
初级用户
积分 55
发帖 17
注册 2007-08-28 15:43
18年会员
UID 96031
性别 男
状态 离线
 smilediao作品
:start
@echo off&setlocal enabledelayedexpansion
cls
color 0a
set a= 怨情
set b= 美人卷珠帘,深坐颦蛾眉。
set c= 但见泪痕湿,不知心恨谁?
set d=29,e=21,f=21
:hello
set /a d+=1
cls
echo. !a:~0,%d%!
ping -n 1 127.1>nul
if !d! equ 33 (goto bye) else (goto hello)
:bye
cls
echo %a%
set /a e+=1
echo. !b:~0,%e%!
ping -n 1 127.1>nul
if !e! equ 34 (goto he) else (goto bye)
:he
cls
echo %a%
echo %b%
set /a f+=1
echo. !c:~0,%f%!
ping -n 1 127.1>nul
if !f! equ 34 (endlocal&ping -n 2 127.1>nul&goto end) else (goto he)
rem endlocal为结束当前的环境变量的设置,从新来设置一次
:end
echo.&echo.&echo 请输入你要执行的命令:
set /p command=
%command%
echo 是否还要执行另外的一条命令(y/n)?
set /p yn=
if "%yn%"=="y" goto start
exit
2 发表于 2007-10-02 11:48 ·  中国 香港 腾讯云
银牌会员
★★★
积分 1,928
发帖 931
注册 2007-01-06 11:46
19年会员
UID 75624
性别 男
状态 离线
 smilediao作品
:start
@echo off&setlocal enabledelayedexpansion
cls
color 0a
set a= 怨情
set b= 美人卷珠帘,深坐颦蛾眉。
set c= 但见泪痕湿,不知心恨谁?
set d=29,e=21,f=21
:hello
set /a d+=1
cls
echo. !a:~0,%d%!
ping -n 1 127.1>nul
if !d! equ 33 (goto bye) else (goto hello)
:bye
cls
echo %a%
set /a e+=1
echo. !b:~0,%e%!
ping -n 1 127.1>nul
if !e! equ 34 (goto he) else (goto bye)
:he
cls
echo %a%
echo %b%
set /a f+=1
echo. !c:~0,%f%!
ping -n 1 127.1>nul
if !f! equ 34 (endlocal&ping -n 2 127.1>nul&goto end) else (goto he)
rem endlocal为结束当前的环境变量的设置,从新来设置一次
:end
echo.&echo.&echo 请输入你要执行的命令:
set /p command=
%command%
echo 是否还要执行另外的一条命令(y/n)?
set /p yn=
if "%yn%"=="y" goto start
exit
论坛跳转: