114 L = PEEK (37):SP$ = "": FOR X = 1 TO 20 - LEN (ST$) / 2:SP$ = SP$ + " ": NEXT :ST$ = SP$ + ST$ + SP$: IF LEN (ST$) / 2 < > INT ( LEN (ST$) / 2) THEN ST$ = ST$ + " " 115 FOR X = 1 TO 20:PR$ = LEFT$ (ST$,X) + RIGHT$ (ST$,X): VTAB L: HTAB 21 - X: PRINT PR$: NEXT : RETURN 116 L = PEEK (37):SP$ = "": FOR X = 1 TO 20 - LEN (ST$) / 2:SP$ = SP$ + " ": NEXT :ST$ = SP$ + ST$ + SP$: IF LEN (ST$) / 2 < > INT ( LEN (ST$) / 2) THEN ST$ = ST$ + " " 117 FOR X = 1 TO 20:PR$ = LEFT$ (ST$,X) + RIGHT$ (ST$,X): VTAB L: HTAB 21 - X:Q = PEEK ( - 16336) + PEEK ( - 16336): PRINT PR$: NEXT : RETURN