Category : Modula II Source Code
Archive   : M2LIB20.ZIP
Filename : WINDOWS.M2O

 
Output of file : WINDOWS.M2O contained in archive : M2LIB20.ZIP
Windowse¯sSysteme¯sStoragef¯sDisplaye¯sTermBasee¯sASCIIe¯sStringse¯sCenterCüw°ÍÀU‹ìUÄôÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.ŽÇFü‹F
‰Fô‹Fü;Fôw.nôsÇFô‹Fü9F
s°ÍÀÄvð&Æ‹Fü;FôsÿFüëÞ6ÿv6ÿv6ÿvš.Ž‰Fø‹Fø;F rÿvÿvÿvÿv
ÿvÿvš.Žëz‹F +Fø‰Fö‹FöÑè‰FúÇFü‹Fü;Fw‹Fü9Fs°ÍÀÄvð&€<t°ë°ÐÈs;‹Fú9F
s°ÍÀÄvð‹Fü9Fs°ÍÀ‰vòŒFôÄ~ø&ŠÄvò&ˆ6ÿFü6ÿFú뜋å]Ê“ºsaveDisplayEéüw°ÍÀU‹ôÿvþV‹îÄøÿ‹vþ6ÄtŒÀ Æu°ÍÀ&‹D]&‹\_‰Fö‰^ø‹F
‰Fú‹F‰Fô‹Fú;Fôv閁nôsÇFôÄ6ª~úv°ÍÀ‹Fú» ÷ã&Ä4ŒÃ Þu°ÍÀð~Ov°ÍÀ‹FÑàðŒÀPVÿvøÿvö‹vþ6ÄtŒÀ Æu°ÍÀ&ÿtaš.Ž‹vþ6ÄtŒÀ Æu°ÍÀ&‹DaÑà6Fö‹Fú;FôsÿFúévÿ‹å]¬öSaveDisplay.lüw°ÍÀU‹ìUÄüÿ.ŽÄvŒÀ Æu°ÍÀ‰vúŒFü6Ävú&DP6Ävú&D
Pš.ŽÄvú&ÿ4Ävú&ÿtÄvú&ÿtÄvú&ÿtè‹å]Êm’
restoreDisplayšLüw°ÍÀU‹ôÿvþV‹îÄøÿ‹vþ6ÄtŒÀ Æu°ÍÀ&‹D]&‹\_‰Fö‰^ø‹F
‰Fú‹F‰Fô‹Fú;FôvéùnôsÇFô‹vþ6ŠDÐÈscÿvøÿvöÄ6ª~úv°ÍÀ‹Fú» ÷ã&Ä4ŒÃ Þu°ÍÀð~Ov°ÍÀ‹FÑàðŒÀPV‹vþ6ÄtŒÀ Æu°ÍÀ&ÿtaš.ŽëVÿvøÿvö~úv°ÍÀ‹Fú» ÷ã‹ð~Ov°ÍÀ‹FÑàðD
ŒÛSP‹vþ6ÄtŒÀ Æu°ÍÀ&‹DaÑàPš.Ž‹vþ6ÄtŒÀ Æu°ÍÀ&‹DaÑà6Fö‹Fú;FôsÿFúéÿ‹å]ÂV® RestoreDisplayæNüw°ÍÀU‹ìUÄüÿ.ŽÄvŒÀ Æu°ÍÀ‰vúŒFüÄvú&ÿ4Ävú&ÿtÄvú&ÿtÄvú&ÿtè
‹å]Ê, UpdtDisplay4öü w°ÍÀU‹ìUÄôÿ.ŽÄvŒÀ Æu°ÍÀ‰vøŒFúÄvø&‹‰FüÄvø&‹D‰Fö‹Fü;Föv騁nösÇFö~üv°ÍÀ‹Fü» ÷ã‹ðÄ~ø&}Ov°ÍÀ&‹EÑàðD
ŒÛSPÄ6ª~üv°ÍÀ‹Fü» ÷ã&Ä4ŒÃ Þu°ÍÀð‰vòŒFôÄ~ø&}Ov°ÍÀ&‹EÑàÄvòðŒÀPVÄvø&ÿtaš.Ž‹Fü;FösÿFüédÿ‹å]Ê
OpenWindow*Ձüw°ÍÀU‹ìUÄèÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Ž¡‹ ÃtéåP¸iPš.ŽÄ6ŒÀ Æu°ÍÀ‰vòŒFôÄvò&ÇDe&ÇDgÄvò&ÇÄvò&ÇDÄvò&ÇDÄvò&ÇDOÄvò&ÆD Ävò&ta‰vîŒFðÄ~ò&}‰~êŒFìÄvò&t‰væŒFèÄ~ê&‹Ävæ&+Ävî&‰Ävò&tc‰vîŒFðÄ~ò&‹EÄvò&+Ävò&÷daÑàÄvî&‰6Ävò&D]PÄvò&ÿtcš.ŽÄ6ŒÀ Æu°ÍÀ‰vòŒFôÿ6ÿ6š‹FÄ6®&‰‹FÄ6²&‰‹FÄ6¶&‰‹FÄ6º&‰ŠF ¢6FúP¸iPš.ŽÄ6®&‹ÄvúŒÃ Þu°ÍÀ&‰ÄvúŒÀ Æu°ÍÀ&t‰vòŒFôÄ>²&‹Ävò&‰ÄvúŒÀ Æu°ÍÀ&t‰vòŒFôÄ>¶&‹Ävò&‰ÄvúŒÀ Æu°ÍÀ&t‰vòŒFôÄ>º&‹Ävò&‰ÄvúŒÀ Æu°ÍÀ &ˆD ~
s°ÍÀÄv&€<t=6ÿv
6ÿv6ÿvÄ6º&‹Ä6²&+-P6ÄvúŒÀ Æu°ÍÀ¸OP&D
Pšë8ÇFö~öOw,ÄvúŒÀ Æu°ÍÀ~öOv°ÍÀvö&ÆD
~öOsÿFöëÔÄvúŒÀ Æu°ÍÀ&ta‰vòŒFôÄ>º&‹Ä6²&+Ävò&‰ÄvúŒÀ Æu°ÍÀ&tc‰vòŒFôÄ>¶&‹Ä6®&+ÄvúŒÃ Þu°ÍÀ&÷daÑàÄvò&‰6ÄvúŒÀ Æu°ÍÀ&D]PÄvúŒÀ Æu°ÍÀ&ÿtcš.ŽÄvúŒÀ Æu°ÍÀ¡‹&‰De&‰\g‹Fú‹^ü£‰ ÐÈréêÄ6®&ÿ4Ä6²&ÿ4š.Ž¸ÉPÄ6¾&ÿ4š .ŽÄ6®&ÿ4Ä6º&ÿ4š.Ž¸»PÄ6¾&ÿ4š .ŽÄ6¶&ÿ4Ä6²&ÿ4š.Ž¸ÈPÄ6¾&ÿ4š .ŽÄ6¶&ÿ4Ä6º&ÿ4š.Ž¸¼PÄ6¾&ÿ4š .ŽÄ6²&‹‰FöÄ6º&‹-‰Fô‹Fö;FôvéɁnôsÇFôÄ6®&ÿ4ÿvöš.ŽÄvúŒÀ Æu°ÍÀ&t
‰vðŒFòÄ>²&‹‹^ö+؁ûOv°ÍÀÄvðó&€<u¸ÍPÄ6¾&ÿ4š .ŽëIÄvúŒÀ Æu°ÍÀ&t
‰vìŒFîÄ>²&‹‹^ö+؁ûOv°ÍÀÄvìó&ÿ4Ä6¾&ÿ4š .Ž‹Fö;FôsÿFöéCÿÄ6²&‹‰FöÄ6º&‹-‰Fô‹Fö;FôwBnôsÇFôÄ6¶&ÿ4ÿvöš.Ž¸ÍPÄ6¾&ÿ4š .Ž‹Fö;FôsÿFöëÊÄ6®&‹‰FöÄ6¶&‹-‰Fô‹Fö;FôwBnôsÇFôÿvöÄ6²&ÿ4š.Ž¸ºPÄ6¾&ÿ4š .Ž‹Fö;FôsÿFöëÊÄ6®&‹‰FöÄ6¶&‹-‰Fô‹Fö;FôwBnôsÇFôÿvöÄ6º&ÿ4š.Ž¸ºPÄ6¾&ÿ4š .Ž‹Fö;FôsÿFöëÊÄ6®&ÿÄ6²&ÿÄ6¶&ÿ Ä6º&ÿ >u0ÿ6Äÿ6Â6FøPš.Žÿ6Èÿ6Æ6FøPš.Žÿ¸ Pš .Ž¡‹Äv&‰&‰\‹å]Ê°´¸¼À†W}º¥xÃØð  2 J _ ¤ ô ?



 W l µ Í ß ÂÆ BuildBackgroundÿ [üw°ÍÀU‹ìU.ŽÄvŒÀ Æu°ÍÀ&‹De&‹\g ÃtÄvŒÀ Æu°ÍÀ&ÿtg&ÿteš ÿvÿv¸Pš ‹å]ÊA P CloseCurWindowZ žü w°ÍÀU‹ìUÄúÿ.Ž>u‹å]ÊÄ6ŒÀ Æu°ÍÀ&‹De&‹\g‰Fú‰^üÿvüÿvúš ÿ6ÿ6š Ä6ŒÀ Æu°ÍÀ&D]PÄ6ŒÀ Æu°ÍÀ&ÿtcš.ŽP¸iPš.Ž‹Fú‹^ü£‰ÄvúŒÀ Æu°ÍÀ&‹Ä6®&‰ÄvúŒÀ Æu°ÍÀ&‹DÄ6²&‰ÄvúŒÀ Æu°ÍÀ&‹DÄ6¶&‰ÄvúŒÀ Æu°ÍÀ&‹DÄ6º&‰ÄvúŒÀ Æu°ÍÀ&ŠD ¢ ÐÈsÄ6®&ÿÄ6²&ÿÄ6¶&ÿ Ä6º&ÿ ÄvúŒÀ Æu°ÍÀ&ÿtÄvúŒÀ Æu°ÍÀ&ÿt
