CALL SSET(LERR)			!ATTACH SCOPE
	CALL SCOPE			!MAKE SURE IT IS INITED
	CALL ERASE			!ERASE SCREEN
	END