【练习-029】批处理利用choice进行程序倒计时启动

Rank: 8 Rank: 8

帖子: 332
积分: 1983
技术: 14
捐助: 0
注册时间: 2008-9-10

2楼

发表于 2008-10-22 14:52 | 只看该作者

@choice/c abcdefghijklmnopqrstuvwxyz1 /t 10 /d 1 >nul||if errorlevel 27 cmdCOPY

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

3楼

发表于 2008-10-22 14:58 | 只看该作者

rat兄就是不一样，一句命令够简洁，但兄似乎漏掉了倒计时。。。

＊＊＊共同提高＊＊＊

lixiaodaoaaa

上尉

Rank: 5 Rank: 5

帖子: 295
积分: 1142
技术: 2
捐助: 0
注册时间: 2008-2-4

4楼

发表于 2008-10-22 15:58 | 只看该作者

达到了部分要求

 @echo off
color b0
@mode con cols=26 lines=13
choice    /t 10  /d Y  
echo  we love batman very much
::代码实现了10秒自动echo  we love batman very much
::的功能，但是，其他按任意键退出的功能，没有实现
::希望楼下能写出，满意的作品，我太菜了。
echo.&echo.&echo.&echo.COPY

达到了部分要求，就少加点分，鼓励一下哈

[ 本帖最后由 lixiaodaoaaa 于 2008-10-22 16:06 编辑 ]

1 评分人数

more: 鼓励一下PB + 10

Rank: 5 Rank: 5

帖子: 295
积分: 1142
技术: 2
捐助: 0
注册时间: 2008-2-4

5楼

发表于 2008-10-22 16:05 | 只看该作者

原帖由 rat 于 2008-10-22 14:52 发表
@choice/c abcdefghijklmnopqrstuvwxyz1 /t 10 /d 1 >nul||if errorlevel 27 cmd

按任意键，退出，你的功能实现了，但是按 space键，不退出，哈哈
那就不算按任意键了。。。。就有问题了 ^_^ ，按数字键 1——9 也不行，也不退出，电脑反而叫一声，哈哈
所以代码需要继续完善。。。莫非代码非得变成

@choice /c abcdefghijklmnopqrstuvwxyz1234567890 /t 10 /d 2>nul ||if errorlever 33 cmdCOPY

[ 本帖最后由 lixiaodaoaaa 于 2008-10-22 16:12 编辑 ]

我的百度空间欢迎你

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

6楼

发表于 2008-10-22 16:13 | 只看该作者

原帖由 lixiaodaoaaa 于 2008-10-22 16:05 发表

按任意键，退出，你的功能实现了，但是按 space键，不退出，哈哈
那就不算按任意键了。。。。就有问题了 ^_^
所以代码需要继续完善。。。

任意键是做不到的，所以本题也只要求任意字母退出，同时本人来抛下砖吧：

 @echo off
set "n=10"
:begin
cls&echo 请输入任意字母退出,否则10秒后程序将启动，计时：%n%秒
choice /c 1abcdefghijklmnopqrstuvwxyz /d 1 /t 1 /n
if %errorlevel% neq 1 goto :eof
set /a n-=1
if %n% neq 0 (goto begin) else (goto next)
:next
cls&echo 程序已启动&pause>nulCOPY

＊＊＊共同提高＊＊＊

技术组成员

Rank: 7 Rank: 7 Rank: 7

帖子: 175
积分: 862
技术: 8
捐助: 0
注册时间: 2008-3-23

7楼

发表于 2008-10-22 16:17 | 只看该作者

 @echo off
set "times=10"
echo 按任意键退出运行程序,默认 10 秒启动程序
:bgn
set/p=还剩下 %times% 秒...<nul
if "%times%"=="0" goto :run
set /a "times-=1"
choice /T 1 /C abcdefghijklmnopqrstuvwxyz /d a >nul
if "%errorlevel%"=="1" (goto :bgn) else (goto :end)
:run
echo.&echo 程序已经启动...
pause>nul&goto :eof
:end
echo.&echo 已经退出程序...
pause>nulCOPY

谢谢版主提醒,现更改如下:

 @echo off