š.Žÿ>u 6FøPš.Ž6FøPš.Ž‹å]Ê¢ ¯ Ú î ½


CloseWindowø
Eüw°ÍÀU‹ìUÄôÿ.Ž¡‹‰Fú‰^üÇFöÇFø‹Fú‹^ü Ãt‹Fú‹^ü‹N‹V+ÁÚ Ãt°ë°ÐÈs)‹Fú‹^ü‰Fö‰^øÄvúŒÀ Æu°ÍÀ&‹De&‹\g‰Fú‰^ü믋Fú‹^ü Ãu‹å]Ê‹Fö‹^ø ÃušéžÄvöŒÀ Æu°ÍÀ&te‰vòŒFôÄ~úŒÀ Çu°ÍÀ&‹Ee&‹]gÄvò&‰&‰\ÿ6ÿ6šÿ6ÿ6š ÿvüÿvúš 6ÄvúŒÀ Æu°ÍÀ&D]PÄvúŒÀ Æu°ÍÀ&ÿtcš.Ž6FúP¸iPš.Ž‹å]Ê’Øåð.SelectWindow= üw°ÍÀU‹ìUÄôÿ.Ž‹F‹^
‹‹+ÁÚ Ãu‹å]Ê¡‹‰Fú‰^üÇFöÇFø‹Fú‹^ü Ãt‹Fú‹^ü‹N‹V
+ÁÚ Ãt°ë°ÐÈs)‹Fú‹^ü‰Fö‰^øÄvúŒÀ Æu°ÍÀ&‹De&‹\g‰Fú‰^ü믋Fú‹^ü Ãu‹å]Ê‹Fö‹^ø ÃuéKŠFÐÈs
ÿ6ÿ6šÄvöŒÀ Æu°ÍÀ&te‰vòŒFôÄ~úŒÀ Çu°ÍÀ&‹Ee&‹]gÄvò&‰&‰\ÄvúŒÀ Æu°ÍÀ¡‹&‰De&‰\g‹Fú‹^ü£‰ÄvúŒÀ Æu°ÍÀ&‹Ä6®&‰ÄvúŒÀ Æu°ÍÀ&‹DÄ6²&‰ÄvúŒÀ Æu°ÍÀ&‹DÄ6¶&‰ÄvúŒÀ Æu°ÍÀ&‹DÄ6º&‰ÄvúŒÀ Æu°ÍÀ&ŠD ¢ ÐÈsÄ6®&ÿÄ6²&ÿÄ6¶&ÿ Ä6º&ÿ ŠFÐÈsÿvüÿvú¸Pš ÄvúŒÀ Æu°ÍÀ&ÿtÄvúŒÀ Æu°ÍÀ&ÿt
š.Ž‹å]Ê7NewWindowTitleFüw°ÍÀU‹ìUÄôÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.ŽÄ6ŒÀ Æu°ÍÀ&ŠD ÐÈré²Ä6²&ÿ Ä6®&ÿ Ä6º&ÿÄ6¶&ÿ~
s°ÍÀÄv&€<t=6ÿv
6ÿv6ÿvÄ6º&‹Ä6²&+-PÄ6ŒÀ Æu°ÍÀ¸OP&D
Pšë9ÇFü~üOw-Ä6ŒÀ Æu°ÍÀ~üOv°ÍÀvü&ÆD
~üOsÿFüëÓÄ6²&‹‰FüÄ6º&‹-‰Fú‹Fü;FúvéˁnúsÇFúÄ6®&ÿ4ÿvüš.ŽÄ6ŒÀ Æu°ÍÀ&t
‰vöŒFøÄ>²&‹‹^ü+؁ûOv°ÍÀÄvöó&€<u¸ÍPÄ6¾&ÿ4š .ŽëJÄ6ŒÀ Æu°ÍÀ&t
‰vòŒFôÄ>²&‹‹^ü+؁ûOv°ÍÀÄvòó&ÿ4Ä6¾&ÿ4š .Ž‹Fü;FúsÿFüéAÿÄ6²&ÿÄ6®&ÿÄ6º&ÿ Ä6¶&ÿ ‹å]Ê „Õ!INITZcüw°ÍÀU‹ì.Ž¡ÑÈs‹å]Êÿšššššš.ŽÇÆÇÇ‹å]Ê~ƒˆ’—Ê@ª®²¶º¾Â Æ 

  3 Responses to “Category : Modula II Source Code
Archive   : M2LIB20.ZIP
Filename : WINDOWS.M2O

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

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

  3. 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/