reactos/base/shell/cmd/delay.c
Cameron Gutman 29fa274d6d - Create another branch for networking fixes
- TSVN choked repeatedly when attempting to merge ~9000 revs into the branch (tried 3 times on 2 different computers)
 - If someone wants to delete aicom-network-fixes, they are welcome to
 - Lesson learned: Letting a branch get thousands of revs out of date is a horrible idea

svn path=/branches/aicom-network-branch/; revision=44353
2009-12-02 03:23:19 +00:00

48 lines
610 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 */