BORDER.SUB - Prints a pretty border around the screen
! new limits for screen interaction: 	row 2, column 2 to
!					row 23, column 78
! Needs no map statements, may be ++INCLUDEd into any BASIC program
! uses the variable n for it's loops
! 3/7/83 ske
! This is a basic include for SET925.BAS
BORDER:
	? tab(1,1); "+";
	for n = 2 to 78
	    ? tab(1,n); "-";
	next n
	? "+";

	for n = 2 to 22
	    ? tab(n,79); "|";
	next n
	? tab(23,79); "+";

	for n = 78 to 2 step - 1
	    ? tab(23,n); "-";
	next n
	? tab(23,1); "+";

	for n = 22 to 2 step - 1
	    ? tab(n,1); "|";
	next n
	return