Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2025-07-31 11:31:40 +00:00
Code Issues Projects Releases Packages Wiki Activity

Git conversion: Make reactos the root directory, move rosapps, rostests, wallpapers into modules, and delete rossubsys.

Browse source
This commit is contained in:
Colin Finck 2017-10-03 07:45:34 +00:00
parent b94e2d8ca0
commit c2c66aff7d
24198 changed files with 0 additions and 37285 deletions
Download patch file Download diff file Expand all files Collapse all files

102
base/shell/cmd/screen.c Normal file
View file

@ -0,0 +1,102 @@
/*
* SCREEN.C - screen internal command.
*
* clone from 4nt msgbox command
*
* 30 Aug 1999
* started - Paolo Pantaleo <paolopan@freemail.it>
*
* 30-Apr-2005 (Magnus Olsen <magnus@greatlord.com>)
* Remove all hardcoded strings in En.rc
*
*/
#include "precomp.h"
#ifdef INCLUDE_CMD_SCREEN
INT CommandScreen(LPTSTR param)
{
SHORT x, y;
SHORT maxx, maxy;
BOOL bSkipText = FALSE;
if (_tcsncmp(param, _T("/?"), 2) == 0)
{
ConOutResPaging(TRUE,STRING_SCREEN_HELP);
return 0;
}
nErrorLevel = 0;
/* Retrieve the screen dimensions */
GetScreenSize(&maxx, &maxy);
/* Get row */
while (_istspace(*param))
param++;
if (!*param)
{
error_req_param_missing();
return 1;
}
y = _ttoi(param);
if (y < 0 || y > (maxy-1))
{
ConOutResPuts(STRING_SCREEN_ROW);
return 1;
}
/* Get column */
if (!(param = _tcschr(param, _T(' '))))
{
error_req_param_missing();
return 1;
}
while (_istspace(*param))
param++;
if (!*param)
{
error_req_param_missing();
return 1;
}
x = _ttoi(param);
if (x < 0 || x > (maxx-1))
{
ConErrResPuts(STRING_SCREEN_COL);
return 1;
}
/* Get text */
if (!(param = _tcschr(param, _T(' '))))
{
bSkipText = TRUE;
}
else
{
while (_istspace(*param))
param++;
if (!*param)
bSkipText = TRUE;
}
bIgnoreEcho = TRUE;
if (bSkipText)
x = 0;
SetCursorXY(x, y);
if (!bSkipText)
ConOutPuts(param);
return 0;
}
#endif /* INCLUDE_CMD_SCREEN */