/************************************************************************
*	string.com	-for string statements				*
************************************************************************/
common/string/string_used,string_ptr,string_buf
integer string_used			#total used up to now
integer string_ptr(MAX_STRING)		#pointer to string beginnings.
character string_buf(MAX_STRING_TOTAL)