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

 
Output of file : DIRECTOR.M2O contained in archive : M2LIB20.ZIP
Directoriesf¯sSysteme¯sDTAf¯sFileSpecf¯sFilesf¯sFormatDir9üw°ÍÀU‹ìUÄôÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.ŽÇFüÄv ‰vöŒFø‹Fü;F
wÄvvü&€<t°ë°ÐÈs!Ävövü‰vòŒFôÄ~~ü&ŠÄvò&ˆ6ÿFüëÁ~üt&‹Fü-Ävöð&€<:t‹Fü-Ävöð&€<\t°ë°ÐÈsÄvövü&Æ\6ÿFüÇFú‹vú€z.tÄvövü‹~úŠC.&ˆ6ÿFü6ÿFúëÞÄvövü&ÆÄvöŠF%´&‰DBÄvö‹F&&‰DDÄvö‹F(&‰DFÄvö‹F*‹^,&‰DH&‰\J‹å]ʊgetFirst;9üÔw°ÍÀU‹ìUÄ¶ÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Ž6FöPš.ŽÄvŒÀPVš.Ž6ÿv6ÿv6ÿvÿvÿvÿvš.Žÿvÿvÿv¸AP6F´PšÄ6Æ&ÇN6F´ŒÓ‰Fú‰^ü‹FúÄ6Ê&‰‹FüÄ6Î&‰‹FÄ6Ò&‰¸!Pš.ŽÄ6Ö&‹%°tþÀ4Äv&ˆÄv&ŠÐÈs%Åv¹€èþ.Žÿv ÿv
6ÿv6ÿv6ÿvšÿvøÿvöš.Ž‹å]ÊÈÌÐÔØ…–µÒZe@GetFirstDirtuüw°ÍÀU‹ìU‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.ŽP6ÿv6ÿv6ÿvÿv¸AP„Pÿv ÿv
ÿvÿvš‹å]ÊßgetNexté؁üŽw°ÍÀU‹ìUÄüÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Ž6FúPš.ŽÄvŒÀPVš.ŽÄ6Æ&ÇO¸!Pš.ŽÄ6Ö&‹%°tþÀ4Äv&ˆÄv&ŠÐÈs%Åv¹€èþ.Žÿv ÿv
6ÿv6ÿv6ÿvšÿvüÿvúš.Ž‹å]Ê3D[§²GetNextDirÁ:üw°ÍÀU‹ìU.ŽP¸AP„Pÿv ÿv
ÿvÿvš‹å]ÊñDirQueryûǁü\w°ÍÀU‹ìUÄðþ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv ‰~ ‰^üò¥.Ž6†~ÿP6ÿv6ÿv6ÿv ÿv
¸AP6†<ÿP6†ðþP6†îþPšŠ†îþÐÈsB¶ðþŒÐŽØ¹Lèþ.Žÿ^.Ž6†~ÿP¸AP6†<ÿP6†ðþP6†îþPš붋å]Ê n¶†MkDirÂ|üNw°ÍÀU‹ìUÄ¾ÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Žÿv
ÿvÿv¸AP6F¼PšÇV¼ŒÐŽØ´9Í!.Žs£‹å]ÊRmDir>|üNw°ÍÀU‹ìUÄ¾ÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Žÿv
ÿvÿv¸AP6F¼PšÇV¼ŒÐŽØ´:Í!.Žs£‹å]Ê•ChDirº|üNw°ÍÀU‹ìUÄ¾ÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Žÿv
ÿvÿv¸AP6F¼PšÇV¼ŒÐŽØ´;Í!.Žs£‹å]ÊGetFileAttr6…üNw°ÍÀU‹ìUÄ¾ÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv
‰~
‰^ üò¥.Žÿvÿv ÿv
¸AP6F¼PšÇV¼ŒÐŽØ¸CÍ!.Žs£ëÄ~&‰
‹å]Ê
SetFileAttr»€üNw°ÍÀU‹ìUÄ¾ÿ‹N AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^
üò¥.Žÿv ÿv
ÿv¸AP6F¼PšÇV¼ŒÐŽØ‹N¸CÍ!.Žs£‹å]Ê GetCurDir;ŠüDw°ÍÀU‹ìUÄ¼ÿ.ŽÇv¼ŒÐŽØŠV ´GÍ!.Žs£>uGÇFº‹Fº;F
w
‹vº€z¼t°ë°ÐÈsÄvvº‹~ºŠC¼&ˆ6ÿFºëЋFº;F
w
Ävvº&Æ‹å]Ê
DeleteÅ|üNw°ÍÀU‹ìUÄ¾ÿ‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Žÿv
ÿvÿv¸AP6F¼PšÇV¼ŒÐŽØ´AÍ!.Žs£‹å]Ê RenameAǁüw°ÍÀU‹ìUÄ|ÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv ‰~ ‰^üò¥‹N
AAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv‰~‰^üò¥.Žÿvÿvÿv ¸AP6F¼Pšÿv
ÿvÿv¸AP6†zÿPšÇV¼¾zÿŒÐŽØŽÀ´VÍ!.Žs£‹å]Ê ÄÝ GetFileTime ¤üw°ÍÀU‹ìUÄþÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv
‰~
‰^ üò¥.Ž6FüP6ÿv6ÿv 6ÿv
¸Pš.ŽÄ6Ú&‹£~üÿÿt*ÿvüÿvÿvš
.ŽÄ6Ú&‹£ÿvüš.Ž‹å]Ê
Üb †  
SetFileTime¬ ¤üw°ÍÀU‹ìUÄþÿ‹NAAÑé‹ÁÀ;àw°ÍÀ+á+á‹üŒÓŽÃÅv
‰~
‰^ üò¥.Ž6FüP6ÿv6ÿv 6ÿv
¸Pš.ŽÄ6Ú&‹£~üÿÿt*ÿvüÿvÿvš.ŽÄ6Ú&‹£ÿvüš.Ž‹å]Ê

*
A
ASCIIZP
±üw°ÍÀU‹ìUÄøÿ.ŽÇFüÇFúÇFø~úAs‹Fü;FwÄv vü&€<t°ë°ÐÈsVÄv vü&ŠˆFö€~ö\t€~ö:t€~ö/t
€~ö.t°ë°ÐÈsÇFøë6ÿFø~øwÄvvúŠFö&ˆ6ÿFú6ÿFüë…Ävvú&Æ‹å]Ê INIT =üw°ÍÀU‹ì.Ž¡ÑÈs‹å]Êÿšššš‹å]Ê% * / 4 þPUSHSTRUCT> [+áÑéŒ×ŽÇ‹üüò¥ÿãÞ0ÆÊÎ"ÒÖ&Ú

  3 Responses to “Category : Modula II Source Code
Archive   : M2LIB20.ZIP
Filename : DIRECTOR.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/