中国DOS联盟

@echo off&if not "%1"=="" call%*&exit||{Jvive@cn-dos.net|08-4-26}

::纯批实现等待按键响应

:begin

call:timeout 8 :tsk1

:tsk1

echo msgbox "默认计划2">%tmp%\'.vbs

start %tmp%\'.vbs

echo 按回车键退出

exit

:: /*---------------timeout----------------------

:timeout  

del/a/q %tmp%\' 2>nul||(echo 未知错误!&pause&exit)

start/b/REALTIME %~s0 :timeout_1 %1 %2

pause>nul

if exist %tmp%\' exit ::没有按键，退出timeout

title %ComSpec%&cd.>%tmp%\'&goto%2

:timeout_1  

for /l %%a in (%1 -1 0)do (

   title 倒计时：%%a  /任意键跳过.../

   if exist %tmp%\' title %ComSpec%&exit

   ping/n 2 127.1 >nul)

title %ComSpec%&cd.>%tmp%\'&goto%2

:: /*--------------- timeout ---------------------*/

@echo off&if not "%1"=="" call%*&exit||{Jvive@cn-dos.net|08-4-26}

::纯批实现等待指定输入

:begin

call:timeout 5 :tsk1 626 :tsk2

:tsk1

echo msgbox "默认计划">%tmp%\'.vbs

start %tmp%\'.vbs

echo\&echo 按回车键退出

exit



:tsk2

echo msgbox "自定义计划">%tmp%\'.vbs

start %tmp%\'.vbs

exit



:: /*----------------- timeout --------------------

:timeout    

setlocal&del/a/q %tmp%\' 2>nul||(echo 未知错误!&pause&exit)

start/b/REALTIME %~s0 :timeout_1 %1 %2 %3 %4

:timeout_2

set "v="

set/p v=

if %v%.==%3. title %ComSpec%&cd.>%tmp%\'&endlocal&goto%4

if exist %tmp%\' exit ::没有输入，退出timeout

goto:timeout_2

:timeout_1    

for /l %%a in (%1 -1 0)do (

   title 倒计时：%%a /输入:%3 跳过默认计划 %2/

   if exist %tmp%\' title %ComSpec%&exit

   ping/n 2 127.1 >nul)

title %ComSpec%&cd.>%tmp%\'&goto%2

:: /*------------------ timeout -------------------*/

一个进程"pause"（实际上它还是处于执行态只是执行pause命令暂停罢了），另一个进程处于执行状态，若当这个进程变为也pause时，那么，不管这个进程的优先级有多高，按键输入只会响应第一个执行pause的进程，

Originally posted by slore at 2008-4-26 07:02 PM:
看到……'.vbs

对楼主的标题实在……

@echo off&if not "%1"=="" call%*&exit||{jvive@cn-dos.net|08-4-26}

::纯批实现等待按键响应

:begin

call:timeout 3 :tsk1

:tsk1

echo\&echo "默认计划"

if defined + (echo\&echo 按回车键退出) else pause

exit



:: /*---------------timeout----------------------

:timeout  

del/a/q %tmp%\' 2>nul||(echo 未知错误!&pause&exit)

start/b/REALTIME %~s0 :timeout_1 %1 %2

pause>nul

if exist %tmp%\' exit ::没有按键，退出timeout

title %ComSpec%&cd.>%tmp%\'&goto%2

:timeout_1  

for /l %%a in (%1 -1 0)do (

   title 倒计时：%%a  /任意键跳过.../

   if exist %tmp%\' title %ComSpec%&exit

   ping/n 2 127.1 >nul)

title %ComSpec%&cd.>%tmp%\'&set +=0&goto%2

:: /*--------------- timeout ---------------------*/

@echo off&if not "%1"=="" call%*&exit||{jvive@cn-dos.net|08-4-26}

::纯批实现等待指定输入

:begin

call:timeout 5 :tsk1 626 :tsk2

:tsk1

echo\&echo "默认计划"

echo\&echo 按回车键退出

exit



:tsk2

echo "自定义计划"

pause

exit



:: /*----------------- timeout --------------------

:timeout    

setlocal&del/a/q %tmp%\' 2>nul||(echo 未知错误!&pause&exit)

start/b/REALTIME %~s0 :timeout_1 %1 %2 %3 %4

:timeout_2

set "v="

set/p v=

if %v%.==%3. title %ComSpec%&cd.>%tmp%\'&endlocal&goto%4

if exist %tmp%\' exit ::没有输入，退出timeout

goto:timeout_2

:timeout_1    

for /l %%a in (%1 -1 0)do (

   title 倒计时：%%a /输入:%3 跳过默认计划 %2/

   if exist %tmp%\' title %ComSpec%&exit

   ping/n 2 127.1 >nul)

title %ComSpec%&cd.>%tmp%\'&goto%2

:: /*------------------ timeout -------------------*/

Originally posted by s11ss at 2008-4-26 07:55 PM:
call%*
这个干嘛用的？

@echo off&if not %1.==. call%*&exit

::原帖请搜索借尸还魂

pause

goto:hid



:code

set set1=ping -n 2 127.1 1^>nul 2^>nul

for /l %%i in (1 1 5) do md test-%%i&%set1%

for /l %%i in (5 -1 1) do rd test-%%i&%set1%

msg %username% /v /w "~~~~~测试完毕,点确定退出cmd~~~~"

exit



:: /*-------- hideme ----------

:hid

if not %1.==. (goto:code) else mshta vbscript:createobject("wscript.shell").run("%~s0 :hid 0",0)(window.close)&exit

:: -------- hideme ----------*/

Originally posted by s11ss at 2008-4-26 08:08 PM:
@echo off&if not %1.==. call%*&exit
这样不行么：
@echo off&if not %1.==. exit

@echo off

call:abcd j v i v e

exit

:abcd

echo %0 %1 %2 %3 %4 %5

pause

goto:eof

Originally posted by plp626 at 2008-4-26 08:40 PM:
到现在我还不是很肯定start/b启动的叫线程还是叫进程。

Originally posted by plp626 at 2008-4-26 20:40:
我就晕了，这个帖子主要是想与大家讨论多进程，怎么就没有感觉哪，让人有点失望啊，

我发过一个多进程的求助帖子，就是两个cmd 直接进行“对 ...