define	MoveRight = 0,
	MoveLeft = 1,
	MoveUp = 2,
	MoveDown = 3;

external simple procedure ClearScreen;
external simple procedure HomeCursor;
external simple procedure KillLine;
external simple procedure MoveCursor(integer Direction,HowFar);
external simple procedure SetCursor(integer NewX, NewY);