Category : Files from Magazines
Archive   : VOL10N19.ZIP
Filename : CENTER3.WK1

 
Output of file : CENTER3.WK1 contained in archive : VOL10N19.ZIP
– /ÿÿ q Hd GCOUNTGFINISH  GGETWIDTHGPROMPT1GPROMPT2GRANGEGTEXTGTEXTLENGWIDTHG\RG\Xÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ0ÿÿÿÿÿÿÿÿ ÿÿÿÿ# ÿÿÿÿgÿÿÿÿÿÿÿÿÿÿÿÿi(ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿfÿÿÿÿÿÿÿÿ$%ò&ò'(\027E (
L<)'*ÿÿÿÿÿÿÿÿ-·ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿqq ÿ'\x ÿ'{getlabel PROMPT1,RANGE}~ÿ'{getlabel PROMPT2,TEXT}~ÿ'{let TEXT,@trim(TEXT)}"ÿ'{let TEXTLEN,@length(TEXT)} ÿ'\rÿ'/rncTITLERANGE~{RANGE}~ÿ'{goto}TITLERANGE~ÿ'{let WIDTH,0}ÿ'{windowsoff}1ÿ'{for COUNT,1,@cols(TITLERANGE),1,GETWIDTH}>ÿ '{if TEXTLEN>WIDTH}{let TITLERANGE,TEXT}~{branch FINISH};ÿ
'{let TITLERANGE,@repeat(" ",(WIDTH-TEXTLEN)/2)&TEXT}
ÿ 'FINISHÿ '{goto}TITLERANGE~ÿ '/rndTITLERANGE~ÿ'GETWIDTH5ÿ'{let WIDTH,WIDTH+@cellpointer("width")}{right}ÿ'PROMPT1ÿ'Enter title range: ÿ'PROMPT2ÿ'Enter title:  ÿ'RANGE ÿ'TEXT ÿ'WIDTHÿ'TEXTLEN ÿ'COUNT ÿ' 

  3 Responses to “Category : Files from Magazines
Archive   : VOL10N19.ZIP
Filename : CENTER3.WK1
”

  1. Daniel says:
    January 27, 2013 at 3:59 pm

    Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. Joshie says:
    March 18, 2014 at 4:57 pm

    This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. DiskingRound says:
    January 14, 2015 at 10:57 pm

    But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/