/*
 * 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 */