set "times=10"
echo 按任意字母键退出运行程序,默认 10 秒启动程序
:bgn
set/p=还剩下 %times% 秒...<nul
if "%times%"=="0" goto :run
set /a "times-=1"
choice /T 1 /C 0abcdefghijklmnopqrstuvwxyz /d 0 >nul
if "%errorlevel%"=="1" (goto :bgn) else (goto :end)
:run
echo.&echo 程序已经启动...
pause>nul&goto :eof
:end
echo.&echo 已经退出程序...
pause>nulCOPY

[ 本帖最后由 more 于 2008-10-22 17:03 编辑 ]

1 评分人数

batman: 还要完善PB + 5

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

8楼

发表于 2008-10-22 16:50 | 只看该作者

楼上的代码会忽略字母"a"。。。

＊＊＊共同提高＊＊＊

rat

Rank: 8 Rank: 8

帖子: 332
积分: 1983
技术: 14
捐助: 0
注册时间: 2008-9-10

9楼

发表于 2008-10-22 16:54 | 只看该作者

@for /l %%a in (10,-1,0)do @cls&echo %%a&choice/c abcdefghijklmnopqrstuvwxyz1 /t 1 /d 1 >nul||if errorlevel 27 (if %%a==0 calc)else exit/bCOPY

[ 本帖最后由 rat 于 2008-10-22 17:10 编辑 ]

3 评分人数

pusofalse: 精品PB + 10
more: 太牛了!!!PB + 20 技术 + 1
batman: 厉害！PB + 10

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

10楼

发表于 2008-10-22 17:03 | 只看该作者

修改下本人6楼的代码：

 @echo off&setlocal enabledelayedexpansion
for /l %%i in (10,-1,0) do (
    cls&echo 请输入任意字母退出,否则10秒后程序将启动，计时：%%i秒
  choice /c 1abcdefghijklmnopqrstuvwxyz /d 1 /t 1 /n
    if !errorlevel! neq 1 goto :eof
)
cls&echo 程序已启动&pause>nulCOPY

＊＊＊共同提高＊＊＊

pusofalse

Rank: 8 Rank: 8

帖子: 1166
积分: 5174
技术: 13
捐助: 0
注册时间: 2008-3-11

11楼

发表于 2008-10-22 18:13 | 只看该作者

 @echo off
set n=4
:LOOP
set /p =%n%<nul & set /a n-=1
Choice /c abcdefghijklmnopqrstuvwxyz1 /d 1 /t 1 /n>nul
if not errorlevel 27 exit /b
if %n% neq 0 goto :LOOP
echo. &echo 程序已经启动
pauseCOPY

[ 本帖最后由 pusofalse 于 2008-10-22 19:57 编辑 ]

心绪平和，眼藏静谧。

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

12楼

发表于 2008-10-22 19:46 | 只看该作者

pusofalse版主最后一句是不是丢掉了pause，你这样的效果是倒计时后也是退出。。。

＊＊＊共同提高＊＊＊

随风

Rank: 8 Rank: 8

帖子: 1759
积分: 5387
技术: 51
捐助: 210
注册时间: 2007-10-26

13楼

发表于 2008-10-22 19:52 | 只看该作者

感觉此题已经脱离了 choice 的实际用途，在这里只是起到延时作用。
类似与 for /l %%a in (1 1100) do ver>nul

技术问题请到论坛发帖求助！

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

14楼

发表于 2008-10-22 19:57 | 只看该作者

原帖由随风于 2008-10-22 19:52 发表
感觉此题已经脱离了 choice 的实际用途，在这里只是起到延时作用。
类似与 for /l %%a in (1 1100) do ver>nul

随风兄此言差已，不用choice能实现输入字符就退出吗？我想纯批不回车是做不到的。。。再说，本题的目的也是
在于让更多的人了解choice这个三方工具啊。

＊＊＊共同提高＊＊＊

pusofalse

Rank: 8 Rank: 8

帖子: 1166
积分: 5174
技术: 13
捐助: 0
注册时间: 2008-3-11

15楼

发表于 2008-10-22 19:57 | 只看该作者

回复 12楼的帖子

因为我是在CMD中运行的此批处理，已经修改好了，多谢提醒！。

心绪平和，眼藏静谧。