IMD 1.16: 1/06/2007 9:52:07 FOGCPM.160 ååååååååååååååå--FOGCPM160RUNPCD COMu READ ME EXPAND PCDLDIR PCD"LSETDATEPCDLTYPE PCDPCDHELP PCD% !"#$PATCH DOC%CREATE COM &'LBRDISK2DOC!()*+,LBRDISK2NOT -.LBRDISK2SET /0LBRDSK22COM;12345678LBRDSK22NOT9LBRDISK3COM;:;<=>?@ALBRDISK3DOC!BCDEFLBRDISK3SET GHLLF11 COM$IJKLMLLF11 DOCNONOPIPES MACPSETRSX COMQSLUDIR11ZQ0RSTLDIR COM~UVWXYZ[\]^_`abcdLDIR PQSCefghijklmDRTODATEINC noLOADDIR INCpqrSKIPBLKSINCsSKIPTO INCtSKPRDRKTINCuSORTDIR INCvwxLDIRBBS COM}yz{|}~€�‚ƒ„…†‡ˆLDIRQ PAS‰LSETDATECOMhŠ‹Œ�Ž��‘’“”•–LSETDATEPQS;—˜™š›œ�žDRDATE INC Ÿ SETNAME INC¡LTYPE PQS(¢£¤¥¦-03-00 87 §-CPM160 DOC"¨©ª«¬ååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååThis is the disk name. ååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååÃ�ÃÎÃÃ?ÃìÉÉÃ�ÃoÃøÃtÃø¯7É7ÉÃ…ÉÉ7É7É@ÐÿÐ9!}É>Í’yÉ>ÅÕåþ?ÚÂo‡…*õÖ…o>Œgñþʵþ0¾ÍÅ33}ÃÂÍÅáÑÁÉéÑ ÍûÃReal arith. error, ABORT $:z·À>Í’·È>ÿÉÅÕåOþ ÊþÊæùþÂÍ33ÃÍáÑÁÉ:z·Ê0¯2z:yÃ5>Í’æþ7?À·7ÉÍñÄJ>Ë:å!�¦áÀ>ÿ2zÍ02yþÀ¯2zÍ0þÊÉ>Ë>Í’Ã5õ> ͉> ͉ñÉÅOÍÁÉ!"y:‚o"{*.ùÍ !"˜;"Q;"Ž;"‚;"O;"T;!ž;}æ€o"n;Í�Ú6Âà*n;V#^ëë+ÕåÍ*^! Í!ýÍ!hÍ!�ÍáÑ>à ~<ÀsÉ!€F#T]#~þ Ê~Íq,Ú'#Âx2€~#ò+¯ÉÍ<ÃQ!ÿÿ"Ž;!oÃÛ5ͽÍ<Íœ :�;·òc>ÍûÃ$$$ SUBABORTEDCP/M installation v3.1 Åå!\ú¬#~þ Äq,Ò—6 #ò¥!e6P#6C#6D!]~þ OëÌ!8ë!"š;á\¯2|2hͺ-ÜãÚ%Í1*Â%F#N+x·òûÍÊÚ%öÿÁÉ>„�Oˆ‘GyxG¯ÊùÕ€åëÍ9ë9áÑÒ%Í1*ÊÁ!HÍÛ5ë\·ÊBÆ@Í�5>:Í�5ÍUë7É** No PCDHELP i`"’;ÍkÅÍÍÒÁà õå*T;|µÊ:V;w!"T;*Q;|µÊ‘:S;w!"Q;áñÉÕõ|µÊ¯ë*Q;|µÂ²ë"Q;~2S;6ÿñÑÉ*T;|µë¯"T;~2V;íþÊœ >?Í�5Íë5>#Í�5*”;ëÍÐ4Êëþ,Êëþ ÂÅÍ”þ Â×É`i"’;ÍÛÿæÈÍ8*’;DMÉÅŠ5Í86ÁÉõÅÕå*˜;}þ Üø5Í >.Í�5PYÕ*”;ëÍ9Íò4Íø5*t;ëÍZ8ë/Æ=ÊNÍø5ÃDÍ Íø5á>ͦ*j;ëÍ9*l;Íò4Íø5! 9åëÍ9*l;Íò4Íø5á>ͦ*l;Íò4Íø5*p;Íò4Íø5*”;Íò4Íë5áÑÁñÉ>ÅG~Í÷4#¨ÁÃø5@line #åÕõÍë5*t;|µÊÚ!µÍÞ5*t;Í Íø5ñõþÚ⯇! ;_^#VëÍÞ5BC`iÍbñáåõDEÍbñÑáåÕõHLÍbñÑÕÅõÍÍë5ñÁÑáÉþ ØþÈþÈþÈÍø5Õ·Ê>þÒ>Æ@Í�5ÍU! Ñëþ!Ø>.Í�5þ!ØÍ�5ÂUÉÍø5{Í�5zÍ�5>=Í�5Ãò4¯åo:…;·>2…;ʶ:„;·Ê¶}!¸·Â–!¿Íë5Å:};GÍø5žÍÞ5ë†;ÍUëÍë5ÁáÉENTER EXIT ͽÍþÚK:|;=2|;ÊK:‚;ÐÍ8É·7ÀDM!ôÿ9ùÕÅ w#ÂòÁÑ!§͘! ¯w! wͺ-Ò%õñ!9͘! 9ù`i7ÉÍmÂ! ~#fo))}!9õÕÑñ=ÊõæÌmÚÕÍwÂ<ëÑñÅN#FáåÍB*`i"O;Á! 9ù`i¯Éå`iÍ1*áÈ7ÉÅå/Ææ�Oˆ‘G ¾#•ˆPYáÁÉÕÅ ~#œÁÑÉPCDS LBR*š;‡‡‡…oÐ$É>„͹)l>�gÉ"š;~<7À#–+þ ?ØÕë"];ë€ÑþÚóÍ1*7ÀÕ€Ñ"_;Íî Í1Ø*š;ë!~2a;!~¿ÍÚØ*š;ë!~#ngë*W;„}æ€oë*”;ÉÍÒGxÅͳë*O;DM!~�Ow+~ˆGwÕ*];ë*_;ÍB*ÑÁØ!ë*_;~#~#~#¶7À?Â5ÉgåÕͳF#N+ë!Õë*_;ër#sÑ!~#ng;Ñå*_;ãåÕ*_;ë!ÿ9}“|šëÑÔB*ÚÎÕ€"_;Ñá+}´ÂŸáÁ##påååáááÉ*š;#~/<ÉåÕGÍÒ¸Ú !a;5Ì_ xͳë!~æ@xÌ" Ú x2˜;!~ö`w!~#ng"”;V#^###"–;ÑáÉÅÕåG:‚;æÊ8 !– ÍÛ5xÍ÷4xͳë!~#ngÍœ *];ëxÔuÚ[ :‚;æÄë5áÑÁÉÅÕåÍÒ+Gë!~2a;xͯ =Âq !‡ :‚;æÄÛ5áÑÁÉmmanage call Need ÅÕå;ë*[;}“|šÒÐ :‚;æÊÄ >(Í�5{•Í÷4>)Í�5; ÔP Úê ã ![;~“w#~šwÚê *Y;"_;ëÍ "Y;áÑÁÉ"W;"Y;*š;ë!~#ng;"[;ÉÅ€w# ÁÉ`i)))))))ÉÅåëV#^+ë;DMáåÍ x±Â. ãÕ##~++ëͳÕë!Ñr#sÑáÁÉÅÕåW:‚;æÊc Íø5zÍ÷4zͳë!~æ@7Ê« ~æ¿w!~#ng;DM*[; "[;!V#^Í ëå*Y;{•zœáÒ¨ Í Ö "Y;áÑÁÉGÍõ æÀO~æ?±wxÉåÕÅÍÒOÿ¯ÃtñÚ¢ à ñÚš o&ÿ à á) V#^à ñÚà à ñÚº g o à ÑÕÕà áÑÕåÕåà Ñà ÑáãÕåà áãåà `i"’;ÑáÁãÕåÅà õÍ×ál:˜;gz·ò ëà  Å�OÒ Ã _Õà W _Õà Ík"t;à áå}æþÂrÃmÑÕz³Â ÃfÑÕz³Ê *p;ÍŒ6Òf*n;ëÍŒ6Ú >Ãtáå|·Ê >`i"’;ÍÅà `i"’;áÅÅÅÅÅÅÅÅéÑÍÍÓwà áÑ}ÍCOx‘Ê•Ò ÍÓ=/wxæxGyæx�<=ÊÈ#6ÿþYÍÓ‡=¦wà {æÆo&9{æ_¯7ÂæÉ`i"’;!9~+·Â^³úÍÓ¦Í0ÑÊ Ã Í0Ñà ñÒÕà ÍZ¶w# Â$ÃT!Ñ9ùëéÍZ/¦w# Â;ÃTÍZ¦w# ÂKÍ0à `i"’;!9BKëÉ g oÉ W _É`iF#N#"’;É`i"’;ÑÍ9BKb{æþoÑ9ùæ`i"’;ÑÍ9BKÑáy°Ê w# ««Ã `i"’;Áá ëá x±Ê +w ÃÅá}îoåà Ñá}³oåà Ñá}£o|¢gåà Ñá}£oåà ÑÕà ÑÕà ÑÕà ÑÕà ÑáÅDMÍÛ6Áà áÑåà á))))à á))à á)à ÑÍ9ëà Ñz·òÍ9·Õò Ã`i"’;{áÑõÍŒ6·Ãn`i"’;{áÑõÍ™6Áõxæ_ñ!ä Ã( `i"’;Á{áÑõͧ6Ãn{ÍZõ ë +¾Â® ˜! ÁÍ3ÅÃn>Ò´/·Ã£`i"’;ÑÁáåÅÍ™6ÑúÐëÍ™6ò >Ãy! "’;ÍráåÍ™6úñÍrëÍ™6ò áà ÑÍ9Õ ÃÑáͽ6åÒ ÃÑáÍÎ6åÒ `i"’;>Ãy`i"’;ÁáÍ"7ÕÒ zÊ>Ãy`i"’;ÁáÍ7åÒ Ãy`i"’;ÑÁÍÛ6åÒ Ã`i"’;ÑBKÃT*l;õÕåÍyá ÑñÉÍiåà Í�çÍ�ðÍ�ú `i"’;ÁáÅ·Ê¢C_X{ÉÍi^#Và Íi^à {ÍiæþÊÅ{·+F+NÅ=ÂÉà ÍiÑs#rà ÍiÑsà {ÍiÍñà æþÊü{ÑÁq#p#=Âþëé`i"’;Ñás#rà `i"’;Ñásà `i"’;{æþÊ2ë9^#VëÍñÑà õæ_ÍyñæðÃo `i"’;õæOæ@>GÊi>€ÿ±Oñæ*j;·Ê€Õ^#Vë=ÂwÑ ÉÍ?åà ÍRåà Í?ÙÍR{æþÚ°æþÚ°þÚ§úæþÚâþÚØÍñà áÑzî€W|·ÂÏW_.Õåà áÑzæÃÇ`i"’;áÑBKlÃõ`i"’;áÑÁhÁÍ¡$Ú|*’;DMgÃÈ`i"’;ÁhÁÑbÑ}·Ê7Íâ$Òû.Õå$%> Êy> Ãy`i"’;ÁhÁxî€GÃB`i"’;ÁhÁÑbÑÍ|%ÃáÑͪ&Òjz·ÿò\Õ>ÃtáÑÍv&ÚSÕà ÑÍS&ÃÈ`i"’;ÁhÁÑÍS&ÕTÕUÅÕà `iF#N#V#^#"’;Í}Ã`i"’;{ÁhÁÑbÑõÍð%ÃnáÑãëÍ®Á3333.$%ÂÇT\ÕåÅÐ$%> Êy> ÃyáÑãëÍôùáÑãëÍùáÑãëÍ�ùáÑãë|·Ê z²ú Íüù> ÃyáÑãë|·Èz·> úyÍ’%Í;ù_å²×ëõáôp/¢/e)þ.“23(S01ø&V'ä&*'¦0"()Ò 0É0C)‰07'w'Ì&Þ' �'𜠜 %15 tŠ‚º:õ“2È/“Œ“2U2n2,) !x0âù…wö!@@ Z3:&+t¤kNN˵ÆÎá…ô§HØÊ¸Ñ!œ;ãëéÍrÃü _Ãü _Í<*j;åz·Êò*l;ÃÍoå!9"j;!};4{Í×Úz·ú ¿ÍÚÒ#>Ãy*”;ëÍ9ë ãå*˜;ãå*t;ãéÑÍ<*j;å*l;å:˜;ºÊ#Ã*ÛÿæÄvÍr*j;ù€ÿë*p;ÍŒ6>Út!"t;à ÛÿæÑÄu*j;ù`i"’;áá"j;á"t;á:˜;ë»{ÄÚÚ7Á9ù!};5*”; à `i"’;Í×Ú! åëé*–;W‡_~æºØ++}“oÒë%V#^·É>ÃÅ! "’;áÅåÌ͋7ÐÃÅÍ›7ÐÃÅ>ÃÅáã^#Vs+rÉáã}óÐûÉáÁãqÉÑán&ãëéáÁã}ÃH;áÁãyÍ3;o&ãéÑáãëéáãé>Í'ë)ëå)Ò\ÁxæGáãq#p#s#rÉáÑãU>Ã'áãå>Í$õ>Í$õ>Í$õ>Í$ñOñGñWáq#6#p#6#r#6ÉáãV##^##~#fo>Ã'Ñáëã|/Ã'>Ã'ÃñÑ!9s#rÑÁ&yÍûoãéÑ!9s#rÁÑ{&Í’oãéÑá~#fo"b;Áx/Í'ÚñÉõÅÕå*b;N#F#ÅN#F#^#V#ã|·}*t;òAoÕ>ÍüÍ29,Â8ëÑ}‘O|˜GÚP{•_zœWáÚkÍpÒe5+5>Í'Ãk# ÍpáÑÁñÉ·4#À4ð7Éáã:�;怴g"Ž;ÉÑ*Ž;ãëéÑ*‚;ãëéáÑãëæþÒ®·Ê®Æ@w#6:#þ ÊÆw# ±6.#ÃÏ6.# ÂÊw# ÂÑ6 #ÂÚÉÁÑá{·Êö||g}oÂêãÅÉÁÑá{·Ê ·|g}oÂãÅÉÁÑá{·Ê)ÂãÅÉáãë>Í$0/ÍR>Í$ÍR >Í$ÍR :>Í$ÍR>Í$0 o&þ Ò]yÍdxÉõåÍF8õ|µÄdñáÆ0ñÉáÑÁã|}¯ÉÑáÁaãÕÉáãõÅÕ†;~#–>ÿ2…;ÑÁñÉáÑãÕ}ëF#NÍõ8áp#qÉáã|µÈÍL9¿+úáÁÑã}áãëÍúãåÉáÁÑã}áãëÍ*ãåÉøWx±zÈ >·x/Gy/OzÉÍæúʾÊ# ÂÂëɾÊ+ ÂÂÃÍæúIÊD¾ÂG# Â6Â6ëɾÂG+ ÂIÂIÃD>ÃÅ*h;}´7È}¹Âq|¸È##^#VëÃe|µÂ�<ÉåÕÅN#F#T] ##ë~»Â¶#~ºÂ¶w+wë+F+Në++~�w#~ˆw¯ÁÑáÉáÁãN#F¯w+w!üÿ DMÍ_>ÚÅ! ~#foÕå!h;z³ÊêëÑs#rÑ*f;}¹Â|¸Âë"f;Õ*d;|µÂ`i"d;##w#wÃL|µÊ1y•xœÚ1ëãë##^#VëÃ}| !ýÿ|µ!e;ÊIbkp+qá+++ëÍzÂ]DMëë`iÍzåN#F ###DM*p;|¸}áÀ¹À"p;z³Â‚b;¯ÉÅå ë DMá~‘#~˜#~#~r+s+Áq+pÉ*d;ëë|µÊÍ~‘#~˜Ò#^#Vø*p;q#p#¯w#wå# Úèë!€ÿ9}“|šëÑÒð!É"p;Õë*r;}“|šëÒ"r;á+++É+Â~‘ÖÚ͉å##N#Fz³Â'b;ëq#pá|µÈå##¯w#wáÉáÁãÍYëÈë!i;~+¶ÊQ*f;##s#rë"f;ÉåͱÑëÕ{²Êl{Æ_Š“Ws#r+Ñz³ÉáÁãÍ=|µÀ>ÃÅáãÃwáãDM Í_>ÚÅë"f;|µÂ©!f;##¯w#w`i##^#VÕÍÁx±Â¯É"n;"p;"r;!"h;"f;"d;ÉÅBKͱÁ|µÄBë*p;z³7È·É>ÃÅáÑÁã|}áãës#rÉÁáÑzS_ñãÕÅÉáÁÑñã`ÍLëãQXÕåÉáÑÁñãxCYJWÍ}MDëãÅåÐ> ò<> ÍÅÉÁÑáñãÕÅÉáÑÁãë^#Vå×Í«7… Ò_ý?ÍÞ7ëár+sÕPYÍI&BKlÑÍI&Íâ$.ëãÕåÉ>p¼Ò˜Ååª8.�Í¡$Ô;ÁiÁÉ&�É{­*}W®~v8©€ô|·ÈÅåþ�Ò¾ÍÏÔÍ<%ÍÏI.�Íx%Ô>p¼ÐÕåBKlÍ¡$žÍÁhÁá$yóŽ}Ê"€[¥�IÅåI.�Íx%ÁiÁ>мØ>p¼ÐÅåú".€Í¡$BKl&ƒÍa.‚Íð%ú-,Íä%z·.�ú>Íð%úJ,ÃG€Íð%òJ,Íx%ÕåBKlÍ¡$çÍÁhÁÍ¡$ÔÅåÕåxªõÍ4%ÚŠÍN&ÚŠñ€.�ü|%ÁhÁÍ¡$ÁiÁÒx%ÉñÑbÑ7Ô|·ÌÆØzÜÆØÅååBK5!��Í|%Õåµ&�Í|%ÁhÁÍâ$ÕåBKlÍ¡$åÍÁhÁÍ¡$BKlÑzÖ�Í/&Í|%.€Ãê%€È{‚¦8Åå!.Í’Ô¡$ÔÅår1.€ÃóÅå Õå&õÅÕåÍZ$ÁhÁÍ|%ÁÚ5ñ=ú6õÅ>ÍïÍ¡$ÁÒÁÁÁÔz·òMî€WÍMÔ<%Ð&ÉÅåBKlÍv&ÚxÕÍI&Íx%{ÍBKlÔ¡$ÁÚxx·7Âxy„gÔz| s�1�ÅåÕåPYeÍ’ÁhÁÕåPYeÍ’ÁhÁÍâ$ÁiÁÉ}·Â³´ÌÆ&Éx·üÆØ|·ÂÄ&�ÉÅåÕåPYeÍ’ÁhÁÍ¡$ÁiÁÒ;|·7ʾz·7ð&É!…o)9ÉåÍç#~#N#FáoÉåÍç^#VáÉåÍçN#FáÉåÍç#~áÉåÍç#~#^#VágÉåÍç~#foÃôåÍç~#foÃåÅL<Íç~#foq#s#rÁáÉLy·ÂWW_É! z怄g))))))DM{æozæW{_y²OS]Ézgo±³°È!@ëÒ’x¨úª!@ x ¬úªxæ`¸!T]öÿ7Éxæ€öWÿc.¯7ÉÅùyOzW{_ú»ÁzæWx怲WyOxGyxo>Îg�ÿ e¯oÉáÑÁ3333ÅÕéÕå! ^4#wáÑÉÍô&jåc.Ãå!9~þÚ >wõ!9~#^#V!ÿÿ9DMgñÍÀ"!9~++G~þxÊe Ö–òK >G!9N>.#¾Êk Êk ÂT Ãk !9–G!9^#VhÍÔ'!9Nx�õ#¯GÍÃ'Á!9~�oÍÔ'!9^#V! 9ùëéåÕÅ W _ÁÍ](ÑáÉÍU(!� å&Ãjåcå!9DM!.~ÍØ"õÁ|ááágÅñÉáÑÕåÍö.ÊÌ.Í­ Dáãáãõx·Âì W_6#w#s#rgñз>òÅ$%> ÊÅ> ÃÅáÑÕåÍö.ÊÌ.Í­ Dáãáãõx·Â#!W_6#w#s#rgñ!Ò4!#ÑãëéåÕ g oV#}|z·ÑáÉáÑÁãÅ+åÕ8!Õë o gë&Ãjåcå!9DMÍÕ"|áLáEáá6#w#s#rPYáëÍ9ëás#rÉÅ@|·Êë!þ‘Ò´!|þŽÒ´!þ{?Ú­!xÖGÍ�$Ür$Ú!|þ‘ÚÍ!þ£ÚÆ!xÆGÍ—$Ü€$ô!z怰Gzö€W|Ö�gÊè!Í29$úÝ!Òè!`ÁÉW_`ÁÉõÅåæþÒ"O|æÖ@�ò"GëÍF8ú"þÚ"#ëÃû!ÁiÁñÉ|·> ò&">-Í6|æÖ@gúQ"ëÍ6È>0Í6Ê6zþÚ7">EÍ6j&Ã86ÍZ8ë_zþ÷Òp"ƒ/EÍ6>-ÃH"ƒúz"Ì6Ã6_Í6>0Í6ú~"Ã86ÅÕåõæ¹"ÍZ8oñæp_|æÖ@ú­"<»Òº"¯…ò²"¯/<ƒÍ@6õñáÑÁÉ>ÅÕåõÍ�!ñÍð!ÍŠ"Í"·Ãº"Í6þ ÊÕ"þ+ÊÕ"ͨ8!@ÒI#þ.Ê#þ-7oÀÍÕ"õzî€WñÉÍ6ͨ8Ò.#o7ÉÍ6ͨ8Ò #þ.Âe#Í6ͨ8Úe#Í”8Ú#Ím8æ…o|ÎgÒ#!ÿÿÃ#Í”8Ú #Ím8æ…o|ÎgÒW#!ÿÿÍ6ͨ8Ò@#þ.Ê#þEÊl#þeë7?Ì $oÔz#Ð>€ÉÅåõ|æ€G|æÖ@OÍI&|·ÊÉ#z°WÚ°#y·ÊÉ#ú¶# ÖÚª#OÍ�$Ú°#Ür$Ò’#ñ7ÁiÁÉÆÚÂ#OÍ—$Ú°#Ü€$ Ã’#ñ·ÁiÁÉÍ6ͨ8Úõ#7ÀSæ_Í6ͨ8ÒÛ#õz‡‡‚‡ƒÑÉþ+ÊÏ#þ-Â$ÍÏ#/<ÉW>7ÉÕÍÏ#Ú"$ÕW|æ€_|æ‚ò%$Ÿ/gñÑ7ɳgñÑ·É€zÃ9$){_zW·ò1$æW´ðÀðSÉzö€Wxö€GÉÅDehBKÑÉõ g _ WñÉõ|{zñÉÅå .„Í¡$ÁiÁÉÅå .„Íâ$Ã|$Åå$t.”Ãy$Åå$t.”Ç$|·È}·Â«$eÉz¨ÅåõÍI$Í«7Í+$ñ怲WxáÁ„õ…gÚÐ$ñ?ÒÔ$&ÉñÚÙ$|·À7É&ÿ\zöW7É}·ÌÆØ|·Èz¨ÅåõÍI$Í39.}gÍÞ7ÕÍ9>þõë)ë)Ú%}�|ˆÒ% ñ<ú%{gÑÍ+$ñá忀²W}/gozW{_|gñÈòj%<õÃW%=õxGyO}oÃ`%zî€W}·È|·Âˆ%PYeɕړ%þÐ|Ú%þð?Ò„%}Ååõxªxòº% ôR$ÍF%|•g{™_z˜Wõü%9ÃÇ%õÍF%|…g{‰_zˆW¯o²³´ÂÕ%ññ·Ã|$Í+$ñ怲W`.�ñÃ.%Ååxî€GÍ|%Ã|$}·Âü%|·ÈzöÉ|·Ê &•Ê&zÒ &x/öɰú&²øz�Â*&{‘Ã)&zöðx’Â*&y“È>·É·gÈWæ€õ&ˆü9Ãc&·gÈW¯_Ã7&¯gÃX&Ív&?Ð&zæ€õü9z³Êr&&�z·úo&ë)ë%Ãc&æWñ²WÉ|·Â&¯W_Éò{&Ö�ú{&Ö•&zÖ€7À³È7É?Øgzõö€WÍ29$ú�&ñ·ðÃ9ÅåÕåÿhz·ò¸&AÍ|%Ív&ÚÆ&ÁÁÃ|$ÑbÑÃ|$áãëͽ.ÂÌ.Úá.áã-ÍÔ'áã}Ã'áãëͽ.ÂÔ.Úé.!.~Ã'áãëͽ.ÂÔ.Úé.> ÅOå!&>/¦wæþÒ 'ÍÉ*Ã&'!À2Íq0áyÁÉáãëͽ.ÂÔ.Úé.Éáãëͽ.ÂÔ.Úé.> Í'> Í'!&~öwÉáãëͽ.ÂÔ.Úé.~æÌC'> Ã'TRUE FALSEáÑÁñå!m'Ú…'!r'ãÅÃ�'áÑÁåͽ.ÂÌ.Úá.áã|·Â¹'µÊÀ'åÅÍ9 ÁEáÚ´'M¯GáãÃÃ'>áãÃÅáãÉåhÍÔ'á È~#Í'ÃÊ'> -øÍ'ÃÖ'áãëͽ.ÂÌ.Úá.áÁãëz·õòø' Í9ÍZ8Gy�ëÚ(åoÍÔ'áñ>-ü'õåÍF8õ|µÄ(ñáÆ0Í'ñÉáãëÍU(!.~áãwÃ6(áãëÍö.ÊÔ.!&~æ€Ì](!&>€/¦wæÈÃŽ/!&~æ�À!&~æ7ÀÍ})þ Êf(õ!&>/¦ö€wñ!.wþÂ’(!&~öw>ã(þ £(6 !&~öw> ·ÉÅÍö.>Ê)ÍU(!.~þ ÂÆ(Í](Ò¶(> Ã)þ+ÊÓ(þ-ÂÙ(Í](ÚÁ(ͨ8Ú)æo&åÍ](áÚÁ(ͨ8Ú)æÍ”8Ú )Ím8…o|ÎgÚ )òä(>Ã)ëÌ9ëÁ¯É>Á7ÉáãëÍ¥(ëáãs#rÚÅÉáãëÍ¥(ëáãÁs#r!Ú@)+ãÅÉáãëÍU(Íö.ÊÔ.!&~æÂŽ/~æÂ<(Í](ÃO)áãëÍU(Íö.ÊÔ.~æ!Ê{)#ãéæþåÒŒ)ͧ*Ã’)!°2Íq0áÐ>ÉÍ6Ð>É!&~æÊê)!,~!0ÕWÂÉ)Í—)þÊÝ)þ ¹)ÃÝ)Í—)w#þÊÚ)þ µ)+6{Ñ!(w!/6!/~4!0…o|Îg~·À> ÉÍ-+>ëÍûë>Íûõå!&> ¶wáñ·È7É!&~æþÀ>/¦wÍ-+>ëÍûë>Íû·ÉÍ-+å!!q#p#6áë>Íûë>!Íû·È7É!&~æ€Êp*>€/¦wÍ*!*Õ^#VÍ«7}|O{G}æÑõÍ?*Ò–*Í�+>(ÍW*áØ|!/w!&~öwÉ!/~4·ò¼*6!0Í1*7À!0…o|Îg~·É!&~ö w!/~æw!0…o|Îgq!/4yð!0Í*yÉÍ*!/~4·ò+6Í.*Ê+!&~öwÉÍ.+~!0 w!*y–#xžÚú*ɯ!*ÅN#F!0 Á…oÐ$É!*~#¶È!&~ö w!/~æwÍ.+å!0 ~áw!/4ò�+¯wÍ*>ÚÅ!&~æþ̪+!&>€/¦w!*y–#xžÚL+ÉÍ-+>€6#=¢+É>$Íû>!Íû·Ä�+!&~öwÉ!$~·ÈG¯w! 6 #6 #6 !€Nå#ÅG Áwá # È~þ(Âå+Ê,# È~þ)Èþ,Êî+Ãò+# È~þ Ê,þ,Èþ)È È Ãx1!"‚;"„;!€>[N È#¾Â&, È#~þ Ê-,ͨ8Øëæo& Èͨ8ÚX,Ím8æ…o|ÎgÃ@,þ]Êg,þ À ÈÃX,"‚;}æ2„;Éæþ!ØÍ¯8ÐåÅG!Š,Í›,xÁá7È?É.,*:@[]<>()=;_?ÿ~#¸È<ò›,É!&~æÀÍÁ+!/6€Í/ÒË,Í{-ÂØ,!&>@¶w7Éö!Ð2Íq0!&~öwÉ*l;^#V!&~æÈæþÚ-!à2Íq0Ã-~æ Ä-!&>/¦wÉ!&~æþÊ*-Í>->Íû<·À7É!&~æ€Ä*>Íû<·À7É!/~·øÅO!&~æÊd-!0å 6# òY-áÃs-yõÍ.+6ñ<òe-Í-+Í*ÁÚí0ÉÍÕ-!&> /¦w! ~þ —-#6 #6 ! 6! 6!&~æʺ-Í_.>Íû<·À7É>Íû<·À·ÂÊ->>Íû<·À7É!~þ ÀÕÅ !.Í!8ÁÑ!Õë*z;#"z;ÍF8ë†w+ë|µÂ÷-ÑÉTEMP0000$$$F7ø#~¹Â.ÉÍ).> Í..É< !€Í.Ø#~Íq,Ø7øå*l;^#VÍè,!$¯wHá~Íx1ͤ,>ÚHÉ>Ãû}´7È~Íq,ØÕå!ëáÍx1á~å!> N#F#Å=‚.>Íû< Á+p+q”.Ñ·7À>Íû<·7ÈÕ! ~#².Ñ·É!&~æþÈ/æ7ÉáãáÃÓ.áã!&~ö@w>ÃÅáãáÃè.áã!&~ö@w>ÃÅ!&~æÉáãë!&~æþÌU(Íö.ÊÔ.>¦!Ê/#ãéþÒ(/·7ÀÅÕå! ~ë#åþ Âe/–2áå úe/¾Â=/#¾Â>/#¾Â?/#~þ:Êf/þ Êf/7yááÑÁÉ>7Éáãë!&~æþ!.ʇ/!0ãåÀÍU(ÐÍ™/ö@w> ÃÅ!&~öwÉáãë!&~æþ+ÌC'Íè,Úí0!&~æýwæþÀ/¦wÉáãëáãëåÍ¥/>ƒ/¦öwá|µÊí/Íx1¯! w!$wͤ,Òý/Í™/Á!ãÅÉÁ!ãÅÃF0áãëáãëåÍ¥/>Ã%0áãëáãëåÍ¥/>ƒ/¦öwá|µÊ:0Íx1¯! w!$wͤ,ÒF0Í™/Ãí0!&~æþÂV0ÉáãëÍö.ÊÔ.~æÂŽ/þÊ™/Í/Úô*!°2æþÒl/‡…o|Îg~#foéáÁãë!&~æþÂí0Í/Òí0Í^*Úí0ÉáãëÍö.ÊÔ.~æþʽ0~æÊé.Í/ÚA+!À2Ãq0áÑãëåÍ¥/Í™/wá|µÊé0Íx1¯! w!$wͤ,Ð>ÃÅæþ!ð2Òq0!&~æ@!ÿÿÀ!&~æ!È> oÉáãëÍö.!Äò0ãéáãëBK>áãõ}|ñ=Â-1> ¯! wáãDM!&q#páãDM!,q#páãDM!*q#páãDM!$q#pÉ|µÈÕů#~+þ:•1~##Í:9Ö@þÒ•1ͬ1~þ.¢1#ͬ1¯ÁÑÉ~Íq,Ú½1Í:9#¬1> ÂÀ1+#~Íq,ÒÈ1É!"z;Í#2 >Íç1 > õÕÍ2ë!D2Í!8Ñ.> Í2&ñÍ2>*Í2,>†*l;Õ^#Vë wÑÉ*l; DMÍ/2¶Í×>ÚÅ"p;{zÉCON: áãë!&~Íö.ÊÔ.æþÒí0Ã_.áÁÑã!ãåÍö.ÊÔ.ÅÍ¥/áæþÐÍd.Øáã!ãé>ÃÅCMDAUXLSTPUNRDRKBDCONNUL3ƒ3}54334ð33¯5¯53333333333¾333333333ý0Y3s33ý0133ý0>7É!&æ!À!É!&~æ!È!&~æ!ÀÍ!æÈ.É!&~æ!ÈÍæ>ÂH3>µoÍæ>ÂV3>µoÉÍý0}æÀå!&~áæÈÍ æÀ.ÉÍý0}æÀÍ æÀ.ÉÅå!&~æʦ3!,~!0Í 4!(w!/6!/~4!0…o|Îg~áÁ·À> É:€<ÉÅÕGåÍ*#ÍÈ4ÍÈ4áxõåGÍ„5þ ÊÀ4þÂS4!ͯ5ͯ5Íë5áñÃ14þÂm4\ͯ5ͯ5Ê64+Ã64þ‹4Ê64ͯ5 ͯ5ͯ5+Ãs4þ ʶ4þ¤4Â64 ͯ5>ö4þ±4Â64Ãþ Ú64w#Â64Íë56záÑÑÁÉ#~O·Ä¯5ÉÍ!5Øþ ÊÐ4!Í5Úª5))))µoÍ!5ÒÜ4ÉÍë5|Í÷4}õÍ5ñÍ5Ã�5ͯ8ØþG?ØþAÚ5ֿɿÆ�'Î@'ÉÍ„5ØÍ:9ê5Í!5ØÈþ Ê+5ê5õ>=Í�5ñÉõ>-Í�5ñÉÅG:|�GÍø5úO5ÁÉõÅ:|·Êl5Ox/¡<€ÍH5ÁñÉõÅÃ\5õÅÃ\5ÍØæÉÍ}5Øþ Êë5ÅO<æþ!Ú¥5:|G:{æ=¸Üë5ͯ5ÁØþ 7?Éå!|ͺ5áà y<æþ ÂÌ5+¶#ð~·È5Éþ!Ò×5ÖÊÙ5É~ Í�5> Í�5ñÉõ> Í�5ñÉõåÍF8õ|µÄ6ñáÆ0ñÉ>.Å ÉÅÉõåÍF8õ|µÄ6ñáÆ0Í6Ì6ñÉÕÍ6ÑÉ=øÕW> Í6òD6ÑÉÍ6þ ÊO6·ÊO6!ͨ8Òf6¿ÉÍv8Ú~6Í6·Êl6ͨ8Òf6·ÉÍv8Í6·Ê~6ͨ8Ò{6Éz¼Â”6{•È>Ð/Éz¬ò¢6¬öÉÍŒ6·É–µ6# x±Â§6É>Ò»6/·ÉÍ9ÂÎ6|·ø>7É|ª7?øz¬ð>7ÉÅz·úò6x·òý6Í9Í«7Í%9Ã7Í9x·òé6Í9Í«7Á|zÚ 7³È>7É£<È>7ÉÍ"7Ø|°ð  ð>7É|·ò+7x±>7ÈÅÕåz²òX7Í%9x·úO7Í~7Úp7ëÍ9ëÃb7Í9Íw7ÃD7°úg7Íw7Úp7ÁÁÁ·ÉÍ9Í~7Òb7áÑÁ>7ÉÍÞ7ØzÉÍÞ7ØÍ9³Èz?ÉáÑÁåÍ«7ãåz³È7>ÉÑÁáÕÍÞ7ëãå>Éõ{ÕÍÉ7ãõ|ÍÉ7Wñ„_Ò¿7}á„gÒÇ7ñÉbj‡ÒÔ7 ŠÈ)�ÚÒ7ÃÔ7·õ{‘z˜Òô7ëÅÍ÷7_Íú7_ÁñÉñ7ÉÍ9zS È)Ú8‡Ò 8#å Ú8áÃþ733<Ãþ7�Ò8# Ãþ7åÕÅ~# x±Â$8ÁÑáÉåÕÅ ë +w x±Â88ÁÑáÉÅ ð¯)¹ÚS8‘#úK8·ÁÉÅÕëÍF8|µÂ_8xëÑÁÉÕT]))ÑÉÍ”8Úˆ8Ím8æ…oÐ$È?ÉÍm8æ…o?Ø$7ÉÅG}Öš|Þ?xÁÉõ> ÍD9ñÉþ:?Øþ0Éͨ8ÐþAØþ[?ÐþaØþ{?É#|µ7È{•zœÉ!ÿ$~/w¾/wÂÎ8D$~/w¾/wÊÙ8ëKéÿÿ~Íõ8ÍÁ8Òé8?ÉÕ©Wæª_Wæ¨Ozæà«Gzæð©OÑÉ y/Ox/GÉ{/_z/WÉëÍ9ëÍ9|µÀÉ·zW{_Éþa?Ðþ{ÐÆàÉÍT9=ÂD9Éõ>ÈÍD9ñÉõåÍ*#~õåáåá~~ñ=Â[9áñɇ‡‡‡…oÐ$ÉÍm9õ~#foñéunclassified errorinteger overflowfeature not implementedstack overflowheap overflowdivide by zerounable to load code segmentinvalid pointercase index out of rangereal arith. underflowreal arith. overflowsquare root of -velog of -ve or zeroread past eofillegal char. or valuemodulo -ve valuefile is read-onlyrange errorfile system errorstring field or size > 255file not open}9�9¡9¹9È9Ö9å9::):?:T:g:z:ˆ:Ÿ:°:Â:Î:à:û:å&Û.Éålgyå!9ÍN;áááÉå&ÓÃ6;é`è7ØÍ9³Èz?ÉáÑÁåÍ«7ãåz³È7>ÉÑÁáÕÍÞ7ëãå>Éõ{ÕÍÉ7ãõ|ÍÉ7Wñ„_Ò¿7}á„gÒÇ7ñÉbj‡ÒÔ7 ŠÈ)�ÚÒ7ÃÔ7·õ{‘z˜Òô7ëÅÍ÷7_Íú7_ÁñÉñ7ÉÍ9zS È)Ú8‡Ò 8#å Ú8áÃþ733<Ãþ7�Ò8# Ãþ7åÕÅ~# x±Â$8ÁÑáÉåÕÅ ë +w x±Â88ÁÑáÉÅ ð¯)¹ÚS8‘#úK8·ÁÉÅÕëÍF8|µÂ_8xëÑÁÉÕT]))ÑÉÍ”8Úˆ8Ím8æ…oÐ$È?ÉÍm8æ…o?Ø$7ÉÅG}Öš|Þ?xÁÉõ> ÍD9ñÉþ:?Øþ0Éͨ8ÐþAØþ[?ÐþaØþ{?É#|µ7È{•zœÉ!ÿ$~/w¾/wÂÎ8D$~/w¾/wÊÙ8ëKéÿÿ~Íõ8ÍÁ8Òé8?ÉÕ©Wæª_The main purpose of this group is to add DATE-STAMPING to LU style libraries. LSETDATE sets them, LDIR shows them. These were the first programs to do this, and they set the date-stamp standard (now in heavy use under MSDOS), and have been maintained. LDIR, LSETDATE, LTYPE give help when run without parameters. LDIR is also interactive in this case. LDIRBBS is especially linked for BBS use, eliminating i/o redirection, thus preventing a remote user from writing to disk. For help in running .PCD programs enter: A>runpcd << with no parameters. pcdhelp.pcd on line >> RUNPCD executes all .PCD programs. It will find them either on line or in PCDS.LBR, on either the default or A: drives. "RUNPCD [1]" displays version no. (with PCDHELP.PCD on line). .PCD programs execute identically to .COM versions, but are much smaller, and run more slowly. For instructions on connecting your system timers, see PROFILER.LBR. This will allow automatic date setting. Applies to both .COM programs and RUNPCD.COM. If a read from port 0ffh bothers your system patch location 017dh to a safe port number. This applies to all programs, but the read is only executed (at present) by RUNPCD, when it tries to find a front panel sense switch. The port is never written to. ‘>y linked for BBS use, eliminating i/o redirection, thus preventing a remote user from writing to disk. For help in running .PCD programs enter: A>runpcd << with no parameters. pcdhelp.pcd on line >> RUNPCD executes all .PCD programs. It will find them either on line or in PCDS.LBR, on either the default or A: drives. "RUNPCD [1]" displays version no. (with PCDHELP.PCD on line). .PCD programs execute identically to .COM versions, but are much smaller, and run more slowly. For instructions on connecting your system timers, see PROFILER.LBR. This will allow automatic date setting. Applies to both .COM prog€ñð'÷ÿþz ð ìømz ð ìøXfÿÿz ðyÿÿ±ø=z ð ìø fÿÿz ðz ð øú,úyÿÿ Éø yÿÿ  z ðfÿÿz ðþ½yÿÿz ðþ¡z ðz ðþŒð$ÿƒåååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå¦ñ÷Š ð Š ð íìŠ ð i ±ïøŠ ðþåö÷Š ð i‰ ¹Š ð Š ð íìïøŠ ðþäö÷Š óŠ ð i<”>”ë­ø Š óŠ óþçö÷ÿâ~ ~ƒbÓøƒ|nd‹|â×c‹|~‹bÛøàƒ|þë†ndâ×cndâ×cnd â×cnd â×c‹^ÛÃøŠ^¼c‹^Û ƒú‹^ÚžƒŠ^¸c‹^µ¤ƒ|‹^µ¦ƒ‹ ^m¤ƒ~ŠŠk‹~ž‹|¢žc‹~³ø ndâ×cú‹ ƒndâ×cŠ ‹^m‹~¢ žcŠ cŠ kndŠ kâ×kËøŠ Š kndŠ kâ×k cŠ Š kàcþÓö÷ÿþŠŠ&ð(ŠŠj§bŠŠj§‚~Š~Š §iaŠ~àŠ §¨Š~ §Š §¨Š~§Š §iŠ §ið>cŠ~§Š §iŠ §ið>cŠ~§Š §iŠ §ið>cŠ~ §Š §iŠ §ið>cö÷ÿü‹ü¬øƒ~ú ƒ~Š�ð ‹~§ñ‹ü¬ìø-~?~ƒ|Óøƒ~Š�ð ‹~§iŠŠðZ‹~~‹|Ûøàƒ~þ憊�ðö÷ÿøŠð §iŠð §ið>ƒzŠ Šð §iŠð §ið>c€ŠbŠð §i ÑŠð §iŠð §ið>³ï‹z^ Ûï‹zËïŠð §i±ïøKŠð §aŠð §aƒ|ŠñŠj‚~~‹z¢~ƒxÓøƒ|Š~§ñŠ~j‚~‹|~‹xÛøàƒ|þ熀ö÷ÿüŠ ‚~Š §‚|‹Œ³ø?Š~§Š| §Þø€ú)Š~§Š| §Îø€úŠ~§Š|àÞø€ú€ú;Š~§Š|àÞø€ú)Š~§Š|àÎø€úŠ~§Š| §Þø€ú€ö÷Š j²ø Š Š bú%Š Š jò ø Š Š jò ú Š Š j§ò ö÷Š Š ò ø Š j‚ þîŠ Š §ñ ö÷ÿþŠ ŠbŠºøwŠ‚~‹ ³øŠ~§bŠ~Š~jbŠ~j‚~Š~²üèúPŠ~§bŠ~bŠ~j‚~Š~²üëŠj‚~Š~ºø-Š~Šñ øŠŠ~bŠ~‚Šj‚~úŠ~Š jñ Š~j‚~þÎö÷\LDIR (cmd, input, output); z ð"\ Ver. 1.9 z ð"\ (c) 1983, 1986 by C.B. Falconer z ð"z ð\+ Execute with "ldir {[options] [libfname]}"++z ð"z ð\3 where {} shows a field that may be repeated and []33z ð"z ð\5 enclose optional fields. "options" is the character55z ð"z ð\ "-" followed by one or more of: z ð"z ð\4 n sort by name u unsorted(default)44z ð"z ð\0 g sort by "typ" m date modified00z ð"z ð\3 s sectors of storage k kilobytes (size)33z ð"z ð\EXAMPLE: B>ldir -m commandz ð"z ð\6Commands may be placed on the command line or executed66z ð"z ð\4 interactively on ">" prompt. "fname>" shows an open44z ð"z ð\1 library, and -options will display its directory11z ð"z ð\,File redirection using "<", ">" is available,,z ð"z ð\)To list command.lbr on the lister, enter:))z ð"z ð\ B>ldir command >lstz ð"z ðz ðö÷\ ** ERROR ** z ð"‹ ú£\Bad directory CRCz ð"úš\Not a library: z ð"oþßz ð"út\ Cannot find: z ð"oþßz ð"úP\ Bad option z ð"ú:\No library specifiedz ð"úð#úèüõûÿSÿnÿ’ÿ´ÿÈz ðö÷ÿþŠ ð i-±øÄŠ ðŠ •eŠ ð i ¹ø¯Š ð iú+ƒ~ú�ƒ~ú‰ƒ~úƒƒ~ú}ƒ~úwƒ~úqƒ~úkèuGüôG ûÿáÿëÿéÿçÿÇÿãÿÉÿÍÿÝÿÛÿÙÿ×ÿ±ÿÓÿËÿÏÿÍÿËÿÉÿÇÿÅÿÃÿÁÿ¿ÿ½ÿ»ÿ¹ÿ·ÿµÿ³ÿ±ÿ¯ÿ¡ÿ«ÿ©ÿ§ÿ‡ÿ£ÿ‰ÿ�ÿ�ÿ›ÿ™ÿ—ÿqÿ“ÿ‹Š Š m‹~”ëeŠ ðþHö÷ÿü�ï­�ï­íìø�ï”ë…ï�þÙºø �þÙð)‡þÙƒ~ŠŒð i}ÿ6­ø4‹~ÛøŠŒ‚|oþß‹~â§Š|ð‹~àƒ~úŠŒðŠŒð i}ÿ6­ìüÑúoþßâ§\LIBRARY¨ƒ~‹~~~ƒ|Óøƒ~oþß‹~â§ a‹~~‹|Ûøàƒ~þé† ŠŒó.oþßâ§ð]³ø) oþßâ§ð]ƒ~‹~ Ûøoþß‹~â§\.LBR ¨oþûoþßð0øToþûoþßð1‡þÝoþûoþÙoþÛoþÝóø"�þÛ»�þÛ�þÝ»ïøò�ï”ê…ïú òoþûð úòö÷‹ Ûø0z ð‹ z ð ö÷ÿú‹ nzn|n~ó z ð‹z]d¦ñ/z ð‹|ñ/z ð‹~ñö÷ÿþŠ §‚~Š~i±Š~k»ïøÌ‹ö³ø7�( ‹ü³ïø\z ð"z ðƒüz ðú z ð‹üàƒüú \ | z ð"Š~àz ð".z ðŠ~ §z ð"ŠŠm­ø Š~kz ð ŠŠm­øŠ~kž¤z ð ŠŠm­ø$Š~k Óø\unknown z ð"úŠ~k ò‹úàƒú‹öà‹þ¦ƒöú!Š~i]ÿ±ø ‹ôàƒôúŠ~i¹ø‹øàƒøö÷Š ºøŠ jòŠ òŠ jòö÷ÿ°oÿ·ð/oÿ·z ð"\Library z ð"oþßz ð"z ð~(~‡ÿ³ÓøƒnnF‹nâ§ a‹n~� ÿ³Ûøàƒnþ醃nnF‹nâ§\Name¨nF‹n žâ§\Typ¨‹n žƒnŠ m­ønF‹nâ§\Sectors¨‹nžƒnŠ m­ønF‹nâ§\Kbytes¨‹nžƒnŠ m­ønF‹nâ§\Modified¨‹n žƒnPž‹nः~‹n ƒnnF‹n(z ð"~‹~~‡ÿ³Óø$ƒp z ðnF‹n(z ð"‹p~� ÿ³Ûøàƒpþà†z ð~‹n~‡ÿ³Óøƒr-z ð‹r~� ÿ³Ûøàƒrþê†~‹~~‡ÿ³ÓøAƒp z ð~‹n~‡ÿ±Óøƒr-z ð‹r~� ÿ±Ûøàƒrþꆋp~� ÿ³Ûøàƒpþƃzƒxƒtƒvƒ|Š m­ø�þÙoÿµóŠ Š m•êeŠ m­ø�þÙoÿµóŠ Š m•êeŠ m­ø�þÙoÿµóŠ Š m”êe� ÿµñz ð‹zz ð \ entries, z ð"‹xz ð \ inactive, z ð"‹tz ð \ free entries z ð"z ðz ðö÷þØ@]À\ ªoþûð&‡þÙ”…ooþßâ§ aˆ ø6oþûð»øoþß oþßð]âz ð"ú?z ð>z ðz ðŠ óŠ ð Š ð í€ˆìøŸŠ ð i-±ø noŠ ñú•…oŠ óŠ ð i}ÿ6­ø�o”ë…o�o­øñ�o”ê…oˆ ø z ðú€úJ�o­øñúoþûð³øñoþû𳀈 øz ðˆøˆ ø€�o”ë…oúnoñˆüoþûð öð'÷ÿ6]† \CMD ªfÿFð& à]~•,”.”ë;>•ë[”ë]]”ë]_”ëêuÿ6fÿFð0ø#fÿFófÿFð ìø fÿFó ú ó z ó ú ó z ó fÿFð ð$ûËúÃúsúŒûâùøJ÷nþWóÎòëó#òYó?ðÄñHñ–ïËï¦ï‚ï_ÿb`“ors¨‹nžƒnŠ m­ønF‹nâ§\Kbytes¨‹nžƒnŠ m­ønF‹nâ§\Modified¨‹n žƒnPž‹nः~‹n ƒnnF‹n(z ð"~‹~~‡ÿ³Óø$ƒp z ðnF‹n(z ð"‹p~� ÿ³Ûøàƒpþà†z ð~‹n~‡ÿ³Óøƒr-z ð‹r~� ÿ³Ûøàƒrþê†~‹~~‡ÿ³ÓøAƒp z ð~‹n~‡ÿ±Óøƒr-z ð‹r~� ÿ±Ûøàƒrþꆋp~� ÿ³Ûøàƒpþƃzƒxƒtƒvƒ|Š m­ø�þÙoÿµóŠ Š m•êeŠ m­ø�þÙoÿµóŠ Š m•êeŠ m­ø�þÙoÿµóŠ Š m”êe� ÿµñz ð‹zz ð \ entries, z ð"‹xz ð \ inactive, z ð"‹tz ð \ free entries z ð"z ðz ðö÷þØ@]À\ ªoþûð&‡þÙ”…ooþßâ§ aˆ ø6oþûð»øoþß oþßð]âz ð"ú?z ð>z ðz ðŠ óŠ ð Š ð í€ˆìøŸŠ ð i-±ø noŠ ñú•…oŠ óŠ ð i}ÿ6­ø�o”ë…o�o­øñ�o”ê…oˆ ø z ðú€úJ�o­øñúoþûð³øñoþû𳀈 øz ðˆøˆ ø€�o”ë…oúnoñˆ ôñ÷Š ð Š ð íìŠ ð i ±ïøŠ ðþåö÷Š ð i‰ ¹Š ð Š ð íìïøŠ ðþäö÷Š óŠ ð i<”>”ë­ø Š óŠ óþçö÷ÿÞ~ ~ƒ^Óøƒbnh‹bâ×c‹b~‹^Ûøàƒbþë†nhâ×cnhâ×cnhâ×cnh â×cnh â×c n â§i0 ¢n â§iž0 ƒ` n â§i0 ¢n â§iž0 ƒb n â§i0 ¢n â§iž0 ƒd‹`BÛø‹`]džƒ`‹`NÛ‹b³í‹d³íøƒún‹`L ƒ`‹`¤ƒf‹`¦ƒ`‹d^Û ^µ‹f¢žƒd‹`Ë‹bËíø‹džƒd‹d^m‹`¢žƒd~‹b ~ƒ^Óøƒf‹dnh‹fâ×kžƒd‹f~‹^Ûøàƒfþ憋dƒö÷ÿüƒ~Š ð i ¹ø$‹~ÛøŠ ‚|Š ‹~â§Š|ð‹~àƒ~úŠ ðþÓ‹~~~ƒ|Óøƒ~Š ‹~â§ a‹~~‹|Ûøàƒ~þë†ö÷z ð\;LSETDATE Ver. 1.2 Copyright (c) 1983, 1986 by C.B. Falconer;;z ð"z ð\0To set module modified dates in LU libraries for00z ð"z ð\all modules not already dated:z ð"z ð\! B>lsetdate libraryname YY/MM/DD!!z ð"z ð\1To unconditionally redate individual modules use:11z ð"z ð\( B>lsetdate lbrname YY/MM/DD modulename((z ð"z ð\.Wildcards accepted. *.* equivalent to no entry..z ð"z ð\1YY/MM/DD is the date to be set. Mandatory if the11z ð"z ð\2system does not supply the current date, otherwise22z ð"z ð\overrides system date.z ð"z ðö÷\*** ERROR *** z ð"‹ úñ\"CRC directory error, bad library: ""z ð"fþ'z ð"z ðz ð\^C aborts, continuesz ð"z ðz ðú™ú�\Not a library: z ð"fþ'z ð"új\ Can't find z ð"fþ'z ð"úI\%No system date or invalid date format%%z ð"úð#úèüõûÿ¿ÿwÿšþÿz ðóö÷ÿú€~~ƒ|Óø7ƒ~ŠŒð ønï‹þ‹~žâ§ aúŠŒ‚znï‹þ‹~žâ§Šzð‹~~‹|Ûøàƒ~þ͆nï‹þžâ§i‰ ±nï‹þâ§i}ýû­ïnï‹þàâ§i}ýû­ïø, nï‹þâ§i0 ¢nï‹þàâ§iž0 ƒ~‹~‹Ë~‹ Óïø€‹þžƒþö÷ÿîƒ~Š \00/00/00 0:00 ¨]c/ñ ø /ñ ø ñ øŠ no¨ö÷Š Šð §iŠð §ið>cŠð §i±Šð §i]ÙïŠ kËïŠ k^ ÛïŠð §iŠð §ið>³ï€Š Šð §iŠð §ið>cŠð §aŠð §aö÷ÿüŠüBð(Šüj‚üŠü§Šœð @¨Šœð~?~ƒ|Óøƒ~Šü§‹~§inúðZ‹~~‹|Ûøàƒ~þæ†ö÷�*ð ‹ ž§�+ÿöa�*ð ‹ ž§�+ÿøaö÷ÿü�*ð ‹ §i±øM~ ~ƒ|Óø=ƒ~�*ð ‹~‹ ž§io(ÿé‹~â§i¹o(ÿé‹~â§i?¹ïøú‹~~‹|Ûøàƒ~þdž‹ òö÷�*ð ‹ §i±�*ð ‹ ž§i±ï�*ð ‹ ž§i±ïø‹ òö÷fþ â§\*.*¶ø ñ ñúñ ñö÷ÿüŠœð Šü§@¨ò ~?~ƒ|Óøƒ~Šœð ‹~§inúðZ‹~~‹|Ûøàƒ~þ憊œðŠüj‚üö÷Š i]a]z•­ø Š Š i  aŠ i� ö÷ÿúƒ|‹|àƒ|Š ‹|â§ñ ±üïƒ|ƒ~Š \ ¨‹|ÓŠ ‹|â§i ”*”ë.”ë­ìïøŠ ‹~â§Š ‹|â§ia‹|àƒ|‹~àƒ~þÌŠ ‹|â§i*±ø*‹~~~ƒzÓøƒ~Š ‹~â§?a‹~~‹zÛøàƒ~þ놋|àƒ|Š ‹|â§i ”.”ë­ìø‹|àƒ|þèŠ ‹|â§i.±øl‹|àƒ| ƒ~‹~ ÓŠ ‹|â§i ”*”ë­ìïøŠ ‹~â§Š ‹|â§ia‹|àƒ|‹~àƒ~þÏŠ ‹|â§i*±ø%‹~~ ~ƒzÓøƒ~Š ‹~â§?a‹~~‹zÛøàƒ~þë†ö÷ÿæfþ niñn~Bð(Š~‚|Š|§Šð @¨Šðƒzn ªónvnxð@~?~ƒgÓøƒtŠ|§‹t§inzðZ‹t~‹gÛøàƒtþæ†~‹ ¢~ƒgÓøƒtñ ‹t~‹gÛøàƒtþñ†‹z{ýù»{ýù»ïøóŠ|bŠ~j‚|Šð Š~§@¨ñ ƒzŠ~§Šð @¨~?~ƒgÓøƒtŠ~§‹t§inzðZ‹t~‹gÛøàƒtþ憊ð9ŠðŠ|ºøñþöŠðŠð Š~§@¨‹znvnxð@Šð §‹xaŠð §‹vaŠðö÷fÿ7ðfÿ7ófÿñð/09•uýûfþ â§\*.* ¨öð'÷ýö@]À\ ªfþCð&]† \CMD ªfÿ7ð&ófÿ7ð fÿ7ð íøóúÉfÿ7fþ'ófÿ7ó.fþ'ð]³øfþ' fþ'ð]â§\.LBR ¨fþCfþ'ð0øŠfþCfþ'ð1fþCfý÷fýùó ømfÿ7ð fÿ7ð íìø3fÿ7ð i}ýû­ø fÿ7fÿñófÿ7ófÿ7ð ìfÿ7ð íø fÿ7fþ ófÿñâ§\00/00/00¶øóúfþCfÿñª{ý÷ó úóúófþCð fÿ7ð ð$þ¼üRüqü ûªûGû ûÞúÖý�úSùmúø?õýõ¡ô}ôXô4ôþ½o ñ÷Šð Š k?秉 æaŠ k?ÛøŠ Š kà?çcú ŠðŠ cö÷Š Šð Š k?ç§iæaŠ k?Ãø ŠðŠ cú Š Š kà?çcö÷Š kËø Š Š óþïö÷Š ð Š ð íìŠ ð i ±ïøŠ ðþåö÷ÿþŠ Š nóŠ Š n~ó‰~‰ð>ƒö÷ÿúŠ ‚|ŠŠ Š|ó~~ƒzÓøƒ~ŠŠ Š|à‹~â§ó‹~~‹zÛøàƒ~þæ†~~ƒzÓøƒ~ŠŠ Š| §‹~â§ó‹~~‹zÛøàƒ~þ冊| §ŠŠ ñcŠ|§ŠŠ ñcŠ|§ŠŠ ñcŠ|§ŠŠ ñc~ ~ƒzÓøƒ~ŠŠ Š|§‹~â§ó‹~~‹zÛøàƒ~þå†ö÷‰à±nánζïnénË¶ï€ ö÷ÿÊ€.nN\ ¨nK\ ¨Š,ðƒZ]aA ƒVƒ^Š,n^n`ñnâ§i ±ø1ñ‹n^ Ûï‹l³ïø€.Š,ð9Š,ðŠ ‹pcŠ‹ncŠ ‹rcú‹ZÓn‹Zâ§i ”.”ë­ìïø;nN‹Zâ§n‹Zâ§ianN‹Zâ§i]a]z•­ønN‹Zâ§nN‹Zâ§i‹V a‹ZžƒZþ°n‹Zâ§i.±ø\‹ZžƒZƒ\‹\Ón‹Zâ§i ¹ïøAnK‹\â§n‹Zâ§ianK‹\â§i]a]z•­ønK‹\â§nK‹\â§i‹V a‹ZžƒZ‹\žƒ\þ¯‹n¢ƒXƒZ‹Z‹XÛø=‹ZžƒZŠ,n^n`ññø'€.Š ‹pcŠ‹ncŠ ‹rcŠ,ð9Š,‹l¢ðŠ,ðúþ½$ö÷ÿà~ ~ƒ`Óøƒ|nb‹|â×c‹|~‹`Ûøàƒ|þë†nbâ×cnbâ×cnb â×cnb â×c‹^ÛÃøŠ^¼c‹^Û ƒú‹^ÚžƒŠ^¸c‹^µ¤ƒ~‹^µ¦ƒ‹ ^m¤ƒzŠŠk‹zž‹~¢žc‹z³ø nbâ×cú‹ ƒnbâ×cŠ ‹^m‹z¢ žcŠ cŠ knbŠ kâ×kËøŠ Š knbŠ kâ×k cŠ Š k àcþÓö÷Š ð Š ð íìŠ ð i‰ ¹ïøŠ ðþäö÷Š óŠ ð i<”>”ë­ø Š ó Š óþçö÷\LTYPE (cmd, input, output);z ð"\ Ver. 1.1 z ð"z ð\0 equivalent to "type", but extracts from library00z ð"z ð\ Run with: z ð"z ð\- B>runpcd ltype [-libfname] {componentname}--z ð"z ð\* where the "-" signals the presence of the**z ð"z ð\/ optional libfname entry. libfname defaults to//z ð"z ð\. "LIBRARY.LBR". [] encloses optional entries,..z ð"z ð\* {} encloses entries that may be repeated.**z ð"z ðö÷z ð\*** ERROR *** z ð"‹ ú¾\No component selectedz ð"ú±\Not a library: z ð"fþz ð"úŒ\EOF - library faulty: z ð"fþz ð"ð%ú^\ Can't find: z ð"fþ6z ð"ú<\ No library: z ð"fþz ð"úð#úèüõûÿ~ÿWÿ¨ÿÈÿ0z ð‹ »øó ö÷ÿüƒ~fÿFð i ¹ø"‹~ÛøŠ ‹~â§fÿFð‹~àƒ~úfÿFðþÔ‹~~~ƒ|Óøƒ~Š ‹~â§ a‹~~‹|Ûøàƒ~þë†ö÷�+ ËøKo(ÿ~§fþRð @¨fþRð øó fþRðo(ÿ~@§fþRð @¨fþRð øó fþRð�+  ‡# € ú o(ÿ~§a€ ö÷‹ü]€Ûo(ÿ~‹ü§i ±ïø‹üàƒüþæö÷ÿúñø«€ ƒ|ñ‹|]€Ûø˜oÿ~‹|§i¹ø�oÿ~‹|§]€‹| ð]ƒz oÿ~‹|§]€‹| ð] ƒ~‹~Ûø ]€‹| ƒ~ú€ÿ‹z»ø‹~‹zÃø‹z ƒ~oÿ~‹|§‹~]€z ð"‹|‹~žƒ|‹|]€Ûøz ð€ÿ‹|àƒ|ñú]€ƒ|€ þbú€ ö÷‹ Ûø0z ð‹ z ð ö÷ÿú‹ nzn|n~ó z ð‹z]d¦ñ/z ð‹|ñ/z ð‹~ñö÷ÿ~z ð‹ z ð \ records in ( z ð"fþ fþð] z ð"\) z ð"fþ6z ð"{þËø\ Installed z ð"{þñz ð€ñøþùˆìøz ðöð'÷þ@]À\ ªfþRð&]† \CMD ªfÿFð&fÿFðfÿFó fÿFð fÿFð íøó ú~~‡þÓø sþfþ{þâ§ a{þ~� þÛøàsþþå†fþ6fþ¨fÿFð i-±ø fÿFðfþófÿFó fþâ§i ±øfþâ§\ LIBRARY.LBR ¨.fþð]³øfþ fþð]â§\.LBR ¨fþRfþð0øvfþRfþð1fþRfþ6ªfþfþfþóøQfÿFð fÿFð íøó ú:fþ6ófþRfþ6ªfþfþfþóø {þóúó fÿFó fÿFð fÿFð íüÈúó úó fþRð fÿFð ð$ý²ýËüÖüqüòýöüû ùOù*ùøö|õ¡õ½ö�õzõaõ)ôóþcð øó fþRðo(ÿ~@§fþRð @¨fþRð øó fþRð�+  ‡# € ú o(ÿ~§a€ ö÷‹ü]€Ûo(ÿ~‹ü§i ±ïø‹üàƒüþæö÷ÿúñø«€ ƒ|ñ‹|]€Ûø˜ñ÷z ð\-To run a PCD (usually Pascal) program, enter:--z ð"z ðz ð\0RUNPCD progfile(fname1, fname2,...fnamen);[parm]00z ð"z ð\2 where all entries after "progfile" are optional.22z ð"z ð\3 and the extension for "progfile" is .PCD (forced)33z ð"z ðz ð\0 "fnames" attach real filenames to pascal names00z ð"z ð\2 as listed in the PROGRAM heading. The default22z ð"z ð\ name is the Pascal namez ð"z ðz ð\4 "[parm]" allows a run time parameter to be passed.44z ð"z ð\- in the range 0..32767. The default is 0.--z ð"z ð\4 *** ODD VALUES CAUSE A TRAP at the first executable44z ð"z ð\3 statement, and allows further traps to be set.33z ð"z ð\3 Use of this feature requires a P-code listing.33z ð"z ðö÷\*RUNPCD with no parameters is equivalent to**z ð"z ð\ RUNPCD PCDHELP(CON,CON);[0] z ð"z ðz ð\0Files "INPUT" and "OUTPUT" cannot be re-assigned00z ð"z ð\3 by this mechanism and attach to "CON:" by default33z ð"z ðz ð\$Standard device files available are:$$z ð"z ð\ NUL a null filez ð"z ð\ CON the consolez ð"z ð\* KBD console, no echo, no buffering**z ð"z ð\( RDR installation "READER" device((z ð"z ð\' PUN installation "PUNCH" device''z ð"z ð\( LST installation "LISTER" device((z ð"z ð\* AUX as RDR, without line buffering**z ð"z ð\' CMD holds run-time command line''z ð"z ð\1Further files may be available on an installation11z ð"z ð\"All the above files are text files""z ð"z ðö÷\6All filenames must consist of alpha-numeric chars only66z ð"z ð\+ and begin with an alphabetical character.++z ð"z ðz ð\1File RDR and CON (on input) are buffered by line,11z ð"z ð\+ with carriage return the eoln signal++z ð"z ð\" linefeeds are generally ignored.""z ð"z ðz ð\/Files "INPUT" and "OUTPUT" may be reassigned to//z ð"z ð\. either devicefiles or diskfiles by including..z ð"z ðz ð\) ">outputfilename" (for OUTPUT) and/or))z ð"z ð\ "pager (inputfilename, outputfilename);[80],,z ð"z ðö÷\Type "RETURN" to continuez ð"z ðz ð ø z ðúz ðöð'÷óóóóóóóóóóóð$ÿ¡ýpùµö¯ôðèíêÿÔ----------- -- ABSOLUTE --;;z ð"z ð\: S ic line instr. local -- stack -- glob heap ic::z ð"z ð\; # locn num stream data ptr data base top base;;z ð"z ð\;== ==== ==== ========== ==== ==== ========== ==== ==== ====;;z ð"z ðö÷\2Pascal programs compiled to native code and stored22z ð"z ð\5 as "COM" files are executed with a similar syntax,55zTo patch RUNPCD ver. 2.4.4, CPM installation 3.1 to 3.1a, do: Loc. Was Is 174 0 2a 175 0 94 176 0 3b 177 0 eb 178 0 c9 389 76 33 38a 33 2e 38b 2e 31 38c 31 61 528 50 cd 529 59 74 52a d5 01 52c 94 92 52e eb e5 16dc fb 05 16dd 01 00 This allows system calls to return a 16 bit value. Needed to operate various RSXs. Uses some of the patch space, so care needed if installing timers etc. &÷ååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååÃ1è Íþ Ò7ÍçCREATE requires CP/M 2.0 or higherÇÍçCREATE Library/Archive Ver 2.0 Copyright (c) 1984 Jim Lopushinsky 03/05/84 :€·Â¸ÍçUse: CREATE [du:]filename.LBR/ARCÇ�!\Íè#}´Ê’!]~þ Ê’!e”Íöʦ‘!eÍöÂ’ÍÍÍÍçAllow how many entries: €>  ÍÍç !�~·Ê‘G#ëÖ0ú‘þ Ò‘ÕT])))ÑÍ7Â,>Í7·|g}oÂN"ª"Ž€!šÍ<!�>ÿpÍEÍL!€>ÿÍE:ªGÊÐÅÍLÁÃ…ÍçInvalid entryÍÇÍÍÍÍoe!—Í<ÍÍ!€>ÿ€ÍEÍLÍoÍçCREATE completeÇá~#å·È_ÍÃç¾À#ÂøÉ:[<È=_ Ã\Ã\Í<ÀÍçNo Directory spaceÇ…oÐ$É~# Â<Éw# ÂEÉ\Í·ÈÍçOut of Disk spaceÍÇ\Í<ÀÍçCan't close fileÍÇLBRARCDIR ÊÄ-þ>ÊÏ-þ,ÊÙ-þ ÊÙ-þ ÊÙ-þ;ÊÙ-þ!̤ þ Êì-w+Íe Ãl-Ow+Íe ¹Ê¸-þ Êñ-Ãå+6ÿ#Í?áåÍ^Í ÊÁÕÍ ÊÂÿÑÃ�þ:ÑÂ�Í Ê]Ö0Ú×þ ÒAGy‡‡�‡€OþÒ×+~#<Â×ÃÊI+q#ÖÚ×þÒ×45Â×�áå wÃÁÍ Èþ ÚÖúÖ Âþ*Êw#·É6?#òÉå!k¾Ê045#Â%·áÈþaØþ{Ò<æ_æɯw# ÍWÍW ÍW p# ÂWÉþ Ê^þ Ê^É .,:;[]=<>|Í Èþ 03/05/84 :€·Â¸ÍçUse: CREATE [du:]filename.LBR/ARCÇ�!\Íè#}´Ê’!]~þ Ê’!e”Íöʦ‘!eÍöÂ’ÍÍÍÍçAllow how many entries: €>  ÍÍç !�~·Ê‘G#ëÖ0ú‘þ Ò‘ÕT])))ÑÍ7Â,>Í7·|g}oÂN"ª"Ž€!šÍ<!�>ÿpÍEÍL!€>ÿÍE:ªGÊÐÅÍLÁÃ…ÍçInvalid entryÍÇÍÍÍÍoe!—Í<ÍÍ!€>ÿ€ÍEÍLÍoÍçCREATE completeÇá~#å·È_ÍÃç¾À#ÂøÉ:[<È=_ Ã\Ã\Í<ÀÍçNo Directory spaceÇ…oÐ$É~# Â<Éw# ÂEÉ\Í·ÈÍçOut of Disk spaceÍÇ\Í<ÀÍçCan't close fileÍÇLBRARCDIR ÊÄ-þ>ÊÏ-þ,ÊÙ-þ ÊÙ-þ ÊÙ-þ;ÊÙ-þ!̤ þ Êì-w+Íe Ãl-Ow+Íe ¹Ê¸-þ Êñ-Ãå+6ÿ#Í?áåÍ^Í ÊÁÕÍ ÊÂÿÑÃ�þ:ÑÂ�Í Ê]Ö0Ú×þ ÒAGy‡‡�‡€OþÒ×+~#<Â×ÃÊI+q#ÖÚ×þÒ×45Â×�áå wÃÁÍ Èþ   Preliminary documentation for LBRDISK (CP/M 2.2 version) Jim Lopushinsky March 5, 1984 What is LBRDISK? ---------------- LBRDISK is an extension of the CP/M 2.2 BDOS (RSX) that allows you to treat libraries and archives as a logical drive. For example, to squeeze and collect into a library a collection of text files you might do the following: B>CREATE TEXT.LBR <--- creates an empty library Allow how many entries: 12 <--- 12 files. B>LBRDISK C:=TEXT <--- allocate drive C to TEXT.LBR B>NSQ C:=*.TXT <--- squeeze all text files into TEXT.LBR It doesn't matter if the assigned drive actually exists or not. All transient programs (including the CCP) have access to the newly created drive. Are there any restrictions? --------------------------- Yes. LBRDISK allows modifications to the library drive only if one library or archive is allocated. If more than one is allocated, the library drive becomes Read-only, and will return appropriate CP/M errors if an attempt is made to write, erase or rename a file on the library drive. There must not be more than one open output file on the library drive. Programs must close any output file before opening another. There are no restrictions on the number of open input files. Libraries and archives are sequential files. It is strongly recomended to erase a file and re-make it before writing to it. Writing to an existing file is allowed. However, the records replace existing records in the old file, and if writing occurs past the end of the file, the next member will be clobbered. Making a new file causes output records to be appended to the end of the library. Random write is allowed, but the program must not leave any "holes" in the file. As far as I can tell, all the common utilities operate as expected. Editors should not be used, unless you are positive that the editor maintains only one output file at a time. What are the programs? ---------------------- There are two utilities associated with LBRDISK: 1. CREATE - to create an empty library or archive. This utility will run under CP/M 2.2 as well as CP/M 3. 2. SETRSX - loads the RSX manager just below the CCP. This utility must be executed prior to using LBRDISK. It is loaded once only, and remains active through warm boots. How do I use LBRDISK? --------------------- Here is the syntax: A>LBRDISK Entering LBRDISK with no command tail will remove the last active Lbrdisk RSX from memory. If there is more than one active Lbrdisk, only the last one loaded is removed. A>LBRDISK C1:=B5:CASM,C:TEXT Drive C user 1 will be allocated to CASM on B5 and TEXT on C0. B>LBRDISK C:=*,1:=A1:JRT*,2:=2:CASM,LASM Drive C will be assigned to the following: C0 = all libraries and archives on B0 C1 = all libraries and archives on A1 beginning with JRT C2 = CASM on B2 and LASM on B0 In the above two examples, drive C becomes read-only. B>LBRDISK D:=TEST D0 will be assigned to TEST on B0. Since only one library was specified, drive D becomes read-write. If we now execute the following: B>LBRDISK C:=1:TESTA A second library drive is created. C0 is now all the members from TESTA on B1. There is nothing stopping you from using NSWP to copy members back and forth between the 2 libraries and/or archives! B>CREATE TEST.LBR Allow how many entries: 6 This creates an empty TEST.LBR file with room for a maximum of 6 members. B>CREATE TEST.ARC This creates an empty TEST.ARC and TEST.DIR file. B>SETRSX This command must be executed before using LBRDISK. If executed a second time, it removes the RSX manager, and any LBR RSXs below it. Please make any bug reports and/or comments to the SYSOP at Meadowlark RCP/M (403) 484-5981 @ 300/1200 baud. xamples, drive C becomes read-only. B>LBRDISK D:=TEST D0 will be assigned to TEST on B0. Since only one library was specified, drive D becomes read-write. If we now execute the following: B>LBRDISK C:=1:TESTA A second library drive is created. C0 is now all the members from TESTA on B1. There is nothing stopping you from using NSWP to copy members back and forth between the 2 libraries and/or archives! B>CREATE TEST.LBR Allow how many entries: 6 This creates an empty TEST.LBR file with room for a maximum of 6 members. B>CREATE TEST.ARC This creates an empty TEST.ARC and TEST.DIR file. B>SETRSX This command must be executed before using LBRDISK. If executed a second time, it removes the RSX manager, and any LBR RSXs below it. Please make any bug reports and/or comments to the SYSOP at   Implementing LBRDISK with ZCPR2 ZCPR2 checks the drive code when attempting to log into a new disk. Since LBRDISK is often used to create psuedo drives higher than the installed drive, it is necessary to change the MAXDISK equate in ZCPRHDR.LIB. Besides, it is the responsibility of the BIOS to check for (and gracefully recover from) an invalid physical disk selection. I suggest setting MAXDISK to 15 and re-installing ZCPR2. Oh, and it is a good idea to set MAXUSER to 15 for compatibility with CP/M+ and other CP/M systems. If you have the source code for your BIOS the beginning of the SELDSK routine should be something like the following: SELDSK: MOV A,C ;Get new disk LXI H,0 ;Flag possible invalid disk CPI MAXDSK ;or whatever the variable name for ;maximum physical drive is. JC DSKOK ;Jump if ok XRA A  STA 4 ;So that the CCP is not caught in ;a loop RET DSKOK: STA SEKDSK ;or whatever the variable name is . . (Remainder of SELDSK routine) . . If there is room in your BIOS, you should install code to print an error message on select error, and jump to WBOOTE. Note: it must jump to WBOOTE, not to WBOOT so that the RSX manager can intercept. Jim Lopushinsky March 7/84 403-484-5981 @ 300/1200 baud. BIOS the beginning of the SELDSK routine should be something like the following: SELDSK: MOV A,C ;Get new disk LXI H,0 ;Flag possible invalid disk CPI MAXDSK ;or whatever the variable name for ;maximum physical drive is. JC DSKOK ;Jump if ok XRA A Lbrdisk options can be selected by using SID, DDT or EDFILE and modifying bytes beginning at 103H as follows: 103H: Read-only flag. 0=R/W, non-zero = Read only. Lbrdisk sets the library drive to read-only if more than 1 library is specified regardless of this setting. 104H: Number of pages for directory RSX. In addition to the library RSX being loaded, a second RSX is built to hold the library FCBs and member names. Each library FCB is 41 bytes, each archive FCB is 82 bytes, each member entry is 23 bytes, plus a 27 byte RSX header. Currently set to 8 pages (2k). 105H: Multi-RSX flag. 0 = allow more than 1 lbrdisk RSX, non- zero = allow only 1 lbrdisk RSX. 106H: Minimum library drive (1=A:,2=B:,etc). 107H: Maximum Library drive. 108H: Maximum library user number. 109H: Secure mode (for RCPM use). 0 = non-secure, non-zero = rename .COM to .OBJ.  10AH: Address of the BDOS entry point. Use SYSTAT or BDLOC to determine this address, the patch it at 10AH, 10BH (Low order first). NOTE: This address must be patched before executing LBRDISK.  library is specified regardless of this setting. 104H: Number of pages for directory RSX. In addition to the library RSX being loaded, a second RSX is built to hold the library FCBs and member names. Each library FCB is 41 bytes, each archive FCB is 82 bytes, each member entry is 23 bytes, plus a 27 byte RSX header. Currently set to 8 pages (2k). 105H: Multi-RSX flag. 0 = allow more than 1 lbrdisk RSX, non- zero = allow only 1 lbrdisk RSX. 106H: Minimum library drive (1=A:,2=B:,etc). 107H: Maximum Library drive. 108H: Maximum library user number. 109H: Secure mode (for RCPM use). 0 = non-secure, non-zero = rename .COM to .OBJ. Ã2Óÿ:È ÑÍò >ÚRSX LBRFILE LBR ARCDIRÉÍßÀ~·<ð=õæÊQ+:e8<2e8ñæîÀ:e8·È:e8=2e8<É#~þÂ=+:e8·Â=+:o8·Â=+ñ7É"X8:Z8=2Z8ÉÍe þ&°+*R6~þ Ê®+þ Ê®+åÅÍРͼ+Áá"R6®+>&2\8Ã,þ&°+:\8·Âµ+>&ÍÓ3·øõ¯2\8ñÉ*g8~·Êê+ó6¾Âß+O+¾Âß+ ÂÏ+xö€¿É+~þÒß+ÃÁ+:p8·À*q8À~·Ê,ó6¾Â12 Íæðþ ÊoÍ· This version of LBRDISK requires CP/M 2.xÇ|·ÂAÍ· LBRDISK version 2.2 Copyright (c) 1984 Jim Lopushinsky 03/10/84 : ·ÂçÍ· BDOS address at 10AH not patched.Ç:ͲÂ!Í· RSX manager not loaded. Use SETRSX to load.Çÿ Í22$Í22:€·ÂBͲ€Í· No Library RSX to remove. Use LBRDISK ? for help.Ç.6ÿ. f.6ÿ.æ¾Âš+~Í· Library RSX removedÇ*: ¼È.~·ÂÐå.ÍÆ áÂЯ=É. fõ!%:¾ÐÍ· Invalid Library user numberÃ^_Ã:·ÊcBͲÊcÍ· Library RSX already active. Use LBRDISK with no command tail to remove.ÇÍr *"4*&"*!�ë!\Í7 #}´ÂfÍ· Syntax error. Enter LBRDISK ? for help.Ã^Í· Examples: B>LBRDISK C:=* <--- Build C0: = Libraries/Archives fro m B0: B>LBRDISK C1:=LIB1,FOOBAR <--- C1: = LIB1 and FOOBAR B>LBRDISK <--- Remove the last LBR RSX B>LBRDISK C:=*,1:=1:*,2:=3:*,2:* <--- C0: = All libraries from B0:, C1: = All libraries from B1:, C2: = All libraries from B3: and B2: B>LBRDISK B:=A6:*,B4:FUM <--- B0: = All libraries from A6:, and FUM from B4: *.6ÿÇ:]þ?ʱ+|µÊ‚"(!]~þ ‚+~=ò‰:2+~<–:$<=2%!:=¾ÊöÚöÍ· Invalid Library drive. Must be between :Æ@ÍÍ· : and :Æ@ÍÍ· :Ã^:=¾Ú¨ÍÖ*(~þ Ê #ë!\Í7 #}´Ê‚+"(!]~þ Âm+~·Ê[:<¾Ê[Í· Only one Library drive is allowedÃ^+~<Âe:$<=2%ÍÖ¯ÄÝ *(}´Â**ë*&Í^ ¥ͷ No Library/Archive found.Ã^!",".ë"0"2*&"6!"8*6ë**Í^ ÊI*8#"8![ë ÍU "6Íx ÊÂ!eJÍÆ Ê/*.ë![%ÍU Í  Õ!eë!UÍU Íx ÑÊÂ![%ÍU Í  ë".!4ÃÂ*2ë![%ÍU Í  ë"2!4ÃÂ:!¶Ê…*8+|µÊa>ÿ2*."*:·Ê�*0ë*2Íd ë**Íd "*"BKë*0Í• :·Ê·*,ë*.Íd ë**Íd "*"BKë*,Í• :W*Íd ë*¯ë.6Ã#6 #t#6Ã.¯w#w.ë!BÍU Õ;Íá."ë**Íd Ò+ Í· Too many Libraries/Archives specifiedÃ@Íd Ú; Ã1 `i":2:%2: 2!*4ë! ÍU :G:æð°2Ç*&}·Ê} $.¯Í¸ È=Ÿ Í· Not on page boundaryÇÍ· Insufficient memoryÇá~#å·È_Í÷ ÕåÊÚ æO~æ¹#ÊÉ áÑÉ![4:$Êé 5~wåÍp á#~·Âú :À#N#F:“= �þÚ( ++å ¼áÚ( W$ÕÅÍ, ÁÑÕZåcx±Ê {æÂ ã~#ão}oÒ „Ãð ÑÑ·Ê! b.& Å;é;ͯÉ>·Éx±È~# Ã, å+6ÿ#ÍŽ áåÍ­ Ío Ê ÕÍo Ê] ÂN ÑÃÜ þ:ÑÂÜ Ío ʬ Ö0Ú& þ Ò� Gy‡‡�‡€OþÒ& +~#<Â& Ãf ʘ +q#ÖÚ& þÒ& 45Â& �áå wà Ío Èþ Ú% ú% Âb þ*Êg w#·É6?#òg Éå!º ¾Ê 45#Ât ·áÈþaØþ{Ò‹ æ_æɯw# ͦ ͦ  ͦ  p# ¦ Éþ Ê­ þ Ê­ É .,:;[]=<>| Ío Èþ Ú% ú% Âb þ*Êg w#·É6?#òg Éå!º ¾Ê 45#Ât ·áEÃ1ÃLBR :·Ê yþ Ú yþ)Ò Ö !R‡ÍŠ~#foé�q�ï ??´øc ¦ º   ² Â Õ L  ¢  L …oÐ$ÉÍ ¯2 22!€"Y:·Â­=2¯2Í­ÍÞ*("[!"*:$·Ê†2]*"ëÕÍïÊtÑÕÍÍ!Ât!‰KÍ7Ât^#Vë"g!Ã*g+"g|µÊtÑÕÍÂt!‰~·Âd"eë*[ëã~ãæwÍ�ë+V+^Í##ÑÕs#r#Í "[**#"*ë*.ÍÌ*eÊ„~<Êt ÂÃÑ:]=2]ʆ!)ÃÐ:'·Ê02]*%)ëÕÍïÊÑÕÍÍ!Â!‰~·Â"eã~ãæö€wë*[ëÍ�Õ+V+^##Õ^#VëÑÍÒ#Ñës#r#ÍÑÕå!×ÿëás#r#Í "[**#"*ë*.ÍÌ*eÊ„¯ÑÕÍʪÑ:]=2]Ê0!R×ÍÃÉ Too many Library/Archive members Specify fewer Libraries/Archives Aborting.$4¯2=2*(.w!~æG:¸Â§:w Í Çã"½!9"Àá1EÍ1É*YëÍ : _Í :!_ à ‰Í :_à Í?! 6Í <ɯ!"w#w#w!'Õë*[ës#rëÑ+w+wÉÍ)!Í ·É!"4À#4À#4ÉÕåÊPæþ?ÊKO~æ¹#Ê:áÑÉÍ_Íh~# Â_É~æ# ÂhÉæ€G~°# ÂsÉ:0·Ê_å> ÍŠ~áæ€Â_Å Í_ÕÆÍ5Ê®ÑÁyÖ OÃ_Ñå!ÉÍ_á>ÍŠÁyÖ OÃ_COMOBJ|ºÀ}»É}“o|šgÉ=úó!¾Êúáyþ ¯2à :·Êåë"këã"!9"^:!2uá1EÍoDþÿÂ]%$Ê]"e:ÆA2AÍ> CP/M Error on : :fþÌaþÌvþÌ‹þ Ì�Ç1ÉõÍ>Read-only DiskñÉõÍ>Read-only FileñÉõÍ>File ExistsñÉõÍ>? in FilenameñÉ Õþ?ÊÁ´ÑÉÑá>ÿ& É**"]*("[*]|µÂß=É+"]*[þ?È:uG~æ¸Âÿ# Í7+È>ÍŠ"[ÃÕå*qëás#r#:sw###É{²Â'2sÃ8{æ<2s{z_>Wë"qëÉá~#å·È_Í Ã>"ÃT!æÅÕ_ Í ÑÁÍ "e:! _à :»>ÿÊ{¯2·Ê†:_{2 à ÍÙͱÍÈÊœ&É"iå*kÑs#r#ë> ÍŠ Í_++V+^*k> ÍŠ~#6ÿ#6€#»>€ÂßÂßå> ÍŠ~áw*kë*i#ÍS¯gÉÍÙÍ[ åÍ8 áåøÿ~áÚ6¯gÉþ?ÄÙþ?Â%:·Ê ¯ÍÙ>?ë| Í_:|þ?Â92ˆÍh ÃI:·Ê Íú͈ *]}´Â\Íh >ÿ&É}ÍÕÂTë*]#"]ë:ˆ¾Ê™Úéþ?Êé*]+"]*["[¯2tÃL!t¾Ú�w4õ*Yë*[~æþ Ú´>å# Í_ñõ¯>ÍŠñ¾>€ÂÔ##~!>åw wwÍ} ¯gÉþ?Âþ:t¾!tÊ Ú Ã�!t¾Ú�àÍÙÍÞ !~æ€>&À*këÍÈÊ'&ÉëÍÐ ö@*këÍÈÊ'Í– ¯gÉÍÙÍ[ !~! ¾>&ÈØ! F!~¸>&ØhÍ­ ÍR*e}þÿÈÍè Òˆë*cëÍÒMe."e*kë! ~�wò¯Ö€w! 4~!¾Â¯##~!w*e}ÉÍÙÍÞ Í[ ÍÐ ! nÍ­ ÍM*e}þÿÈÍè Ü+*kë! ~�wòîÖ€w! 4!w*e}ÉÍÙÍÞ Í±ÍÈ>ÿ&ÈÍó &Àë"ië:'G:u°*k# Íhx*"Ò3 *%ë>ÍŠs#r++¯w+w+å!%N#Fáp+q>ÍŠ¯w#w#wÍ– *iÜÍÙÍÞ  ͳ!wë ͳÍÈ>ÿ&È*këÍÈÊ� &ÉëÍÐ *k  ÍsÍ– ¯gÉ:·Ê :oÉÍÙÍÞ  ͳÍÈÊÆ &Éë*k#ÍSÍ– ¯gÉÍÙÍ[ Í“ ÍÍR*kë!!N#FÅyæõyx! w!¾>€Â ##~!w! ñw*e}ÑþÿÈÕ·Â% *k~#foÑÍÒ|·ÂG }¹ÒG *ee."e*e}ÉÍÙÍÞ Í[ !!^#VÕÍÑÍÍM*që*k ~#foÍÌÜ+ÃØÍÙͱÍÈÊŽ &É N#F!!q#p#¯wgÉÕÍ Ñ:ÿ&É:-·Âí :,!u¾È>ÿá&É*(ë**"]*]|µÊ +"]æ@Â3 !ëÃý **#ë"[*.ÍÌÊ5 Ú5 ë"**[ë¯É¯=É:-·À*kë!~Ø!~#fo"cëÍë!N#F*c DM!~#fo>%ÍŠq#p!ÕÍ Ñ!~#foë#ÍS>ÍŠ Í_*(~õ^#Vë"oÍ ÍÞñ*oÚi ë!"¯w#wÕÍ?ÑÕÍ!‰!^#Vë"g))+ë*]ëÍÌÒì ÑáÍÃ>&ɉ!ë>ÿÍ8 à ÑÕÍ? *g+"g|µÊa ‰*]|µÂ(  >ÿÍ8 ÃZ *[~æ@Ê< >ÍŠ"[à ¯#Í_¯Í8 >ÍŠ"[*]+"] à ÑÍý ÍÃÉ)ë!"¯w#wÕÍJ ‰*]|µÂ‘ >ÿÍ8 ÃÚ *[~æ@Ê¥ >ÍŠ"[à ¯# Í_Å+F+N##Õ^#V#"eë +ëáÁs#r#ë>*eÍŠ"[*]+"] ÑÕÍ? *]|µÂz ÑÕÍý Ñ!×ÿëÍý ÍÃÉà *("[ë!"]**"g*g|µÈæ@Â) *]#"]*g+"g!ëà  Â8 ÉÕ"Í ÑÃ)Í?ÕÍ Ñà ! ~<Èá> &É>ÿ2*("[**"]¯2t![_Ã_!_[Ã_!N#F!!^#V`iÍÌÐá>&É&)))))))å! ~áÍŠ"cå!^#V###N#Fãã! "m!" Áq#p*mëÉ·Âï *cyÍŠë*kÅ Á~#foÍÌÉ*k N#Fë ë*k N#F`iå" s#rÑÉ*k>ÍŠs#rùÿ~æwÉæÕ_ Í ÑÉ €ˆUUUUUU@D�Hˆ’H$I $„€ „�$@@@ "$�€‘‰ HH‰$$D� "@$� „‚@ ‚@"H!ˆ$D I$„€B@€B$‘$D’H@ �DHI$‚ BB"H€ˆ@„„’D’Hˆ�‘ D‘@@@€‰$‰$� D�H’ˆ� BI$ $�"� € $„H�$ ‰ "A$’„‚BHD’I @„B ‰ I‚BI"@!"@@„€��„€"B! �„ „�!$D‰HB�BH $D$!�$�$€H‘H $‰!$  D@  €_Ã_!_[Ã_!N#F!!^#V`iÍÌÐá>&É&)))))))å! ~áÍŠ"cå!^#V###N#Fãã! "m!" Áq#p*mëÉ·Âï *cyÍŠë*kÅ Á~#foÍÌÉ*k N#Fë ë*k N#F`iå" s#rÑÉ*k>ÍŠs#rùÿ~æwÉæÕ_ Í ÑÉ €ˆUUUUUU@D�Hˆ’H$I $„€ „�$@@@ "$�€‘‰ HH‰$$D� "@$� „‚@ ‚@"H!ˆ$D I$„€B@€B$‘$D’H@ �DHI$‚ BBThere is a bug in LBRDISK2 vers 2.1 which prevents the library user number from being an odd number. The version number has been changed to 2.2 to prevent confusion. Just replace LBRDISK2.COM with LBRDSK22.COM. All the other modules are the same. March 10, 1984 Jim Lopushinsky LBRDISK2SET /0LBRDSK22COM;12345678LBRDSK22$$$ååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååÉ É KLBR Ã+ÿ:÷ ÑÍò >Ú LBRFILE LBR ARCDIRò ÒÕ áëÉÍßÀ~·<ð=õæÊQ+:e8<2e8ñæîÀ:e8·È:e8=2e8<É#~þÂ=+:e8·Â=+:o8·Â=+ñ7É"X8:Z8=2Z8ÉÍe þ&°+*R6~þ Ê®+þ Ê®+åÅÍРͼ+Áá"R6®+>&2\8Ã,þ&°+:\8·Âµ+>&ÍÓ3·øõ¯2\8ñÉ*g8~·Êê+ó6¾Âß+O+¾Âß+ ÂÏ+xö€¿É+~þÒß+ÃÁ+:p8·À*q8À~·Ê,1+ Íþ0ÒfÍd This version of LBRDISK requires CP/M 3.xÇÍd LBRDISK version 2.1 for CP/M Plus Copyright (c) 1984 Jim Lopushinsky 02/18/84 "1Í".à~2$.Ú"~2 :€·Â¼*.6ÿ;Í*Í]Â*Íd No Library RSX to remove. Use LBRDISK ? for help.Ç.6ÿ. f.6ÿë*.¯¾ÂEwÍd Library RSX removedÇå*.™~á2&:&¼È.~·Â†å.;Ís ᆯ=É. fÃh!%:¾ÐÍd Invalid Library user numberÃ_Ã:·Ê*Í]ÊÍd Library RSX already active. Use LBRDISK with no command tail to remove.Ã*"5*'"+!�ë!\Íf #}´ÂÍd Syntax error. Enter LBRDISK ? for help.ÃÍd Examples: B>LBRDISK C:=* <--- Build C0: = Libraries/Archives from B0: B>LBRDISK C1:=LIB1,FOOBAR <--- C1: = LIB1 and FOOBAR B>LBRDISK <--- Remove the last LBR RSX B>LBRDISK C:=*,1:=1:*,2:=3:*,2:* <--- C0: = All libraries from B0:, C1: = All libraries from B1:, C2: = All libraries from B3: and B2: B>LBRDISK B:=A6:*,B4:FUM <--- B0: = All libraries from A6:, and FUM from B4: *.6ÿÇ:]þ?Êf+|µÊ7")!]~þ Â7+~=ò>: 2 +~<ÂK:$<=2%! :=¾Ê«Ú«Íd Invalid Library drive. Must be between :Æ@ͶÍd : and :Æ@ͶÍd :Ã:=¾Ú]ÍŒ*)~þ ÊÀ#ë!\Íf #}´Ê7+")!]~þ Â"+~·Ê: <¾ÊÍd Only one Library drive is allowedÃ+~<Â:$<=2%ÍŒ¯ÄŠ *)}´Â¶*+ë*'Í ÂZÍd No Library/Archive found.Ã!"-"/ë"1"3*'"7!"9*7ë*+Í Êþ*9#"9![ë Í "7Í& Êw!eCÍs Êä*/ë![%Í ÍN Õ!eë!NÍ Í& ÑÊw![%Í ÍN ë"/!4Ãw*3ë![%Í ÍN ë"3!4Ãw:!¶Ê:*9+|µÊ>ÿ2*."+:·ÊE*1ë*3Í ë*+Í "+"BKë*1ÍC :·Êl*-ë*/Í ë*+Í "+"BKë*-ÍC :W*Í ë*.Í ¯ >k s#rër+6."ë*.þs#rë6Ã#6 #t#6Ã.¯w#w.ë!;Í ë."ë*+Í ÒÿÍd Too many Libraries/Archives specifiedÃêÍ Ú Ã `i":2:%2: 2!*5ë! Í  Í€: ÆA:þ ÚS G>1xÖ Æ0>:¯/_ÍÇá~#å·È_ÍÃd Õåʇ æO~æ¹#Êv áÑÉ![4:$Ê– 5~wåÍ á#~·Â§ : �áå wÃ? Íž Èþ ÚT úT ‘ þ*Ê– w#·É6?#ò– Éå!é ¾Ê® 45#£ ·áÈþaØþ{Òº æ_æɯw# ÍÕ ÍÕ  ÍÕ  p# ÂÕ Éþ ÊÜ þ ÊÜ É .,:;[]=<>| Íž Èþ ÚÃ3ÃLBR :·Ê yþ Ú :·*":ÂZ¾Âj:w>ÿÃg¾:Âbw¾Êj¯2yþhÒ þcÒˆþ/Ò Ö !�‡ÍÞ~#foéÖc!ÔÃã-�ªß¬ãX œ  J    V  y ô ' J  ô     b p ° ¸ ° ° …oÐ$ÉÍ ¯2ÍëÍÍN**"a!",:&·ÊÂ2c*$ëÕÍk°ÑÕÍ|Í�°!�Sͳ°^#Vë"m!ÃZ*m+"m|µÊ°ÑÕÍš°!�~·Â "kë*aëã~ãæwÍýë+V+^ÍÆ##ÑÕs#r#Í´"a*,#",ë*0Í_*kÊÀ~<ʰ ÂZÃAÑ:c=2cÊÂ!)à :)·Êl2c*')ëÕÍkÂZÑÕÍ|Í�ÂZ!�~·ÂJ"kã~ãæö€wë*aëÍýÕ+V+^##Õ^#VëÑÍe#Ñës#r#ÍÆÑÕå!×ÿëás#r#Í´"a*,#",ë*0Í_*kÊÀÂëÑÕÍšÊæÑ:c=2cÊl!RÃÓÍ%É Too many Library/Archive members Specify fewer Libraries/Archives Aborting.p¯2=2**.w* .Ó6.¯:¾Âå:w Í Çã"û!9"þá1KÍ1É* |.ØÍ!,Í!.ÚÍ!.àÍ!.æÍ!.ç~É!|^#V#åÍ á^#åÍ Ñ* .àw.æw.çwÉ�Í :_Í * .æ6.ç6ÉÍI! 6Í ·É¯!"w#w#w!'Õë*aës#rëÑ+w+wÉÍ¥!Í ·É!"4À#4À#4ÉÕåÊÌæþ?ÊÇO~æ¹#ʶáÑÉÍÛÍä~# ÂÛÉ~æ# ÂäÉæ€G~°# ÂïÉ:2·ÊÛå> ÍÞ~áæ€ÂÛÅ ÍÛÕSͱÊ3VͱÊ;ÑÁyÖ OÃÛÑå!YÃ@Ñå!\ÍÛá>ÍÞÁyÖ OÃÛCOMPRLOBJOBP|ºÀ}»É}“o|šgÉ=ú†!¾Ê�áyþ ¯2à :·Êxë"qëã"«!9"* .à~2{á1KÍoDþÿÂ%$Ê"k* .ç~<Êõ:ÆA2âÍè CP/M Error on : :lþÌ þÌ þÌ5þ ÌGñ<Â*k}D1ÉõÍèRead-only DiskñÉõÍèRead-only FileñÉõÍèFile ExistsñÉõÍè? in FilenameñÉ Õþ?ÊkÂ^ÑÉÑá>ÿ& É*,"c**"a*c|µÂ‰=É+"c*aþ?È:{G~æ¸Â©# ͳ+È>ÍÞ"aÃå*wëás#r#:yw###É{²ÂÑ2yÃâ{æ<2y{z_>Wë"wëÉá~#å·È_Í Ãè"Ãþ!* .à~õåæwÍ "káñwÉ:»>ÿʯ2·Ê :_à ÍlÍ[ÍrÊ<&É"oå*qÑs#r#ë> ÍÞ ÍÛ++V+^*q> ÍÞ~#6ÿ#6€#»>€ÂÂå> ÍÞ~áw*që*o#ÍϯgÉÍlÍaåÍ, áåøÿ~áÚ§6¯gÉþ?Älþ?ÂÅ:·Ê ¯Íl>?ë‚ ÍÛ:‚þ?ÂÙ2ŽÍnÃé:·Ê Í�ÍŽ*c}´ÂüÍn>ÿ&ɃÍÂôë*c#"cë:޾Ê9Ú�þ?Ê�*c+"c*a"a¯2zÃì!z¾Ú!w4õ* .Ø^#V*a~æþ ÚX>å# ÍÛñõ¯>ÍÞñ¾>€Âx##~!>åw ww̓¯gÉþ?¢:z¾!zÊ@Ú@Ã!!z¾Ú!Ã@ÍlÍÒ !~æ€>&À*qëÍrÊË&ÉëÍÄ ö@*qëÍrÊËÍŠ ¯gÉÍlÍa!~! ¾>&ÈØ! F!~¸>&ØhͳÍü*k}þÿÈÍîÒ, ë*iëÍeMe."k*që! ~�wòS Ö€w! 4~!¾ÂS ##~!w*k}ÉÍlÍÒ ÍaÍÄ ! nͳÍ÷*k}þÿÈÍîÜ5*që! ~�wò’ Ö€w! 4!w*k}ÉÍlÍÒ Í[Ír>ÿ&ÈÍç &Àë"oë:)G:{°*q# Íäx*$Ò× *'ë>ÍÞs#r++¯w+w+å!%N#Fáp+q>ÍÞ¯w#w#wÍŠ *oÃ<ÍlÍÒ  Í]!wë Í]Ír>ÿ&È*qëÍrÊ3 &ÉëÍÄ *q  ÍïÍŠ ¯gÉ:·Ê :oÉÍlÍÒ  Í]ÍrÊj &Éë*q#ÍÏÍŠ ¯gÉÍlÍaÍ™ÍÍü*që!!N#FÅyæõyx! w!¾>€Â® ##~!w! ñw*k}ÑþÿÈÕ·LÂÍ * .æN*q~#foÑÍe|·Âï }¹Òï *ke."k*k}ÉÍlÍÒ Ía!!^#VÕÍÆÑÍÍ÷*wë*q ~#foÍ_Ü5Ã| ÍlÍ[ÍrÊ6 &É N#F!!q#p#¯wgÉÕÍ Ñ:ÿ&Ðëq#pÍŠ ¯gÉÍl>ÿ&É:»Â ¯goGÉ! ~æ€Èá>ÿ&É:/·Âá :.!{¾È>ÿá&É**ë*,"c*c|µÊ +"cæ@Â' !ëÃñ *,#ë"a*0Í_Ê) Ú) ë",*aë¯É¯=É:/·À*që!~Ø!~#fo"iëÍÆë!N#F*i DM!~#fo>%ÍÞq#p!ÕÍ´Ñ!~#foë#ÍÏ>ÍÞ ÍÛ**~õ^#Vë"uÍ ÍÍNñ*uÚ` ë!"¯w#wÕÍIÑÕÍ��!^#Vë"m))+ë*cëÍ_Òã ÑáÍ%>&É�!ë>ÿÍ>à ÑÕÍE*m+"m|µÊX �*c|µÂ  >ÿÍ>ÃQ *a~æ@Ê3 >ÍÞ"aà ¯#ÍÛ¯Í>>ÍÞ"a*c+"c Ã÷ ÑÍô Í%É)ë!"¯w#wÕÍP�*c|µÂˆ >ÿÍ>ÃÑ *a~æ@Êœ >ÍÞ"aÃv ¯# ÍÛÅ+F+N##Õ^#V#"kë +ëáÁs#r#ë>*kÍÞ"a*c+"cÂv ÑÕÍE*c|µÂq ÑÕÍô Ñ!×ÿëÍô Í%É!~ö€wåÍ á~æwÉ**"aë!"c*,"m*m|µÈæ@Â/*c#"c*m+"m!ëà Â>ÉÕ"Í ÑÃ¥ÍIÕÍ Ñà ! ~<Èá> &É>ÿ2**"a*,"c¯2z!aeÃÛ!eaÃÛ!N#F!!^#V`iÍ_Ðá>&É&)))))))å! ~áÍÞ"iå!^#V###N#Fãã! "s!" Áq#p*sëÉ·LÂù* .æN*iyÍÞë*qÅ Á~#foÍ_É*q N#Fë ë*q N#F`iå" s#rÑÉ*q>ÍÞs#rùÿ~æwÉ* .àæwÉ €A"H�D„AB UUUUUUUUUTI$‚D��’HH‘ID’"I  H’!$� €€ $ˆ’@BDH"$�B@B@"„‚@@ @@€ @‚$’@!! ‘$ˆ„ @’B@„!€ € $B €‚‘€$€€€�D‰$‚ BB"H€ˆ@„„’D’Hˆ�‘ D‘@H’H’@‰I€ Hˆ@ $�@’@BI!’’H@€‰@��’$I A„‚BHD’I @ˆ‘$’ @ "’D�ˆ $$’$ €HI!  D„B!!A BH‰�„ „�HˆHB ’"D @€$’$„�€€€$ˆ@2z!aeÃÛ!eaÃÛ!N#F!!^#V`iÍ_Ðá>&É&)))))))å! ~áÍÞ"iå!^#V###N#Fãã! "s!" Áq#p*sëÉ·LÂù* .æN*iyÍÞë*qÅ Á~#foÍ_É*q N#Fë ë*q N#F`iå" s#rÑÉ*q>ÍÞs#rùÿ~æwÉ* .àæwÉ €A"H�D„AB UUUUUUUUUTI$‚D��’HH‘ID’"I  H’!$� €€ $ˆ’@BDH"$�B@B@"„‚@@ @@€ @‚$’@!! ‘$ˆ„ @’B@„!€ € $B €‚ Preliminary documentation for LBRDISK (CP/M Plus version) Jim Lopushinsky March 5, 1984 What is LBRDISK? ---------------- LBRDISK is an extension of the CP/M Plus BDOS (RSX) that allows you to treat libraries and archives as a logical drive. For example, to squeeze and collect into a library a collection of text files you might do the following: B>CREATE TEXT.LBR <--- creates an empty library Allow how many entries: 12 <--- 12 files. B>LBRDISK C:=TEXT <--- allocate drive C to TEXT.LBR B>NSQ C:=*.TXT <--- squeeze all text files into TEXT.LBR It doesn't matter if the assigned drive actually exists or not. All transient programs (including the CCP) have access to the newly created drive. Are there any restrictions? --------------------------- Yes. LBRDISK allows modifications to the library drive only if one library or archive is allocated. If more than one is allocated, the library drive becomes Read-only, and will return appropriate CP/M errors if an attempt is made to write, erase or rename a file on the library drive. There must not be more than one open output file on the library drive. Programs must close any output file before opening another. There are no restrictions on the number of open input files. Libraries and archives are sequential files. It is strongly recomended to erase a file and re-make it before writing to it. Writing to an existing file is allowed. However, the records replace existing records in the old file, and if writing occurs past the end of the file, the next member will be clobbered. Making a new file causes output records to be appended to the end of the library. Random write is allowed, but the program must not leave any "holes" in the file. As far as I can tell, all the common utilities operate as expected, with a few exceptions: CP/M+ DIR command withoptions does not report the correct sizes of members. CP/M+ ERASE transient with wildcards only erases some of the requested files. CP/M+ RENAME transient with wildcards only renames some of the files. Editors should not be used, unless you are positive that the editor maintains only one output file at a time. XFCBs, Directory Labels, and Time stamps are not supported. What are the programs? ---------------------- There is one utility associated with LBRDISK: 1. CREATE - to create an empty library or archive. This utility will run under CP/M 2.2 as well as CP/M 3. How do I use LBRDISK? --------------------- Here is the syntax: A>LBRDISK Entering LBRDISK with no command tail will remove the last active Lbrdisk RSX from memory. If there is more than one active Lbrdisk, only the last one loaded is removed. A>LBRDISK C1:=B5:CASM,C:TEXT Drive C user 1 will be allocated to CASM on B5 and TEXT on C0. B>LBRDISK C:=*,1:=A1:JRT*,2:=2:CASM,LASM Drive C will be assigned to the following: C0 = all libraries and archives on B0 C1 = all libraries and archives on A1 beginning with JRT C2 = CASM on B2 and LASM on B0 In the above two examples, drive C becomes read-only. B>LBRDISK D:=TEST D0 will be assigned to TEST on B0. Since only one library was specified, drive D becomes read-write. If we now execute the following: B>LBRDISK C:=1:TESTA A second library drive is created. C0 is now all the members from TESTA on B1. There is nothing stopping you from using NSWP to copy members back and forth between the 2 libraries and/or archives! B>CREATE TEST.LBR Allow how many entries: 6 This creates an empty TEST.LBR file with room for a maximum of 6 members. B>CREATE TEST.ARC This creates an empty TEST.ARC and TEST.DIR file. Please make any bug reports and/or comments to the SYSOP at Meadowlark RCP/M (403) 484-5981 @ 300/1200 baud.  all libraries and archives on B0 C1 = all libraries and archives on A1 beginning with JRT C2 = CASM on B2 and LASM on B0 In the above two examples, drive C becomes read-only. B>LBRDISK D:=TEST D0 will be assigned to TEST on B0. Since only one library was specified, drive D becomes read-write. If we now execute the following: B>LBRDISK C:=1:TESTA A second library drive is created. C0 is now all the members from TESTA on B1. There is nothing stopping you from using NSWP to copy members back and forth between the 2 libraries and/or archives! B>CREATE TEST.LBR Allow how many entries: 6 This creates an empty TEST.LBR file with room for a maximum of 6 members. B>CREATE TEST.ARC This creates an empty TEST.ARC and TEST.DIR file. Please make any bug reports and/or comments to the SYSOP at MeadowlarLbrdisk options can be selected by using SID or EDFILE and modifying bytes beginning at 203H as follows: 203H: Read-only flag. 0=R/W, non-zero = Read only. Lbrdisk sets the library drive to read-only if more than 1 library is specified regardless of this setting. 204H: Number of pages for directory RSX. In addition to the library RSX being loaded, a second RSX is built to hold the library FCBs and member names. Each library FCB is 41 bytes, each archive FCB is 82 bytes, each member entry is 23 bytes, plus a 27 byte RSX header. Currently set to 8 pages (2k). 205H: Multi-RSX flag. 0 = allow more than 1 lbrdisk RSX, non- zero = allow only 1 lbrdisk RSX. 206H: Minimum library drive (1=A:,2=B:,etc). 207H: Maximum Library drive. 208H: Maximum library user number. 209H: Secure mode (for RCPM use). 0 = non-secure, non-zero = rename .COM to .OBJ, .PRL to .OBP. ad-only flag. 0=R/W, non-zero = Read only. Lbrdisk sets the library drive to read-only if more than 1 library is specified regardless of this setting. 204H: Number of pages for directory RSX. In addition to the library RSX being loaded, a second RSX is built to hold the library FCBs and member names. Each library FCB is 41 bytes, each archive FCB is 82 bytes, each member entry is 23 bytes, plus a 27 byte RSX header. Currently set to 8 pages (2k). 205H: Multi-RSX flag. 0 = allow more than 1 lbrdisk RSX, non- zero = allow only 1 lbrdisk RSX. 206H: Minimum library drive (1=A:,2=B:,etc). 207H: Maximum Library drive. 208H: Maximum library user number. 209H: Secure mode (for RCPM use). 0 = non-secure, non-zero = rename .COM to .OBJ, à Z3ENVþ* Í­ >2²Í!�€ëí°ë"s"w>2}2y2|Í!6>ÿÍÀ:7·( *8~þ/ÂNÍÕLLF (List Library Files), Version 1.1 Syntax: LLF dir:library -or- LLF dir:library afn1,afn2,... o... -or- LLF dir:library /o... Options: C - Print CRCs G - Group by File Type and Name I - Print Indices P - Printer OutputÉO>Í~ͳ !3Xí°>Í((:ÍÕ Library File PÍ3ÍÕ Not Found or Structure ErrorÉ:7þ(q*:~#þ/( :7þ8_*<~Íš  å/åCàGèIòPú>2y#Ü:|/2|#Ò>2}#Ê>�2²#ÂÍÕ Invalid Option: ÍÍwÃN*:y·(!/\>Í~å!]>íKwÍ‹`i*s~·(ø"wá~#þ,(ÍíC�*wÍß ÍÕ TPA OverflowÉ*s"ÍF *w6Í´*z|µ2~*s"u:~·Êl*u"wÍN ##~Ö‡G*u~·( ø~·(2~"u>2~i&åÅÍ\Áá#ÍýÍí[wëA~·(Íýë~·(Íý6Å ë Áå:~·Ê�ÍÕ More Files to Follow - Strike Any Key (^C to Quit) Í þÊlÍXÃ�ÍŸ ÀÍ…Íú Í…ÍXÍÁÍú ÍÁÍXÉÍú Filename.Typ Recs Size :}·( Íú Index:y·ÈÍú CRCÉÍú ------------ ----- ------:}·( Íú -----:y·ÈÍú ----ÉåÕëÍU! ^#V#Õ^#V#ë> Í›Í4 }æõÍýÍýÍýñ(#> Í›Í4 >KÍ›á:}·(> Í›Í4 ë^#Vë:y·(> Í›Í Ñá yæÊXÍú ÉyæÄXÍŸ À*zÍ4 Íú Files Selected in Library !P~þ (Í›#õ:²æ€ÄXÉ!"z*sT]~·(!þ (åÕÍæÑá(åí°*z#"zá ÛÉë~·(  ¾À#ùÉöÿÉÅåÕ:|·  Í'ÑáÁÉ ë ëÍ' îÑáåÕÍ'ã¾À#ùÉ*.*LBRüÿåÕÅ€ÍÁÑáåÕÅ:Ö 2%"!`i"#!ëN#F!Í€ åÕÅÍÛÁÑá( # x± ê*#6öÿÁÑá·É!€~· 3å#í[! æþ?(¾ #òÑ*#:%¼8ÕÅëí°íS#Á¯Éá  ÂöÿÉåÕÅÕ€ÍÑ!6# ú!ëͨ ͽ $Íï #:€· !Œ· · w#w¯ÁÑá·É>÷>ó>ïÅ2 ÍeÕÍñ ѯ2I ÕÍÑÁ:H ·ÉÅÍÅ*J €Õ~ͪ ʵ#ç¯ápÁ*F ! : ·É2 Íe>ÿ2I ! Íñ \Íñ ! Í:H 2 å! * Í á:E 2 "J å~ͪ Ê #Ãÿ"F á͆ È\Í͆ Èl¯2E 2L 2H ÍFy2M Õ͹Ñ~2 þ:Â{2E #: ·ÊRÍæÊbÍC Êb: ·ÂbÍæ:L ÕÍ÷ ѯ2H Õ͹Ñ~2 : ë ëþ.‘#Õ͹Ñë ë:M :I ·Ê´~þ!Ú´ͪ Ê´#þ=¢:H ·ÉÍ� Èþ*ÂÌ>?ÍßÃÓ#þ?Ìß¹Í� È#Ã×å!H 4áÉåÕÍîÑáÉÍd Êw ë#Ír G~þAÚ Ö@¸Ò@ 2L #~þ ÈÍå Øå~þ Ê- Íå Ú? # ~þ Â? áÍ€ O ͱ ¹Ò@ 2M ¯Éá¯=ÉåÕÍK ÑáÉÍŽ Êw ë#·Êw åÕ¾Âi #Â^ ÑáÊz ë ëÃS ¯=É2M 2L ¯É~#þ ʆ +É~þ!Ú¯ þ=Èþ_Èþ.Èþ:Èþ,Èþ<Èþ>È·Èþ;ɯÉÅ~Í� ÊÞ #Íå Úâ WyÚâ Úâ �Úâ Úâ ‚Úâ Oµ yÁ·ÉÁ7ÉÖ0Øþ Òï ?É7ɯÍ÷  > Í ¯ÍFy¯ É~# ÉCOMõÕ*± /F##x‡€_ÑñÉåÕ*± .~Ñá·ÉåÕ*± ,~Ñá·ÉåÕ*± -~Ñá·ÉÕ*± ^#V#~ëÑ·ÉåÕ*± (~Ñá·É"± ÉåÕÅõÕÍÿ·ÉÁÑ*4 ¯ÉåÕÅõë,  ÍÁ*. "8 DMx·Âf yþÚ‰ :6 ·Êˆ *, ë*4 x±Êˆ s#r#å*0 ëáÃt *8 ": ·*: |g}o´Êí ": "@ *@ #"@ ë*8 }“|šÚŽ *@ "< *: ë*< }“o|šg"< Ú¢ |µÊ¢ ë*: "> Íõ Ú¢ *< ë*> ÍŽ ú :6 ·Ê‰ *. "< *4 "B *, "D *< DM*B ë*D ½Â ¼Ê?  y°Â Íw SORT Pointer ErrorÃ*B ~#~*0 DM*D ë*B ~#foëÅNëqëÁ# x±ÂZ *0 ë*D "D *B ##"B *< +"< |µÂ ñÁÑáÉ:6 ·ÂÚ Í¯ å*0 DMáÅNwy#Á x±ÂŸ ÉåÍ "À ÑÍ ë*À ëÉ*0 DM!z³ÊÔ ÃÊ ë*, Éå*4 DMá+) ë+) Nëq#NëqÉ:6 ·Â ͯ à å*4 DMá+) ë+) ëN#Fë^#V`iå*2 ãÉõ|͈ }͈ ñÉõÅÕåÃ: õÅÕå'Í] èÍ] dÍ]  Í] }Æ0Í›áÑÁñÉ}“o|šgÚl Ã_ }ƒo|Šgy·Â€ °Ê€ > ÛyÆ0ÛõõÍ— ñÍ— ñÉæþ Ú£ Æ7ÛÆ0ÛÅÕåõë¯w ÍwñáÑÁÉÅÕåÍ]þÿÂÐ >ÿ·ÃÑ ¯áÑÁÉÅÕåÍ]þÿÂÐ Í]þÿÂÐ ÃÊ åÅÍ]·ÁáÉãÍãÉÕÅõ~#·ÊTþ Ê> Í„þ Ê+þ Ê0þÊ0þÊ4Ãà Ãy·Ê ÃyæG>�G�O> Í›ÂJÃñÁÑÉõ:²õæ€ÄjñæÄwñÉõ> Í2> Í2ñÉãÍ}ãÉÕÅõ~#·ÊÑþ Ê» ͳþ ʨþ Ê­þÊ­þʱ Ây·Ê‚ ÂyæG>�G�O> ÍÂÇÂñÁÑÉãÍÛãÉÕÅõ~#·Ê/þ Ê Íþ Êþ Ê þÊ þÊÃàÃà Ãày·Êà ÃàyæG>�G�O> ÍÂ%ÃàñÁÑÉÕÅõÍI>.ÍÍIñÁÑÉæÍÂIÉÕÅõÍk>.Í›ÍkñÁÑÉæÍ›ÂkÉõ> Í> ÍñÉõÅO:²Gæ€yÄàxæyijÁñÉõÅO:²Gæ€yÄ2xæyÄÁñÉþ ÒþÊþÊþÊþ Êþ Êõõ>^ÍñÆ@ÍñÉþ Ò2þÊ2þÊ2þÊ2þ Ê2þ Ê2õõ>^Í2ñÆ@Í2ñÉÅÕå*. ÕéáÑÁÉõÅÕåO*. -ÕéáÑÁñÉõÅÕåO*.AÕéáÑÁñÉõÕåÍõÿ ÍOñGáÑñÉÅÕÍÑÁÉõå~·ÊtÍuw#ÃgáñÉÅHÍ€ÁÉåõÅÕWÍ¡ÑÁñáÉÅHÍ–ÁÉõÅÕWÍ¡ÑÁñÉr# x±Â¡ÉÍÁÅH ë ëÁÉÍÊÅ ë ëÁÉÅHÍÊÁÉõÅÕå|ºÚêÂÛ}»Úê~# x±ÂÛáÑÁñÉ ë ë~+ x±ÂðÃåõ§|g}oÒ ñ7Éñ·ÉõÅÕ¯2tå!"ráÍVÒ;å*r}ƒo|Šg"rÒ:>ÿ2táëÍdëÂÑÁ*r:t·ÊSñ7Éñ·Éõ§|g}oÒSÃPõ§}o|gÒSÃPæþaØþ{Ðæ_ÉåÕÅÕë! s#r#6Ñ!ÍÁÑá·ÉãõÅF#"¾##¾Êµ###¤*¾ö#~#foÁñãÉÅÕåOëFå##Í·Êøs#r#ÊìÍ·Êøy·Êç¯x·ÂÉÍÍ·Êøöÿáõ~�#wñáÑÁÉæþ Êþ ÊÉæÈþ Èþ ÈÃõ*/}·Ê-$.ñÉ16ÉÝ4#:É·Ä&*:Ãþ(þ Êö)Í*ÝË%F(͈/ÝË~(ËE´ )"ÝË$Æý*üÉÍ*ÝË&F \ÝË&ÆÝË$F$’I$„$�’’A !Aªªªªªª @’$’I$‰"!$’H$I$’I ’"! $�‘A$ˆ€’ � H„H��„AA"I @BB‘ „$�„’A"ÊÃàÃà Ãày·Êà ÃàyæG>�G�O> ÍÂ%ÃàñÁÑÉÕÅõÍI>.ÍÍIñÁÑÉæÍÂIÉÕÅõÍk>.Í›ÍkñÁÑÉæÍ›ÂkÉõ> Í> ÍñÉõÅO:²Gæ€yÄàxæyijÁñÉõÅO:²Gæ€yÄ2xæyÄÁñÉþ ÒþÊþÊþÊþ Êþ Êõõ>^ÍñÆ@ÍñÉþ Ò2þÊ2þÊ2þÊ2þ Ê2þ Ê2õõ>^Í2ñÆ@Í2ñÉÅÕå*. ÕéáÑÁÉõÅÕåO*. -ÕéáÑÁñÉõÅÕåO*.AÕéáÑÁñÉõÕåÍõÿ ÍOñGáÑñÉÅÕÍÑÁÉõå~·ÊtÍuw#ÃgáñÉÅHÍ€ÁÉåõÅÕWÍ¡ÑÁñáÉÅHÍ–ÁÉõÅÕWÍ¡ÑÁñÉr# x±Â¡ÉÍÁÅH ë ëÁÉÍÊÅ ë ëÁÉÅHÍÊÁÉõÅÕå|ºÚêÂÛ}»Úê~# x±ÂÛáÑÁñÉ ë ë~+ x±ÂðÃåõ§| LLF Version 1.1 11/27/86 LLF Version 1.1 corrects a bug in Version 1.0 that caused sporadic and unpredictable bomb-outs. The bug manifested itself with a 'TPA Overflow' error-message, for which nobody had a sensible explanation. Bruce Morgen finally tracked the bug down during his recent exhaustive work with library files. The bug results from an error in the LUDIR module of SYSLIB Version 3.6. The source of the bug was traced to the file SLUDIR.Z80. The line in SLUDIR.Z80,'ld a,(bdose+7)', should be 'ld a,(bdose+2)'. The LUDIR module of SYSLIB, used in LLF, derives the top of TPA from the most significant byte (msb) of the bdos entry address, which is contained at memory address 7. Since 'bdose' is equated to 5, the most significant byte of the bdos entry address is at 'bdose+2', not 'bdose+7'. By loading 'bdose+7' into the A register, the LUDIR module introduces a random number into the top-of-TPA calculation. Neither CP/M nor ZCPR3 documentation sets forth a value for 'bdose+7' and at any particular time this address may contain any of 255 different values. The source code for LLF has not been released. Nevertheless, examination of the program with a debugger reveals the erroneous code at 069DH. That byte should be changed from 0C to 07. That's all there is to it. For those unaccustomed to in-memory modification of COM files, we have included a patched version of LLF in this library, LLF Version 1.1. In addition, we have included the modified source code for the LUDIR module, SLUDIR11.Z80. Bug Fix: Bruce Morgen Director, NAOG/ZSIG Documentation: Richard Jacobson Sysop, Lillipute Z-Node 312-649-1730 System 1 312-664-1730 System 2 ry address is at 'bdose+2', not 'bdose+7'. By loading 'bdose+7' into the A register, the LUDIR module introduces a random; Prevent any "piping" commands executing. ; This is used to avoid anomalous disk writes on secure systems. ; .pipes:: stc ret end ÔPATCH DOC%CREATE COM &'LBRDISK2DOC!()*+,LBRDISK2NOT -.LBRDISK2SET /0LBRDSK22COM;12345678LBRDSK22NOT9LBRDISK3COM;:;<=>?@ALBRDISK3DOC!BCDEFLBRDISK3SET GHLLF11 COM$IJKLMLLF11 DOCNONOPIPES $$$ååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååÃ1) Íæðþ Ê?ÍÜThis version of SETRSX requires CP/M 2.xÇ|·Âͨ*÷}·ÊR$.>Í)Ê�=ÂwÍÜNot on page boundaryÇÍÜInsufficient memoryÇ*.^#V#å*#N#Fr+sáq#pÇ*.45¸. fë.ùÍëÀÍÜRSX removed¯2;ÿÿÃá~#å·È_ÍÃܾÀ# ÂíɨRSX +¾Âß+ ÂÏ+xö€¿É+~þÒß+ÃÁ+:p8·À*q8À~·Ê_·Ê0}·>À#N#F:“= �þÚ™++å ¼áÚ™W$ÕÅÍ�ÁÑÕZåcx±Ê {æÂrã~#ão}oÒ{„ÃaÑÑ·Ê’b.—Å;é;ͯÉ>·Éx±È~# Ã�Ê_·Ê0}·>À#N#F:“= �þÚ™++å ¼áÚ™W$ÕÅÍ�ÁÑÕZåcx±Ê {æÂrã~#ão}oÒ{„ÃaÑÅÃÃRSX ÿ¥yþ; z³Êoz³Êc*¿|µÂ<*G¯ >k x·ÂTs#r+#ër+6.""¿É*ë*#s#rÇ*¿D`.45À. F.~·Ês. ^#Vx>`. s#rz·Âs.""¿Ãs1Å*¿"Ío* .ø:Oé€A€D@ @I �vÿDÒSLUDIR11.Z80Vßÿ öÿšÿ�ÿ�ÿ‹ÿõÿòÿŒÿ›ÿ‘ÿ“ÿÄÿžÿ™ÿ–ÿ œÿ�ÿŠÿ—ÿ�ÿÓÿ’ÿ!"#$%&'()*+†ÿÅÿ˜ÿÎÿ³ÿ,-./0123456789:;<×ÿÖÿ»ÿÑÿÏÿ¾ÿ½ÿ¹ÿ¶ÿ‰ÿ«ÿªÿ…ÿÍÿˆÿ‡ÿ•ÿoÿºÿ=>?@ABCDEFGHIJK²ÿ­ÿ¼ÿ±ÿÂÿøÿÒÿ·ÿ¯ÿ©ÿØÿ¬ÿÔÿÈÿÇÿ°ÿ”ÿûÿŽÿÛÿÊÿÉÿ¨ÿÝÿLMNOPQÐÿÌÿËÿÆÿÀÿ¸ÿ´ÿ¥ÿRSTUÿÿúÿåÿ§ÿ¦ÿ ÿ‚ÿÿþÙÙŒÝåîì�4 ‰×Ø]œ=v6ãx0£Ê�[7 x¢1:›qP ¯ñÇÃfð¾9›±»Ü��à5‹oר9›±»Ü��à‘†!1^³ø¦q�íᑳÙÙŒÝåîì�4 ‰×Ø]œ=v6ã1Ÿ7ß4¢ fTYãD†ŽñHeÃÑÙŒƒbx�íïxªç¼L,øðÝÙŒÝåîì¯Y|Ó¸ÆöðÈÙŒÝåîì�4 ‰ñšÅ7�kl·Îfg3žªa¿Ækß4b{¸…ao<ª ŒöЊ‹WǘVHZB‹˜‘±¨7ÎfÜ?÷m[m]‰ÓÊ0´ÂŒŒ)¨G#+”„½G‹FaFƱ³÷Ï…7ÍÜ43ÂŒŒª)éM‹¼@ (óÞÔó»ëýCà5‹o�͸¾==<½˜QbÀÉ|ßw–ü0Q™·GD½�QLœô?yõøWg)Ú3}áöçBž 8ôFœ¥h¯¶Äûó˜(×sFoFQ[bIJ°³”�óD”±aƒÞŒbáEe…i¨•ÅYJ�ÒÜ9K)ÐÞ4Ôʲ?�‰2|9gôF` /*+LC­,ÎR 4¦9 ¡veh­ž Œâôɉ³TB 1Í��%¾¥Àó˜ˆ2ð §ONœ¥¨›÷Æ´O”±aƒÄqcFhEhÂ�QY9K-v4&g)šæ½1í;K)Иæ#¢ ášpgTVh{Â�JÀѾ³Iµ_;K]I‰ä«p DRbÐÂ%8KwBñjfʨ-1¢Tb@«`g©üHc"Êðåœñ‰WÞxg©üH��¥~ð#M�³Ô•”Èw%eø®DTÔ–±,Œ¥˜nD‰ÓÐRÀ4ÔÊâ,õÚÓÔe{£ÂøÄ+o¼³ÔkO��¥^{“³t't5³ˆ QÆÅ«cÔ!%g©ÅŽÆD”ÑEä[áN%8K�;š:¢ŒN‡hô&"qܘZš8K)P™'¢Œ ‘ÿp–T¨s–î„âÕœT{g)Ó¼7 µ²ìSF¯-Eä[ƒie¥¤â 8Y9K)ÐÞ˜öç#¢ oTW,ê,Ý �L”qüìUtÁÄU…aFÆÏ;A¼š“jÿÓYQY;K*tTëH”áÙàèôô¥³A#¯�¥^{š:¢ aoTÂï,õÚS`g©×žÆä,©P!ÊðlPSÙxgIØ8›�ÍÀÛ®D\œ\žž¢ª ¶ÄˆeaïlÎ*^TVÐs–šôfÆñ³#”ð7‹â4• Þ²q6gÿšqüìèôô¥³ÙYß•¸v–R 1Ífj¥ŒÞÀ(¦¡Vg)êæßˆ2~G#�=zõ¾M‰�õ]‰Ûµ³”•yoLûDÝÈÝ'T”δsG#+gI… QÆÑ³{géN(^;+ñÖ8KýàG“³ÔbGc"Êè Œ"–…�¥(ð¼W[â}Êè Œ¢¶Äˆeag)šæí–(c»Å´2ì�õ]‰©_;K)P™÷ïelØ –…�¥½¯#QÆRü',~r–ºžÞüñ†(c)¦qÓRp–î„®fß•˜ú­³Ôõ´7¦}¢ŒN—¾Ã(Bp4²r–î„âÕì»Sí¬ïJLýví,µØÑ˜ˆ2z£ˆ|kœ¥; ì,…»xE¾+1õÎR¯=&ʸaŒåœQ°Ó�x�ÞÀ(8YᦙÎR 4¦yojeÙ§Œ ”„½‡VD¾5˜†ZYÀÑÈÊYJ�ʼgúÂ1ìSF7r÷ UzÎR“Þ8K]O£³t'Ô;+‘E(ãâÕ1ôœ¥&½q–úÁ�˜(×sFoÄYê?ÒÔeørÎètˆÆYj±£ÀD½�QÔ–±,ì,ñ-žÇD”áu�ŽÑ"^hêæÄÑø+Êàhdß®ØYJ¡‰³”íMC­,ûs`ÊðåœÑAUAä[ƒNû•³ÔkOSG”±aƒN‡hœ¥;!ß•˜úk¢ŒN£iq`g}W"‹¬�¥[*DÂf�ˆ›fF\±(ª XDÅY6Îú®ÄÔ_¯�¥^{QFo`Ý ÂÑ8ë»oÍÚYJ�Ï¿^eôFùÖ8K%ÓØY ÜQG”Ñé ‚ÞDgéN(^;+që,©ÐQ­#Q†gƒ¨`gIØ8ëlv6'C­,ÞÙìlm‰×<]eôÚ¢a�Qœ>=<½pvjeYSðtM”Ñk‹†F±ð¢²Â4ÔÊâ¬é ǰ¦àiK”Á1 /†V\¼:v6 �£YSðtM”Ñk‹†F±»<G#+g�%ŽÁÙýãþÿÍ+:!͆*:<·Ê þÿÂɅý:!ÕÃÎÃ$ÃDÃìÉÉÃ�ÃtÃøÃyÃø¯7É7ÉÃ…ÉÉ7É7É@ÐÿÐ9!}É>Í’yÉ>ÅÕåþ?ÚÂo‡…*õÖ…o>Œgñþʵþ0¾ÍÅ33}ÃÂÍÅáÑÁÉéÑ ÍûÃReal arith. error, ABORT $:z·À>Í’·È>ÿÉÅÕåOþ(Òþ ÊþÊæùþÂÍ33Ã!ÍáÑÁÉ:z·Ê5¯2z:yÃ:>Í’æþ7?À·7ÉÍñÄO>Ë:å!�¦áÀ>ÿ2zÍ52yþÀ¯2zÍ5þÊÉ>Ë>Í’Ã:õ> ÍŽ> ÍŽñÉÅOÍÁÉ!"y:‚o"{!ùà+!ÍT0! 9^#VÕÍÉ3! 9^#VÕÍÚ2áÑ{µ_{î_Õ! 9^#VÕÍ34á^Õ á{•Ö>W_á{¥_Â! 9^#VÕÍ4ïà0!ÍT0! 9^#VÕÍ34á^Õ!9^á{•Æÿ>W_Õ! 9^#VÕÍÉ3!9^#VÕÍÚ2áÑ{µ_{î_á{¥_Âe! 9^#VÕÍ4Ãà0!ÍT0! 9^#VÕ>ÿÍ©! 9^#VÕÍ34á^Õ<Í*1>Í*1Íó0Í1ÂÅ Õ! 9^#VÕ>ÿÍ! 9^#VÕ>ÿÍ©Ã~à0!âÿÍT0ÕÕ Õ!9s#rÑáÍ=úíÂ@!9Ñs#r!9å!9^#Vë)Ñåás#r!9^#VÕÕ!9^#VáÍ=Ê0ú0Â@Ñ!9s#rÃù33!9åë)Ñåás#r!9åë)Ñåás#r!9å ë)Ñåás#r!9å ë)Ñåás#r!.9^#VÕÛáÍ=ʯú¯ÂÜ!,9^#VÕ¼ás#r!.9^#VÕÛáÍÁ0ë!.9s#rÃ!.9^#VÕÚáͺ0ë!.9s#r+++^#VÕ¸ás#r!.9^#VÕµKBáÍÏ0!9s#r!.9^#VÕµKBáÍK<Ü‚-ë!.9s#r+^#VÕáÍÁ0åmKBáÍÏ0!9s#r!,9^#VÕ+^#Vë^#VÕ! 9^#Váͺ0åÕ! 9^#VÁÍÈ0Ñͺ0ëás#r!9^#VÕá{•_zœ³Ö>W_¼!9åë)Ñåás#rÃè!.9^#VÕáÍÁ0ë!.9s#r!9åë)Ñåás#r!(9^#VÕ!09^#VÕmÕ!"9^#VÁÍÈ0ëáÍÁ0åáͺ0ëás#r!*9^#VÕás#r!(9^#Vë^#VÕ!9å!.9^#Vë^#Vë)Ñ^#VáÍ=òWÂ¥!(9^#VÕ+^#Vë^#VÕ!9å!09^#Vë^#Vë)Ñ^#VáÍÁ0ëás#r!*9^#VÕ+^#Vë^#Vás#rÃ(à0!þÿÍT0!9^#V! ^#VÕ&ÕÍã,!9^#V! ^#Vë^#VÕás#r!9^#V! ^#Vë^#V!ë!9s#r+^#VÕ!9^#VÕá^ás!9^#VÕ!9^#VÕáÑ~#Â3!9^#V! å!9^#VÕ áÑ~#ÂW!9^#V!å;;!9^#VÕ á^Õ!9^#VÕ á^ÕÍû/Ñás#r!9^#V!å;;!9^#VÕá^Õ!9^#VÕá^ÕÍû/Ñás#r!9^#V!å;;!9^#VÕá^Õ!9^#VÕá^ÕÍû/Ñás#r!9^#V! å;;!9^#VÕá^Õ!9^#VÕá^ÕÍû/Ñás#rà0!üÿÍT0!9^#V!üÿ^#V{æ_Âp!9s#rÃz !9s#r!9^#V!^#VÕÍ34!9^#Váå¯Í«!9^#V!üÿ^#V{æ_{î_ÂP ÕÕ?Õ!9s#rÑáÍ=úÒÂ< !9Ñs#r!9^#V!^#VÕÍ34!9^#Vá^Õ!9^#V! ^#VÕÍV/!9^#VÕÕ+++^#VáÍ=Ê, ú, Â< Ñ!9s#rÃÞ33!9^#V!^#VÕÍT4à0!øÿÍT0;;!9^#VÕÍ34á^Õ!9^#VÕÍ34á^ÕÍû/!9Ñs#r!9^#VÕ;;###^#VÕÍ34á^Õ!9^#VÕÍ34á^ÕÍû/Ñás#r!9s++++^#VÕás#r!9^#VÕÍ34á^Õ á{•?>W_Õ;;!9^#VÕÍ34 á^Õ!9^#VÕÍ34 á^ÕÍû/á{•_zœ³Ö>W_á{¥_Õ!9^#VÕ áÍ=Ê^ ú^ á{¥_Õ!9^#VÕáÍ=òy á{¥_Õ!9^#VÕÍ34á^Õá{•Ö>W_á{¥_ÂŒ !9^#VÕÍ34áåás!9^#VÕÍ34áåás!9s#r!9^#VÕ¯ÍE!9^#Vë^#V!9s#rÕÕÕ!9^#VÁÍÈ0åë!9s#rÑáÍ=ú# ‚ !9Ñs#r!9^#VÕ¯ÍE!9^#Vë^#V!9s#r+++^#VÕÕ!9^#VáÍ=Êr úr ‚ Ñ!9s#rÃ/ 33!9sà0!üÿÍT0!9^#V!9s#r!9^#V!ë!9s#r!9^#V! ^#VÕá{•_zœ³Ö>W_‰ !9^#V!å!9^#V! ëáÍ4=Ê ú  !9sÆ !9^#V!å!9^#V! ëáÍ4=ò; ÂJ !9sÆ !9^#V!å!9^#VáÍ4=Êo úo Â~ !9sÆ !9sÃ. !9^#V!å!9^#VáÍ4=Ê® ú® ½ !9sÃ. !9^#V!å!9^#VáÍ4=òß Âî !9sÃ. !9^#V!å!9^#V! ëáÍ4=Ê ú Â& !9sÃ. !9sà0!ÍT0! 9^#Vë^#VÕá{•_zœ³Ö>W_Ân ! 9^#VÕ#^#Vás#rÃÁ ;;!9^#VÕ+++^#Vë^#VÕ>Í’ ñÒ§ ! 9^#VÕ+++^#Vë^#VÕ>Í4 ÃÁ ! 9^#VÕ+++^#Vë^#VÕ>Í4 à0!ÍT0;;!9^#VÕ+++^#VÕ>Í’ ñÒ! 9^#Vë^#V! 9s#rÃÍ ! 9^#VÕ+++^#VÕ¯Í4 à0!þÿÍT0! 9^#VÕ###^#Vás#r!9^#VÕá{•_zœ³Æÿ>W_ÂÜ!9^#V!9s#r!9^#VÕá{•_zœ³Ö>W_Â×!9^#VÕás#r!9^#VÕ+^#Vë^#Vás#r!9^#Vë^#V!9s#r+^#VÕá{•_zœ³Ö>W_Â{ÃÜ!9^#VÕás#r!9^#VÕás#r!9^#Vë^#V!9s#r+^#VÕá{•_zœ³Ö>W_Â×!9^#Vë^#V!9s#r!9^#VÕá{•_zœ³Æÿ>W_ÂÜ;;!9^#VÕ!9^#Vկ͒ ñÒ«!9^#VÕ!9^#Vás#r!9^#V!9s#r+^#Vë^#V!9s#rÃÙ!9^#VÕ!9^#Vë^#VÕ¯ÍÇ !9^#Vë^#V!9s#rÃ=à0!ÍT0ÍLDIR (cmd, input, output); ÕÕ*Ø? ^#VÕÍx3Í%Ver. 1.9  ÕÕ*Ø? ^#VÕÍx3Í[ (c) 1983, 1986 by C.B. Falconer ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3ͪ Execute with "ldir {[options] [libfname]}"+ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Í where {} shows a field that may be repeated and []3ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3ÍZ enclose optional fields. "options" is the character5ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Íž "-" followed by one or more of: ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Íö n sort by name u unsorted(default)4ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3ÍJ g sort by "typ" m date modified0ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Í¡ s sectors of storage k kilobytes (size)3ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3ÍàEXAMPLE: B>ldir -m commandÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Í:Commands may be placed on the command line or executed6ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Í’ interactively on ">" prompt. "fname>" shows an open4ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Íç library, and -options will display its directory1ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Í7File redirection using "<", ">" is available,ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3Í„To list command.lbr on the lister, enter:)ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3ͽ B>ldir command >lstÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3*Ø? ^#VÕÍ3à0!ÍT0Í** ERROR **  ÕÕ*Ø? ^#VÕÍx3! 9^#VÃ2Í8Bad directory CRCÕÕ*Ø? ^#VÕÍx3ÃcÍ`Not a library: ÕÕ*Ø? ^#VÕÍx3!9^#V!ßþåÕÕ*Ø? ^#VÕÍx3ÃcÍ¥Cannot find:  ÕÕ*Ø? ^#VÕÍx3!9^#V!ßþåÕÕ*Ø? ^#VÕÍx3ÃcÍçBad option ÕÕ*Ø? ^#VÕÍx3ÃcÍNo library specifiedÕÕ*Ø? ^#VÕÍx3Ãc>Í‚-Ãc!ûÿ|î€úA!´úIÕÅñÒ*Ñ!Y^#Vëé$N•Úý*Ø? ^#VÕÍ3à0!þÿÍT0! 9^#VÕÍ34á^Õ-á{•Ö>W_Â3! 9^#VÕÍ4!9^#VÕÕëÑÍ41!9^#VëÑs#r#ÂÅÑ! 9^#VÕÍ34á^Õ á{•Æÿ>W_Â3! 9^#VÕÍ34á^Ã]!9s#rÃé!9s#rÃé!9s#rÃé!9s#rÃé!9s#rÃé!9s#rÃé!9s#rÃé!Šÿ|î€úl!¹ÿ´útÕÅñÒPGáÍÁ0ë!‹^#Vëé6PPPP)PPPPPCPPPPPPPPPPPPPPPPP6PPPP)PPPPPC!9^#VÕ+^#Vë +V+^Õ Âû!9^#VÍ*1Íó0!9^#VëÑs#r#ÂÑ! 9^#VÕÍ4ÃÏà0!üÿÍT0Õ!9^#V!ïÿ +V+^Õ ÂSÍ1ÕÕ!9^#V!ïÿ +V+^Õ ÂtÍ1á{µ_{î_ÂÄ!9^#V!ïÿ +V+^Õ ÂœÍ*1Íó0!9^#V!ïÿÑs#r#»!9^#V!Ùþ^#VÕá{•_zœ³Æÿ>W_ !9^#V!Ùþ^#VÕÍ¿,Õ!9^#V!ÙþÑs#r!9s#r!9^#V! ^#VÕÍ34á^Õ*Ø?6ÿ  +V+^Õ Â:Í1Âù!9^#VÕáÍ=Êcúc­!9^#V! ^#V!9s#r!9^#V!ßþå!9^#Váå!9^#VÕ͸3!9^#V+s#rÿ!9^#V! ^#VÕÍ4!9^#V! ^#VÕÍ34á^Õ*Ø?6ÿ  +V+^Õ ÂâÍ1{î_ÂJÃ,!9^#V!ßþåáåÍLIBRARYáÑ~#Â!9s#r!9^#VÕÕÕ+++s#rÑáÍ=úK !9Ñs#r!9^#V!ßþå!9^#Váå ás!9^#VÕÕ+++^#VáÍ=Ê�ú� Ñ!9s#rÃW33 Õ!9^#V! ^#VÕ>ÿÍ;;.Õ!9^#V!ßþåáåÕÍ0á{•_zœ³Ö>W_Âe;; Õ!9^#V!ßþåáåÕÍ0!9Ñs#r+^#VÕÕáÍÁ0ëáÍ=Ê6ú6Âe!9^#V!ßþå!9^#VáåÍY.LBR áÑ~#Â];;!9^#V!ûþåäÿ åÍ)2ñÒj!9^#V!ûþåäÿ åÍg/Õ!9^#V!ÝþÑs#r;; åÞÿ å##å##å>ÿÍV ñÒO!9^#V!Ûþ^#VÕá{•_zœ³Æÿ>W_Õ!9^#V!Ûþ^#VÕ#^#Vá{•_zœ³Æÿ>W_á{¥_ÂÕ>Íò!9^#V!ïÿ +V+^Õ Â$Í*1ÍÖ0!9^#V!ïÿÑs#r#ÂCÃgÕ>Íò!9^#V!ûþåÍ´2ÃsÕ>Íòà0!ÍT0! 9^#VÕ áÍ=ʘú˜²0ÕÕ*Ø? ^#VÕÍJ3! 9^#VÕÕ*Ø? ^#VÕÍ3à0!úÿÍT0!9^#VÕ!9å##å##å>ÿÍË ÕÕ*Ø? ^#VÕÍJ3!9^#VÕdKBáÍK<Ü‚-å¯Íy/ÕÕ*Ø? ^#VÕÍJ3!9^#VÕ¯Íy/ÕÕ*Ø? ^#VÕÍJ3!9^#VÕ¯Íyà0!þÿÍT0! 9^#V!ë!9s#r+^#Vë^Õá{•Ö>W_Õ!9^#Vë^#VÕá{•_zœ³Æÿ>W_á{¥_Âb !9^#V!öÿ^#VÕá{•_zœ³Ö>W_‘!9^#Vë^#V! ^Õ!9^#V!üÿ^#VÕá{•_zœ³Ö>W_á{¥_ÂmÍ(ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍû2Õ!9^#V!üÿÑs#r*Ø? ^#VÕÍá3ÃŽ*Ø? ^#VÕÍ3!9^#V!üÿ^#V+s#rêÍ— | ÕÕ*Ø? ^#VÕÍx3!9^#VÕÕÕ*Ø? ^#VÕÍx3.ÕÕ*Ø? ^#VÕÍJ3!9^#V! åÕÕ*Ø? ^#VÕÍx3Õ!9^#V! ^#Vë +V+^Õ ÂÍ1ÂE!9^#Vë^#VÕÕ*Ø? ^#VÕÍ3Õ!9^#V! ^#Vë +V+^Õ Â]Í1¡!9^#Vë^#VÕáͺ0åKBáÍÏ0ÕÕ*Ø? ^#VÕÍ3Õ!9^#V! ^#Vë +V+^Õ Â¹Í1Â" !9^#Vë ^#VÕáÍ=úç Íõunknown ÕÕ*Ø? ^#VÕÍx3Ã" !9^#Vë ^#VÕ>ÍÒ!9^#V!úÿ^#V+s#rûÿ ^#VÕ ^#VKBáÍK<Ü‚-ëÕ!9^#V!öÿÑs#rÃÅ !9^#Vë^Õÿá{•Ö>W_• !9^#V!ôÿ^#V+s#rÃÅ !9^#Vë^Õá{•Æÿ>W_ÂÅ !9^#V!øÿ^#V+s#rà0!ÍT0! 9^#VÕá{•_zœ³Æÿ>W_Â!! 9^#Vë##^#VÕ>ÍË ! 9^#VÕ>Íi! 9^#Vë^#VÕ>ÍË à0!°ÿÍT0!9åͶ/!9åÕÕ*Ø? ^#VÕÍx3ÍV!Library ÕÕ*Ø? ^#VÕÍx3!P9^#V!ßþåÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3ÕÕ(Õ! 9s#rÑáÍ=ú²!Â"!@9Ñs#r!9å!@9^#Váå ás!>9^#VÕÕ!9^#VáÍ=Êñ!úñ!Â"Ñ!>9s#rþ!33!>9s#r!9å!@9^#VáåÍ$"NameáÑ~#Â("!9å!@9^#VÕ áͺ0+ÑåÍN"TypáÑ~#ÂR"!>9^#VÕ áͺ0ë!>9s#rÕ!\9^#Vë +V+^Õ Â‚"Í1ÂÏ"!9å!@9^#Váåͬ"SectorsáÑ~#°"!>9^#VÕáͺ0ë!>9s#rÕ!\9^#Vë +V+^Õ Âà"Í1Â,#!9å!@9^#VáåÍ #KbytesáÑ~# #!>9^#VÕáͺ0ë!>9s#rÕ!\9^#Vë +V+^Õ Â=#Í1‹#!9å!@9^#VáåÍh#ModifiedáÑ~#Âl#!>9^#VÕ áͺ0ë!>9s#rPÕáͺ0å!@9^#VKBáÍÏ0!N9s#r!>9^#VÕáÍÁ0ë!>9s#r!9å!@9^#VÕ(Õ*Ø? ^#VÕÍx3ÕÕ!R9^#VÕ! 9s#rÑáÍ=ú$Âq$!B9Ñs#r ÕÕ*Ø? ^#VÕÍJ3!9å!@9^#VÕ(Õ*Ø? ^#VÕÍx3!@9^#VÕÕ!9^#VáÍ=Êa$úa$Âq$Ñ!@9s#rÃ$33*Ø? ^#VÕÍ3ÕÕ!B9^#VÕ! 9s#rÑáÍ=ú¡$Âñ$!D9Ñs#r-ÕÕ*Ø? ^#VÕÍJ3!B9^#VÕÕ!9^#VáÍ=Êá$úá$Âñ$Ñ!B9s#rí$33ÕÕ!R9^#VÕ! 9s#rÑáÍ=ú%ÂÕ%!B9Ñs#r ÕÕ*Ø? ^#VÕÍJ3ÕÕ!B9^#VÕ!9s#rÑáÍ=úU%Â¥%!D9Ñs#r-ÕÕ*Ø? ^#VÕÍJ3!B9^#VÕÕ!9^#VáÍ=Ê•%ú•%Â¥%Ñ!B9s#rÃa%33!@9^#VÕÕ!9^#VáÍ=ÊÅ%úÅ%ÂÕ%Ñ!@9s#rÃ%33!J9s#r+++s#r!D9s#r#s#r!L9s#rÕ!\9^#Vë +V+^Õ Â&Í1€&!P9^#V!Ùþ^#VÕÕ! 9å>ÿÍ!Z9^#VÕ+^#Vë +V+^Õ ÂU&ÕëÑÍ41ÍÖ0!9^#VëÑs#r#Âv&ÑÕ!\9^#Vë +V+^Õ Â‘&Í1Âú&!P9^#V!Ùþ^#VÕÕ! 9å>ÿÍ!Z9^#VÕ+^#Vë +V+^Õ ÂÐ&ÕëÑÍ41ÍÖ0!9^#VëÑs#r#Âð&ÑÕ!\9^#Vë +V+^Õ Â 'Í1Âp'!P9^#V!Ùþ^#VÕÕ! 9å>ÿÍ!Z9^#VÕ+^#Vë +V+^Õ ÂJ'Í*1ÍÖ0!9^#VëÑs#r#Âf'Ñ!9^#VÕ¯ÍË *Ø? ^#VÕÍ3!J9^#VÕÕ*Ø? ^#VÕÍ3ͱ' entries,  ÕÕ*Ø? ^#VÕÍx3!H9^#VÕÕ*Ø? ^#VÕÍ3Íì' inactive,  ÕÕ*Ø? ^#VÕÍx3!D9^#VÕÕ*Ø? ^#VÕÍ3Í)( free entries ÕÕ*Ø? ^#VÕÍx3*Ø? ^#VÕÍ3*Ø? ^#VÕÍ3à0!ØþÍT0Õ@ÕÀÕÕÍ( Ñ!+V+^Õ†(!39åÍ®:!9s#rÍ*1!'9Ñs#r#­(!9åáå ás!29^ÂT)!#9åÍ%4á{•_zœ³Æÿ>W_Â)!9å;; ÕåÕÍ0ÑÕÕ*Ø? ^#VÕÍx3Ã0)?ÕÕ*Ø? ^#VÕÍJ3>ÕÕ*Ø? ^#VÕÍJ3*Ø? ^#VÕÍû2!49^#VÕ>ÿÍk!49^#VÕÍÉ3!69^#VÕÍÚ2áÑ{µ_!'9s^{î_‡+!49^#VÕÍ34á^Õ-á{•Ö>W_ÂÁ)!9å!69^#VÕ¯ÍwÃÚ)ÕëÑÍ41!'9Ñs#r#ÂÑ)!49^#VÕ>ÿÍk!49^#VÕÍ34á^Õ*Ø?6ÿ  +V+^Õ Â*Í1Â=*!9 +V+^Õ Â*Í*1Íó0!'9Ñs#r#Â4*Õ!9 +V+^Õ ÂJ*Í1³*Õ¯Íò!9 +V+^Õ Âk*Í*1ÍÖ0!'9Ñs#r#ƒ*!29^¨**Ø? ^#VÕÍá3ð*!'9sÇ+Õ!9 +V+^Õ ÂÀ*Í1Â×*¯Í9Ãü*!#9åÍ%4á{•_zœ³Ö>W_Âü*Õ¯Íò!#9åÍ%4á{•_zœ³Ö>W_!'9s!29^Â3+*Ø? ^#VÕÍá3!'9^Â~+!29^ÂQ+!'9s!9 +V+^Õ ÂZ+Í*1Íó0!'9Ñs#r#Âr+Ç+!9å¯Í%!!'9^ÂÇ(!#9åÍ´2à0Í9-!6ÿÍT0ÕÕ†Õ ÕÍÁ+CMD Ñ!+V+^ÕÂÈ+*Ø?Fÿ åÍ®: Õ~ëÑÍ41,Í*1.Í*1Íó0;Õ>ëÑÍ41Íó0[Í*1Íó0]Í*1Íó0_Í*1Íó0ÍÖ0*Ø?6ÿ Ñs#r#Â.,;;åÕÍ)2ñÒ–,*Ø?Fÿ å>ÿÍk*Ø?Fÿ åÍÉ3Ñ{î_Âz,*Ø?Fÿ åÕ>ÿÍ^(Ó,>ÿÍâ*Ø? ^#VÕÕ>ÿÍ^(ï,>ÿÍâ*Ø? ^#VÕÕ>ÿÍ^(*Ø?Fÿ åÍ´2Í,/ûváã|µ>Ê‚-"Ü?ÉÕë*Þ?ëÍ'=Ñ"Ü?Ð"Þ?É!ãåëáãëÍ->Ú‚-ÍÌ,áãs#rÉáãëÍ-Ò-*Ü?ÍÌ,áãs#rÉ*Ü?å?Ò'-å€ë!9Í'=áÑ?É"Ú?"Ü?"Þ?É>Â-¯2ü?Ñ*.ù"Ö?òÿ "Ø?åå! @Í*-!"ú?!åÕ>2è?Íh6Í¥1ͯ4>ÿÍ‚-¯ÉÍ‚-!.Íý=Ã<È=ÅåõÕ!/_^#VëÍú=*à?|µÊ¯-!".Íý=*à?>Íw>ÑñõÕÍÓ-Í7>ÑñáÁþÚÊ-å!è?5á7À!.Íý=Ã,/þ ØþÈþÈþÈ!-.Íý=Õ·Êõ-þÒõ-Æ@Í>Í .! Ñëþ!Ø>.Í>þ!ØÍ> .Éaborting in line # FILE=???o'flownot imp.stk o'flowheap o'flowdiv 0can't loadbad ptrcase indexreal u'flowreal o'flowsqrt -velog -ve/0eofbad ch/valuemod -vefile R/Orangefile sys.string fld/sz > 255file not open4.8.?.H.S._.e.p.x.ƒ.�.›.¤.®.².¿.Ç.Ð.Ö.à.ô. Íü4 Íü4:û?·òJ/>ÍûÃ$$$ SUBáÑãÕ}ëF#NÍ“?áp#qÉáÑãëæþÒ‚/·Ê‚/Æ@w#6:#þ Êš/w# Â…/6.#ã/6.# ž/w# Â¥/6 #®/Éáãë>Í$0/Íé/>Í$Íé/ >Í$Íé/ :>Í$Íé/>Í$0 o&þ Òô/yͤ>xÉÑáÁaãÕÉáÁÑã}áãëÍ0ãåÉÍ@0ú/0Ê-0¾Ê-0# Â0Â0ëɾÊ-0+ Â/0Â/0Ã*0øWx±zÈ >·x/Gy/OzÉÁë!å!å*Ö?å·Êy0òo0*Ø?Ãy0Õ^#Vë=Âp0Ñå!9"Ö?å€*Ü?ëá̓?ëë>Ò‚-ùÅ!"à?É*Ö?ùáá"Ö?á!á!"à?áë9ùëéÍ =ÐÂ-Íû<ÐÂ-ÍY<ÐÂ-Í’<ÐÂ-!9ë/¦w#Âá0Ñ!9ùëé!9ë¶w#Âþ0Ñ!9ùëé!9ë^Íg1¦Á!9ùÅÀÉáÍ€1åÍg1wÉ}áÍ€1åCOx‘Ê/1ÐÍg1=/wxæxGyæx�<=Ê^1#6ÿÃT1YÍg1‡=¦wÉ{æÆo&9{æ_¯7Âz1ÉåÕÅõ!9ë!ðÿù w#Â�1>p#=š1ñÁÑáÉ!"æ?Í÷1 >Í»1 > õÕÍê1ë!2Í]?Ñ.> Íê1&ñÍê1>*Íê1,>†*Ø?Õ^#Vë wÑÉ*Ø? DMÍ2¶Í->Ú‚-"Ü?{zÉCON: áãëáãëåÍ·2>ƒ/¦öwá|µÊN2ÍU:¯! w!$wÍÃ6Ò^2Í;Á!ãÅÉÁ!ãÅç2áãëáãëåÍ·2>Æ2áãëáãëåÍ·2>ƒ/¦öwá|µÊ›2ÍU:¯! w!$wÍÃ6Ò§2Í;Ãu4!&~æþÂW4Éáãë!&~æþ+̘5Í5Úu4!&~æýwæþÀ/¦wÉáãë!&~æþÌþ5Í ;Ê¢4>¦!Êù2#ãéáãëÍ;¢4Ú�4ÉáãëÍ;¢4Ú�4Ø5áãëÍ;š4Ú…4áÁãëz·õò13 ̓?Í·>Gy�ëÚA3åoÍÐ5áñ>-üÚ5ë5áãëÍ;š4Ú…4áã-ÍÐ5áã}ÃÚ5áÑÁñå!®3Úp3!³3ãÅÃ{3áÑÁåÍ;š4Ú…4áã|·Â¤3µÊ«3åÅÍ{? ÁEáÚŸ3M¯Gáãÿ5>áãÂ-áãÉTRUE FALSEáãëÍþ5!.~áãwÃ4áãëÍþ5Í ;Ê¢4~æ!Êß3#ãéáãëÍþ5Í ;Ê¢4!&~æÂz4~æ 4Í6Ãí3áãëÍ ;Ê¢4!&~æ€Ì6!&>€/¦wæÈÃz4áãëÍ ;!ÄÖ7ãéáãë!&~æþ!.ÊJ4!0ãåÀÍþ5Úz4ÉáãëÍ ;Ê¢4~æÂz4þÊ;Íü7Ú¼;!a8Ãä7>Â-Í;ö@w> Â-áãáÃŒ4áã!&~ö@w>Â-áãáá4áã!&~ö@w>Â-Í»4> ÍÀ4É< !€Íñ4Ø#~Í<;Ø7øå*Ø?^#VÍ5!$¯wHá~ÍU:ÍÃ6>Úv-ÉF7ø#~¹Âò4É*Ø?^#V!&~æÈæþÚ5!‘8Íä7Ã"5~æ Ä,5!&>/¦wÉ!&~æþÊE5ÍY5>Íû<·À7É!&~æ€Ä<>Íû<·À7É!/~·øÅO!&~æÊ5!0å 6# òt5áÃŽ5yõÍ8<6ñ<ò€5Í7<Í<Á>Ú‚-É> ÍÚ5> ÍÚ5!&~öwÉõåÍÊ>õ|µÄ«5ñáÆ0ÍÚ5ñÉåhÍÐ5á È~#ÍÚ5ÃÆ5> -øÍÚ5ÃÒ5ÅOå!&>/¦wæþÒô5Í‘;Ãú5!q8Íä7áyÁÉ!&~æ�À!&~æ7ÀÍN6þ Ê6õ!&>/¦ö€wñ!.wþÂ;6!&~öw>ÃL6þ ÂL66 !&~öw> ·ÉæþåÒ]6Ío;Ãc6!a8Íä7áÐ>É!"î?"ð?!€>[N È#¾Âx6 È#~þ Ê6ÍÅ?Øëæo& ÈÍÅ?Úª6ÍÞ>æ…o|ÎgÃ’6þ]ʹ6þ À Èê6"î?}æ2ð?É!&~æÀÍ�7!/6€Íü7Òê6Í7Â÷6!&>@¶w7Éö!�8Íä7!&~öwÉÍ?7!&> /¦w! ~þ Â7#6 #6 ! 6! 6!&~æÊ!;Í|7>Íû<·À7É!~þ ÀÕÅ !p7Í]?ÁÑ!Õë*æ?#"æ?ÍÊ>ë†w+ë|µÂa7ÑÉTEMP0000$$$>Ãû!$~·ÈG¯w! 6 #6 #6 !€Nå#ÅG Áwá # È~þ(Â¥7ÊÁ7# È~þ)Èþ,Ê®7ò7# È~þ ÊÁ7þ,Èþ)È È ÃU:æþÚ;:!¡8Ãä7æþÒø8‡…o|Îg~#foéþÒ8·7ÀÅÕå! ~ë#åþ ÂB8G8áå úB8¾Â8#¾Â8#¾Â8#~þ:ÊC8þ ÊC87yááÑÁÉCMDAUXLSTPUNRDRKBDCONNULø8Ì9D>ü8ø8ø8::û8K>K>û8û8û8û8û8û8û8û8û8û8š9û8û8û8û8û8û8û8û8;:€9p9±8;:Ð8¼8;:!&~æ!È!&~æ!ÀÍ!æÈ.É!&~æ!ÈÍæ>Âç8>µoÍæ>Âõ8>µoÉ>7ÉÅåÍ9áÁÉ!&~æÊS9!,~!0ÕWÂ29Íi9þÊF9þ Â"9ÃF9Íi9w#þÊC9þ Â9+6{Ñ!(w!/6!/~4!0…o|Îg~·À> ÉÍ¢>Ð>ÉÍ;:}æÀÍ æÀ.ÉÍ;:}æÀå!&~áæÈÍ æÀ.É:€< ÉÍØõþ Ê:ñÉñ>ÉÅå!&~æ!/~Â):4!0…o|Îg~áÁ·À> É!&~æ@!ÿÿÀ!&~æ!È> oÉ|µÈÕů#~+þ:Âr:~##ÍÌ?Ö@þÒr:͉:~þ.Â:#͉:¯ÁÑÉ~Í<;Úš:ÍÌ?#‰:> Â�:+#~Í<;Ò¥:ÉáãëBK>áãõ}|ñ=¶:> ¯! wáãDM!&q#páãDM!,q#páãDM!*q#páãDM!$q#pÉ!&~öwÉ!&~æÉ!&~æþÈ/æ7É>Íû<·À·Â1;>>Íû<·À7Éæþ!ØÍ³?ÐåÅG!U;Íf;xÁá7È?É.,*:@[]<>()=;_?ÿ~#¸È<òf;É!/~4·ò„;6!0Í <7À!0…o|Îg~·É!&~ö w!/~æw!0…o|Îgq!/4yð!0Í/¦wÍ7<à <>ëÍûë>Íû·ÉÍ7<>ëÍûë>Íûõå!&> ¶wáñ·È7ɯ!*ÅN#F!0 Á…oÐ$ÉÍ’<Ø|°ð  ð>7ÉÅz·úp7É£<È>7É|·ò›<x±>7ÈÅÕåz²òÈ<Íq?x·ú¿<Íî<Úà<ë̓?ëÃÒ<Í{?Íç<ô<°ú×<Íç<Úà<ÁÁÁ·ÉÍ{?Íî<ÒÒ<áÑÁ>7ÉÍç>ØzÉÍç>ØÍƒ?³Èz?É̓? =|·ø>7É|ª7?øz¬ð>7Éz¬ò"=¬öÉÍ'=·Éz¼Â/={•È>Ð/É–ÂB=# x±Â4=É>ÒH=/·ÉÅÕGåÍ*#Íò=Íò=áxõåGÍ >þ Êê=þÂ}=!ÍK>ÍK>Í7>áñÃ[=þ—=\ÍK>ÍK>Ê`=+Ã`=þµ=Ê`=ÍK> ÍK>ÍK>+Ã�=þ Êà=þÂÎ=Â`= ÍK>>Ãà=þÂÛ=Â`=Ãþ Ú`=w#Â`=Í7>6záÑÑÁÉ#~O·ÄK>ÉÍ7>õ~#·Ê >Í>Ãþ=ñÉÍD>Øþ Ê7>ÅO<æþ!Ú->:|G:{æ=¸Ü7>ÍK>ÁØþ 7?Éõ> Í>> Í>ñÉÍØæÉå!|ÍV>áà y<æþ Âh>+¶#ð~·È5Éþ!Òs>ÖÊu>É~ÑÉõåÍÊ>õ|µÄ>ñáÆ0Íš>̘>ñÉ>.Å ÉÅÉõåÍÊ>õ|µÄ¤>ñáÆ0ñÉÅÕëÍÊ>|µÂ¼>xëÑÁÉÅ ð¯)¹Ú×>‘#úÏ>·ÁÉÕT]))ÑÉ·õ{‘z˜Òý>ëÅÍ?_Í?_ÁñÉñ7ÉÍ{?zS È)Ú!?‡Ò?#å Ú?áÃ?33<Ã?�Ò&?# Ã?õ{ÕÍH?ãõ|ÍH?Wñ„_Ò>?}á„gÒF?ñÉbj‡ÒS? ŠÈ)�ÚQ?ÃS?x±ÈåÕÅ~# x±Âc?ÁÑáÉÍ„?Í‹?µÀÉ y/Ox/GÉ{/_z/WÉ+}/o|/gÉÕ©Wæª_Wæ¨Ozæà«Gzæð©OÑÉÍÅ?ÐþAØþ[?ÐþaØþ{?Éþ:?Øþ0Éþa?Ðþ{ÐÆàÉÐ�/¦wÍ7<à <>ëÍûë>Íû·ÉÍ7<>ëÍûë>Íûõå!&> ¶wáñ·È7ɯ!*ÅN#F!0 Á…oÐ$ÉÍ’<Ø|°ð  ð>7ÉÅz·úp7É£<È>7É|·ò›<x±>7ÈÅÕåz²òÈ<Íq?x·ú¿<Íî<Úà<ë̓?ëÃÒ<Í{?Íç<ô<°ú×<Íç<Úà<ÁÁÁ·ÉÍ{?Íî<ÒÒ<áÑÁ>7ÉÍç>ØzÉÍç>ØÍƒ?³Èz?É̓?î€vÿHÈLDIR.PASißÿ šÿ–ÿ‹ÿ�ÿõÿ‘ÿòÿ�ÿoÿŒÿžÿ !"#$%&'(›ÿÖÿ×ÿ“ÿÄÿÕÿºÿœÿØÿ�ÿ±ÿ’ÿ™ÿÅÿ)*+,-./012345678—ÿ¶ÿÓÿùÿÂÿ­ÿŠÿ˜ÿûÿˆÿ»ÿ÷ÿ�ÿ†ÿÑÿ¹ÿ«ÿ°ÿÎÿ9:;<=>?@ABCDEÒÿ½ÿ·ÿ¸ÿ¾ÿÏÿ¤ÿ¢ÿ³ÿFGHIJKLMNOPQRSTUVÍÿ¼ÿ¬ÿ‰ÿ¯ÿ”ÿÌÿ‡ÿÝÿÐÿÇÿ…ÿøÿÁÿúÿÔÿÃÿ²ÿªÿÛÿ©ÿóÿðÿ¦ÿ¡ÿÆÿÉÿËÿÊÿ•ÿöÿWXYñÿÈÿZ[\]„ÿ‚ÿ^_`abc´ÿ¨ÿïÿîÿäÿôÿêÿdefghéÿåÿÀÿ§ÿ ÿŽÿƒÿ�ÿbÿÿþ�¦ÇËéÕ{¤Û¤l£X×31‚œ‰z&ą̂$Ç”ê4”Ô’¨­œÛÐŽ°d1éAÐ%µ¤…‰r‡<6*Éq¾ÅýÝùû�–R“áÇ‹k\+:i#êÇ»Ü:��Jr¸ÅEh#Ò#Ü—Zïpýã×éo¸ÿ–ÇF%9†Z�Ž(‚�°T§¡$ˆAZž³)6[\»Å£òب$G#JÏ”úÇ<Âf& k²A–,£àË�>�ÇF%9üÖ jG:B-­€��b@m(¬É�àgåÁ#��JrˆáâÑ“ëëëð@Pí1 " “†�`íggÈc£’i1 ¤¼±ÁnÑIÛ�ÎÊb@ÐAðC‚{“ÇF%9ÚPX¼�6Ì �´m~‡¡dC)ø!aæ ì‘ÇF%9‚éAÐ%µ¤ÅÁƒ=j+²g©ÑI‹€(òب$G+#î˜"�v ÖBÊì[*…´ÛÜ"��Jr„0² ‚KDìÃo½ ûÇðl9 �` ylT’ƒ5¨ë¨;¸gyl”QIŽÓî;ÎðâÇó{Ïï=Á�¼@'-"¶T i·PˆÈb<òب$‡{µIƒ~ Z¡=§B"•e,õä�´Èc£’îUóáîJÙÖAð†SÛ𯓦‚¼€[ä±QI÷ª“[*…´[< )G,¶#tÒâýƒÕñÜ›<6*Éá^•²­ƒà §,¶H¼l ›¡¶rîãÊM ��Jrœv/p†¿žŸ®ŸŸ~à �¬|ÈE˜Þô¥Ô^-ÐI‹<6*Éá^QÊ-ë XÏÑqJ°±¥R°Ô#,¤áylT’ýšyŠ 5¦÷½‡ßzA­ßj¢èlVCvp‹<6*Éá^El©Òná¥HjKYÎ<–Áã!Ù-Ü›<6*Éá^ÕRZH�ÚÒ™—VP„ˆ-•BZ&ïàÆylT’ã´ûgxñóùéÞóë8ÔZù�"XòÂr)Xj©áylT’ý*Áz°FÇ)A‡–<Î0«!$üÖ jwòب$Çi÷gxñäùéÞó''œá*Må’"tÒââÑ“ëëkÌ )òØ(¸ÿHrDT“Ž<¤FÊú1ë9j²�´-E;¸u¾>*Œ‚[l¶‚àÖ”ƒ`3£àÖ]-,Ü› ®w» k[Fmx𷨰î8%¸7ì‡wŽ{\M§W_o6¬»ZØ[÷ØleFÁ-ÈZ¸?$›•¶AK‘òf„2hѱŽFØ„HÖ‚¥AE)oâÌ(¸E§CKp¯&xtuÿ_Š®¦Ó«¯7§Ý®Ó­ç—t‹ãå ØÌ(£à[ÒÂnáL‹ûÇéÊ(¸±AÌ<ܸÇf+(3 n¬CKpëWÓéÕ×›Ón÷âÇ=6[A™Qpcz*àþô¸šN¯¾Þœv»'·8î±Ù ÊŒ‚§² ‚¥7öü’FFÁ�K[> éÈ(¸q+#î˜"¸EÖ‚æd3£àƾ–à^õ¸šN¯¾Þœv»Ó½[÷ØleFÁ�‹f•!ɱ%-ìyl”Qp‹ˆm-,Üx‚oÛr0Ó�3£àÛr0Ó�áL‹ûÇéÊ(¸±¦§bdÜ8¥NŒŒ‚[žÜ«ÛZØÌ(¸qÄîO�ˆ-ia·™Qpã¢YeHrDlËÁL?FeÜÂK+³Žà$3í¥�°ÙêÐÒ›íÜÊYgF|ºš·(ÛîOAOE÷%ÉQʶ :BÊš�ÇF·HrüïYðŒRj/‚ylÜ¢Óå X÷¦Çƒâ€ãå Ø Hr„4•KŠÀ§ZòÈc£Œ’§3÷å„<6ʨ$ÿÈ•Ìõ&}ìw¬Ë*��Jò�\ùÇ\ ¹c]VylT’äÊ?®md‹ë²Êc£’ü#W‘2 ‚v¬Ë*��Jò�\¥2DÛë²Êc£’ü#W^Z±Ý±.«<6 x4=Þ/V¦<ϵԙQFÁ-΋Ëaƒ$‡ç¹–ylÜbiYPRÝ­†S$e�Àºž‰äLÔ3g¨âÌ(¸Åp-Åôþ£÷8\ ––%ÉÆFÁ-Š»––%Én6>ÎŒ‚[,- JuR!)cœ¾¿x2Âéû‹Ølqw¾Ã>¤¥Ôd«83 n±´,(ÕI…â)•3AX²àY±Å?nd-Xj‹›”7�-ÝþóYgFÁ-––¥:©°�%üãŸð¹ôè˜Òbڰņ`©¦ (BÐnn«83 n±´,(ÕIÒe*=AÖ‚¥):¦4ò;à™¬KíŸ�=Ä€P‚ ¥ [Å™Qp‹¥eA©N*<;{†N¦©\R„ÍR¤E+-Av}gFÁ-––¥:©àÞh^Z�Í:´§ffÚK+(J"êÂ,qgFÁ-––¥:©àÞÌxi6[<ÛúÜŸ@¡•wLQgFÁ-––¥:©àÞxžJ!­‡ìà…´aNp‹Çs*7[A‰ç—WqfÜbiYPª“ªøŸWïÝ=pþ:�Øâ¬E)Û6訊3£àKË‚R�T÷eÛy´a‹ ¡NCI¤†JÙ¶AGHY¤=¥r&(ªâÌ(¸ÅÒ² T'X ²¡ü�Ò-¤Æ³×ÏP[ÙÖb‡g�-½~?�K� !kÒUœ·XZ”ê¤BÊìv„ #œÉZ°ÔKNSDìë4lÁÂ#bK¥�v[Å™Qp‹áZŠéýGïq¸(œ—ÃÆ(¸ñÒ² T'ÕžS‚¥ˆ-•‚¥ÆÌ³žãÙ»g#<{ý ìNÃ&¥*ÎŒ‚/- JuR$Rö¥lÛ £]º±�b@HÙ ²#�dû*ÎŒ‚/- JuRç¯Óˆ-JÙ¶AGx�zQÅŠfeÜ¢¸{P`iYPª“ꫜ¡�y� !•ó9E�ZHˆ!²ü�žÏ6 n\Ü=(p^\£’ü£?Ëctº½9aœâï[ôTwÃóéÕôk•�ÑOð"CѬ2$ùGÿ6��‚ï�S0ú ‡#:Ýz~IXÑéö†oÑOP¡ÊŒ‚ûÇ\ ™T¨F(»83êÿ„[ ÷ðeÐ�´Iµ«Fèt{sº¡Ó­ç—c‚k.ŠçÅå°1 n�äÐÏvÏFè¤- »»ó)è© íYjä±Qÿø'ܘÑOàË ;i“ Õ�noN·#tºõü’âÌ(¸õpÆ;tºõü’p†_8\�QIþÑŸå1€N·7ŒýqŠ_·è'¨vwçSTŠf•7îAOÙ Ÿ¤¼é8¥:ÝÆ8\ ΋ËacT’ôoó§¤CKIÊ›ŽS¡ÓmŒ$‡�ð"è(؈_¤†ßzA-:iÛ �Ç™QpëÒ–Ëý×™Qpëá© QÄ6IyÓqJ#X)ÅÛÒ–#”¶\F1Eƒóârا†{$ÛÒ–x÷×1®š’ˆmiK¼{�Ò–Ë(Æá¢hày®CšlBTÚ2ÎŒ‚S²,µG?�¬Kíq†›TÖ¤o3ÍÊ(¸uq÷ Àyq9lŒ‚Sžç:¤‰–"åMœ§ÊTzJRÞtœRœ!ÉQ[zHZ b_§a‹Àþ8Åß·è'¨P)¤õU†A: Ÿ`�Îx‹Šf•7îñx³ä1l kÁR{.ŠçÅå°1 n=ˆné|€ýqŠ·è'¨þe³ä« ƒt>@?Á �ðg(šUfÜx¸GaØ@Ö‚¥ö8\ ΋ËacÜzÝ Òùûã/nÑOP½—wLQ•a�Îè'¤óÞâ{†¢YeF%ùGÿ6��‚×dSÖ„~‚Ä—V{~Ix‹{1VÃOð³²Lé|gFÁ�é|€~‚A:à ÷2$9¼VP„ pBÐ:Ö!Å& ú1BšÊ2Š�ÇFÁ�—–%ƒ=é|gFÁ�÷Ç)ý÷p8¢&›²&¬ŽXZ”T¨ÐãɃ=é|gFÁ�—–¥:3 n¼?Nñý'ޤóVG,- Jª³*ÎŒ‚ï�S0ú îápDM6eMXq^\£àÖKË‚’ z<‰3£àÖûã¿ÑOpÂáˆA:`uÄÒ² ¤:«â E³ÊŒ‚'9:¶^@ÎD=`A-"Ib@XZ”jä±QpcÔúz&ÐOp��µÞÒo*Eè'¸ÎÀ‚ZßY"ô\gFÁ�YPë¥NYú ®3¤¬É×3�~‚{™Qpãás+g5† d-Xj�ÃEÑ༸6FÁ­½´"b›X)Å›íÜÊY=BľNÃÖJ)âÌ(¸µ¬KíÑO kÁR{œáfnå¬A‡–FÐÒK+n3Í*3 n<ÜC‡–0l kÁR{.ŠçÅå°1 ní¥ÛÄJ)FØluhi„ˆ}�†­•RÄ™QpkY –Ú£Ÿ@Ö‚¥ö8Ã�-� ¥—VÜf(šUfÜx¸‡–^Z�aY –ÚãpQ48/.‡�Qpk/­ˆØ&VJ1ÂL{iE#Dìë4l­”"ÎŒ‚[ËZ°Ôý²,µÇn´ôÒŠÛ E³ÊŒ‚û�\Fl“ˆ}�†­•RÄ––¥:3 n¼´,(Õ j}=èq¡ia™üÕÈ(¸¿XPë-ý¦RP„§*°¥à‡4B52 î/ÔúΡÇi„ �%ia™|gFÁ�—–¥:3 n\4« IŽˆ}�†-òØ(£àIŽ{gîË=ä±QFÁ-΋Ëaƒ$G$KÙ¶AGylÜÂJ)ÐOÐ ï2ÈZ°Ôý7©¬Ißfèt{sºE?A…*3 n1-W£àÆÃ=X ²¡ü�p¸(œ—ÃÆ(¸õp/‚˜ù$åMÇ)Åx÷×8\�QpjiYPÒé=jKQâË ;i“ Õ�nGètëù%Åqlܺ¸{P`iYPRý�*ÎŒ‚[×V¶µHª×Uœ¡hV™Qpcÿ˜kK[*K�”]œ7¦§,ÐO@2ÕIÙÅ8NA²KÊ.ÎŒ‚÷hŽÐS8\ ΋ËacÜz¸GÙ}ÃÕY…ÃEÑ ã4Md-Xj?Â?:+Û¢ìb£àÖÅ݃²,µG?ÁM*kÒ#h饷™Qpkÿ˜kK[*K�”]œ·îQvß0lÐér¬Çá¢h kÁR{ôÈZ°Ôoq“ÊšômfÜz¸Ç&D6�µ`©=Eƒóârا<ÏuH“Mˆd-Xê83 NÉZ°Ôý²,µÇn6!ºÍŒ‚SÃ=X ²¡ü�p¸(X Qª�‚SÅ݃ô”ú „�Q†¢Y·.î8/.‡�Qpj¸G’Êš4† d-XjãpQ4�5i£àTq÷ Àp/‚˜ù$åMÇ)Řà‡‹¢�ç¹i¢‰¢”7qfœ¢§,ÐO�xÄÌ')o:N)Æ×qfœîÁZ� ¥à‡„ÃEÑÀRˆR�§†{ÐS8\ ΋ËacÜçá¬ÙP ~H8\ è) ôt!õ”!É!uºô,M‘²&ä±QpŸe-Xj�~Y –Úã-nRY“¾ÍP4+£àTq÷ @ľNÃ6ùGÊ›ŽSBÄ–J!íöŸ�µ`©}œ¡hV™Qpë¢YeFÁ->4‡áè)‹Ì(¸EѬ2$9"Yʶ :òÈc£Œ’§3÷å„<6Ê(༸6Hr¤[ä±Q@§ËA°ý7~V–I…*Þíªÿ[ÝÂ�“Á—Ì(eÄzŽˆjÒQÐylÜø ¸©&ÕÕ¨¡ú_ÕÕ®¡U#TY5Bõ®¡z]�PÝT#T·Õmf0܃ž²>)Û(Æá¢hp^\£àþ1×–"¶T –:)Û(ÎŒ‚[ ÷hŽ�LuR¶QŒÃEÑ ’¥lÛ #Ÿ”m4BRO±Qp‹âîA�óârØ7ö<×Rgˆd)Û6èÈ'¬ë™AØÅŠf•·(š•Q@q÷ Àyq9lŒ‚[xžk©3D²”mtäÖõLŒ ìŒâ E³ÊŒŠfµC’#�Ø"��úïŽâÿ÷ÿ Œ~?+Ë„ã E³2 Nw ÌI$egFÁ­?4‡ášãIÙ}ðA§ËA°>6 n\Ü=(p^\£’ü£?Ëctº½9aœâï[ôTwÃóéÕôk•�ÑOð"CѬ2$ùGÿ6��‚ï�S0ú œ—ÃÆ(¸õp/‚˜ù$åMÇ)Åx÷×8\�QpjiYPÒé=jKQâË ;i“ Õ�nGètëù%Åqlܺ¸{P`iYPRý�*ÎŒ‚[×V¶µHª×Uœ¡hV™Qpcÿ˜kK[*K�”]œ7¦§,ÐO@2ÕIÙÅ8NA²KÊ.ÎŒ‚÷hŽÐS8\ ΋ËacÜz¸GÙ}ÃÕY…ÃEÑ ã4Md-Xj?Â?:+Û¢ìb£àÖÅ݃²,µG?ÁM*kÒ#h饷™Qpkÿ˜kK[*K�”]œ·îQvß0lÐér¬Çá¢h kÁR{ôÈZ°Ôoq“ÊšômfÜz¸Ç&D6�µ`©=Eƒóârا<ÏuH“Mˆd-Xê83 NÉZ°Ôý²,µÇn6!ºÍŒ‚SÃ=X ²¡ü�p¸(X Qª�‚SÅ݃ô”ú „�Q†¢Y·.î8/.‡�Qpj¸G’Êš4† d-XjãpQ4�5i£àTq÷ Àp/‚˜ù$åMÇ)Řà‡‹¢�ç¹i¢‰¢”7qfœ¢§,ÐO�xÄÌ')o:N)Æ×qfœîÁZ� ¥à‡„ÃEÑÀRˆR�§†{ÐS8\ ΋ËacÜçá¬ÙP ~H8\ è) ôt!õ”!É!uºô,M‘²&ä±QpŸe-Xj�~Y –Úã-nRY“¾ÍP4+£àTq÷ @ľNÃ6ùGÊ›ŽSBÄ–J!íöŸ�µ`©}œ¡hV™Qpë¢YeFÁ->4‡áè)‹Ì(¸EѬ2$9"Yʶ :òÈc£Œ’§3÷å„<6Ê( PROCEDURE drtodate(thedate : integer; VAR yr, mo, day : integer); (* 1 Jan 1978 corresponds to Digital Research date = 1 *) (* BUG - cannot handle negative values for dates > 2067 *) VAR i, y1 : integer; dayspermonth : ARRAY[1..12] OF 1..31; BEGIN (* drtodate *) FOR i := 1 TO 12 DO dayspermonth[i] := 31; dayspermonth[4] := 30; dayspermonth[6] := 30; dayspermonth[9] := 30; dayspermonth[11] := 30; IF thedate >= 731 THEN BEGIN (* avoid overflows *) yr := 1980; thedate := thedate - 731; END ELSE BEGIN thedate := thedate + 730; yr := 1976; END; (* 0..365=y0; 366..730=y1; 731..1095=y2; 1096..1460=y3 *) i := thedate DIV 1461; thedate := thedate MOD 1461; y1 := (thedate-1) DIV 365; yr := yr + y1 + 4*i; IF y1 = 0 THEN (* leap year *) dayspermonth[2] := 29 ELSE BEGIN thedate := thedate - 1; (* 366 -> 365 -> 1 Jan *) dayspermonth[2] := 28; END; day := thedate - 365*y1 + 1; mo := 1; WHILE day > dayspermonth[mo] DO BEGIN day := day - dayspermonth[mo]; mo := succ(mo); END; END; (* drtodate *) (* 1-----------------1 *) ¯sARRAY[1..12] OF 1..31; BEGIN (* drtodate *) FOR i := 1 TO 12 DO dayspermonth[i] := 31; dayspermonth[4] := 30; dayspermonth[6] := 30; dayspermonth[9] := 30; dayspermonth[11] := 30; IF thedate >= 731 THEN BEGIN (* avoid overflows *) yr := 1980; thedate := thedate - 731; END ELSE BEGIN thedate := thedate + 730; yr := 1976; END; (* 0..365=y0; 366..730=y1; 731..1095=y2; 1096..1460=y3 *) i := thedate DIV 1461; thedate := thedate MOD 1461; y1 := (thedate-1) DIV 365; yr := yr + y1 + 4*i; IF y1 = 0 THEN (* leap year *) dayspermonth[2] := 29 ELSE BEGIN thedate := thedate - 1; (* 366 -> 365 -> 1 Jan *) dayspermonth[2] := 28; END; day := thedate - 365*y1 + 1; mo := 1; WHILE da (* For library utilities - specialized sub area *) (* typical global declarations required, commented out here *) { CONST binrcdmax = 63; TYPE byte = char; binfptr = 0..binrcdmax; binfile = FILE OF ARRAY[binfptr] OF byte; direntry = RECORD status : byte; name : ARRAY[1..8] OF byte; ext : ARRAY[1..3] OF byte; location, size, crcval, modified : integer; spare : ARRAY[1..12] OF byte; END; dirptr = ^dirchunk; dirchunk = RECORD next, left, right : dirptr; dir : direntry; END; } FUNCTION loaddir(VAR l : binfile; VAR root : dirptr; VAR dircrc, crcwd : integer) : boolean; (* libfile l is open and rewound. *) (* Returns true if apparently a library *) CONST dirpcmax = 31; (* 0 based *) dirpcsize = 32; (* dirpcmax + 1 *) TYPE  dirpiece = ARRAY[0..dirpcmax] OF byte; VAR p : dirptr; dirsize, i : integer; (* 2---------------2 *) PROCEDURE savechunk(VAR r : dirptr); VAR ix : integer; (* 3---------------3 *) PROCEDURE insert(VAR dp : dirpiece); (* this operation preserves compatability *) (* across various 16 and 8 bit machines. *) BEGIN (* insert *) new(r); r^.next := NIL; WITH r^.dir DO BEGIN status := dp[0]; (*$s-*) name := dp[1 FOR 8]; ext := dp[9 FOR 3]; (*$s+*) location := mergebytes(ord(dp[13]), ord(dp[12])); size := mergebytes(ord(dp[15]), ord(dp[14])); crcval := mergebytes(ord(dp[17]), ord(dp[16])); modified := mergebytes(ord(dp[19]), ord(dp[18])); END; END; (* insert *) (* 3---------------3 *) BEGIN (* savechunk *) IF odd(i) THEN ix := 0 ELSE ix := 32; (* unpack direntry from l^ *) (*$s-*) insert(l^[ix FOR dirpcsize]); (*$s+*) IF NOT odd(i) THEN BEGIN (* need more from l *) FOR ix := 0 TO binrcdmax DO crc(l^[ix], crcwd); get(l); END; END; (* savechunk *) (* 2---------------2 *) BEGIN (* loaddir *) dirsize := mergebytes(ord(l^[15]), ord(l^[14])); dircrc := mergebytes(ord(l^[17]), ord(l^[16])); loaddir := false; (* default *) root := NIL; (*$s-*) IF (l^[1] <= ' ') AND (* reduced test for MSDOS compatiblity *) (*$s+*) (mergebytes(ord(l^[13]), ord(l^[12])) = 0) AND (dirsize < 8192) AND (dirsize > 0) AND (l^[0] = chr(0)) THEN BEGIN (* looks like a valid directory header *) l^[17] := chr(0); l^[16] := chr(0); i := 1; savechunk(root); (* the directory header *) p := root; FOR i := 2 TO 4*dirsize DO BEGIN savechunk(p^.next); p := p^.next; END; loaddir := true; END; END; (* loaddir *) (* 1---------------1 *) ”Š PROCEDURE skipblanks(VAR f : text); (* exits with either eoln or eof true, or (f^ <> ' ' *) BEGIN (* skipblanks *) WHILE NOT (eoln(f) OR eof(f)) AND (f^ = ' ') DO get(f); END; (* skipblanks *) (* 1---------------1 *) ­‘PATCH DOC%CREATE COM &'LBRDISK2DOC!()*+,LBRDISK2NOT -.LBRDISK2SET /0LBRDSK22COM;12345678LBRDSK22NOT9LBRDISK3COM;:;<=>?@ALBRDISK3DOC!BCDEFLBRDISK3SET GHLLF11 COM$IJKLMLLF11 DOCNONOPIPES MACPSETRSX COMQSLUDIR11ZQ0RSTLDIR COM~UVWXYZ[\]^_`abcdLDIR PQSCefghijklmDRTODATEINC noLOADDIR INCpqrSKIPBLKS$$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå PROCEDURE skipto(c : char; VAR f : text); (* skip characters until either c or eoln encountered *) (* at exit c is in f^, or eoln or eof is true *) BEGIN (* skipto *) WHILE (f^ <> c) AND NOT (eoln(f) OR eof(f)) DO get(f); END; (* skipto *) (* 1---------------1 *) ç·LBRDISK2SET /0LBRDSK22COM;12345678LBRDSK22NOT9LBRDISK3COM;:;<=>?@ALBRDISK3DOC!BCDEFLBRDISK3SET GHLLF11 COM$IJKLMLLF11 DOCNONOPIPES MACPSETRSX COMQSLUDIR11ZQ0RSTLDIR COM~UVWXYZ[\]^_`abcdLDIR PQSCefghijklmDRTODATEINC noLOADDIR INCpqrSKIPBLKSINCsSKIPTO $$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå PROCEDURE skipredirection(VAR f : text); (* skip over ">name" and/or "'] DO BEGIN skipto(' ', f); skipblanks(f); END; END; (* skipredirection *) (* 1---------------1 *) ’LBRDISK2SET /0LBRDSK22COM;12345678LBRDSK22NOT9LBRDISK3COM;:;<=>?@ALBRDISK3DOC!BCDEFLBRDISK3SET GHLLF11 COM$IJKLMLLF11 DOCNONOPIPES MACPSETRSX COMQSLUDIR11ZQ0RSTLDIR COM~UVWXYZ[\]^_`abcdLDIR PQSCefghijklmDRTODATEINC noLOADDIR INCpqrSKIPBLKSINCsSKIPTO INCtSKPRDRKT$$$åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå (* For library utilities - specialized sub area *) PROCEDURE sortdir(p : dirptr; how : sortkind; VAR pp : dirptr); (* follow the chain from and including p via *) (* the "next" fields, and set up the "left" *) (* and "right" fields so that pp becomes a *) (* pointer to the root of a binary tree. *) (* Modified 85/10/16, sort speed up, pp param *) (* The code now caters to presorted data, at *) (* the expense of random data. *) VAR p1 : dirptr; (* 2---------------2 *) FUNCTION greaterorequal(p1, p2 : dirptr) : boolean; BEGIN (* greaterorequal *) WITH p1^, p2^.dir DO IF how = bygroup THEN IF dir.ext < ext THEN greaterorequal := false ELSE IF dir.ext > ext THEN greaterorequal := true ELSE IF dir.name < name THEN greaterorequal := false ELSE greaterorequal := true ELSE (* how = byname *) IF dir.name < name THEN greaterorequal := false  ELSE IF dir.name > name THEN greaterorequal := true ELSE IF dir.ext < ext THEN greaterorequal := false ELSE greaterorequal := true; END; (* greaterorequal *) (* 2---------------2 *) PROCEDURE install(p1, (* in root *) p : dirptr); (* 3---------------3 *) PROCEDURE insert(p1 : dirptr; VAR p : dirptr); BEGIN (* insert *) IF p = NIL THEN p := p1 ELSE IF greaterorequal(p1, p) THEN insert(p1, p^.right) ELSE insert(p1, p^.left); END; (* insert *) (* 3---------------3 *) BEGIN (* install *) WHILE greaterorequal(p1, p) DO p := p^.next; insert(p1, p^.left); END; (* install *) (* 2---------------2 *) BEGIN (* sortdir *) pp := p; (* default *) IF p <> NIL THEN BEGIN p1 := p; IF how = unsorted THEN REPEAT (* make links reflect original order *) p1^.left := nil; p1^.right := p1^.next; p1 := p1^.next; UNTIL p1 = NIL ELSE BEGIN REPEAT (* clear the pointers *) p1^.left := nil; p1^.right := NIL; p1 := p1^.next; UNTIL p1 = NIL; p1 := p^.next; WHILE p1 <> NIL DO BEGIN IF greaterorequal(p1, p) THEN BEGIN p^.right := p1; p := p1; p1 := p^.next; END ELSE BEGIN (* must go in a left field somewhere *) install(p1, pp); p1 := p1^.next; END; END; END; END; END; (* sortdir *) (* 1---------------1 *) =>equal(p1, p) DO p := p^.next; insert(p1, p^.left); END; (* install *) (* 2---------------2 *) BEGIN (* sortdir *) pp := p; (* default *) IF p <> NIL THEN BEGIN p1 := p; IF how = unsorted THEN REPEAT (* make links reflect original order *) p1^.left := nil; p1^.right := p1^.next; p1 := p1^.next; ÕÃÎÃ$ÃDÃìÉÉÃ�ÃtÃøÃyÃø¯7É7ÉÃ…ÉÉ7É7É@ÐÿÐ9!}É>Í’yÉ>ÅÕåþ?ÚÂo‡…*õÖ…o>Œgñþʵþ0¾ÍÅ33}ÃÂÍÅáÑÁÉéÑ ÍûÃReal arith. error, ABORT $:z·À>Í’·È>ÿÉÅÕåOþ(Òþ ÊþÊæùþÂÍ33Ã!ÍáÑÁÉ:z·Ê5¯2z:yÃ:>Í’æþ7?À·7ÉÍñÄO>Ë:å!�¦áÀ>ÿ2zÍ52yþÀ¯2zÍ5þÊÉ>Ë>Í’Ã:õ> ÍŽ> ÍŽñÉÅOÍÁÉ!"y:‚o"{!ùà +!ÍÖ/! 9^#VÕÍK3! 9^#VÕÍ\2áÑ{µ_{î_Õ! 9^#VÕ͵3á^Õ á{•Ö>W_á{¥_Â! 9^#VÕÍ…3ïÃ"0!ÍÖ/! 9^#VÕ͵3á^Õ!9^á{•Æÿ>W_Õ! 9^#VÕÍK3!9^#VÕÍ\2áÑ{µ_{î_á{¥_Âe! 9^#VÕÍ…3ÃÃ"0!ÍÖ/! 9^#VÕ>ÿÍ©! 9^#VÕ͵3á^Õ<ͬ0>ͬ0Íu0Í‘0ÂÅ Õ! 9^#VÕ>ÿÍ! 9^#VÕ>ÿÍ©Ã~Ã"0!âÿÍÖ/ÕÕ Õ!9s#rÑáÍN<úíÂ@!9Ñs#r!9å!9^#Vë)Ñåás#r!9^#VÕÕ!9^#VáÍN<Ê0ú0Â@Ñ!9s#rÃù33!9åë)Ñåás#r!9åë)Ñåás#r!9å ë)Ñåás#r!9å ë)Ñåás#r!.9^#VÕÛáÍN<ʯú¯ÂÜ!,9^#VÕ¼ás#r!.9^#VÕÛáÍC0ë!.9s#rÃ!.9^#VÕÚáÍ<0ë!.9s#r+++^#VÕ¸ás#r!.9^#VÕµKBáÍQ0!9s#r!.9^#VÕµKBáÍ€;Ü-ë!.9s#r+^#VÕáÍC0åmKBáÍQ0!9s#r!,9^#VÕ+^#Vë^#VÕ! 9^#VáÍ<0åÕ! 9^#VÁÍJ0ÑÍ<0ëás#r!9^#VÕá{•_zœ³Ö>W_¼!9åë)Ñåás#rÃè!.9^#VÕáÍC0ë!.9s#r!9åë)Ñåás#r!(9^#VÕ!09^#VÕmÕ!"9^#VÁÍJ0ëáÍC0åáÍ<0ëás#r!*9^#VÕás#r!(9^#Vë^#VÕ!9å!.9^#Vë^#Vë)Ñ^#VáÍN<òWÂ¥!(9^#VÕ+^#Vë^#VÕ!9å!09^#Vë^#Vë)Ñ^#VáÍC0ëás#r!*9^#VÕ+^#Vë^#Vás#rÃ(Ã"0!þÿÍÖ/!9^#V! ^#VÕ&ÕÍe,!9^#V! ^#Vë^#VÕás#r!9^#V! ^#Vë^#V!ë!9s#r+^#VÕ!9^#VÕá^ás!9^#VÕ!9^#VÕáÑ~#Â3!9^#V! å!9^#VÕ áÑ~#ÂW!9^#V!å;;!9^#VÕ á^Õ!9^#VÕ á^ÕÍ}/Ñás#r!9^#V!å;;!9^#VÕá^Õ!9^#VÕá^ÕÍ}/Ñás#r!9^#V!å;;!9^#VÕá^Õ!9^#VÕá^ÕÍ}/Ñás#r!9^#V! å;;!9^#VÕá^Õ!9^#VÕá^ÕÍ}/Ñás#rÃ"0!üÿÍÖ/!9^#V!üÿ^#V{æ_Âp!9s#rÃz !9s#r!9^#V!^#VÕ͵3!9^#Váå¯Í«!9^#V!üÿ^#V{æ_{î_ÂP ÕÕ?Õ!9s#rÑáÍN<úÒÂ< !9Ñs#r!9^#V!^#VÕ͵3!9^#Vá^Õ!9^#V! ^#VÕÍØ.!9^#VÕÕ+++^#VáÍN<Ê, ú, Â< Ñ!9s#rÃÞ33!9^#V!^#VÕÍÖ3Ã"0!øÿÍÖ/;;!9^#VÕ͵3á^Õ!9^#VÕ͵3á^ÕÍ}/!9Ñs#r!9^#VÕ;;###^#VÕ͵3á^Õ!9^#VÕ͵3á^ÕÍ}/Ñás#r!9s++++^#VÕás#r!9^#VÕ͵3á^Õ á{•?>W_Õ;;!9^#VÕ͵3 á^Õ!9^#VÕ͵3 á^ÕÍ}/á{•_zœ³Ö>W_á{¥_Õ!9^#VÕ áÍN<Ê^ ú^ á{¥_Õ!9^#VÕáÍN<òy á{¥_Õ!9^#VÕ͵3á^Õá{•Ö>W_á{¥_ÂŒ !9^#VÕ͵3áåás!9^#VÕ͵3áåás!9s#r!9^#VÕ¯ÍE!9^#Vë^#V!9s#rÕÕÕ!9^#VÁÍJ0åë!9s#rÑáÍN<ú# ‚ !9Ñs#r!9^#VÕ¯ÍE!9^#Vë^#V!9s#r+++^#VÕÕ!9^#VáÍN<Êr úr ‚ Ñ!9s#rÃ/ 33!9sÃ"0!üÿÍÖ/!9^#V!9s#r!9^#V!ë!9s#r!9^#V! ^#VÕá{•_zœ³Ö>W_‰ !9^#V!å!9^#V! ëáÍi<Ê ú  !9sÆ !9^#V!å!9^#V! ëáÍi<ò; ÂJ !9sÆ !9^#V!å!9^#VáÍi<Êo úo Â~ !9sÆ !9sÃ. !9^#V!å!9^#VáÍi<Ê® ú® ½ !9sÃ. !9^#V!å!9^#VáÍi<òß Âî !9sÃ. !9^#V!å!9^#V! ëáÍi<Ê ú Â& !9sÃ. !9sÃ"0!ÍÖ/! 9^#Vë^#VÕá{•_zœ³Ö>W_Ân ! 9^#VÕ#^#Vás#rÃÁ ;;!9^#VÕ+++^#Vë^#VÕ>Í’ ñÒ§ ! 9^#VÕ+++^#Vë^#VÕ>Í4 ÃÁ ! 9^#VÕ+++^#Vë^#VÕ>Í4 Ã"0!ÍÖ/;;!9^#VÕ+++^#VÕ>Í’ ñÒ! 9^#Vë^#V! 9s#rÃÍ ! 9^#VÕ+++^#VÕ¯Í4 Ã"0!þÿÍÖ/! 9^#VÕ###^#Vás#r!9^#VÕá{•_zœ³Æÿ>W_ÂÜ!9^#V!9s#r!9^#VÕá{•_zœ³Ö>W_Â×!9^#VÕás#r!9^#VÕ+^#Vë^#Vás#r!9^#Vë^#V!9s#r+^#VÕá{•_zœ³Ö>W_Â{ÃÜ!9^#VÕás#r!9^#VÕás#r!9^#Vë^#V!9s#r+^#VÕá{•_zœ³Ö>W_Â×!9^#Vë^#V!9s#r!9^#VÕá{•_zœ³Æÿ>W_ÂÜ;;!9^#VÕ!9^#Vկ͒ ñÒ«!9^#VÕ!9^#Vás#r!9^#V!9s#r+^#Vë^#V!9s#rÃÙ!9^#VÕ!9^#Vë^#VÕ¯ÍÇ !9^#Vë^#V!9s#rÃ=Ã"0!ÍÖ/ÍLDIR (cmd, input, output); ÕÕ* ? ^#VÕÍú2Í,Ver. 1.9 (RCPM)ÕÕ* ? ^#VÕÍú2Íb (c) 1983, 1986 by C.B. Falconer ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2ͱ Execute with "ldir {[options] [libfname]}"+ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Í where {} shows a field that may be repeated and []3ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Ía enclose optional fields. "options" is the character5ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Í¥ "-" followed by one or more of: ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Íý n sort by name u unsorted(default)4ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2ÍQ g sort by "typ" m date modified0ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2ͨ s sectors of storage k kilobytes (size)3ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2ÍçEXAMPLE: B>ldir -m commandÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2ÍACommands may be placed on the command line or executed6ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Í™ interactively on ">" prompt. "fname>" shows an open4ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Íî library, and -options will display its directory1ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2Í=You must be logged onto the drive/user area+ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2* ? ^#VÕÍŠ2Ã"0!ÍÖ/͇** ERROR **  ÕÕ* ? ^#VÕÍú2! 9^#Vò͸Bad directory CRCÕÕ* ? ^#VÕÍú2ÃãÍàNot a library: ÕÕ* ? ^#VÕÍú2!9^#V!ßþåÕÕ* ? ^#VÕÍú2ÃãÍ%Cannot find:  ÕÕ* ? ^#VÕÍú2!9^#V!ßþåÕÕ* ? ^#VÕÍú2ÃãÍgBad option ÕÕ* ? ^#VÕÍú2ÃãÍ”No library specifiedÕÕ* ? ^#VÕÍú2Ãã>Í-Ãã!ûÿ|î€úÁ!´úÉÕÅñÒªÑ!Ù^#Vëé¤ÎZ}* ? ^#VÕÍŠ2Ã"0!þÿÍÖ/! 9^#VÕ͵3á^Õ-á{•Ö>W_³! 9^#VÕÍ…3!9^#VÕÕëÑͶ0!9^#VëÑs#r#ÂEÑ! 9^#VÕ͵3á^Õ á{•Æÿ>W_³! 9^#VÕ͵3á^ÃÝ!9s#rÃi!9s#rÃi!9s#rÃi!9s#rÃi!9s#rÃi!9s#rÃi!9s#rÃi!Šÿ|î€úì!¹ÿ´úôÕÅñÒÐGáÍC0ë! ^#Vëé¶ÐÐÐ�М©ÐÐÐЂÐÃÐÐÐÐÐÐÐÐÐÐÐÐÐÐÐÐжÐÐÐ�М©ÐÐÐЂÐÃ!9^#VÕ+^#Vë +V+^Õ Â{!9^#Vͬ0Íu0!9^#VëÑs#r#›Ñ! 9^#VÕÍ…3ÃOÃ"0!üÿÍÖ/Õ!9^#V!ïÿ +V+^Õ ÂÓÍ‘0ÕÕ!9^#V!ïÿ +V+^Õ ÂôÍ‘0á{µ_{î_ÂD!9^#V!ïÿ +V+^Õ Âͬ0Íu0!9^#V!ïÿÑs#r#Â;!9^#V!Ùþ^#VÕá{•_zœ³Æÿ>W_Â�!9^#V!Ùþ^#VÕÍA,Õ!9^#V!ÙþÑs#r!9s#r!9^#V! ^#VÕ͵3á^Õ* ?6ÿ  +V+^Õ ÂºÍ‘0Ây!9^#VÕáÍN<ÊãúãÂ-!9^#V! ^#V!9s#r!9^#V!ßþå!9^#Váå!9^#VÕÍ:3!9^#V+s#rÃ?!9^#V! ^#VÕÍ…3!9^#V! ^#VÕ͵3á^Õ* ?6ÿ  +V+^Õ ÂbÍ‘0{î_ÂÊì!9^#V!ßþåáåÍ–LIBRARYáÑ~#š!9s#r!9^#VÕÕÕ+++s#rÑáÍN<úË !9Ñs#r!9^#V!ßþå!9^#Váå ás!9^#VÕÕ+++^#VáÍN<Êú Ñ!9s#rÃ×33 Õ!9^#V! ^#VÕ>ÿÍ;;.Õ!9^#V!ßþåáåÕÍ„/á{•_zœ³Ö>W_Âå;; Õ!9^#V!ßþåáåÕÍ„/!9Ñs#r+^#VÕÕáÍC0ëáÍN<ʶú¶Âå!9^#V!ßþå!9^#VáåÍÙ.LBR áÑ~#ÂÝ;;!9^#V!ûþåäÿ åÍ«1ñÒê!9^#V!ûþåäÿ åÍé.Õ!9^#V!ÝþÑs#r;; åÞÿ å##å##å>ÿÍV ñÒÏ!9^#V!Ûþ^#VÕá{•_zœ³Æÿ>W_Õ!9^#V!Ûþ^#VÕ#^#Vá{•_zœ³Æÿ>W_á{¥_”Õ>Ír!9^#V!ïÿ +V+^Õ Â¤ͬ0ÍX0!9^#V!ïÿÑs#r#ÂÃÃçÕ>Ír!9^#V!ûþåÍ62ÃóÕ>ÍrÃ"0!ÍÖ/! 9^#VÕ áÍN<ÊúÂ20ÕÕ* ? ^#VÕÍÌ2! 9^#VÕÕ* ? ^#VÕÍ™2Ã"0!úÿÍÖ/!9^#VÕ!9å##å##å>ÿÍË ÕÕ* ? ^#VÕÍÌ2!9^#VÕdKBáÍ€;Ü-å¯Íù/ÕÕ* ? ^#VÕÍÌ2!9^#VÕ¯Íù/ÕÕ* ? ^#VÕÍÌ2!9^#VÕ¯ÍùÃ"0!þÿÍÖ/! 9^#V!ë!9s#r+^#Vë^Õá{•Ö>W_Õ!9^#Vë^#VÕá{•_zœ³Æÿ>W_á{¥_Ââ!9^#V!öÿ^#VÕá{•_zœ³Ö>W_Â!9^#Vë^#V! ^Õ!9^#V!üÿ^#VÕá{•_zœ³Ö>W_á{¥_ÂíͨÕÕ* ? ^#VÕÍú2* ? ^#VÕÍ}2Õ!9^#V!üÿÑs#r* ? ^#VÕÍc3Ã* ? ^#VÕÍŠ2!9^#V!üÿ^#V+s#rÃ*Í | ÕÕ* ? ^#VÕÍú2!9^#VÕÕÕ* ? ^#VÕÍú2.ÕÕ* ? ^#VÕÍÌ2!9^#V! åÕÕ* ? ^#VÕÍú2Õ!9^#V! ^#Vë +V+^Õ Â“Í‘0ÂÅ!9^#Vë^#VÕÕ* ? ^#VÕÍ™2Õ!9^#V! ^#Vë +V+^Õ ÂÝÍ‘0Â!!9^#Vë^#VÕáÍ<0åKBáÍQ0ÕÕ* ? ^#VÕÍ™2Õ!9^#V! ^#Vë +V+^Õ Â9Í‘0¢!9^#Vë ^#VÕáÍN<úgÂ�Íuunknown ÕÕ* ? ^#VÕÍú2â!9^#Vë ^#VÕ>ÍR!9^#V!úÿ^#V+s#rûÿ ^#VÕ ^#VKBáÍ€;Ü-ëÕ!9^#V!öÿÑs#rÃE !9^#Vë^Õÿá{•Ö>W_ !9^#V!ôÿ^#V+s#rÃE !9^#Vë^Õá{•Æÿ>W_ÂE !9^#V!øÿ^#V+s#rÃ"0!ÍÖ/! 9^#VÕá{•_zœ³Æÿ>W_Ÿ ! 9^#Vë##^#VÕ>ÍK ! 9^#VÕ>Íé! 9^#Vë^#VÕ>ÍK Ã"0!°ÿÍÖ/!9åÍ8/!9åÕÕ* ? ^#VÕÍú2ÍÖ Library ÕÕ* ? ^#VÕÍú2!P9^#V!ßþåÕÕ* ?  ^#VÕÍú2* ? ^#VÕÍŠ2ÕÕ(Õ! 9s#rÑáÍN<ú2!Â�!!@9Ñs#r!9å!@9^#Váå ás!>9^#VÕÕ!9^#VáÍN<Êq!úq!Â�!Ñ!>9s#rÃ>!33!>9s#r!9å!@9^#Váåͤ!NameáÑ~#¨!!9å!@9^#VÕ áÍ<0+ÑåÍÎ!TypáÑ~#ÂÒ!!>9^#VÕ áÍ<0ë!>9s#rÕ!\9^#Vë +V+^Õ Â"Í‘0ÂO"!9å!@9^#VáåÍ,"SectorsáÑ~#Â0"!>9^#VÕáÍ<0ë!>9s#rÕ!\9^#Vë +V+^Õ Â`"Í‘0¬"!9å!@9^#Váå͉"KbytesáÑ~#Â�"!>9^#VÕáÍ<0ë!>9s#rÕ!\9^#Vë +V+^Õ Â½"Í‘0 #!9å!@9^#VáåÍè"ModifiedáÑ~#Âì"!>9^#VÕ áÍ<0ë!>9s#rPÕáÍ<0å!@9^#VKBáÍQ0!N9s#r!>9^#VÕáÍC0ë!>9s#r!9å!@9^#VÕ(Õ* ? ^#VÕÍú2ÕÕ!R9^#VÕ! 9s#rÑáÍN<ú‚#Âñ#!B9Ñs#r ÕÕ* ? ^#VÕÍÌ2!9å!@9^#VÕ(Õ* ? ^#VÕÍú2!@9^#VÕÕ!9^#VáÍN<Êá#úá#Âñ#Ñ!@9s#rÃŽ#33* ? ^#VÕÍŠ2ÕÕ!B9^#VÕ! 9s#rÑáÍN<ú!$Âq$!D9Ñs#r-ÕÕ* ? ^#VÕÍÌ2!B9^#VÕÕ!9^#VáÍN<Êa$úa$Âq$Ñ!B9s#rÃ-$33ÕÕ!R9^#VÕ! 9s#rÑáÍN<ú“$ÂU%!B9Ñs#r ÕÕ* ? ^#VÕÍÌ2ÕÕ!B9^#VÕ!9s#rÑáÍN<úÕ$Â%%!D9Ñs#r-ÕÕ* ? ^#VÕÍÌ2!B9^#VÕÕ!9^#VáÍN<Ê%ú%Â%%Ñ!B9s#rÃá$33!@9^#VÕÕ!9^#VáÍN<ÊE%úE%ÂU%Ñ!@9s#rß$33!J9s#r+++s#r!D9s#r#s#r!L9s#rÕ!\9^#Vë +V+^Õ Â–%Í‘0Â&!P9^#V!Ùþ^#VÕÕ! 9å>ÿÍ!Z9^#VÕ+^#Vë +V+^Õ ÂÕ%ÕëÑͶ0ÍX0!9^#VëÑs#r#Âö%ÑÕ!\9^#Vë +V+^Õ Â&Í‘0Âz&!P9^#V!Ùþ^#VÕÕ! 9å>ÿÍ!Z9^#VÕ+^#Vë +V+^Õ ÂP&ÕëÑͶ0ÍX0!9^#VëÑs#r#Âp&ÑÕ!\9^#Vë +V+^Õ Â‹&Í‘0Âð&!P9^#V!Ùþ^#VÕÕ! 9å>ÿÍ!Z9^#VÕ+^#Vë +V+^Õ ÂÊ&ͬ0ÍX0!9^#VëÑs#r#Âæ&Ñ!9^#VÕ¯ÍK * ? ^#VÕÍŠ2!J9^#VÕÕ* ? ^#VÕÍ™2Í1' entries,  ÕÕ* ? ^#VÕÍú2!H9^#VÕÕ* ? ^#VÕÍ™2Íl' inactive,  ÕÕ* ? ^#VÕÍú2!D9^#VÕÕ* ? ^#VÕÍ™2Í©' free entries ÕÕ* ? ^#VÕÍú2* ? ^#VÕÍŠ2* ? ^#VÕÍŠ2Ã"0!ØþÍÖ/Õ@ÕÀÕÕÍÿ' Ñ!+V+^ÕÂ(!39åÍã9!9s#rͬ0!'9Ñs#r#Â-(!9åáå ás!29^ÂÔ(!#9åͧ3á{•_zœ³Æÿ>W_š(!9å;; ÕåÕÍ„/ÑÕÕ* ? ^#VÕÍú2ð(?ÕÕ* ? ^#VÕÍÌ2>ÕÕ* ? ^#VÕÍÌ2* ? ^#VÕÍ}2!49^#VÕ>ÿÍk!49^#VÕÍK3!69^#VÕÍ\2áÑ{µ_!'9s^{î_Â+!49^#VÕ͵3á^Õ-á{•Ö>W_ÂA)!9å!69^#VÕ¯Í÷ÃZ)ÕëÑͶ0!'9Ñs#r#ÂQ)!49^#VÕ>ÿÍk!49^#VÕ͵3á^Õ* ?6ÿ  +V+^Õ Âƒ)Í‘0½)!9 +V+^Õ Âœ)ͬ0Íu0!'9Ñs#r#´)Õ!9 +V+^Õ ÂÊ)Í‘0Â3*Õ¯Ír!9 +V+^Õ Âë)ͬ0ÍX0!'9Ñs#r#Â*!29^Â(** ? ^#VÕÍc3Ã0*!'9sÃ+Õ!9 +V+^Õ Â@*Í‘0ÂW*¯Í¹Ã|*!#9åͧ3á{•_zœ³Ö>W_Â|*Õ¯Ír!#9åͧ3á{•_zœ³Ö>W_!'9s!29^³** ? ^#VÕÍc3!'9^Âþ*!29^ÂÑ*!'9s!9 +V+^Õ ÂÚ*ͬ0Íu0!'9Ñs#r#Âò*Ã+!9å¯Í¥ !'9^ÂG(!#9åÍ62Ã"0Í»,!6ÿÍÖ/ÕÕ†Õ ÕÍA+CMD Ñ!+V+^ÕÂH+* ?Fÿ åÍã9 Õ~ëÑͶ0,ͬ0.ͬ0Íu0;Õ>ëÑͶ0Íu0[ͬ0Íu0]ͬ0Íu0_ͬ0Íu0ÍX0* ?6ÿ Ñs#r#®+;;åÕÍ«1ñÒ,* ?Fÿ å>ÿÍk* ?Fÿ åÍK3Ñ{î_Âú+* ?Fÿ åÕ>ÿÍÞ'Ã,>ÿÍâ* ? ^#VÕÕ>ÿÍÞ'Ã/,>ÿÍâ* ? ^#VÕÕ>ÿÍÞ'* ?Fÿ åÍ62Í®.ûv7Éáã|µ>Ê-"?ÉÕë*?ëÍ\<Ñ"?Ð"?É!ãåëáãëÍ’,>Ú-ÍN,áãs#rÉáãëÍ’,Ò‰,*?ÍN,áãs#rÉ*?å?Ò©,å€ë!9Í\<áÑ?É"?"?"?É>Ã-¯21?Ñ*.ù" ?òÿ " ?åå!??ͬ,!"/?!åÕ>2?Í�5Í'1Í?,>ÿÍ-¯ÉÍ-!›-Í2=Ã<È=ÅåõÕ!„._^#VëÍ/=*?|µÊ1-!¤-Í2=*?G=ͬ=ÑñõÕÍU-Íl=ÑñáÁþÚL-å!?5á7À!›-Í2=î.þ ØþÈþÈþÈ!¯-Í2=Õ·Êw-þÒw-Æ@ÍJ=ÍŽ-! Ñëþ!Ø>.ÍJ=þ!ØÍJ=ÂŽ-Éaborting in line # FILE=???o'flownot imp.stk o'flowheap o'flowdiv 0can't loadbad ptrcase indexreal u'flowreal o'flowsqrt -velog -ve/0eofbad ch/valuemod -vefile R/Orangefile sys.string fld/sz > 255file not open¶-º-Á-Ê-Õ-á-ç-ò-ú-...&.0.4.A.I.R.X.b.v. Í14 Í14:0?·òÌ.>ÍûÃ$$$ SUBáÑãÕ}ëF#NÍÈ>áp#qÉáÑãëæþÒ/·Ê/Æ@w#6:#þ Ê/w# Â/6.#Ã%/6.#  /w# Â'/6 #Â0/Éáãë>Í$0/Ík/>Í$Ík/ >Í$Ík/ :>Í$Ík/>Í$0 o&þ Òv/yÍÙ=xÉÑáÁaãÕÉáÁÑã}áãëÍ’/ãåÉÍÂ/ú±/ʯ/¾Ê¯/# ž/ž/ëɾʯ/+ ±/±/ì/øWx±zÈ >·x/Gy/OzÉÁë!å!å* ?å·Êû/òñ/* ?Ãû/Õ^#Vë=Âò/Ñå!9" ?å€*?ëá͸>ëë>Ò-ùÅ!"?É* ?ùáá" ?á!á!"?áë9ùëéÍA<ÐÃ-Í0<ÐÃ-ÍŽ;ÐÃ-ÍÇ;ÐÃ-!9ë/¦w#Âc0Ñ!9ùëé!9ë¶w#€0Ñ!9ùëé!9ë^Íé0¦Á!9ùÅÀÉáÍ1åÍé0wÉ}áÍ1åCOx‘ʱ0ÐÍé0=/wxæxGyæx�<=Êà0#6ÿÃÖ0YÍé0‡=¦wÉ{æÆo&9{æ_¯7Âü0ÉåÕÅõ!9ë!ðÿù w#Â1>p#=Â1ñÁÑáÉ!"?Íy1 >Í=1 > õÕÍl1ë!š1Í’>Ñ.> Íl1&ñÍl1>*Íl1,>†* ?Õ^#Vë wÑÉ* ? DMÍ…1¶Í’,>Ú-"?{zÉCON: áãëáãëåÍ92>ƒ/¦öwá|µÊÐ1ÍŠ9¯! w!$wÍø5Òà1Í6:Á!ãÅÉÁ!ãÅÃ)2áãëáãëåÍ92>Ã2áãëáãëåÍ92>ƒ/¦öwá|µÊ2ÍŠ9¯! w!$wÍø5Ò)2Í6:Ã÷3!&~æþÂÙ3Éáãë!&~æþ+ÌÍ4Í84Ú÷3!&~æýwæþÀ/¦wÉáãë!&~æþÌ35Í?:Ê$4>¦!Ê{2#ãéáãëÍG:Â$4Ú4ÉáãëÍG:Â$4Ú4ÃÍ4áãëÍG:Â4Ú4áÁãëz·õò³2 ͸>Íì=Gy�ëÚÃ2åoÍ5áñ>-ü5Ãà4áãëÍG:Â4Ú4áã-Í5áã}Ã5áÑÁñå!03Úò2!53ãÅÃý2áÑÁåÍG:Â4Ú4áã|·Â&3µÊ-3åÅͰ> ÁEáÚ!3M¯GáãÃô4>áãÃ-áãÉTRUE FALSEáãëÍ35!.~áãwÈ3áãëÍ35Í?:Ê$4~æ!Êa3#ãéáãëÍ35Í?:Ê$4!&~æÂü3~æÂŽ3Í;5Ão3áãëÍ?:Ê$4!&~æ€Ì;5!&>€/¦wæÈÃü3áãëÍ?:!Ä 7ãéáãë!&~æþ!.ÊÌ3!0ãåÀÍ35Úü3ÉáãëÍ?:Ê$4~æÂü3þÊ6:Í17Úñ:!–7Ã7>Ã-Í6:ö@w> Ã-áãáÃ4áã!&~ö@w>Ã-áãáÃ#4áã!&~ö@w>Ã-* ?^#V!&~æÈæþÚQ4!Æ7Í7ÃW4~æ Äa4!&>/¦wÉ!&~æþÊz4ÍŽ4>Íû<·À7É!&~æ€ÄM;>Íû<·À7É!/~·øÅO!&~æÊ´4!0å 6# ò©4áÃÃ4yõÍm;6ñ<òµ4Íl;ÍP;Á>Ú-É> Í5> Í5!&~öwÉõåÍÿ=õ|µÄà4ñáÆ0Í5ñÉåhÍ5á È~#Í5Ãû4> -øÍ5Ã5ÅOå!&>/¦wæþÒ)5ÍÆ:Ã/5!¦7Í7áyÁÉ!&~æ�À!&~æ7À̓5þ ÊD5õ!&>/¦ö€wñ!.wþÂp5!&~öw>Ã�5þ Â�56 !&~öw> ·ÉæþåÒ’5ͤ:Ø5!–7Í7áÐ>É!"#?"%?!€>[N È#¾Â­5 È#~þ Ê´5Íú>Øëæo& ÈÍú>Úß5Í>æ…o|ÎgÃÇ5þ]Êî5þ À ÈÃß5"#?}æ2%?É!&~æÀͶ6!/6€Í17Ò6Í56Â,6!&>@¶w7Éö!¶7Í7!&~öwÉÍt6!&> /¦w! ~þ ÂQ6#6 #6 ! 6! 6!&~æÊV:ͱ6>Íû<·À7É!~þ ÀÕÅ !¥6Í’>ÁÑ!Õë*?#"?Íÿ=ë†w+ë|µÂ–6ÑÉTEMP0000$$$>Ãû!$~·ÈG¯w! 6 #6 #6 !€Nå#ÅG Áwá # È~þ(ÂÚ6Êö6# È~þ)Èþ,Êã6Ãç6# È~þ Êö6þ,Èþ)È È ÃŠ9æþÚp9!Ö7Ã7æþÒ-8‡…o|Îg~#foéþÒ:7·7ÀÅÕå! ~ë#åþ Âw7|7áå úw7¾ÂO7#¾ÂP7#¾ÂQ7#~þ:Êx7þ Êx77yááÑÁÉCMDAUXLSTPUNRDRKBDCONNUL-89y=18-8-8<9L908€=€=08080808080808080808Ï80808080808080808p9µ8¥8æ7p98ñ7p9!&~æ!È!&~æ!ÀÍ!æÈ.É!&~æ!ÈÍæ>Â8>µoÍæ>Â*8>µoÉ>7ÉÅåÍ<8áÁÉ!&~æʈ8!,~!0ÕWÂg8Íž8þÊ{8þ ÂW8Ã{8Íž8w#þÊx8þ ÂS8+6{Ñ!(w!/6!/~4!0…o|Îg~·À> ÉÍ×=Ð>ÉÍp9}æÀÍ æÀ.ÉÍp9}æÀå!&~áæÈÍ æÀ.É:€< ÉÍØõþ ÊH9ñÉñ>ÉÅå!&~æ!/~Â^94!0…o|Îg~áÁ·À> É!&~æ@!ÿÿÀ!&~æ!È> oÉ|µÈÕů#~+þ:§9~##Í?Ö@þÒ§9;9~þ.´9#;9¯ÁÑÉ~Íq:ÚÏ9Í?#¾9> ÂÒ9+#~Íq:ÒÚ9ÉáãëBK>áãõ}|ñ=Âë9> ¯! wáãDM!&q#páãDM!,q#páãDM!*q#páãDM!$q#pÉ!&~öwÉ!&~æÉ!&~æþÈ/æ7É>Íû<·À·Âf:>>Íû<·À7Éæþ!ØÍè>ÐåÅG!Š:Í›:xÁá7È?É.,*:@[]<>()=;_?ÿ~#¸È<ò›:É!/~4·ò¹:6!0Í?;7À!0…o|Îg~·É!&~ö w!/~æw!0…o|Îgq!/4yð!0ÍP;yÉÍ*;!/~4·ò;6Í9;Ê;!&~öwÉÍm;~!0 w!*y–#xžÚ÷:É!&~æþÀ>/¦wÍl;Ã?;>ëÍûë>Íû·ÉÍl;>ëÍûë>Íûõå!&> ¶wáñ·È7ɯ!*ÅN#F!0 Á…oÐ$ÉÍÇ;Ø|°ð  ð>7ÉÅz·ú¥;x·ò°;Ͱ>Í_>ͦ>ó;͸>x·òœ;Ͱ>Í_>Á|zÚÀ;³È>7É£<È>7É|·òÐ;x±>7ÈÅÕåz²òý;ͦ>x·úô;Í#<Ú<ë͸>ëÃ<Ͱ>Í<Ãé;°ú <Í<Ú<ÁÁÁ·ÉͰ>Í#<Ò<áÑÁ>7ÉÍ>ØzÉÍ>ØÍ¸>³Èz?É͸>ÂA<|·ø>7É|ª7?øz¬ð>7Éz¬òW<¬öÉÍ\<·Éz¼Âd<{•È>Ð/É–Âw<# x±Âi<É>Ò}Ã=þÂ=•<Ãþ Ú• ÍJ=> ÍJ=ñÉÍØæÉå!|Í‹=áà y<æþ Â�=+¶#ð~·È5Éþ!Ò¨=Öʪ=É~.Å ÉÅÉõåÍÿ=õ|µÄÙ=ñáÆ0ñÉÅÕëÍÿ=|µÂñ=xëÑÁÉÅ ð¯)¹Ú >‘#ú>·ÁÉÕT]))ÑÉ·õ{‘z˜Ò2>ëÅÍ5>_Í8>_ÁñÉñ7ÉͰ>zS È)ÚV>‡ÒG>#å ÚP>áÃ<>33<Ã<>�Ò[># Ã<>õ{ÕÍ}>ãõ|Í}>Wñ„_Òs>}á„gÒ{>ñÉbj‡Òˆ> ŠÈ)�Ú†>È>x±ÈåÕÅ~# x±Â˜>ÁÑáÉ͹>ÍÀ>µÀÉ y/Ox/GÉ{/_z/WÉ+}/o|/gÉÕ©Wæª_Wæ¨Ozæà«Gzæð©OÑÉÍú>ÐþAØþ[?ÐþaØþ{?Éþ:?Øþ0Éþa?Ðþ{ÐÆàÉ·³ÍÇ;Ø|°ð  ð>7ÉÅz·ú¥;x·ò°;Ͱ>Í_>ͦ>ó;͸>x·òœ;Ͱ>Í_>Á|zÚÀ;³È>7É£<È>7É|·òÐ;x±>7ÈÅÕåz²òý;ͦ>x·úô;Í#<Ú<ë͸>ëÃ<Ͱ>Í<Ãé;°ú <Í<Ú<ÁÁÁ·ÉͰ>Í#<Ò<áÑÁ>7ÉÍ>ØzÉÍ>ØÍ¸>³Èz?É͸>ÂA<|·ø>7É|ª7?øz¬ð>7Éz¬òW<¬öÉÍ\<·Éz¼Âd<{•È>Ð/É–Âw<# x±Âi<É>Ò}00000001(*$d-,n-,i'ldir.pas' no run-time checks, no line nos. *) 5ÀååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååÕÃÎÃ$ÃDÃìÉÉÃ�ÃtÃøÃyÃø¯7É7ÉÃ…ÉÉ7É7É@ÐÿÐ9!}É>Í’yÉ>ÅÕåþ?ÚÂo‡…*õÖ…o>Œgñþʵþ0¾ÍÅ33}ÃÂÍÅáÑÁÉéÑ ÍûÃReal arith. error, ABORT $:z·À>Í’·È>ÿÉÅÕåOþ(Òþ ÊþÊæùþÂÍ33Ã!ÍáÑÁÉ:z·Ê5¯2z:yÃ:>Í’æþ7?À·7ÉÍñÄO>Ë:å!�¦áÀ>ÿ2zÍ52yþÀ¯2zÍ5þÊÉ>Ë>Í’Ã:õ> ÍŽ> ÍŽñÉÅOÍÁÉ!"y:‚o"{!ùÃl!Í£$! 9^#VÕÍå'! 9^#VÕÍ)'áÑ{µ_{î_Õ! 9^#VÕÍA(á^Õ á{•Ö>W_á{¥_Â! 9^#VÕÍ(ïÃï$!Í£$! 9^#VÕÍA(á^Õ!9^á{•Æÿ>W_Õ! 9^#VÕÍå'!9^#VÕÍ)'áÑ{µ_{î_á{¥_Âe! 9^#VÕÍ(ÃÃï$!Í£$! 9^#VÕ>ÿÍ©! 9^#VÕÍA(á^Õ<Í\%>Í\%Í%%ÍA%ÂÅ Õ! 9^#VÕ>ÿÍ! 9^#VÕ>ÿÍ©Ã~Ãï$!ÞÿÍ£$ÕÕ Õ!9s#rÑáÍ2úíÂ@!9Ñs#r! 9å!9^#Vë)Ñåás#r!9^#VÕÕ!9^#VáÍ2Ê0ú0Â@Ñ!9s#rÃù33! 9åë)Ñåás#r! 9åë)Ñåás#r! 9åë)Ñåás#r! 9å ë)Ñåás#r! 9å ë)Ñåás#r Õ!.9åá^Õ0áÍ%ëÁÍ%å!.9åá^áÍ %å0áÍ%ë!9s#r Õ!.9åá^Õ0áÍ%ëÁÍ%å!.9åá^áÍ %å0áÍ%ë!9s#r Õ!.9åá^Õ0áÍ%ëÁÍ%å!.9åá^áÍ %å0áÍ%ë!9s#r!9^#VÕBáÍ2ÊŠúŠÂ¥!9^#VÕdáÍ %ë!9s#r!9^#VÕNáÍ2ʾú¾Õ!9^#VÕá{•_zœ³Ö>W_á{µ_Õ!9^#VÕá{•_zœ³Ö>W_á{µ_ !<9s#rÀ!9^#VÕLáÍ%ë!9s#r+^#VÕKBáÍ%!9s#r!9^#VÕKBáÍ@1ÜÃ!ë!9s#r###^#VÕÛáÍ%åµÕ! 9^#VÁÍ%ÑÍ %ë!9s#r!9^#VÕáÍ2ò“Õ!9^#VÕáÍ2òªá{µ_ÂÉ!9^#VÕáÍ %ë!9s#r!9^#VÕmÕ!9^#VÁÍ%ÑÍ %ë!9s#rÕÕ+++^#VÕáÍ%åë!9s#rÑáÍ2úÂp! 9Ñs#r!9^#VÕ###å++^#Vë)Ñ^#VáÍ %ë!9s#r#^#VÕÕ!9^#VáÍ2Ê`ú`ÂpÑ!9s#rà 33!9^#V!<9s#rÃï$!üÿÍ£$!9s#r!9^#VÕÍA(á^Õ á{•Æÿ>W_Â!9^#VÕáÍ2ÊÐúÐÂ!9^#V!9s#r!9^#VÕ!9^#Váå!9^#VÕÍÔ'!9^#V+s#rÃ!9^#VÕÍ(Ö!9^#VÕÕÕ+++s#rÑáÍ2ú<Â�!9Ñs#r!9^#VÕ!9^#Váå ás!9^#VÕÕ+++^#VáÍ2Ê}ú}Â�Ñ!9s#rÃH33Ãï$!Í£$*º4 ^#VÕÍW'ÍçLSETDATE Ver. 1.2 Copyright (c) 1983, 1986 by C.B. Falconer;ÕÕ*º4 ^#VÕÍ”'*º4  ^#VÕÍW'Í; To set module modified dates in LU libraries for0ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Í} all modules not already dated:ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Í B>lsetdate libraryname YY/MM/DD!ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Í To unconditionally redate individual modules use:1ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Íc B>lsetdate lbrname YY/MM/DD modulename(ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'͵ Wildcards accepted. *.* equivalent to no entry.ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Í YY/MM/DD is the date to be set. Mandatory if the1ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Í` system does not supply the current date, otherwise2ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Íš overrides system date.ÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍW'Ãï$!Í£$ÍØ *** ERROR *** ÕÕ*º4 ^#VÕÍ”'! 9^#VÃ} Í CRC directory error, bad library: "ÕÕ*º4 ^#VÕÍ”'*º4'þ åÕÕå ^#VÕÍ”'*º4 ^#VÕÍW'ÕÕ*º4 ^#VÕÍf'͆ ^C aborts, continuesÕÕ*º4 ^#VÕÍ”'*º4 ^#VÕÍJ'*º4 ^#VÕÍý'ÿ ì ÍÍ Not a library: ÕÕ*º4 ^#VÕÍ”'*º4'þ åÕÕå ^#VÕÍ”'ì Í Can't find  ÕÕ*º4 ^#VÕÍ”'*º4'þ åÕÕå ^#VÕÍ”'ì Í_ No system date or invalid date format%ÕÕ*º4 ^#VÕÍ”'ì >ÍÃ!ì !üÿ|î€úŒ !´ú” ÕÅñÒu Ñ!¤ ^#Vëé7 » û õ *º4 ^#VÕÍW'>ÿÍ•Ãï$!úÿÍ£$!9sÕÕÕ!9s#rÑáÍ2úî «!9Ñs#r!9^#V! ^#VÕÍå'ñÒ;!9^#V!ïÿå ^#VÕ!9^#VáÍ %+Ñå ásÃ~!9^#V! ^#V!9s#r!9^#V!ïÿå ^#VÕ!9^#VáÍ %+Ñå!9^#VÕÍÔ'!9^#VÕÕ+++^#VáÍ2Ê›ú›«Ñ!9s#rÃú 33!9^#V!ïÿå ^#VÕáÍ %+Ñ^Õ!9^á{•Ö>W_Õ!9^#V!ïÿå ^#Vá^Õ*º4ûý  +V+^Õ ÂÍA%á{¥_Õ!9^#V!ïÿå ^#Vá^Õ*º4ûý  +V+^Õ Â?ÍA%á{¥_Âñ Õ!9^#V!ïÿå ^#Vá^Õ0áÍ%ëÁÍ%å!9^#V!ïÿå ^#Vá^áÍ %å0áÍ%ë!9s#r+^#VÕ!9^#VáÍ2ÊÆúÆÕ!9^#VÕ!9^#VáÍ2úáá{¥_Âñ!9s!9^#V!þÿ^#VÕáÍ %ëÕ!9^#V!þÿÑs#rÃï$!îÿÍ£$!9s#r!9^#VÕÍH00/00/00 0:00 áÑ~#ÂL;;ÕcÕ/Õ¯ÍÅ ñÒ«;;Õ Õ/Õ¯ÍÅ ñÒ«;;ÕÕÕ¯ÍÅ ñÒ«!9^#VÕ!9Ñ~#£Ãï$!Í£$! 9^#VÕ;;#^#VÕÍA(á^Õ!9^#VÕÍA(á^ÕÍJ$Ñás#r!9^#VÕÍA(á^Õá{•Ö>W_Õ!9^#VÕÍA(á^Õá}“>W_á{¥_Õ!9^#Vë^#VÕáÍ2òNá{¥_Õ!9^#Vë^#VÕ áÍ2Êpúpá{¥_Õ;;!9^#VÕÍA( á^Õ!9^#VÕÍA( á^ÕÍJ$á{•_zœ³Ö>W_á{¥_!9s! 9^#VÕ;;###^#VÕÍA(á^Õ!9^#VÕÍA(á^ÕÍJ$Ñás#r!9^#VÕÍA(áåás!9^#VÕÍA(áåásÃï$!üÿÍ£$!9^#V!üÿ^#VÕBÕÍ$!!9^#V!üÿ^#Vë^#VÕ!9^#V!üÿÑs#r+^#VÕ ^#VÕÍA(áÑ@~#Â{!9^#V!^#VÕÍ…(ÕÕ?Õ!9s#rÑáÍ2ú±Â!9Ñs#r!9^#V!üÿ^#VÕ!9^#Vá^Õ!9^#V!úÿåÍ—#!9^#VÕÕ+++^#VáÍ2ÊúÂÑ!9s#rý33Ãï$!Í£$!9^#Vë^#V!^#VÕÍA(! 9^#VÕáÍ %Ñå!9^#Vë^#V!öÿ^#Vás!9^#Vë^#V!^#VÕÍA(! 9^#VÕáÍ %Ñå!9^#Vë^#V!øÿ^#VásÃï$!üÿÍ£$!9^#Vë^#V!^#VÕÍA(!9^#Vá^Õá{•Ö>W_ÂÎÕÕ Õ!9s#rÑáÍ2úù¿!9Ñs#r!9^#Vë^#V!^#VÕÍA(!9^#VÕ!9^#VáÍ %Ñ^Õ!9^#Vë^#V!éÿå!9^#Vá^á{•Æÿ>W_Õ!9^#Vë^#V!éÿå!9^#Vá^Õ?á{•Æÿ>W_á{¥_Â’ÃÎ!9^#VÕÕ+++^#VáÍ2ʯú¯¿Ñ!9s#rÃ33!9^#VÕ>ÍÃï$!Í£$!9^#Vë^#V!^#VÕÍA(! 9^#Vá^Õá{•Ö>W_Õ!9^#Vë^#V!^#VÕÍA(!9^#VÕáÍ %Ñ^Õá{•Ö>W_á{¥_Õ!9^#Vë^#V!^#VÕÍA(!9^#VÕáÍ %Ñ^Õá{•Ö>W_á{¥_•! 9^#VÕ>ÍÃï$!Í£$*º4 þ åáåͶ*.*ÑáÍ)2ÂÅÂÜÕ¯ÍÔ Õ¯ÍÔÃìկͣ կͣÃï$!üÿÍ£$!9^#V!^#VÕÍA(!9^#V!üÿ^#VëÑ@~#Â>Í›ÕÕ?Õ!9s#rÑáÍ2úG®!9Ñs#r!9^#V!^#VÕÍA(!9^#Vá^Õ!9^#V!úÿåÍ—#!9^#VÕÕ+++^#VáÍ2Êžúž®Ñ!9s#rÃS33!9^#V!^#VÕÍb(!9^#V!üÿ^#Vë^#VÕ!9^#V!üÿÑs#rÃï$!Í£$! 9^#Vë^ÕaÕzëÑÍf%ÍA%Â*! 9^#VÕ+^#Vë^Õ áÍ%ëás! 9^#Vë^! 9sÃï$!úÿÍ£$!9s#r!9^#V+s#r;;!9^#VÕ!9^#Váå¯Íê á{•Ö>W_ÂP!9s#r#s#r!9^#VÕÍ­ áÑ ~#±!9^#VÕáÍ2úÏÕ!9^#VÕ!9^#Vá^Õ Í\%*Í\%Í%%.Í\%Í%%ÍA%{î_á{¥_ÂO!9^#VÕ!9^#Váå!9^#VÕ!9^#Vá^ás!9^#V+s#r#^#V+s#rù!9^#VÕ!9^#Vá^Õ*á{•Ö>W_Âö!9^#VÕÕÕ!9s#rÑáÍ2ú–Âè!9Ñs#r!9^#VÕ!9^#Váå?ás!9^#VÕÕ!9^#VáÍ2ÊØúØÂèÑ!9s#râ33!9^#V+s#r!9^#VÕ!9^#Vá^Õ Í\%.Í\%Í%%ÍA%{î_Â5!9^#V+s#rÃö!9^#VÕ!9^#Vá^Õ.á{•Ö>W_—!9^#V+s#r #s#r!9^#VÕ áÍ2ú…Õ!9^#VÕ!9^#Vá^Õ Í\%*Í\%Í%%ÍA%{î_á{¥_Âü!9^#VÕ!9^#Váå!9^#VÕ!9^#Vá^ás!9^#V+s#r#^#V+s#rÃo!9^#VÕ!9^#Vá^Õ*á{•Ö>W_—!9^#VÕÕ Õ!9s#rÑáÍ2úC•!9Ñs#r!9^#VÕ!9^#Váå?ás!9^#VÕÕ!9^#VáÍ2Ê…ú…•Ñ!9s#rÃO33Ãï$!æÿÍ£$*º4 þ å!9å¯Í@!9åBÕÍ$!!9^#V+++s#r+^#VÕ!89^#VÕÍA(áÑ@~#Âã!69^#VÕÍ…(!9s#r;;!(9ë!+V+^Õ >ÿÍË!9å##åÍ<$ÕÕ?Õ!9s#rÑáÍ2úB›!9Ñs#r!9^#VÕ!9^#Vá^Õ!9åÍ—#!9^#VÕÕ!9^#VáÍ2Ê‹ú‹›Ñ!9s#rÃN33ÕÕÕ!*9^#VÁÍ%åë!9s#rÑáÍ2úÃÂ!9Ñs#r¯Í'!9^#VÕÕ!9^#VáÍ2ÊñúñÂÑ!9s#rÃÏ33!9^#VÕ*º4ùý ^#Vá{•_zœ³Æÿ>W_Õ*º4ùý ^#VÕá{•_zœ³Æÿ>W_á{¥_ÂQÕ>ÿÍÁ !9^#VÕás#r!9^#Vë^#V!9s#r!69^#VÕÍA(!9^#VëÑ@~#Š¯Í›!9s#r###^#VÕ!89^#VÕÍA(áÑ@~#¸ÕÕ?Õ!9s#rÑáÍ2úÜÂ5!9Ñs#r!9^#VÕ!9^#Vá^Õ! 9åÍ—#!9^#VÕÕ!9^#VáÍ2Ê%ú%Â5Ñ!9s#rÃè33!69^#VÕÕÍ™&!69^#VÕÕÍæ&!9^#VÕá{•_zœ³Æÿ>W_Ây¯ÍòÃU!69^#VÕÕÍæ&!69^#VÕÍA(!9^#VëÑ@~# !9^#VÕ!9å##åÍ<$!69^#VÕÍA(áå!9^#Vás!69^#VÕÍA(áå!9^#Vás!69^#VÕÍb(Ãï$!Í£$*º47ÿ åÕͨ&*º47ÿ å>ÿÍk*º4ñÿ åÍ÷#0Õ9ëÑÍf%*º4ûý Ñs#r#ÂBåáåÍZ*.* áÑ~#Â^Ãï$Íz!!öýÍ£$Õ@ÕÀÕÕÍ� Ñ!+V+^Õ—*º4Cþ åͽ.ÕÕ†Õ ÕÍÃCMD Ñ!+V+^ÕÂÊ*º47ÿ åͽ.>ÿÍ*º47ÿ åÍå'*º47ÿ åÍ)'áÑ{µ_ >ÿÍ•Ãå *º47ÿ åðþ å>ÿ͆*º47ÿ å>ÿÍk;;.Õ*º4'þ åÕÍQ$á{•_zœ³Ö>W_‚*º4'þ å;; ÕåÕÍQ$ÑáåÍv.LBR áÑ~#Âz;;*º4Cþ åäÿ åÍ[&ñÒÜ *º4Cþ åäÿ åͨ#;;*º4Cþ å´ÿ å##å>ÿͱñÒÐ *º47ÿ åÍå'*º47ÿ åÍ)'áÑ{µ_{î_Âh *º47ÿ åÍA(á^Õ*º4ûý  +V+^Õ Â ÍA%Â$ *º47ÿ åº å>ÿÍ*º47ÿ å>ÿÍk*º47ÿ åÍå'Ñ{î_Õ*º47ÿ åÍ)'áÑ{µ_Âh *º47ÿ åÔþ å>ÿ͆*º4ñÿ åáåÍ‚ 00/00/00ÑáÍ)2‘ ¡ Õ>ÿÍÁ ÃÍ *º4Cþ å® ë!+V+^Õ´ *º4÷ý ^#VÕ>ÿÍ�ÃÙ Õ>ÿÍÁ Ãå Õ>ÿÍÁ *º4Cþ åÍ'*º47ÿ åÍ'Ím#ûváã|µ>ÊÃ!"¾4ÉÕë*À4ëÍ2Ñ"¾4Ð"À4É!ãåëáãëÍQ!>ÚÃ!Í !áãs#rÉáãëÍQ!ÒH!*¾4Í !áãs#rÉ*¾4å?Òh!å€ë!9Í2áÑ?É"¼4"¾4"À4É>ÃÃ!¯2Þ4Ñ*.ù"¸4òÿ "º4åå!ì4Ík!!"Ü4!åÕ>2Ê4Í…*Í×%Íà(>ÿÍÃ!¯ÉÍÃ!!Z"Íò2Ã<È=ÅåõÕ!C#_^#VëÍï2*Â4|µÊð!!c"Íò2*Â43Íl3ÑñõÕÍ"Í,3ÑñáÁþÚ "å!Ê45á7À!Z"Íò2Ãm#þ ØþÈþÈþÈ!n"Íò2Õ·Ê6"þÒ6"Æ@Í 3ÍM"! Ñëþ!Ø>.Í 3þ!ØÍ 3ÂM"Éaborting in line # FILE=???o'flownot imp.stk o'flowheap o'flowdiv 0can't loadbad ptrcase indexreal u'flowreal o'flowsqrt -velog -ve/0eofbad ch/valuemod -vefile R/Orangefile sys.string fld/sz > 255file not openu"y"€"‰"”" "¦"±"¹"Ä"Ð"Ü"å"ï"ó"####!#5# Í-) Í-):Ý4·ò‹#>ÍûÃ$$$ SUBáÑãÕ}ëF#NÍu4áp#qÉáÑãëæþÒÃ#·ÊÃ#Æ@w#6:#þ ÊÛ#w# ÂÆ#6.#Ãä#6.# Âß#w# Âæ#6 #Âï#Éáãë>Í$0/Í*$>Í$Í*$ >Í$Í*$ :>Í$Í*$>Í$0 o&þ Ò5$yÍ™3xÉáÑÁã|}¯ÉÑáÁaãÕÉáÁÑã}áãëÍ_$ãåÉÍ�$ú~$Ê|$¾Ê|$# Âk$Âk$ëɾÊ|$+ Â~$Â~$Ãy$øWx±zÈ >·x/Gy/OzÉÁë!å!å*¸4å·ÊÈ$ò¾$*º4ÃÈ$Õ^#Vë=¿$Ñå!9"¸4å€*¾4ëáÍe4ëë>ÒÃ!ùÅ!"Â4É*¸4ùáá"¸4á!á!"Â4áë9ùëéÍ2ÐÃÃ!Íð1ÐÃÃ!ÍN1ÐÃÃ!͇1ÐÃÃ!!9ë¶w#Â0%Ñ!9ùëé!9ë^Í™%¦Á!9ùÅÀÉáͲ%åÍ™%wÉ}áͲ%åCOx‘Êa%ÐÍ™%=/wxæxGyæx�<=Ê�%#6ÿÆ%YÍ™%‡=¦wÉ{æÆo&9{æ_¯7¬%ÉåÕÅõ!9ë!ðÿù w#ÂÂ%>p#=ÂÌ%ñÁÑáÉ!"È4Í)& >Íí% > õÕÍ&ë!J&Í?4Ñ.> Í&&ñÍ&>*Í&,>†*º4Õ^#Vë wÑÉ*º4 DMÍ5&¶ÍQ!>ÚÃ!"¾4{zÉCON: áãëáãëåÍ'>ƒ/¦öwá|µÊ€&Íd.¯! w!$wÍà*Ò�&Í/Á!ãÅÉÁ!ãÅÃÙ&áãëáãëåÍ'>ø&áãëáãëåÍ'>ƒ/¦öwá|µÊÍ&Íd.¯! w!$wÍà*ÒÙ&Í/æ(!&~æþˆ(ÉáÁãë!&~æþ¦(Í ,Ò¦(ÍO/Ú¦(Éáãë!&~æþ+ÌÉ)Í4)Ú¦(!&~æýwæþÀ/¦wÉáãë!&~æþÌ*Í/ÊÓ(>¦!ÊH'#ãéáãëÍ!/ÂÓ(Ú¾(ÉáãëÍ!/ÂÓ(Ú¾(ÃÉ)áãëÍ!/ÂË(Ú¶(áã-Íí)áã}Ã÷)áÑÁñå!Ê'ÚŒ'!Ï'ãÅ×'áÑÁåÍ!/ÂË(Ú¶(áã|·ÂÀ'µÊÇ'åÅÍ]4 ÁEáÚ»'M¯GáãÃÜ)>áãÃÃ!áãÉTRUE FALSEáãëÍ*!.~áãwÃ"(áãëÍ*Í/ÊÓ(~æ!Êû'#ãéáãëÍ*Í/ÊÓ(!&~æ«(~æÂ((Í#*à (áãëÍ/ÊÓ(!&~æ€Ì#*!&>€/¦wæÈë(áãë!&~æþ!.ÊX(!0ãåÀÍ*Ú«(ÉáãëÍ/ÊÓ(~æþÊy(~æʾ(Í ,Ú˜/!€,Ãó+áãëÍ/ÊÓ(~æ«(þÊ/Í ,Ú±0!p,Ãó+>ÃÃ!Í/ö@w> ÃÃ!áãáý(áã!&~ö@w>ÃÃ!áãáÃÒ(áã!&~ö@w>ÃÃ!Íì(> Íñ(É< !€Í")Ø#~Í10Ø7øå*º4^#VÍ4)!$¯wHá~Íd.Íà*>Ú·!ÉF7ø#~¹Â#)É*º4^#V!&~æÈæþÚM)! ,Íó+ÃS)~æ Ä])!&>/¦wÉ!&~æþÊv)ÍŠ)>Íû<·À7É!&~æ€Ä 1>Íû<·À7É!/~·øÅO!&~æʰ)!0å 6# ò¥)áÿ)yõÍ-16ñ<ò±)Í,1Í1Á>ÚÃ!É> Í÷)> Í÷)!&~öwÉåhÍí)á È~#Í÷)Ãã)> -øÍ÷)Ãï)ÅOå!&>/¦wæþÒ*͆0Ã*!€,Íó+áyÁÉ!&~æ�À!&~æ7ÀÍk*þ Ê,*õ!&>/¦ö€wñ!.wþÂX*!&~öw>Ãi*þ Âi*6 !&~öw> ·ÉæþåÒz*Íd0À*!p,Íó+áÐ>É!"Ð4"Ò4!€>[N È#¾Â•* È#~þ Êœ*ͧ4Øëæo& Èͧ4ÚÇ*ÍÀ3æ…o|Îgï*þ]ÊÖ*þ À ÈÃÇ*"Ð4}æ2Ò4É!&~æÀÍž+!/6€Í ,Ò+Í+Â+!&>@¶w7Éö!�,Íó+!&~öwÉÍ\+!&> /¦w! ~þ Â9+#6 #6 ! 6! 6!&~æÊ0Í™+>Íû<·À7É!~þ ÀÕÅ !�+Í?4ÁÑ!Õë*È4#"È4ͬ3ë†w+ë|µÂ~+ÑÉTEMP0000$$$>Ãû!$~·ÈG¯w! 6 #6 #6 !€Nå#ÅG Áwá # È~þ(ÂÂ+ÊÞ+# È~þ)Èþ,ÊË+ÃÏ+# È~þ ÊÞ+þ,Èþ)È È Ãd.æþÒ-‡…o|Îg~#foéþÒ,·7ÀÅÕå! ~ë#åþ ÂQ,V,áå úQ,¾Â),#¾Â*,#¾Â+,#~þ:ÊR,þ ÊR,7yááÑÁÉCMDAUXLSTPUNRDRKBDCONNUL-Û-93 ---.&. -@3@3 - - - - - - - - - -©- - - - - - - - -J.�--À,J.ß,Ë,J.!&~æ!È!&~æ!ÀÍ!æÈ.É!&~æ!ÈÍæ>Âö,>µoÍæ>Â->µoÉ>7ÉÅåÍ-áÁÉ!&~æÊb-!,~!0ÕWÂA-Íx-þÊU-þ Â1-ÃU-Íx-w#þÊR-þ Â--+6{Ñ!(w!/6!/~4!0…o|Îg~·À> ÉÍ—3Ð>ÉÍJ.}æÀÍ æÀ.ÉÍJ.}æÀå!&~áæÈÍ æÀ.É:€< ÉÍØõþ Ê".ñÉñ>ÉÅå!&~æ!/~Â8.4!0…o|Îg~áÁ·À> É!&~æ@!ÿÿÀ!&~æ!È> oÉ|µÈÕů#~+þ:Â�.~##Í®4Ö@þÒ�.͘.~þ.ÂŽ.#͘.¯ÁÑÉ~Í10Ú©.Í®4#˜.> ¬.+#~Í10Ò´.ÉáãëBK>áãõ}|ñ=ÂÅ.> ¯! wáãDM!&q#páãDM!,q#páãDM!*q#páãDM!$q#pÉ!&~öwÉ!&~æÉ!&~æþÈ/æ7ÉÍ,1å!!q#p#6áë>Íûë>!Íû·È7É!&~æ€Êa/>€/¦wÍ 1!*Õ^#VÍ 4}|O{G}æÑõÍ0/Ò‡/Í 0>(ÍH/áØ|!/w!&~öwÉ!*~#¶È!&~ö w!/~æwÍ-1å!0 ~áw!/4òå/¯wÍ 1>Ø!&~æþÌò/!&>€/¦w!*y–#xžÚ£/É>$Íû>!Íû·Ä 0!&~öwÉÍ,1>€6#=Â0É>Íû<·À·Â&0>>Íû<·À7Éæþ!ØÍ•4ÐåÅG!J0Í[0xÁá7È?É.,*:@[]<>()=;_?ÿ~#¸È<ò[0É!/~4·òy06!0Íÿ07À!0…o|Îg~·É!&~ö w!/~æw!0…o|Îgq!/4yð!0Í1yÉÍê0!/~4·òÒ06Íù0ÊÒ0!&~öwÉÍ-1~!0 w!*y–#xžÚ·0É!&~æþÀ>/¦wÍ,1Ãÿ0>!ëÍûë>Íû·ÉÍ,1>ëÍûë>Íûõå!&> ¶wáñ·È7ɯ!*ÅN#F!0 Á…oÐ$É͇1Ø|°ð  ð>7ÉÅz·úe1x·òp1Í]4Í 4ÍS4Ãs1Íe4x·ò\1Í]4Í 4Á|zÚ€1³È>7É£<È>7É|·ò�1x±>7ÈÅÕåz²ò½1ÍS4x·ú´1Íã1ÚÕ1ëÍe4ëÃÇ1Í]4ÍÜ1é1°úÌ1ÍÜ1ÚÕ1ÁÁÁ·ÉÍ]4Íã1ÒÇ1áÑÁ>7ÉÍÉ3ØzÉÍÉ3ØÍe4³Èz?ÉÍe4Â2|·ø>7É|ª7?øz¬ð>7Éz¬ò2¬öÉÍ2·Éz¼Â$2{•È>Ð/É–Â72# x±Â)2É>Ò=2/·ÉÅÕGåÍ*#Íç2Íç2áxõåGÍ3þ Êß2þÂr2!Í@3Í@3Í,3áñÃP2þÂŒ2\Í@3Í@3ÊU2+ÃU2þª2ÊU2Í@3 Í@3Í@3+Ã’2þ ÊÕ2þÂÃ2ÂU2 Í@3>ÃÕ2þÂÐ2ÂU2Ãþ ÚU2w#ÂU2Í,36záÑÑÁÉ#~O·Ä@3ÉÍ,3õ~#·Êÿ2Í 3Ãó2ñÉÍ93Øþ Ê,3ÅO<æþ!Ú"3:|G:{æ=¸Ü,3Í@3ÁØþ 7?Éõ> Í 3> Í 3ñÉÍØæÉå!|ÍK3áà y<æþ Â]3+¶#ð~·È5Éþ!Òh3ÖÊj3É~.Å ÉÅÉõåͬ3õ|µÄ™3ñáÆ0ñÉÅ ð¯)¹Ú¹3‘#ú±3·ÁÉÕT]))ÑÉ·õ{‘z˜Òß3ëÅÍâ3_Íå3_ÁñÉñ7ÉÍ]4zS È)Ú4‡Òô3#å Úý3áÃé333<Ãé3�Ò4# Ãé3õ{ÕÍ*4ãõ|Í*4Wñ„_Ò 4}á„gÒ(4ñÉbj‡Ò54 ŠÈ)�Ú34Ã54x±ÈåÕÅ~# x±ÂE4ÁÑáÉÍf4Ím4µÀÉ y/Ox/GÉ{/_z/WÉ+}/o|/gÉÕ©Wæª_Wæ¨Ozæà«Gzæð©OÑÉͧ4ÐþAØþ[?ÐþaØþ{?Éþ:?Øþ0Éþa?Ðþ{ÐÆàÉl‡vÿ?êLSETDATE.PAScßÿ šÿ‹ÿ–ÿõÿòÿ�ÿžÿ‘ÿ›ÿoÿ×ÿÖÿÕÿ“ÿœÿ !"#$%&ŒÿÄÿ�ÿ’ÿºÿ±ÿØÿ'()*+,-./01234567Åÿ—ÿŠÿûÿ™ÿÂÿÑÿÎÿ»ÿ�ÿ­ÿùÿ°ÿÓÿ¶ÿ�ÿ†ÿ¤ÿ¢ÿ«ÿ89:;<=>?@ABCDEÏÿ˜ÿ¹ÿ¾ÿ¡ÿˆÿ÷ÿÒÿ½ÿ‡ÿÍÿ”ÿ¸ÿ¼ÿFGHIJKLMNOPQRS³ÿ…ÿ·ÿªÿ•ÿñÿÐÿ‰ÿÌÿ¯ÿ¬ÿ©ÿúÿÛÿÔÿÇÿ¦ÿÉÿÃÿÁÿÆÿ²ÿÈÿÊÿTUVW¨ÿøÿXYZ[\]ËÿÝÿŽÿÀÿ´ÿôÿðÿ^_`abìÿöÿóÿîÿíÿåÿáÿÙÿ ÿÿþo«‡ÅùO¤‚˜ÕŒ|®íÜll�jÀ¶J)|Ĺ�¶/&3° Zíðv‚¶z]œRqÏ»‰Ï•V;»‚Q ÷!)|ıBA ­+ËGœì_a5£܉ϕVœŠ pìó—<%Ä€¤ð¬_«`}Í aT Œ«0'<%U­Á'4ÁÀÜ›êÒ¬Ä …� çb nrXnNa)#‹ù€ÁT #E2Lq*Ö¨Ü0)|ëÈ0Å©À¨RÐ(¶”ùˆ“E]ÙA"ƒùuAl̸¢Ì*µC Rø2LíÀYAi^ ØRæ#žuJ;p“ÓÀ’]C'Ö¯§}âÉs¼™œ@‹¤©5t**´ÏŸ<Çtòƒí[E©×«¨ ƒ>BCÑu¥NµáO5ã•™àÉs<%UQC— çb�öù“ç°¦cˆA á>Ç …�xÔ)qsŠ‚þ6 “©÷¿1Há#n¾«�Ùf‹T³šŸ+­vF׫¡®ì ÜˤðÀ%g}XÍÚXÔ•$Bµe¼2:M€ÍUÍ# Ö'X͈A qÉSœ@·LéÌÈb¤ª¬O(v£z >‚~­yÒóDkhcÄ …�à#˜ŠA¿Ö<éy"¼Þ¦è–3\rÖ‡6 ¥*…šŠBŸÒ›b�ÂGÔ•$/PÕœ1²Ð)a`¬fdA†)N´"XÍÈN€cŸ€¤ð£JÕšaT)XͼÀ_w»WuýÊÚ¿â’³>ØeËO9+°%ΨžÄ …�Øíð _¿‚`Š4# ]ànZ0d2l v|ý5™üúE1XÍh‚¤�ÂGL'w¸Æç¯¯î^Ý}Å¿% EpE5†Q¥0OÚÜC�)XÍhÄ …�˜N¦¸Æç¯¯î^ÝýçÖ’ëse±ÕJ×ÄH�UàÆò×ÜtJ;¸a Rø÷gA‰2Câs¥Õ¹ª·•!à ° V3šÇ>/�5#U1Há#ÜŸ¬BûüÉs\öyîÃVTÀT 9‘V°šQ1Á¤ïÉ�ëb�ÂG¸?Ÿ+­vx­·œíÀ¨``²f¤À*UMøùn¶z÷!)|„ûs«ªS¥ëb�Ë>Ï}Ø ¦b˜'mîÁúËÕþä£kšÀ c�ÂG¸?ÿà)ÁT—¨LÚa°µštfü5Á›ŠÁR"F6€ S» b�ÂGL''¸Æç7¯¦w¯¦Á5'7œé”+C ×à†3®^“*xe&pˤ�ÂÇ�æzm¯ñù/¯¦w¯NþEuõš,ÔÀ\3^rŸò}±†©�ûÚœÒy>B RH<®ÚwG)à†}Ò–܇±pWÝ“wÍqv~lðžÔÓÉ«íNñÓ>ƒÏӟ߬1ýñù+æ;Œq2™L—RÀ ­f” ܇1Þž?þ£™á|±8ÿ²ŸN&V3J¦xzÀê ¹¯U)ÜpdtMpË1Þž?þ£™á|±8ÿ²ŸN&#Sü)°:CîkUJ7œs3Ú27ãd2™s£²­õm)ÜpÎ͈'‚Žq¶yÒ`u†óÅâüË~ÎÍhËÔ«3ÌwŒJ)à†¤ÜÕÞYÍh S±Äçkdm؈»FV™” ¥RïÏRÀ ­f”¸!=XÍ(™R ¸a®-ÜUŒnY)Ü0ñùˆ'‚ö0çfÄ•RÀ Ÿ�Œ® @#£k*¥€Ö6]ܰ‡‘Ñ5•RÀ -?嬀ûÐûæˆÕº“n2é~t¥pÂ?¥5ÜÿøˆjËeV©b�nh¹Ê*Ã}è�F§¤J¸—>‚n™Ò™‘ÅHU5,Wû“b�B ÀGL¯ÝË)b�B ?ò®¸çÛyº/&Üä.)|üÈ»âžoY5á&w1HáãGÞ÷[eÕ=›p“»¤ðñ#גּšÑ„›ÜÅ …�yW3º¦ 7¹‹A àíbõØÌž/ô)mK)¤€Þ4›>¢Oi‹¤€^*Î(™R ¸á¥âŒ’ñ}Ò–T(¥€^*Î(ß+ÄPWv�ueùˆ“…ÕŒ pƒ'Ï‘ø\iÅ©À¨R](¥€^*Î(ßé”PWv�¨€©tR¤íV3²½.”RÀ /g”Œï€›ï© f5#$>WZ팮 _¾¼úùóÕlÖ…R ¸á¥âŒ’ñݱÂÀäÊXÎxetJ;(²š¸±ü5·�PWv�¨À  ^J)à†—Š3JÆwÀÍ÷T³šÒ\]¾|yõóç«Ù ue‰Œ®© ¥pÃKÅ%ã»?x²Y+[@çL[Fv‚8‰ ¿ øk�È0° ¦¦v](¥€^*Î(ß}ùòêçÏW³xÖ'XͬœP›?µ±šUj>ëSJ)à†—Š3JÆwÅ®`TÃVTÀT Å`»M;°>!”"Ã`5£5*Ö'uÉ êB)ÜðRqFÉø®zMJqKŠ]Á¨†ÕŒ&](¥€6í¬„�èSÚ")¤|ÄôÚ½œ")¤Þ.V�Íìù¢AÁO�Nþ=�R¡”B ¸á“ó›æ ¦¥RÀ oš‡M QðS£b�nx©8#ßÅÑ,«bŒèB)Üðñü]ƒ[¬Î¤È*“R=)à–7Íæ•ny©8£d|÷¸x„åŠ2«Ô¤T¥Ö˜k‹ÄçJ«]݉ÏGF×J)à–[UÕ[æs_ù_a�îâz^)V¬ñMûŽ\ÆÍ€Š.”RÀ-i›L‰‡Õq…i)ܲig¥¦b‰Ï{RÀ-/gä»¶bÐH|®´ÚõЭ‘ø|dtM¡”"kÃFÜØžpËKÅùîQ›®cqcÑ­‘ø|dtM¡”ÂYͨ'ÜòRqF¾k+»‚Q «¡RàæµNÜÂjFUªÖ¬ ¥p˦�•RÀ /g”L‰>¥m)Å´4í¬„�(ø©Ñ 1H!à#¦×îå1H!ðv±zlfÏ bV3òïÏ¡F·¬Äûó,z°šQ2¡”B ¸áûó…pKôÀ £SR¥pK;EV3J¦”B ¸¡�¸»v/ïƒRÀ Ïž·�ÇͪÅ)±§d}Í͵¾EÜ0:%UÂRâ5g¤ÐCîkÐüªiSJ!ÜòýùB ¸«@Ü0:%UJ!Üò¦yØ´ð§ÄFœ’E RÀ-O‰�8%‹Þ#� *¥€[ž­x�Þ'8®p‡Ù RÀ]mÎ@U2~p|Ö´°Ó=Ç'¼8 7F‡N ¸«æÉ»Š´õ£5ìtÏñ /¡”n¹9ƒ·Ó=Ç'Ü0†¥ÄkÎHœ·3)àþÝÛéž°iaù)gEÀy;ƒ·Ó}1ÈÙópÀ¦…å§œÇgM‹›æaÓJwõ½1¦'ÑWÊz;ÝóCÀ5*e}wÒ…€O¨”õvº/9{ר”õÝIJ)à®6gð/ð}Œš›€óvÿ߯¨õmÀñYÓâ”ØˆS²è�ÁÔ€J4í¬”nÉуãÞ”RÀ-›vVÂGœqJ1H!ÜÐGÜ]»—wˆA )à†7Íæ…�(ˆYÍ1H7äè�1-aÑ£;9yuròêä8é�œ +á#,�ô 1Œ*RªRˆA ¸áæ §ÄFœ’õ'küø±F÷ª 8>kZ)à–›3œqJÖOטޭѽêŽÏšV ¸«ÍN‰�8%ë§k¼™®Ñ¡ 8>kZXôưÓR ¸aÓÎJøˆ‚˜ÕŒƒR>bzí^NƒRgÏÛÇãfÕâ5)>Úù÷ç $ô0çfÄ•RÀý×ûó þ”Ö°\e•Ñ7ŒNIô0¯ªDÚ”R>"áÅ `¨¶dÈ®QTHèWÉà†3®åJYÄ à#Ž}^ W–À ´«#¶•bzž:«ª(0ýŠ9gb�ðÅ®`TàžÌ6 Œ*…bÀ™ž'B®,7§1Høˆwýj�, £Jaž´¹‡Ñ5a>`(ªšðóÝlõ1Høˆ­ªN•® l ¬OH|®´ÚÁèšÀú¤h·ŒA )à†7Íæ…�‘â£b�nXð§„Þ5©Sšï¾RÖ§‹ýô÷!¬Q)ëÓÅ~ú—C¥pÃפøh‡Þ>]ìO#÷•? çí >]ì§|Cî+?½ûÎÛ™p/}ÁŸ¾ã$à¼�Áü)á>OÜœ·3)à^úšÔ)ÍwŒ _)ëÓÅ~úæÖ¨”õéb?½;„€1NB)ÜÐr•UFoŒšÔ)ÍwŒ _)ëÓÅ~úëÖ¨”õéb?ýz¡”n˜.öÓ_ôÆÈ}åOB‰t±Ÿ~= 7Fî+JøˆQ¥`¹BVY§8…û0S*¥�nxüò¶‘nY]Ûm c¼=üG3Ãùbqþe?�L¦ÓVgÈ}­J)à–snr`î�1΋ó/û97£-S¬Î0ß1*¥€[ιQ”·LaŒ‹97в-¥€[ιQ”-€1Íãj1“îÊÐ-ƒ[ö0çFQÞ2UJw¥([¸esnr`îK)"சvVÂG̹Q”-b�B ¸áûó…pË”"Ã.&†nY(‘J‘aè�‘J‘aC·¬”n™J‘aEÙ¢7Fº(qJ̧PJ·<[-ÀÑãÇæÜ¨lk}‹Ù YeŸJ‘aEÙîùa�¬ò¥ ¥p˦�•ð«åþÀÜ#)¤€úˆ»k÷ò1H!ÜðíbõØÌž/Ä[«•RH·ôo®ÝË7ˆA )à–o«Çfö|Ñ€›‚锬f¤™ç·è�F§¤B)…pW7Íæ…�à¦`:%«i†¤€»J{~‹O˜þ8 7Fî+ßç¡DºØó[|Âôó½1r_ùT…R ¸«¦�•ðÜL§d5#̓RÀ-}Ä›k÷ò b�B ¸åÛÅê±™=_4ÈýûZ³Ü×Ìó[ôÀ £SR¡”né#x½MT“a.y²ÈZYÔšå>7§Ð§š›‚!]ìùí1H!ÜÕ“ó›æ ¦¥RÀ]½?_H'8€¸atJª”B ¸«›æaÓÂGäþ}­Yîk†¤€»Úœ!]ìùícä¾ò'ÇgM‹›æaÓÂG$þš@†©b�Nœ­àè�1Åq…鳕pÿ±9ƒO{ŽOà·|ûŽÚèšöüpÞÎàk£kÚó¾}G÷÷.àø¬i¥€û×Ãê¸Â´„�0jÍr1H'|D­Yî¯1ØZͬO°šb�NpS0�’ÕŒ4óü6”hÚY)€i@ÓÎJøˆÜ¿¯5Ë}̓RÀ-}Ä›k÷ò b�B ¸åÛÅê±™=_4Èý{SYÍH3ÏoÑ7ŒNI…R ¸¥�àõ6QM†(ˆ1nNQ� ÍSƒÕŒ ¤‹=¿= )¤€»ºi6-|Dîß›ÊjFš!)à®6gðébÏo#÷•? çíL ¸út±ç·ø„é�ÆÈ}åOBÀy;ƒO{~‹O˜~>`ŒÜWþ$Ÿ5­p‚›‚锬f¤™ç·¡”îªig%|Dîß›ÊjFš!)¤€[úˆ7×îåÄ …pË›æaÓÂGÄ[«!)|üX\Ç Ürs†Ú&£kÚOq¶ZàÍctq;Ÿ5-nš‡M ¡SÂÀXÍÈ")|üX|йo*«iæOB‰Ü¿7•ÕŒ4óoîB‰¦�I·lž¼kpÓ…y †Þy v11tËJ)à–M;+á#¶–ûs�¤�nè#î®ÝË;Ä …p÷‹Õc3{¾hP0m¬V–?%ÿþ|�Ú&£kB#£k*ñþ|�ÚèšÐCmtMl·¥PJ7ôÜl —â͵{ù1H!ÜòìyûxܬZ ¶EŸ�˜¾@Ü×* ‡Üת”B ¸«›æaÓÂG ¶EŸ�b�îjs†ÜǦžÓÝdÒ=í8>kZä>zcä¾ò•²>÷®ñæ.”RÀ] ¶EŸ�zcä~)ÜUÓÎJøˆÁ¶èóC RH·ôo®ÝË7ˆA )à–7Íæ…�(˜6V+ËŸb�nÉÑ㤔n¹hÞ6çG)à®8zcƒœ=¥pËçíqóƒmÑç#æk›Œ®iÏctèJ)à–½1¦%^ 7Æ´DmtMè�ÑÁý³+¥�nùdz͓žãÛŸÎÛÚÕ¾¶Éèšöü€M‹}‡n�nÒ­ÑÅî0[á¦yØ´RÀ]ÕF×´q@oŒÚ&£kÚóC ŽÞÅ gÏC‰è�Q rö/B‰¦�•RÀ-7g¨m2º¦=?`Œ.v8>kZÜ4›V ¸«³Õ/ÐãŽ+|Æl…Úèšö/è�Ñý½+¥€»âè�Q rö<”hÚY)…pË?žmž4hWGøÚ&£kÚó6-öº5ºIw˜­ÀÑ£äìy(¥�n¹9Cm“Ñ5íùct“ÇgM‹›æaÓJwÅÑ£äìy(ñ½1~”RÀ]ýñló¤��ocL§çí íê_ÛdtM{~À¦Å¾C·F»CÀl…›æaÓJ'j£kÚ¿8 7Fm“Ñ5íù¡GoŒb�³ç¡Ä ôÆ(9û¡DÓÎJ)à®6g¨m2º¦=?`Œ.v8>kZ)àÄÙj�è�ñǦSÌV¨�®iÿâ€ÞÝß»M;+¥€[6í¬„�(˜6V+ËŸb�B ¸¡�¸»v/ïƒRÀ oš‡M ¡è5/1H7,˜6V+ËŸ’¯m2º¦5j£k %|«ÀúËeV©F•ª5C RÀ ]zUU,”È¥È0ôÆPUÅJä�RdØÅDQ¶è�‘.Jœó)”RÀ ³Ê—½1NJÛÄÙ|ǨðVYÍÈ[Í(qCa�>_#U¡”nx¶Z€£7Æ Ž+̹QÙÖú³²Ê>”"Ã.&вÝóÃYåKJ)à†g«8zcÜá¸Â],øSÂl…‚UŠr`îKøÖ'\ö«D°\Qf•Ú!)à†›3ø¬ò¥Å·ï°\e•ÎÛ¼å*«Œoßqp|Ö´(ø©ÑÉg•I©PJ7̥Ȱ‹‰¡[†ÞíæI‰bzí^NƒRo«Çfö|Ñ€θNü)•RH7¼i6-|7œq�øSB RÀ Ä|®m(QÜó­"ËeÆ+ãsmC)ÜÐjFÊ[Í(qC¡„�89yuròêä|S¡ØŒjXÍúµæIÏ!)à†–ŸrV 7ƾ;é&“îGw(¥ðñcqƒpÃÚ&£kÚOq¶Zà/ôÆèâ$¢+¥ðñcñ))à†M;+á#¸áŒëÄŸb�B ÀGL¯ÝË)b�B à¦yØ´ð© f5#Ä À g\'þ”J)€Í¨JÆçÚ¬ jäsmŽÏš}J[)€æÉ»7Íæ•nX3º&Ÿk»Fâó‘Ñ5…Å=ß*²\Qf¼2>×6”Røø±¸ŽA ¸áæ EÖfT)ßMº5Ÿ�Œ®i�‘© þ”Æ8ÁñYÓÂGÄ`i¤‰aòäf�¤€[&>]Ó¾ÈÚŒ*å;tk$>]Ó#Sü)œ­ø}@oŒnòäf�®”n¸9Ýò‚>ñùˆ'Z#ñùÈ蚎Ϛ7Íæ•ÂÇ�ŧ¤€[Žx"£kò‰ÏG<щÏGF×JøˆbW0ªQ0m¬VFׄ¤€[nÎðší|âóO´FÁŸÒ–«¬rÀñYÓâ¦yØ´RÀ]mÎЮŽðT%ãsmV P5ò¹¶!àø¬iqÓkZĬfäsm×°šQâ†B)œ(îùV‘åŠ2ã•ñ¹¶¡”NlÎÐ®Ž *Ÿk°Z€ª‘ϵ 8>kZÄŒ®ÉçÚ®QÛdtM¡DÓÎJ)|üX\ǀͬf”¸¡ýg«>0FwròêääÕÉI‡ã³¦EÁO�NÞYÍ(HáãÇâS hž¼k è5/È'>ñDkXÍ(qCkü)øÍ�tÁC‰¦�I·lž¼kPðS£“7K|J4íL ¸aóä]ƒ‚Ÿ�|Ö†�¸±¡DÓÎJ)€¦�Mà#RAÌjFˆAŠÿvëýßÿaÓÎJøˆ‚˜ÕŒƒR>bzí^NƒRgÏÛÇãfÕâ5)>Úù÷ç $ô0çfÄ•RÀý×ûó þ”Ö°\e•Ñ7ŒNIô0*_ÚPJ7l­fäS(¡h[œñÊø´Æ4”RÀ ÿx¶yÒ ”"Ãðí;ÚÍÌVØXîÌ})ÜPѶ*8ã•ñi�“P"] 7†ª*v1Q”m)ܰØ&Îæ;F…Ï*_Ú5ú|�T…R ¸aºØO¿Ð#÷•OU(‘.öÓ_ôÆÈ}åû<”ðŠ^ó‚,�ˆA ¸ávÀ| ¥pæ�•ðŠ^ó‚ƒR>bzí^NƒRo«Çfö|Ñ€θNü)•RH7¼i6-|7œq�øSB RÀ Ä|®m(QÜó­"ËeÆ+ãsmC)ÜÐjFÊ[Í(qC¡„�89yuròêä|S¡ØŒjXÍúµæIÏ!)à†–ŸrV 7ƾ;é&“îGw(¥ðñcqƒpÃÚ&£kÚOq¶Zà/ôÆèâ$¢+¥ðñcñ))à†M;+á#¸áŒëÄŸb�B ÀGL¯ÝË)b�B à¦yØ´ð© f5#Ä À g\'þ”J)€Í¨JÆçÚ¬ jäsmŽÏš}J[)€æÉ»7Íæ•nX3º&Ÿk»Fâó‘Ñ5…Å=ß*²\Qf¼2>×6”Røø±¸ŽA ¸áæ EÖfT)ßMº5Ÿ�Œ®i�‘© þ”Æ8ÁñYÓÂGÄ`i¤‰aòäf�¤€[&>]Ó¾ÈÚŒ*å;tk$>]Ó#Sü)œ­ø}@oŒnòäf�®”n¸9Ýò‚>ñùˆ'Z#ñùÈ蚎Ϛ7Íæ•ÂÇ�ŧ¤€[Žx"£kò‰ÏG<щÏGF×JøˆbW0ªQ0m¬VFׄ¤€[nÎ FUNCTION drdate(d : dateln) : integer; (* 1 Jan 1978 <--> drd = 1. Assumes valid d *) VAR dayspermonth : ARRAY[1..12] OF 1..31; year, month, day, i : integer; BEGIN (* drdate *) FOR month := 1 TO 12 DO dayspermonth[month] := 31; dayspermonth[2] := 28; dayspermonth[4] := 30; dayspermonth[6] := 30; dayspermonth[9] := 30; dayspermonth[11] := 30; year := 10 * (ord(d[1])-ord('0')) + ord(d[2])-ord('0'); month := 10 * (ord(d[4])-ord('0')) + ord(d[5])-ord('0'); day := 10 * (ord(d[7])-ord('0')) + ord(d[8])-ord('0'); IF year < 66 THEN year := year + 100; IF (year < 78) OR (month = 0) OR (day = 0) THEN drdate := 0 ELSE BEGIN year := (year - 76); i := year DIV 4; year := year MOD 4; day := day - 731 (* from 1 Jan 1976, -1 *) + 1461 * i; IF (year > 0) OR (month > 2) THEN day := day+1; day := day + 365 * year; FOR i := 1 TO month-1 DO day := day + dayspermonth[i]; drdate := day; END END; (* #drdate *) (* 1-----------------1 *) )CY[1..12] OF 1..31; year, month, day, i : integer; BEGIN (* drdate *) FOR month := 1 TO 12 DO dayspermonth[month] := 31; dayspermonth[2] := 28; dayspermonth[4] := 30; dayspermonth[6] := 30; dayspermonth[9] := 30; dayspermonth[11] := 30; year := 10 * (ord(d[1])-ord('0')) + ord(d[2])-ord('0'); month := 10 * (ord(d[4])-ord('0')) + ord(d[5])-ord('0'); day := 10 * (ord(d[7])-ord('0')) + ord(d[8])-ord('0'); IF year < 66 THEN year := year + 100; IF (year < 78) OR (month = 0) OR (day = 0) THEN drdate := 0 ELSE BEGIN year := (year - 76); i := year DIV 4; year := year MOD 4; day := day - 731 (* from 1 Jan 1976, -1 *) + 1461 * i; IF (year > 0) OR (month > 2) THEN day := day+1; day := day + 365 * year; FOR i := 1 TO month-1 DO day := day + dayspermonth[i]; drdate := day; END END; (*  PROCEDURE setname(VAR f : text; VAR n : fname); (* parse the name from the input stream in f *) VAR i : integer; BEGIN (* setname *) i := 1; WHILE f^ <> ' ' DO IF i < fnmsize THEN BEGIN read(f, n[i]); i := succ(i); END ELSE get(f); FOR i := i TO fnmsize DO n[i] := ' '; END; (* setname *) (* 1----------------1 *) Ëååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååvÿ�*LTYPE.PAS`ßÿ šÿ–ÿõÿ‹ÿ‘ÿòÿ�ÿ�ÿoÿ“ÿŒÿžÿÕÿ !"#$%&×ÿÖÿœÿÄÿºÿ™ÿ›ÿ’ÿ�ÿ±ÿØÿ'()*+,-./012345�ÿûÿÅÿ¶ÿÓÿ­ÿˆÿÂÿŠÿùÿÑÿÎÿ¹ÿ°ÿ»ÿ…ÿ6789:;<=>?@ABC†ÿÒÿ½ÿ«ÿ˜ÿ—ÿ·ÿ³ÿ¸ÿ¤ÿ¢ÿ”ÿ÷ÿDEFGHIJKLMNOPQRÏÿÍÿ¾ÿÛÿ¼ÿ‡ÿóÿ¬ÿÇÿïÿÝÿÌÿ¯ÿÃÿªÿÁÿ¦ÿ©ÿ‰ÿøÿÔÿúÿñÿÆÿ¨ÿ¡ÿSTUV„ÿ‚ÿWXYZ[\ôÿÊÿÉÿöÿÐÿËÿ²ÿŽÿðÿ]^_íÿåÿÈÿµÿ´ÿÿþïæû›ù“ÁË“Ž�m3«n%g°+Ù­d^j¡E–žªÓYsŠÚ( ³R§’[BqIÅ}€²žA­Ú™€”k¡E–@ÿ^ñ—èIIH‹7ò¤£73ŒVô\šXÈ€ÚØžG&š¤\‹,a¾RX°¼œÀ )×"KÎ>š•êŠ^žt„ÛSÏ£ZÅ–îðGaÛÎ*RRÅ–þ„§\‹,aqI† / oNß ð…Š>@^:C�TA°5ä%Á}M¹Y‚í$[=<�j[)iN6€çQ­bKh¨Ž+/¤R®E–ðæzz62ÿ´¹>›¿Ù·w Ux(Àv’­Š¤¤a 3)×"KøãO�*¼ @J¦y%Úx‚ÁPGQR³�ûšr-²„©bÉÑã ™ÀVaûO¨Ø`ûóÕ£ ÎNðls¶Á.úÂ*2¤\‹,a»Ùâ…5† I š( EôÅÊGÉVmàþ“r-´žíû—çZÀ�¿��ûË>“Ù`»Ù¥pãZµ��÷u‰Ç¯J-àÆ#V¦hÚøîû{[j7±2EøHpã%þöÏnœ%ŒX™¢iãs|Ã)×B àüÓ»J ¸ñèDœX¢¸Œ¦�%t±¸§�6›Çý+R®ܸV±%¸¿/ñîɳÿ«x2Ÿ?ùt»ÝljÕ>Òö;—Ñ”ZÀ�G¬êN¸¯K<ÚlF¬LÑ´ñy©ÜxĪfOp_—ØM¯+ìwx2Ÿ?ùt;bUwÒÜa¿ÃèDR©ܘŒ�ûËÙšŒ™AYéy4ƒ²²¶+ÕÌày¤ˆjfàF5Ôä¥ZŸŸÌµ€m÷— $=—¥pcÏ£š=Á}�`ĪfO¥pcÏ£ZÅ–fZÀ� ÛvV‘’pß'¨Ul©ÔnÌ3-àÆá8Ón\˜bÑÌ´€7Qœ˜€•¤ 2%€,¡6¶…ç6THkNP[ƒÂ¶�U¤$R®ܸ!Ï-K2n<ÁËêûŠËhJd µ5¨ÙTl) åZh‘¥§<ŒXÕì)lX›.†"ú!åZdé)áž»‘¿VŦ‹¡ˆ~H¹Yzʃç)iN6¬ŠMCý�r-²ô”‡ÆHÛDIVŦ‹¡ˆ~H¹YzÊC¸çNÚ «bÓÅPD?¤\‹,=å!Üw¦1…ܰ*6] EôCʵÞÍ÷ϪÇy…Kò]©…pã³êfÚ#K¸$ß!åZÀ�†%y• ×çŸÞUÈŠ¶™�U·’3Ø•ìV2/‡¾�ÉK-àÆ Ã’¼ÊпWü%zRÒâ�<éèÍ £•=—&2 6¶…瑉ædÈK-àÆ Ã’¼ÊÌW –—“!/µ€/ Kò*œ}4+Õ ¼<é·§žGµŠ-Ýá�¶�U¤¤Š-ý9ä¥pã…aI^e—dò’ðæô _¨èä%¡3H[C^Ò�—ZÀ�†%y• °�d«¢‡çQ­bK %ÍÉð<ªUl Õqåe€´C^j7^–äU6àÍõôlþdþis}6³nï@ªð6P€í$[=HIÃfC^j7^–äU6à�?Aªð6P)i˜äe”hã FCEIÍfÈK-àÆU(‘%\’ï�r-´²„í©{½EʵÐx7ß?«æ_¨è³ç˜€ŒÉK-´€ŸU7ÓYBà =R®ÜxaX’W%†%eCJ Õ|¾Ÿ#¥„!/µ€?{ò²ÂsìwZp£ˆj&ZÀ­†%eCoQض³Š”D O…¤fÈK-”•žG-àÖ Ã’²¡·žG&š“ †<�j[ÊK-ÈÖdÌD ¸õYu3íµ€[/ Kʆj¿Ã)<�L4'¨ãÊË“ †<�j[ÊK-àÖ’LË*J*µ€[Wý¡ÔBYYÛ•j&ZÀ­†%eó¨†A¢fÕL0ÌPض³Š”ÌK-<�QCÍD ¸õ°¤lè-<�L4' 3xÕ*¶”—ZÀ­«þP"K(b ¤\ ¸ñ°$¯J-àÆÓžãýG(+k»R ίª—ä»R ¸qÕJd �/TôH¹ZYÂöÔ½Þ"åZh¼›ïŸU‡ó �¤Š-eŸŸÌ¡0A­bKy©�%tÑ‚¼$¨Øjc[ÈK«n%¤¡Ø‚ж�r-´€~2×nÍpë XIº Sj¡Üø¬º™öÈI[Bʵ€3&KlK-àÆ¿®¦×жù�÷1`Àa¯Üzºã=jÕ>ίªgÕÍ´×îÁPl²¢mfP·|——`L–«¢È8/Qõ-àÖÕõË $³¢mòR ¸ñn?c²ã|�Zµ��„Ãê–ï0YbÀPj7®úC‰,!�T±%¤\ -€,a{ê^o‘r-´ÞÍ÷ϪÇy…fÕv…m;«HÉ,1+IdòR K¨�m!/ �¡/lWÁŸ ³�%[E <�jö´z+ ò2J¤\ KG´« 1"¬5�…UÒXyI¨ö;°BAY�­�”kd m4÷dÀµ]©¬ / …m;«HÉ Ü¥\ -àÆÏöýËs-²ô4œ¦\ ¸5Ùº�æîûÙäñß&y©ܺ0pb‰l²};ÉK-àÖ¾†Kd“í£I^j·V+÷÷%²É£I^j‘¥§á[ʵÐnüùÉ\ ¸µ�A’õ n<ÁÈZOQ•²ƒ„]Én%±ˆd½Bʵ€[*¤5pë žÌçO>Ý>Úl¶�_Ýa¿ÃèDR©…pã,áñ©{ý)×B ¸ñîCÿì|ºï±0,)P!­Á#k=EUj7΢÷ÖÈ[CÅ OpÍ(^¤EaÕ2ÒBÒs‰”k7Î É•Q¨£„Å%)�­ÛhîQÛ•j�r-´€[~2×î�TÓI3Ó¬$™™pSAá÷}V’.È”Zh·ÎÞžº×o‘r-´€[ï>ôÏΧû5{¨�Ö`‚‘µž¢*µÐîᬺ™öÈjö>P!­Aʵ€{˜îŽøˆG8¿ªzœU7Ó^‹,= §)¨�ÖÜ>Ân?Lj•)šÀGºÃd Ï£š=ý.µ€ÓÈÖ™çQÍžrœ_U=_¨è3²5“—ZÀ‰ ’™çQÍžòR 8¨�ÖÜŽX™¢ |$ìösŒX™¢ |¤;L–ð<ªÙÓïR 81Ý�l�yÕì)ÇùUÕ#ð…Š>#[“1y©E–ž†o)pA2ó<ªÙS^"1Y"qŠm‰š½THk0YBš•¨úƒpÕõË gÕÍ´×N*¤5·�î0Y‚lÝFs_¢fïÒL–¨£T¢ê¥pU(‘%Ôì} BZƒ”k¡Ü:Kx{ê^¿EʵÐnýn¾V>Ì+„{î|J-´€{8«n¦=²„pÏ�¯R®Üï«éu…¬³¬$¼Çöñ«Oú²@…´æ¶³¬$™;,á뇽p¢³¬$L–«¢È:ËJ’ÉK-àªþP"K÷Üù: åZh·ÎÞ$žº×o‘r-´ÈÒÓçßfÍé,œ‚½§‹è›ÆP�*¤5·�e%É`·ŸcûøÕ]Î —d)×n}VÝL{d Ã’Ò¤\ ¸õt‡š½THkp~Uõ8«n¦½p Ã’ÒL–�fE%:ËJ’Ád‰G%Â=w¾¥p¿®¦×:ËJ’Á{l¿Âa¯œ˜î¨�ÖÜv–•$s‡÷A¶n£¹ÇùUÕ㬺™öZÀ½ ÕtÒ`²D(¢ª­ÉÈÖm4÷3*¤5·�e%ÉÜͰ}üê´³¬$™¼ÔîEÇTP8b²D(¢ª­É 3C BZsÛYV’ÌÝ ÛǯpŠÎ²’dòÓm©Ü‹éSAáˆ÷x„ó«ªGÇTP8b²Äöñ+œ¢³¬$-à^T×/+ø$Y¯0Y¢Ž>P©Ü‹é©¦“ï?âQŽó«ªG–Pós°÷t=ÈÖ)×îÇt‡Ž© pÄÇ%H5�48¿ªztL…#&K�j:ipŠm©Ü‹…aIY BZsÛYV’ vû9¶�_Ýa‚Ž© pÌKd �ŽXXs�r-à^t–•$ƒÉ�e%Éà:¦‚±ÔîÅt‡Î²’dðÛǯp~Uõ8«n¦½p?†%yU"K¨íJ5ˆ( R^ÂÇ Éz…ÉÒ¬¨ÔîGgYI2˜,VE‘u–•$“—÷Üù:”¨úC©Ü‹ª?h'ªë—Ϊ›i�,¡¶¦ Ðs–H¹p/:ËJ’Ád‰íãW%†%*¤5˜,QG¨DÕJ-àDÕ´€[W×/+, K THk0Y¢Ž>P©ܺê%²„…aI� i R®E–ž>?…¡ ­!ØN²U)×B ¸q–ðøÔ½~Œ”k¡ÜøÝ|ÿ¬:|˜WX–ÔDIY%aV’.Èä¥pã,a‹ÂC¡³ª �[üoTØþüŸWH¹ZÀ­??™k÷pBÑÌÐZ%/ghâ 0+IdJ-´€[g oOÝë·H¹ZÀ­ßÍ÷ϪÇyO±auq$c)dŒ XIº “—Èm6?Â*‚”k¡ÜÃYu3í‘%xŠ «‹#K)×îaºã=¶�p~UõX–” �†¼ÔîaaXRƘ`›—ZÀ=Tý¡D–à)6¬.Žd,¤\ -àÖYÂÛS÷ú-R®…pë³êfÚ#KX–ÔDIH¹pëÆHÛDIY%ÍpBÑÌÐZ%/ghâI^j·^–” òžbÃêâHÆRÈN(ükÀöÑ£¼Ôn½0,)þ1ä%<ņÕÅ‘Œ¥�µVÉ˼Ôn½0,)þ1ä%<ņÕÅ‘Œ¥�5ñ$/µ€[Wý¡D–°0,©‰’�r-´€g �OÝëÇH¹ZÀ�Ϫ›i�,¡Yµ]aÛÎ*R)×n¼0,É«R ¸ñ°¤,1Áv†† kšVȆ™pÂó¨V±%LЍjk²à žGµŠ-ÍP«6ð‘òÓí CŽa¦œ(lÛYEJæ¥pãéM”„�x„ó«ªÇYu3íµ€[/ KÊLU�Ñ{j†¼Ä°¤&JÊš()/Qõ‡R ¸ñ°$¯Jø$Y¯0YBš•ZÀ�]M¯+, K THkpØ#KðÖvHy©ÜxºC¿?‡�A’õ çWU�…aI^•ZÀ�«þP"KhVmWض³Š”DʵÐȶ§îõ)×B ଺™öȼ<é)×0HfEÛä%Â=w†6TH¶*+Ú&/µ¦;�õ*+Ú&Ç~²uV´MŽó«ªÇ%ùN  º~Yᬺ™öZÀ�wû9“%¶8ߣVmà#á°‡çQ­bK·|‡É†R ¸qaÛÎ*R“%<�j[*µ€Ow(Úæ7–Nœ_U=Ϊ›i¯Üú‚dV´M^"�T±¥Ìó¨V±¥¼DÕJ-àÆáž;C *$[•m“—Zdéi8M¹pãéžGµŠ-Ýnï°Ä€çWUÏ£ZÅ–n·ØíçØ>¾Ãd‰ázz62ÿ´¹>›c(µ€OwETµ5Ù°fð<ªUli†Zµ��”c‰G8¿ªzd ¬‰ÍõÙ)×níyT«ØÒm(¢ª­É 3xÕ*¶4C­ÚÀGʱÛÏñ×;L–6×gs ¥pãéôœƒ ™çQÍžfð<ªUl)ÇùUÕ㬺™öZÀ­kö¤bK™çQÍžfð<ªUl)/‘%ì¬A8 ’Z¨ØR®E–ž†o)×n=ÝÁóˆ”4'™çQÍžf(lÛYEJÎŽ3¦X434QRŽó«ªÇYu3íµ€{ÈF>ª{¶í¬"%g¨íJ5ˆhØP!­9Aʵ€{˜î@¶ÎжɱŸƒ¬WYÑ69ίª�/Tô7Ѝ¡&×~Yi'æÕ»êɹp/I[Ê ÛvV‘’y©Ü‹éžG¤¤9É<�jö4CaÛÎ*Rr†pœ¡0Å¢™¡‰’rœ_U½p?šUÛ¶í¬"%³p̵€{Q]¿¬øBEŸ)+k»RM^j÷"Üsg¨aC…d«²¢mòR 8ñ¡?Ÿ^ƒl�m“c?Y¯²¢mòUÐn]]¿¬øBEŸ)+=�òUÐn\]¿¬øBEŸy)¢†š¼DÕJ-€ª?l�%xyÒR®Å;óÿÙšŒ™AYéy4ƒ²²¶+ÕÌày¤ˆjfàF5Ôä¥ZŸŸÌµ€m This is the release date of the disk. !K"Kÿÿ$K%K&K'K(K)Kÿÿ+K,K-K.K/Kÿÿÿÿ2K3K4K5K6K7K8K9K:K;KK?K@KAKBKCKDKEKFKGKHKIKJKKKLKMKNKOKPKQKRKSKTKUKVKWKXKYKZK[K\K]K^K_K`KaKbKcKdKeKfKgKhKiKjKkKlKmKnKoKpKqKrKsKtKuKvKwKxKyKzK{K|K}K~KK€K�K‚KƒK„K…K†K‡KˆK‰KŠK‹KŒK�KŽK�K�K‘K’K“K”K•K–K—K˜K™KšK›KœK�KžKŸK K¡K¢K£K¤K¥K¦K§K¨K©KªK«K¬K­K®K¯K°K±K²K³K´KµK¶K·K¸K¹KºK»K¼K½K¾K¿KÀKÁKÂKÃKÄKÅKÆKÇKÈKÉKÊKËKÌKÍKÎKÏKÿÿÑKÒKÓKÔKÕKÖK×KØKÙKÚKÛKÜKÝKÞKßKàKáKâKãKäKåKæKçKèKéKêKëKìKÿÿîKïKðKñKòKóKôKÿÿöK÷KøKùKúKûKüKýKþKÿKLLBRDISK2.DOC BC 17 4224 33 LBRDISK2.NOT 7C 49 1664 13 LBRDISK2.SET 17 42 1280 10 LBRDSK22.COM 7E 98 7552 59 LBRDSK22.NOT B8 59 384 3 LBRDISK3.COM F0 29 7552 59 LBRDISK3.DOC F1 1C 4224 33 LBRDISK3.SET 95 95 1152 9 LLF11 .COM C8 A2 4608 36 LLF11 .DOC D7 34 1920 15 NOPIPES .MAC 7F 15 256 2 SETRSX .COM D8 87 1024 8 SLUDIR11 Fog Library Disk FOG-CPM.160 Copyright (1987) by Fog International Computer Users Group to the extent not copyrighted by the original author for the exclusive use and enjoyment of its members. Any reproduction or distribution for profit or personal gain is strictly forbidden. For information, contact FOG, P. O. Box 3474, Daly City, CA. 94015-0474. as part of the description of a file indicates that the program is distributed on a "try first, pay if you like it" basis. If you find the program(s) meet your need, please refer to the author's documentation for information on becoming a registered user. Only by registering and paying for the programs you like and use will the authors of such programs continue development. Often, more complete documentation, additional modules, and new releases are available only to registered users. Files for working with Library Files (.LBR) as well as various Library utilities written with a pseudo code implementation. Filename Description -03-00 .87 This is the release date of the disk. -CPM160 .DOC This is the description of the disk contents. RUNPCD .COM 145C 15K [RUNPCD 1 of 8] This program runs the files with a PCD extension. In this case they are a pseudo code program. They are much smaller, and much slower. READ .ME 05B4 2K [RUNPCD 2 of 8] EXPAND .PCD 9038 1K [RUNPCD 3 of 8] LDIR .PCD 6FD8 5K [RUNPCD 4 of 8] LSETDATE.PCD AF17 3K [RUNPCD 5 of 8] LTYPE .PCD DE3F 3K [RUNPCD 6 of 8] PCDHELP .PCD B1A4 5K [RUNPCD 7 of 8] PATCH .DOC 0569 1K [RUNPCD 8 of 8] CREATE .COM 3B2E 2K This creates a .LBR file template. LBRDISK2.DOC BC17 5K [LBRDISK 1 of 8] This set contains the programs, documentation, and notes on how to set up an .LBR file as a pseudo disk. Implementations % are here for CPM 2.2 as well as CPM 3.0. LBRDISK2.NOT 7C49 2K [LBRDISK 2 of 8] LBRDISK2.SET 1742 2K [LBRDISK 3 of 8] LBRDSK22.COM 7E98 8K [LBRDISK 4 of 8] LBRDSK22.NOT B859 1K [LBRDISK 5 of 8] LBRDISK3.COM F029 8K [LBRDISK 6 of 8] LBRDISK3.DOC F11C 5K [LBRDISK 7 of 8] LBRDISK3.SET 9595 2K [LBRDISK 8 of 8] LLF11 .COM C8A2 5K ver. 1.1 [Library Lister 1 of 2] This program lists the files within a Library (.LBR file). LLF11 .DOC D734 2K ver. 1.1 [Library Lister 2 of 2] NOPIPES .MAC 7F15 1K This is an assembler macro to eliminate writes to disks. This is helpful for a remote system. SETRSX .COM D887 1K This program can be used separately, or with the program LBRDISK. It helps set the proper system extensions for another disk drive. SLUDIR11.ZQ0 5B6D 3K ver. 1.1 Sludir is an updated module for the SYSLIB  collection LDIR .COM 6599 16K [Library Directory 1 of 10] This set contains the program, squeezed Pascal source code, and a version customized for bulletin board usage. LDIR .PQS 1C07 9K [Library Directory 2 of 10] DRTODATE.INC 107A 2K [Library Directory 3 of 10] LOADDIR .INC 2334 3K [Library Directory 4 of 10] SKIPBLKS.INC 8685 1K [Library Directory 5 of 10] SKIPTO .INC C107 1K [Library Directory 6 of 10] SKPRDRKT.INC FFA9 1K [Library Directory 7 of 10] SORTDIR .INC 9F03 3K [Library Directory 8 of 10] LDIRBBS .COM 9606 16K [Library Directory 9 of 10] LDIRQ .PAS E543 1K [Library Directory 10 of 10] LSETDATE.COM 62F2 13K [Library Date Set 1 of 4] This set allows you to set the dates within a library file. LSETDATE.PQS 7CFE 8K [Library Date Set 2 of 4] DRDATE .INC AA99 2K [Library Date Set 3 of 4] SETNAME .INC 2CDC 1K [Library Date Set 4 of 4] LTYPE .PQS 3EC1 5K This is Pascal source code for a program to type a text file from within a library.  filedesc SET ALTE OFF SET ALTE TO SELE A STOR diskf-"-"-SUBST(dfile,5,3)-"&mdiskno"-".DOC" TO malt SET ALTE TO &malt SET ALTE ON DO WHILE diskno="&mdiskno".AND. .NOT. EOF() IF diskno="000" IF dfile="FOG-DOS" ? " åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååå&ååååå'ååååå