Home | Info | Community | Development | myReactOS | Contact Us
ReactOS Development > Doxygendelay.c
Go to the documentation of this file.
00001 /* 00002 * DELAY.C - internal command. 00003 * 00004 * clone from 4nt delay command 00005 * 00006 * 30 Aug 1999 00007 * started - Paolo Pantaleo <paolopan@freemail.it> 00008 * 00009 * 00010 */ 00011 00012 #include <precomp.h> 00013 00014 #ifdef INCLUDE_CMD_DELAY 00015 00016 00017 INT CommandDelay (LPTSTR param) 00018 { 00019 DWORD val; 00020 DWORD mul=1000; 00021 00022 if (_tcsncmp (param, _T("/?"), 2) == 0) 00023 { 00024 ConOutResPaging(TRUE,STRING_DELAY_HELP); 00025 return 0; 00026 } 00027 00028 nErrorLevel = 0; 00029 00030 if (*param==0) 00031 { 00032 error_req_param_missing (); 00033 return 1; 00034 } 00035 00036 if (_tcsnicmp(param,_T("/m"),2) == 0) 00037 { 00038 mul = 1; 00039 param += 2; 00040 } 00041 00042 val = _ttoi(param); 00043 Sleep(val * mul); 00044 00045 return 0; 00046 } 00047 00048 #endif /* INCLUDE_CMD_DELAY */ Generated on Fri May 25 2012 04:16:29 for ReactOS by
1.7.6.1
|