CLS
INPUT "TEXT ", TEXT$
A = LEN(TEXT$)
MIDDLE = 78 / 2 - A / 2
LOCATE 23 / 2, MIDDLE : PRINT TEXT$
locate 23 / 2 + 2, middle : PRINT 23 / 2; MIDDLE


'cool huh? Before I made this I always had to guess and check every single text 'that I wanted to center. This helps with intro pages to games and stuff like 'that!

I made this script 2005 or 2006 as intro of one game that never finished.
http://www.ascii-world.com/tiki-read_article.php?articleId=32

There should be some delay function before "Next y" so letters comes out one by one, like typing.

I am just glad to see the likes of you and Laanan Fisher visiting these forums, it is just a pity that we have lost others.

But i mostly keep my mouth shut since i seem to be somesort of trigger for someones ;)

i enjoy of the silence.