ClearScreen(screen) register TScreen *screen;
ClearScreen(register TScreen *screen)
ClearScreen(screen)register TScreen *screen;{	register int top;	if(screen->cursor_state)		HideCursor();	screen->do_wrap = 0;	if((top = -screen->topline) <= screen->max_row) {		if(screen->scroll_amt)			FlushScroll(screen);		ClearCurBackground(screen,		    top * FontHeight(screen) + screen->border,			    OriginX(screen), 		    (screen->max_row - top + 1) * FontHeight(screen),		    Width(screen));	}	ClearBufRows (screen, 0, screen->max_row);}