mirror of
https://github.com/reactos/reactos.git
synced 2024-06-16 01:21:44 +00:00
49 lines
691 B
C
49 lines
691 B
C
/*
|
|
* DELAY.C - internal command.
|
|
*
|
|
* clone from 4nt delay command
|
|
*
|
|
* 30 Aug 1999
|
|
* started - Paolo Pantaleo <paolopan@freemail.it>
|
|
*
|
|
*
|
|
*/
|
|
|
|
#include "precomp.h"
|
|
|
|
#ifdef INCLUDE_CMD_DELAY
|
|
|
|
|
|
INT CommandDelay (LPTSTR param)
|
|
{
|
|
DWORD val;
|
|
DWORD mul=1000;
|
|
|
|
if (_tcsncmp (param, _T("/?"), 2) == 0)
|
|
{
|
|
ConOutResPaging(TRUE,STRING_DELAY_HELP);
|
|
return 0;
|
|
}
|
|
|
|
nErrorLevel = 0;
|
|
|
|
if (*param==0)
|
|
{
|
|
error_req_param_missing ();
|
|
return 1;
|
|
}
|
|
|
|
if (_tcsnicmp(param,_T("/m"),2) == 0)
|
|
{
|
|
mul = 1;
|
|
param += 2;
|
|
}
|
|
|
|
val = _ttoi(param);
|
|
Sleep(val * mul);
|
|
|
|
return 0;
|
|
}
|
|
|
|
#endif /* INCLUDE_CMD_DELAY */
|