base/shell/cmd/delay.c

   1 /*
   2  * DELAY.C - internal command.
   3  *
   4  * clone from 4nt delay command
   5  *
   6  * 30 Aug 1999
   7  *     started - Paolo Pantaleo <paolopan@freemail.it>
   8  *
   9  *
  10  */
  11
  12 #include "precomp.h"
  13
  14 #ifdef INCLUDE_CMD_DELAY
  15
  16
  17 INT CommandDelay (LPTSTR param)
  18 {
  19     DWORD val;
  20     DWORD mul=1000;
  21
  22     if (_tcsncmp (param, _T("/?"), 2) == 0)
  23     {
  24         ConOutResPaging(TRUE,STRING_DELAY_HELP);
  25         return 0;
  26     }
  27
  28     nErrorLevel = 0;
  29
  30     if (*param==0)
  31     {
  32         error_req_param_missing ();
  33         return 1;
  34     }
  35
  36     if (_tcsnicmp(param,_T("/m"),2) == 0)
  37     {
  38         mul = 1;
  39         param += 2;
  40     }
  41
  42     val = _ttoi(param);
  43     Sleep(val * mul);
  44
  45     return 0;
  46 }
  47
  48 #endif /* INCLUDE_CMD_DELAY */