IMD 1.17: 24/11/2010 19:35:21 11 pascal 1.4I disk 2  @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ &lŗkm HBf     &  %C e U7F ?IO ERROR WHILE BOOTING? 7$ ?NOT ENOUGH CORE TO BOOT?    e   ևߕ vߕ 7| SYSTEM.PASCAL? w7b SYSTEM.INTERP? @Aw  `! mG~d!~  ^\F C& J&  0  EN  ~ TEM.PASCALj$# _~U@pe5w E ŋw Ŋw C! @ D~̋   wTwDԤ eeW 7 ?YOU DON'T HAVE A  ߋt_v @ @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@PCL1.4I z&xp SYSTEM.CHARSET.  SYSTEM.SYNTAXji#PSYSTEM.COMPILER*Pq SYSTEM.FILERk@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@*q SYSTEM.INTERP#J SYSTEM.PASCALl SYSTEM.EDITORl WORKFILE.TEXTHz  DRAWER.TEXTHz@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  PLOT.TEXTHz ABC.TEXTHz&ABC.PMDH.&vxABC.CODEH.&@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@>>$$$~$~$$>> >&&228DD800   $~$|888H.S602.CODEH.S603.CODEH.S ~888``0 @@<@@>`PHD~@@>>@@B<|>BB<~@ > BB>BB>~~ý directory of$Pdd0&"d-ˡ2De>"rBB^@BBB~BBB>> ">B""B~BfZBBBBBFJZRbBBB>~BBBRr~@>BB>BBB<000 Q 0 ̌̌̌? ?B<@B<~BBBBBB<BBBB$$BBBBZfBBB$$BBBBB$~B B~>> 0``|@@@@@|"?< ~ ``0<@\B|:FBF:BBBB>pp`> 3cc3O^ہہǻýýÿýýýÿýýýýݽݽý :Number expected  107:Incompatible subrange types  108:File not allowed here  109:Type must not be real on  145:Type conflict  146:Assignment of files not allowed  147:Label type incompatible with selecting expression  148:Subra 110: type must be scalar or subrange  111:Incompatible with part 112:Index type must not be real  113:Inge bounds must be scalar  149:Index type must be integer  150:Assignment to standard function is not allowed  151:Assignmentndex type must be a scalar or a subrange  114:Base type must not be real  115:Base type must be a scalar or a subrange  116:E to formal function is not allowed 152:No such field in this record  153:Type error in read  154:Actual parameter must be a varror in type of standard procedure parameter  117:Unsatisified forward reference  118:Forward reference type identifier in varriable  155:Control variable cannot be formal or non-local  156:Multidefined case label iable declaration  119:Re-specified params not OK for a forward declared procedure 120:Function result type must be scalar, sub 157:Too many cases in case statement  158:No such variant in this record  159:Real or string tagfields not allowed  160:Prerange or pointer  121:File value parameter not allowed  122:A forward declared function's result type can't be re-specified  vious declaration was not forward  161:Again forward declared  162:Parameter size must be constant  163:Missing variant in de1:Error in simple type  2:Identifier expected  3:'PROGRAM' expected  4:')' expected  5:':' expected  6:Illegal symbol (mayb123:Missing result type in function declaration  124:F-format for reals only  125:Error in type of standard procedure parametee missing ';' on the line above)  7:Error in parameter list  8:'OF' expected  9:'(' expected  10:Error in type  11:'[' exper  126:Number of parameters does not agree with declaration  127:Illegal parameter substitution  128:Result type does not agrcted  12:']' expected  13:'END' expected  14:':' expected  15:Integer expected  16:'=' expected  17:'BEGIN' expected  18:ee with declaration  129:Type conflict of operands  130:Expression is not of set type  131:Tests on equality allowed only Error in declaration part  19:error in  20:'.' expected  21:'*' expected  50:Error in constant  51:':=' expect 132:Strict inclusion not allowed  133:File comparison not allowed  134:Illegal type of operand(s)  135:Type of operand musted  52:'THEN' expected  53:'UNTIL' expected  54:'DO' expected  55:'TO' or 'DOWNTO' expected in for statement  56:'IF' expec be boolean  136:Set element type must be scalar or subrange  137:Set element types must be compatible  138:Type of variable ted  57:'FILE' expected  58:Error in (bad expression)  59:Error in variable  101:Identifier declared twice 102:Low is not array  139:Index type is not compatible with the declaration  140:Type of variable is not record 141:Type of variable mbound exceeds high bound 103:Identifier is not of the appropriate class  104:Undeclared identifier  105:sign not allowed  106ust be file or pointer 142:Illegal parameter solution  143:Illegal type of loop control variable  144:Illegal type of expressi n octal number  250:Too many scopes of nested identifiers  251:Too many nested procedures or functions  252:Too many forward y*?CC.TEXTy*? COMPILER.ggE#* COMPILER.PMD#*references of procedure entries  253:Procedure too long  254:Too many long constants in this procedure Ɓ-ġX*SYSTEM.SYNTAXƁ. Ɓ/Pʁ. Ɓ/Ɓ/' Error code # 256:Too many external references  257:Too many externals  258:Too many local files  259:Expression too complicated  300:Di   In procedure  , in file ?^^^?ˍvision by zero  301:No case provided for this value  302:Index expression out of bounds  303:Value to be assinged is out of b^?^^ؚ Dá 1D D DڂڕڕǴ <---< ERROR!ounds  304:Element expression out of range  398:Implementation restriction  399:Implementation restriction  400:Illegal char' (continue), (terminate), EditEeÍ ^? ǐ^Í ^  á E acter in text  401:Unexpected end of input  402:Error in writing code file, not enough room  403:Error in reading include fil D*?ˡ? D;?ˡǑá á ??n_ڟá _e  404:Error in writing list file, not enough room  901:Value out of range  902:No such procedure in segment-table  903:Exitؚ7؞áeá ؞á٢ؚ٢ ؚآ آ< bAA áD á  from uncalled procedure  904:Stack overflow  905:Integer overflow  906:Division by zero  907:NIL pointer reference  908:Prá P P \ ( ؿ؞؂ 4 $áogram interrupted by user  909:System IO error  910:I/O error  911:Unimplemented instruction  912:Floating point error  913ˡ,Í + ۹-ëڳ0+ë"+-Í+ë*á claration  164:Substition of standard proc/func not allowed  165:Multidefined label 166:Multideclared label  167:Undeclared l:String overflow abel  168:Undefined label  169:Error in base set  170:Value parameter expected  171:Standard file was re-declared  172:Unde8 "| / COMPILER clared external file  173:Fortran procedure or function expected!  174:Pascal function or procedure expected  201:Error in re PASCALCOCOMPINITFINISHCODECLARATBODYPART TEXT) ) =á    {  "$&;E);<<> R؟ˡM٣0:٣ á3٣ á,٣'u undefined(*,.2468:<F2 TVXZ\^`bdf nprtvxz|~)Z 899á_ 88ˡ8á(4/á áǐ  (ٟˡإá8 8S8ˡ8á 8ˡ8Ä  M8ˡ؟؟}" ġ<_ڟˡ(áڣa #g #Ch543(7 Fܣ E;8!8 8 9L8á< 8 8ܢܢ ܢ-ܢ ܢ7ܢFܢ"ˡP(.TEXT-"ˡǓ(.TEXT-󫁥D?? ZX-2410ښ  á !ڧ)áˡ < آآآآآآPREAD ЩREADLN ЩWRITE ЩWRITELN Щb[B>$=7ݡ  XXXXݡXX؟ˡYYYX ښXؚ EOF ЩEOLN ЩPRED ЩSUCC Щ ORD Щ SQR Щ ABSdn(,6D?A@;;ȡ));٢٢ Щ;;<EF=ǂܢۚ 8áhVZJƄƅ?Ƅ;ƅgƁƃ ƁƂ B SJ  Ƅ Щ NEW Щ UNITREADЩUNITWRITЩCONCAT ЩLENGTH ЩINSERT ЩƄ;ƁƁ#v @ |Z6 vf4  88ˡ8áDELETE ЩCOPY ЩPOS ЩMOVELEFTЩMOVERIGHЩEXIT Щ++٢٢**٢٢))٢٢((٢٢&&٢٢'',٢IDSEARCHЩTREESEARЩTIME ЩFILLCHARЩDISPOSE Щ########ЩREWRITE٢)%%,٢٢)$ $٢P٢٢٢+٢ ٢ ٢)٢P ۦINTEGER Щ ЩCLOSE Щ SEEK Щ!RESET Щ"GET Щ#PUT Щ$SCAN Щ%ۢ +ۢ  ۦREAL Щۢ *ۢ  ۦCHAR Щۢ )ۢ  ۦBOOLEAN Щۢ (ۢ BLOCKREAЩ&BLOCKWRIЩ'DRAWLINEЩ(PAGE Щ)SIZEOF Щ*DRAWBLOCЩ+GOT ۦSTRING Щۢ $ۢ  ۦTEXT Щۢ 'ۢ  ۦINTERACTЩۢ %ۢ  ۦMAXINT OXY Щ+̀ʀȡgٳlpڡ  ̀ʀʀʀ ڡ ʀʀʀʀٚ LЩۢ +ۢۢ / /ۦINPUT Щۢ 'ۢۢۢۢ/ . .ۦOUTPUT Щۢ 'ۢۢۢۢqb ODD ЩCHR ЩTRUNC ЩROUND ЩSIN ЩCOS .  ۦKEYBOARDЩۢ 'ۢۢۢۢ ȡN ܢ (áܦFALSE ЩܦTRUE Щܢؚܢ ЩLOG ЩATAN Щ LN Щ EXP Щ SQRT Щ MARK Щ ښܢ (ٚ ۦNIL Щۢ &ۢۢۢ  j5 5ئ Щآ آ4 4RELEASE ЩIORESULTЩUNITBUSYЩPWROFTENЩUNITWAITЩUNITCLEAЩHALئ Щآ آآآ3 3ئ Щآ آآآآآ2 2ئ Щآ آآT ЩMEMAVAILЩWWȡܳF0ܹ( XX +X)+ XX *X* 11ئ Щآ آ آآآآآآآآآ00ئ Щآ آآ آآXXXXXX ۚXp+g( XX +XL*FA9+0(  ˡ á @ @BB s;;ȡa);šJSegment ٢    ٟ %>l ڟ˶zcڧ+ڧ*˄2 ġ%ɡ܂4 words long.;;A  linesBšX, B<  secs, BA  ɡ۸km2S@š  ڢ ڢڢڢ lines per minute. BSmallest available space = >  words. ;;ȡ);/ ł ڢڢ ˡ   ٶ˄/ڣ %ڣ áڢڣ ڣ Ȅ ڢڢ  ;;;;ȡ1);ȡ٢ ;;C  "Compilation errors.٢٢٢ á   ٢ ٢٢٢# #á!  $wd B s;;ȡa);šJSegment ٢   á  áU   ˡ8 ȡ,* m    ء n    NJ; : "!#ڦPROGRAM Щ \8Y\V words long.;;A  linesBšX, B<  secs, BA |YGtSP<MxJتP"ˡ: Can't  lines per minute. BSmallest available space = >  words. ;;ȡ);open . RN L7 Compile: ƂPƂ *Ƃ  ;;;;ȡ1);ȡ٢ ;;C  "Compilation errors.̂*Ƃ*$Ƃ*:Ƃ*LƂ*P;̂*Ƃ*ƂPƂ*.TEXTUƂ*TEXT ̂*Ƃ*ƂPƂ*.CODE[*]XƂ*Y Y Yá _ˡ   á2   ޚߚCODE ̂*Ƃ*ƂPƂ*.PMDTƂ*PMD ;ˡǑ @C   7 _ٟ٢٢    " " ˡޢߚ á  á  ád ٢ :UCSD Pascal Compiler [I.4i](>   -;:u 7_ٟ٢٢ ǔ á   ޢ ˡk }ާ$Äf  ݧ+á٢--٢٢٦PROGRAM Щ٢ ٢٢٢٢٢;٢٢ ٢!á_ á );-ˡ -4ō P Pˡ ާ$  á  ޟˡkޢ ǔ -   á (Sá  á  C. jrxBN0  Ƃ*.CODE[*]XƂ* ݚ á   ޢ ˡk ޟˡ/ á&ˡ *áǏ š f ޚ   ˡ ál ˡ áá&     ݟˡ   ڢ ۚ,ٟˡ)گ ٧,ˡآ,á%    ޚá؟*/3/"jآآ ái# # á)  ,ˡu , r á3 ݥݢٚݢݢ ݢݢ7   G  إآ آ,آ ,$ ˡ ˧  l   V V VG ˫ á  Gٟˡ>ݢ ۚݢ܂á۟ˡáݢ_Y á+á$ G G ,á á  ޚ_ؚá%    G,ˡu ,/3 >    ݟˡ2ȡ%ݧ*á m ݧ+á Ǖ ߢݚq ˫ á áw  @ ! @á  ˡ 6     á   ߟˡ ál ȡ 熚 ߚˡ9 ޚ7   . ˫ á á^   ˡá  ȡ ǎ  ޟá-á  ɡ _  łáy  ȡ ㏂ޟˡ  ߚ  ( (  á( @ _ޚ á  *á  á   ޟˡ&ާ+Íާ*Í s  ާ*ár ! á+    آߟˡ\ݚ˄< Í   ł á        ˡ o  ޚޟˡ% š ǩ M.áH  á    ٢ ٢ ٢٢    ˫ á  á  á (  ߢޚޟˡ ,(ߚ  ٟá249; #áQ_؟ٓ  öń ˡ%      ł  á%    ˡ Ǧ ٓۢۢڢؚ      ˫ á  ˫   Í  oo    á̜ ˡ  á ۥۢ ۢۢ ) Ä   آ ٚآá>   ޚ      ˫ á á%     ˡ  á ݥݢ ݢ ) Ä  áܣ Äܣ ÄޓǠ ޓá 7E;ء:   Gڳáقšخáخǀ  خjȄ 3ǔ :EǕá EEá a۟ˡ>á-ˡ& á    ߧš߫;ܣ .aǀ Ȅ ?á(ۢá  (ۢܣ ;EؓǏ   17 F ܣ F7ɡ77  ɡ. _ޡ 9á ۢښ(ˡLJ !خ ٢`m ۢۢáޓܢۚo ޓܢۚáP á4ޡz  ܢ ݚݟˡ x ܢ   `mɡ(ġ 9!٫خ5R ˡr*˄&á*á33S,á'ޓ{ á  "á=ޡǡ ܢ  á    39  88 67)##:<> 4!zO˄ ˡS>á+8 7 FءE;$ V   á  á  á  á   876ˡǐ #;=? E.d ˡhP &ǐ G(á%27 !á  ˡ"܍  J9[ |X p86   !ˡ"g 0 XEv   á  ! á'  6áޓܢۚo ޓܢۚáP á4ޡz  ܢ ݚݟˡ x ܢ   7 _á 7á'6  2 Í Ä á"   ޓ{ á  "á=ޡǡ ܢ  á    39  88 : ˡǖ g   8ˡń P; P P8 7 FءE;$ V   á  á  á  á  áܟˡˡ NJ  >ˡ ˡq ܟˡ < , ! ȡ .ǀٿBǀ &á& ȡڢ 〮šNj ˡA*á ! @$ńˡá   á   ݚٟm. nء` Ǐ <; :;E :š >ǀ 3áná šˡ ۚš$ ġ á  E  Ǐ á ); áá_ ܟˡ?ܣáܣÄܣ Ä_ٳ0d@ HJ'ÍȄ'á ؂ ؂ #Ȅ؂ خ @MÍǀ  ɡ ٣šث٫+áMM" ˡ ˡ} ás áeNORMAL Я ܮܮM} ˫ áۮM57 !ޣ á ޣ ˡǐ áٟá~ áˡˡ nj  áˡ á ǘ   # ǐ  " 2 ILOCK Я 2PURGE Я CRUNCH Я    M" Í Ä á"   ˡń   WˡO Í;áá ˡ çáǏ } Yá  +ˡ} } M E?9ˡ )ˡǏ  MǏ ˡńǍ  P P W,WWpá    (a73 7ˡ +ˡ} á  )á á á}  }  3ۮ .)Ä Iá >ءǚ á0)á(=ܢܢ= $ ˡ )ˡ} á  " á   + ˡˡ}  ˡ} $x" ˡ' áˡ át á "  ˡǏ á   á  "+ˡ} á  +ˡ} %ááǞ eˡǢ WˡQ ٧*Íǟ < -ٟˡ á t ߮خ M+ á   *áȡ3á  <  á  á á   á á"ˡ +ˡ} *á  خMá   ˡ+*٣ á٣á0  !á - ؟ˡأ á أ أ } } R+ˡ} á  á%٣  27٣ ٣ ٣ á'٣  67٣ ٣ J/ö9  ˡ(á!)á "   á  "+ˡ} á( á"+ˡ} á  á   ˄ٮ"ág  ˡK+ M :* M)) M M+ˡ}  á8خ2خ"ɡٮM2خ} ˫ áٮM  .ö7. ˡ(á!)á "˫ ɡ šث $ ٚ+x á+ˡ/ á ˄ۮ&؟ˡ ȡ á& &ˡ +ˡ ا+á ١M ا*á8١îá2خá  ˡ +ˡ} á   ˡ +ˡ} á1M2خ٣á# "ˡ +ˡ} M]ا)á ١MJ ١M5 )ˡ ݕ  ˡ} ˡ!áM )  ÍM{wsokgc^+V  f& D$ˡ ەˡǁ ؚ,'$)áoL)&(&$|~|zL C:a_cecacaoagݡá  " z +á  )Í ˡ ȡ  $ )Í ˡ ȡ ۟˄á+á   ǁ *+á ا*$#M: M M.  ۣáۮ&ۣá ǂ ˡ# ' P' a ۧ*á ۧ(á ۮˡá+  *  á) ߧ$ ߢ߫     ǃ  DŽ  s $  ˡ  ǃ 4ǃ   "ٟ˄ڟˡ٣ áȡW)Äá <ç! &+ڧ* *  á   &ˡ(ˡ LJ   á ߫ $C Ä +&Pˡ ݕˡǎ ګ+á ág  á ˡǎ ǚ  ˡˡ Lj   Ȅ   áF    lj ݡȄǎ ٟˡˡá  ٟˡ~ ޣ áVޣáޣ ;ˡ Mޣ ޣ 4ޣ áBޣ %ޣ 7áNޣ ޣ áO ݡ 㔜ޡߢ߫lj ˫ á  ޡ, = = .ޣ ޣ ޣ ˄ޣ "أ áأ á t ܳo"== ==V&Ni "$&(*,.02468:<>@BDFQA1ܹ !ݡ2  ˡˡ} )ÄǏ /áM M (ˡáá M &~$&&'á &۟s ˡ ġ} +ˡ+á*á} +ˡ+á*á} + >˄ۧ++Ä0#ۧ**Ä   dž #ۧ**Ä dž cۧ++Ä dž +á  á   ˡ +ˡ} Má Hۧ++Ä dž -ۧ((Ä dž  z'_F $ &% (`   M+ á    á   á %!+á*á dž (á %۟˄ۧ++Ä0#ۧ   + ˡ +ˡ} á    ˡ +ˡ}  " ˡ **Ä  dž jۧ++Ä0#ۧ**Ä  dž (ۧ((Ä  dž  ٮ `, 9ٟ߮ˡ٧*Í ǐ  á    ٟˡ_ P&  Kf  v(ڟáR@ڧ+á$ڧ)áڧ*áڧ(á3 ܟˡ ȡáǜ   ܚޚ۟áښǓ ˫ á  (Hd3کޢٚޢ ػޞ$4٣٣ Ä˄,٣ 34٣ 4Jڟˡ9˫  Í߮ ݟˡc ݚܟá ,   9 š   ˡ5ˡ5^5š';F4ĥ_˄_562  ( ݟá á  @?mNO+- خ (J˫  á خ >ɡ>؟ˡةأߟˡáuˡo ńM2 6 +*ˡ )5 GI X. ٮ @ خ á 6 (9ٮخ B/áW   á( áڦ????????ЩA@_ ˡ  _ߟˡN2 2    Ǜ ؟ˡŧ* Ǐ   A áW ˡ>ˡǐ 0 !,á%á)áM(J˫  á  _ߟ؟ˡç!  Ǒ 3   ǀ @ˡsˡǐ e V؟ˡˡ2 M؟áV!أ áA - á_ ˡ `mˡǨ  槁 !Dž  ~m0*564/1(0!7/ 1, )ǁ ( Zrç! 8߮ 6šá40Ǒ 7 @ !á 6 $@خá ˡ ō  á ) ˡ ȡ ٟ˄+(á 9߮ ]0á    3Bخˡ}áq ɡdá*  *ޡJ)Ä$6ˡ-  )˄Pˡǁ ٫٫ lQ!  _á_ۢۢۢ0 8_ۢۢš nj ˫  Q  F @ޡ*٣)($(ǒ 8Z<I: ǁ 3   d)" #áOá 6 (ڕ ٕ 1#áZ_ܤˡ_ܤݟˡ"áǥ  ǧ _ڤˡ_ڤ؟ٓá 9ٓǧ   7R n*(J á  ġ U?  J \<  ۣá ۮ)u +n   á  :< D+ ٮ á 4  ( á 9خٮ (خ *g ,` -Y /R .K 0D 1=6c  "$&eYTHQE@l!dš   Z& !L"<##$$%~&&(2'*V+h,,,+--B../r/-j5_ ˡ `mˡǨ  槁 Bad unit numberPBad IO operationP Timeout errorPVolume went off-linePFile lost in directoryP .á .CODE:98:9 Bad file namePNo room on volPNo such volume on-linePjFile not foundPTDuplicate directory entryP3   EKCommand: E(dit, R(un, F(ile, C(ompile, X(ecute, D(ebug, I(nit, H(alt [I.4a]P')%$x Filer error!P 3dP1# \Blocked volumePUnblocked volumePRˡM o쓡*SYSTEM.EDITORˡ% Restarting... U not r PSáPunRPPblkd volXP File name YPGFile or volume naallowedV Running...:Rád4@45$N<meP, Volume namePNVC*d"P expectedYPr:UZ 6P b=PASCALSYFILEHAND ˡعWildcard not allowedP*á not PFirst volume/file name was k a wildcarduP ,33EP,L))y)sok!g"c$_([# file loadedP3áNo SPعfilePvolumeP46"Illegal X W'S.O/K0G4C5?2;9BZ2;SOK#g;UI'U$U(ISA0I,QábX ntT p name]P6ˡ$P [Pع6Volume to file nameP'File to volume nameP <=>%H4jjB!P$$>&''''*:)^++-z,-4.(0Z.020f3d4445T9:*5;<aP file name P scan string P volume name P- Illegal formar???rJanrFebrMarrAprrMayrJunrJultP - char. max >PNo directory on volumeP File foundPVolume already on linePOutput file fullPš  ؟á    ܕ  F 7 ); <rAugr Sepr Octr Novr Decr ???r???r???MIæ((67MbتP&R Parity (CRC) errorP Workfile already savedPNo workfile to savePZá TextP CodePP file lost [PI:!(T ݪ(á=ڡ%8 Pd 0 1A-M 6Dangerous! Suggest using ? on wildcards to same volumed:<>@BDFHJLNP "$&(*,.02468:<>1A -M Ȅ-M ç-M M:!@BDFHJLNjlVXZ\^`b%'nprtv|~iU9"$&(*,.0268(87:  ?  ,,Xá8Q,:,Pá2 ,d &v *ˡdȡ.ۛ ۛۛaA 0,1A 88 d8 =)-=N dЦ6 D ؾȡٛ š* &) $ ۪#  á1 ۿ)áڿ)š )b# 0  ڡ,-á -ˡ ڡ4Put  : in unit ڿ۶Ȅ: ȡز)(ئ(ȡA)ɡ))$=!Put in :&(ڡ-l ضض˄ ?ˡ:ئxɡ ...too long <ٹ@dAdBd ɡ:á ; / (*áH:á ? : 0 ($á   DdCdd)Ъ,,)оɡЦ - d:W, dˡ2ɡ  &7?)ū7::خ')*á)*)#áخٮ)خؾپšSOnly 2 .ݪ( =T/! 9==- 00á d/-áB}0 Ed . characters total allowed in a wildcard searchdvš% ȡ;6NdbT- ˡFdC:TOd dCd d ٓdlá  M=?6(d|:=5d4dC<@. F ڪd | ȡîM:!(ЦȄ0%=ȡЦÄ? &Í|å|ddtlšdStdl- Цdо ЦI)$tl|êX=?6*dtl=6  Yá&}~+T.T=.T= NewHRdd'T.TEXTT.CODE=ò} 67GBdd Do you still wish to continue ?  Yˡ X,Ud X,,=; LQ54ChangeChange to what ? `TdPdA6545æ<dærX,d = =#á,,Xá5,á,xUd Í% X,X=d556Change Q554*IMM:!(5P"%Q54Transfer To where ? tUdVd5056 Transfer Q5545P"dÄ,I:d )dI:!("  dJd ,Xˡ,ç,YÍ-W--M =W--M "dЦg:-ݡ what file what volume ? & о Ц-!ؓfX : changed to =:}W =?XWÄ?=X=r:6D,@d wإåTMIe=:T already exists; remove it ?  ,PX:c6  c changed to TcTl dd! Td ,YáDتP,پ, پ*تPPPRڪP$HdP"d4؍ءЦЦe&"7Z^c$!Remove@RdPd6 PUPR$%GetHRddT.TEXTT.CODE==;=:T RQRemove Q7r=:-QM : -QM  removedRRR%.TEXT=:T.CODEء5=:T .TEXT loaded(%QM8Update directory ?  Yá[QR 1A FQR-M ȡ*QM١5=:T .CODE loadedٍ.T=3d" <̀ƀ=ƀ:ƀTQRM-"RRQQ1 -aP"dKP"d2 = : T  removed ƀ.TEXTƀP+̀ƀ=ƀ:ƀTƀ.CODEƀPT̀ƀ=ƀ:ƀTƀ.PMDƀPЦЦsw4".?The current workfile is :. N}+~T}~š}( already exists.~(+ alreado workfile&l#%á%Put in ':0Put destination disk in unit #0 y exists.(T already exists.á Remove it? š Remove them?( X,,&'T/!','-,#áضò} &,l,á&`ض /;= Prefix is ;:&`(9Files on volume 0Cá"d 55 .1Zpd)=- 0%Version of 3 October 1979, 1.4iR on C -rC-C   File name Size Last moVolumes on-line: 0 0ȡ}0 ٦0  : پd-$ File name Size Last mod Place Bytes$+ض8%ÍK5%ا7ٲ? System files.ٲ; Default files. File Character-structured volume.$&()%8+ء 4%$+ا4 $65؄6G2988 9900 Prefix is - ;:/ ; .%Bad blocks scan of$Pdd088*ٕڶ7šڸ7šC6ڂ64{{{ Unused }}}   *b&"dRQ}0 ́QʁȡP0Qˡ4RRBlock Q  is badQQR,47#RáWriting&.RR-QM -QM ,5454SYSTEM.آÄ  bad blocks{ /Ƃ+ƃWVolume to get boot from: P:쥁P2S%,ç,YÍ"d Pu} ]́+Ɓ+Possibly destroyآ آ5 آšG آ -rآ-آ  آ directory of Ɓ+ %Ɓ+: ? )Ɓ+ Yˡ #VbÄ22 X㧁WÄ5š2á  أ  ILLEGALPpBad diskPvCodefilePfTextfilePVInfofilePFDatafileP6R"çRÄDR85X P2S"d "dId5ń GraffileP&FotofilePxj\N@2$ * -Ɓ/4R5ء:Directo k b!llòCń!C"dnX:c6  ćry listing of`TdTd8Ɓ0=CONSOLE:P1XSd }0 45PP+Ɓ+ transferred to Ɓ+ Ɓ+:Ɓ+'Ɓ+,XˡP4ڍڡЦЦ &/A"dṔ6́4́7́8æ*Q`Td \6List Q-AQ-M E9~ $4MakeHRdd(,˧,Y˄,Xá4bP"dLa`\Ṕ:Qʁ:ȡ)æ--QM ï-QQ58æ6-QM -M ,ʁ9-M  "d0=:T made44Ц 'Prefix titles by6Vdd files in directory, ʁ4  blocks used, ʁ6  unused, ʁ7  in largest area.4  y ?  ,,Yá ,XáN,-ˡs-M ħ-M 'ȄX-M  blocks ? ء&Try to fix them ?  YˡܫR̂RʂȡBlock R 0ƁRƁ0ƁR"á 0 ,,Xá,Yá -M ,YˡD# of blocks ?  ɡ Bad # blocksNew volume nR"Ɓ  may be ok* is badRɡRRšRRRɡá5Block ame ? P :á ō6d  CM   is still badLBlocks   thru   are still bad Mark them : correct ?  Yá00"d: zeroed1 n055ء (may remove files!) ?  YˡءARR-M ȡ/-RM ̂ʂʂĄ RM-"RR-M5إ/:3%E Date set: 1..31-Jan..Dec-00..99P'Cá No current d Má dC BAD.xxxxx.BADQ̂Qʂġ. QܲnQ0ܲnQQateW Today is C -rC-C   New date ? PQ-M R٧-RM ɡRRRM-#0 -  markedkN%w(j4%Crunc oQyQ 0QQōۡQŧQ Ʉ CQh Pdd:M-M M ȡ-M -M ńMoving 3ܥń=  =QQȡ9QAĥQZȄ=QQAa =QQQQQ Qȡ#rQ SYSTEM.PASCAL=?-M ܕۧSšSš܂܂ۂ ȡd02ڂ"ˡCRead err= CQ QQ3ܡF5QyQ 0QQcȫ55 C Qd?- 00or, rel  , abs  ܂܂ۂ ȡd02ڂ"ˡCWrite error, rá̂SƂSPƂS:QƂSPƂ+"ˡ1 is not available, other file: áƂ++ˡUá-M C0 - New date is C -rC-C  J ; is not big enough to be a bootstrap, no transfer attempted0+"ˡI8 Error in attempt to wri2%Examine blocks on PddBlock number-range ?   1te boot, boot area now undefined/ Boot transferred successfully. Ƃ+ 1%Zero d  ɡۀɡ ܫQQܧ-M ɡ)Risk the directory ?  YˡR-M ̂Rʂȡ-Rirectory of$Pdd0&"d-ˡ2Destroy =: ?  YˡDuplicate directorM ̂ʂʂĄbؓ%File(s) endangered:ʂ ʂʂ ʂ RR ߡ Please re-boot:WbkX5'3),, á%$&&67 E@ 7U@~w&nE75@k7w d7w 7 \w V-t@3ЦELFiler: Get, Change, Transfer, Remove, Fast, New, Date, ?, What, Prefix, QuitP6,?áIE@Filer: List, Bad-blks,N pazE J3 E@ >8 63(?( E@ - 7n? ~7> Ext-dir, Make, Vols, Xamine, Krunch, ZeroP6,x33EP,L))y)sok!g"c$_([#   E7 w wU &    #7 7 7 zv x7 vEW'S.O/K0G4C5?2;9BZ2;SOK#g;UI'U$U(ISA0I,QábX ntT p l7 h v7 rEj7 f \wRU W 7 27 0 ,Z 2*E@ $&?  w UH4jjB!P$$>&''''*:)^++-z,-4.(0Z.020f3d4445T9:*5;< 6 & 7  ~w ?  "U@ wPrTۺ߈~0Tp`R.nDzT*áIE@Filer: List, Bad-blks,Ez7 vwBd ^pr`&& `E e `&EՀ~ tv Ext-dir, Make, Vols, Xamine, Krunch, ZeroP6,x33EP,L))y)sok!g"c$_([#f ~f{fxfufrfoflfifffcf `f"]f$Zf&Wf(Tf*Q NKHEW'S.O/K0G4C5?2;9BZ2;SOK#g;UI'U$U(ISA0I,QábX ntT p B?<963 0"-$*&'($*!eeee e  e H4jjB!P$$>&''''*:)^++-z,-4.(0Z.020f3d4445T9:*5;<e Uel ݕ , abs  ۂáݚނ0 -= : crunched _ 6_ 8/efAA" w  t  &,28>DJPV\bhntz,,`V\`V\@F`@na@n@,E7 j\zh7 \bz7 Nbzr7 Bz7 ,z6 \ 2   \ ,,,,,,,,,,, > L  j  @  W  m e 5`\w\e w5 5@ \ɋE 5\\\..wB~  Ձ@  a a!~F@  B~ ~ E`E `E@ @` dd&`f&d&b& w@ w  AFՀW  `E e `&& `E e `&EՀ~ EՀ~,]A@AK w WFlp   mAF! &N  7  ҂ ~  E e ` E   @ ` G ffD e wn5 whDe C8 B@B  7z   7H 76W wN B   6 C@ e E`E``B~A EwwDw N  -@`@`( 7E E7 ~ & EE >d`V  %  D~ " ~$]   P~P~NPP  W  ~~% ``!~$eί E D~ D C~ %  D~  ~&  AA~E e @`& E&~AA~%@ eAp6% "1, 1,1,^  5 ^A 5^E e @`&AA~E e @`  `` t @L A@@A&Daef  _09E A Z ꆃ > ѕ  D@ A tBt J@ P  ``f~ ``A~  ҇ d ``&& `   R~@A @`e eJ   C~C~ %  E e @a&&6E e @a&E e @a e8\C~C~c7 "| & @  z7 "| 7 ,#7 #7  7 v$7  7 z!7 %\ vw~- &$@`@`$fH@7`e B~ B~   &*.FR^b|&*e@ BCzEG@HPtJ$LM nO(kQRChTV焵W!cY_[\^^k `#8 F Rbv @ X z z z z z z  J \ r    $ * 0 H N Xf j n : @ 4p axXc'exfhShjQYkoNmo9?pIrs|ouEw7x߄z @|Η}½  & &2&0& . &  E&@W E  t`  U&E w e Entte x\ \S\ e& @7  #`#e\#f& \:יc&>X4%]@& & E e' e2-.E$E7  e w$$$$$$$xNr$$$$$$$$& ez\& Dr)&&\   5@5@7 X  v! " " " " " n" "$$$$$PE Ґ~2 wU &f&f7 6U   0 "  f&\  \& \\r1@\[?\ ew & ?U?*@ڪADɝ^& _E7 6C DE!:7  7aehD A    C %     @  f&\   B -  e \z\Daw7e:wXP@P7n@eI70@wnM)w\ 7 , ßz 5U f C_  fW & @&&&&7 !""!n"!v! !" v!  v!! !"4"e\\;@\ \N @ w. m e  ɋ e wvr@p@@J0F26|@*&'<)(+$ J  E     7 7  @  27 !ׯ+U E *$ND'RRAY,EGINASEONSTIV'OOWNTOLSE ND ORILE.ORWARD"UNCTION `    ͋D 5|w 5B N  5 , W#D  7W OTOFN)ABELOD'OT&F R(ACKED+ROCEDURROGRAM!ECORD-EPEATET*EGMENT!HEN OYPENTIL΁?Zw w   D5H5   :@ S~ e&-"wn.5) 5| ARHILEITH%.J[j{ - e6_ 8 E w 77 :  .-& pU`E@ wHw .B  E7 _ wU K E|7 xvv vVFU@ % eC ~% C ``` ez&f  R-NDE     7 7  @   &fEʝ@W U@ -T~ & 7  F  <? :? - 7   x נww w ʕtʕ  Q~EU  7 v   j7 d ZEeN7H  >?0_ (f&? 77B~5 J <  p UU Ve0   W @e@ E@W &: le2Je7B7j eeePPXXxhPXp D&&e #@  @6 7 v!$6 6 #?%-0 @    eff wl :wv6 @ @m5 "@>m5 6׳f&& @׳@f&7 " d% v!,%f&f&7 l"n%" " " " "  % "`%   \%f&~wD@6@>6@>6- "@@eB@m>AmNPP  P~P~m>m  \ e\>:L]L?ƪ@ \fEA#& e@ & f& f& f7 v! % ff w : @5 @@eBA Am f&f& w-?BAa~ 5 >fff& w-#W-%   &@& &&  'Z7 f7 VVw L7 L"'@@'47 4 CptE`eE -W-$!W/ 5W->>= ,fwzw Bew& RZ b`E@X d& 7 m-  ` ~ m- ` ~-D'.<@ R<@ b<@ `<@ X<@ d7.4d?Z  w dU@Xw ^>v.<@ d<@ Z<@ d<@  ه   5  \d '8'D' et   p t `mwE : 7> &PASCALSYUSERPROGPRINTERRINITIALIGETCMD  t7m7 El7h7^ 7\ZZ7 Vev 6 Fe   n`& , @ R , *^/ńȄ  =@f&ysE[\pCf&f&\% a @w   6 6 &  f ..& wt  {()7vP @ 7v7vx7vee~m m7vwt{2) wvP6A  v  6N\z\\\ N A f C %C B    \ A 7t7v 7t7vx((((n(()))n(ff w   w :hv w  D& &&@7  8#D& && 6  A7 ^v!#! ##!# ###"#" " " " "|#6 u-@>m5 <wr@6@>6@>6- @eB@m>AmNPP  ~~m e\ \S\ e& @7  #`#e\#f& \:יc&>X4%]@& & >m *@eBA Amf&f& w-h 5 >fff& w-SW-UW-& & & D&&D&& @%7 rv!<$  IA e e@ e& & & & & W  @W*fw@!5 ,*fwtW# :W-$@  >+fwB No user program linked in6P"dṔ6́4́7́8æ(, exceeds destination maximum length of آ *" )In*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58 source line: 46b  ./ .+  Variables in +-áprogram æ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, module ȡ)3 ˡ3:3O ʁ6  unused, ʁ7  in largest area.4 "d 55 .1Zp 3 3 Í3 + ٦:=    &Ȅ٦š r  - ORD( )TġHǀ ġ#٦ ''٦ CHR( )d ` @' B B3$ B@ ɍF(á ٦TRUE á٦FALSE V>`ߡ٦ *NOT SET* ޡ( ߓ ŧ7ȡ5ˡ0݊ Bġsá  ȡ%٦ ޓ3Zrˍ"á  á.ˡ*ɡe e+ e ܕڂȡ 0.    ˡá ˡ7̂ƂPƂ QƂġ0ȡ:b"v3˶3 ˍ.PP Pv\ Ɓ-(š4))EƀEƀP).TEXTU)J333 3 333!!OOPS!!Щ@ Z á{ NIL }  XP ȡ ؞&.,,˶,Ä ,,E٢: ^ to @ + 3R**ȡǀ ɍ8%ńAš٢&P٢&?EEƀEƀP.PMDTP,æSYSTEM.Eō9 in System, to exit)*T Ɓ- Dump to file:Ɓ/PƁ/Ɓ/́XƁXƁ/PƁX.TEXTUSystem I/O error(Unimplemented instruction(Floating point error(String overflow(Programmed hƁXPƁ/"áv./,́.3ʁ.ʁ.,á+́.+/Info written to alt(String too long(hString index out of range(GArgument out of range(*"|\F0/)Can't open file Ɓ/  )01E1ȡ0E1Í01ydE*4. 6,V| ~ :n n,or(No proc in seg-table(Exit from uncall10  0%a3+أ  أ  DŽ +ƁW`DsDsD nn ndnn'ýʁʁʁX-N3,>:+/BU(&l]  "$T8 ,---**SYSTEM.MISCINFOP+"á,+ ́ʁ>+>ʁJ+J ++n  ȡ,}ؤ---*,EDump: P+$EEP Up, Top, YP+,ˡ)EEPDown, Bottoۢ0ۢ ؞&}CONSOLE}SYSTERM???}?á';??m, ^P ˡ!EEPEdit, VPEEP File, QuitZP'Qá` 3Ɓ_ٟá'C &"á}PRINTER&"á}REMOTEƄƅ/Ƅ*SYSTEM.CHARSET/3E"223 8. to exit)*3 r unknown cause("áǀ"áƄ  ̄+ʄ+ȡ   ̄+ʄ+ȡƂ  hardware error(illegal unit #(illegal I/O request(data-com timeout(volume went off-line(}GRAPHIC :ƄPV77::9file lost in dir( bad file name(no room on volume(volume not found(file not found( dup dir ent988:9  6    .Xry(nfile already open(U file not open(@invalid input format($VB.{hQ> IO error: :: F7 :9CONSOLE:(:9SYSTERM:(8(< Unknown run-time error(Value range error(No proc in seg-table(Exit from uncall:986ë6!:%蓡$ ƀƀ.CODEƀPt   TE?Command: Edit, Run, Filer, Compile, Xecute, Init, Again T%>ˡ.ˡ sš sJ&$&::Eń[I.4i] P'T)S%SjTT|S@*SYSTEM.EDITORc *SYSTEM.FILEROKFA=8dAXE:E ERT'Jɡšɡš  0P= "3&(*,.Mˡ  š*SYSTEM.EDITOR &+ *SYSTEM.INITP&:*:azȄaA:)Type a < space > to continue:) "á *SYSTEM.INIT8 7 š  š*SYSTEM.EDITOR=á5%:.& XÍ ˫X `(ުP22ȡ7233 ȡ 23aħ3zȄ 23aA22988:9  6    .X.CODEt :98:9. +ƁW  á +:: F7 :9CONSOLE:(:9SYSTERM:(8 28lN&d4 TT|S@*SYSTEM.EDITORc *SYSTEM.FILEROKFA=8dAXڪP--áOPPáP/@P"áR.Q.Qȡ@.. č-O`.R/.SRPRSR0P= "3&(*,.Mˡ  š*SYSTEM.EDITOR &+ *SYSTEM.INITSP.. Bad block #0! not codeH-á"Illegal file name "á *SYSTEM.INIT8 7 š  š*SYSTEM.EDITOR=á5%:.No file Qv 2*SYSTEM.COMPILER*SYSTEM.SWAPDISK(7   .CODEt :98:9. +ƁW  á + Compiling.8 :..TEXTؚ*٪Pء6!á-E** Stack Overflow **PEE* :9"8}? *   R.٪PƁ.ƂZƁ.́VƁVPƁVǠƁV؞"ÚƁ..Ú.ۤƁ.Execution error #  (*>Já2šDh.|...:...P`.CODEۡ@.TEXTۡڡ..P.. áMš1 ˡ   á ͇ +>ˡCODEU.! No workfile. Execute: šA.á &88s ˄ 8sB$$>:&ˡ,ˡ sš s   , Ą:쓡"á  8"ë á 쓡-Ä+  ɡ"á M  $Ꟛšr#ń@ 񂾲y 񂾂0 ń Ȅ g>@ << á6铡,! }ÍV}M ˡ!  ,ȫ, 넡B BB/"ˡ ( ! 767, } ,Í1} š˄  `" R 9S328˄ šá  d</ dÍÍ (  d˯7 H ȡ   ˡ 퓄 Ä퓡  dÄÍ" ˄"ɡ0 H" ġ  *@#ٕš ګ۫ š۫ ګ,.  dá dá C#C˄ C    á&á    ȡQɫ  ȡ .  .ȡ? ȡ  ġ} -/18  Äɡ3ġ$ꕫš*á ?:22ȡá;2á!2ȡ5252š[2  á ġMáš3 삫 d #( -2š2222ȡ2š5252á4x4]11á4^1šX42233y  Íáɡ 럚肚Z ū 3042221ç42ç1Ä2*á444ńi55P.TEXTF.CODE4. < áš < c@B B Ä $ BINFO".GRAF.FOTO!}áë  B >Ä /  !š Í 7ÄȄĄMȄqfȡD ōɍ ō ȍ dč "ÄT ǐɄ96ń}66! á } 쓡ë  쓡 ! 8 ,} Ä{횧 :˄˥ń á   uš  gá   낫šꓡš땫ĚQ삫Ú< š 0.áBy0$yheEÍ ^ "á50 ɚ j ɍCá >듡ɡ 퀞$ $ # Bá    Q š *3á+   T p꾂ȡ龞š  4V j ɡ 逫-á-32768 Rġ?n꾂(ń꾂Ȅ4š뾂á뾞뾂NPńȄ00ń0ˡ nɡa ɍ.ń0á š肂蕿BšT뾕 -   $ $ $' 푞$ $ō ȡ4 š킥뾞<X h6!}?^EPlease put volume  $ġ $ $ $ȡ&  0 $č? in #4P'pá,##&á=$ *6*^   .ˡ>  Eɡ  -푫 š 0 0 lġ-   킂.  L((VFl8 Z*n`& , @ R , *^/ńȄ핕 킿:  핂 0 . 0 핂 肿 ɡ  , Mȡ龫.ń0á š肂蕿BšT뾕š 龕龫!낾  2 d?š !ȡ4 š킥뾞<X h6!}?^EPlease put volume šš"š Ą  ˡP %@B삾 0 Vá " *áá "ˡ ˄B"ˡ\ š < ń<ˡ0á ]+-Í-ëy 0>욹  - v /šá.Ą ɡ @y á +-Í-ëy 3,   ^(PASCALSYEDITOR S2 S3 S4 S5 S6 S7 *Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58S8 S9 INITIALIFINISH ENVIRONMBLEND EDITCORE   D"ۊ)HۊܳHaFæ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, D!٪P what marker? - ئ Щ,- V,Vȡ,-,,,ʁ6  unused, ʁ7  in largest area.4 "d 55 .1Zp t% . Type 1Error # . Type  á   XSd }0 45PP"dṔ6́4́7́8æXSd }0 45PP"dṔ6́4́7́8æ*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58æ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, æ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, ʁ6  unused, ʁ7  in largest area.4 "d 55 .1Zpʁ6  unused, ʁ7  in largest area.4 "d 55 .1ZpXSd }0 45PP"dṔ6́4́7́8æXSd }0 45PP"dṔ6́4́7́8æ*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58æ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, æ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, ʁ6  unused, ʁ7  in largest area.4 "d 55 .1Zpʁ6  unused, ʁ7  in largest area.4 "d 55 .1ZpXSd }0 45PP"dṔ6́4́7́8æXSd }0 45PP"dṔ6́4́7́8æ*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58 ػٳ قػ0  (|š  )1 B6H ȡ0ȡ8٤؂8٤؂ záz;67opqrst^uvwx + * )( '&%$ #"ȡABCDFGIJL M P Q R SVXz AZ az 09 )) ++   š.!)Í 삧)Z,>.+-?/=<٢>á ٢P٢N٢P٢NJ٢٢!٢ ٢ @*Hf,` YY˥YȍY++YP+.TEXTU+PY"6+Not present. Enteæ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used,   V)+'09ȡ %$ ^ƓƔ>Edit:Ɠʁ6  unused, ʁ7  in largest area.4 "d 55 .1ZpƓ*SYSTEM.SYNTAX"á' ')Ɠ'̓̓̓ʓʓʓ Ʉ̓ʓ(áʓ̓XSd }0 45PP"dṔ6́4́7́8æʓ ʓ0̓ʓ̓ʓ ˡ.')ʓ ʓ̓ʓá ʓ̓ʓ áRʓ̓ʓ*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58)ˡ>̓ƓƓ Ɠȥʓʓ̓Ɠ Vi2(Reading Yæ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, ˡ Reading file6NJ.̂̂̂ʂʂ̂ʂe. ʁ6  unused, ʁ7  in largest area.4 "d 55 .1Zp̂ʂ ̂ʂ̂ʂʂʂ á ʂʂ̂"ˡ Disk error!ʂFile too long to e XSd }0 45PP"dṔ6́4́7́8ædit>< 2Edit: Enter edit file, P.&Y+++:+.+PYP á|*Q`Td \6List Q-AQ-M ́:Qʁ:ȡ)æ--QM ï-QQ58 for . Ynew file or to exit.: PYæ6-QM -M ,ʁ9-M   files in directory, ʁ4  blocks used, PY6.TEXTYY˥YȍY++YP+.TEXTU+PY"6+Not present. Enteʁ6  unused, ʁ7  in largest area.4 "d 55 .1Zpr Edit file Pád ȡػǀػ$2 >,:yx !xx. 6NJˡ.ɡk) @jئPP QPؾٿٮ`áؾ7T D  ˡ.ɡ9 ˡU. Auto indent o Filling p Left margin r  Right margin  is   characters long. -s  Para margin t  Delimit char u Seek tokens qړf2Do you want to Exit from or Return to the editor?  -- ا-EÚ٫>ƂYPq Ignore case w Tab spacing z  Go command `ȡ+ړ-EW&  8$ڡCan't write the file"ۓNot enough room for fileDsá `Y File is unnamed$ File title is Z &\2 ˡ.ɡ9 ˡU.Y , Edit Cycle v  Editing time: xpC  hrs. x<  Y 0 Quit:P U1" Update the workfile and leave is   characters long. - Exit without updating* Return to the editor without updating$ Write to a fileqړf2Do you want to Exit from or Return to the editor?  -- ا-EÚ٫>ƂYP name and return -- :YL Write to Y?ړ-EW&  8$ڡCan't write the file"ۓNot enough room for fileDs --@N--Yá YP1Name of output file ( to return to editor):  ءTrueFalse.  ڳ@ T or FD.TEXT˲ȍ"P.TEXTUPV ɡ))ڳu@TÚTrue False  ݳ ɡ@ NئPˡ( QP0 /R<++ɡ ݂0ݳȄܓM% Must be in range [ .. ],,P,[Q,ǡ,]Ǣ,؞"ÚTWriting vvݧÍܡޚ  ا!á{ETX}Lا)á{CR}7ا+á{TAB}! ɡ^  --!# %-oprssrtuq P: Beginning End Marker P  Bá'EáMá اˡا$ w z *Go command: enter commands, type ` to end  /AT( cye  p5Marginate this paragraph?P Yá  "0-!# @*,]<2( á N Set0-ا7ɥ8ؤ  ġ ȡ7 : '8٤'0:Y ,04 Environment: { options } Q to leave [ Edit 4I.4i8]9P 5All markers are in use. Which one to replace? (0..9)P--0-2 з  8ؤe --!# %-oprssrtuq 7 7E  0 Set: Environment Marker P  EáMá اˡا w z *Go command: enter commands, type ` to end  /AT( cyFx 0> eXchange: TEXT { a char } [ escapes; accepts]P  Blend in file:P  .TEXT   ȍ" ̂2Ƃ2 PƂ2.TEXTUƂ2P--á;š4ق  -)á-!)˄ ̂2Ƃ2 Can't find Ƃ2 [Ƃ2. Blend in file: lƂ2P"áġ(á-á  -+-á س aA-ث--?-قؿ-Blending؍Z2ٓC.2 ڂ ء2ڞڂ--!-á!ګٞǀ3;=?Pš=0Zap > 80 characters? (y/n)P  mins.   characters, C슐󊇞 % full.y Patter"ˡ Disk errorٓBuffer overflow.ޕۂ߫  T( cyns:/ = 'zǀ'y- , = '8xǀ'7šá>,<,,(직 ŧĄ Invalid copy.x직ġNo room`療 Markers: 7ȡH :8á ħɄ療 療직療   Jump to0:Y ,04 Environment: { options } Q to leave [ Edit 4I.4i8]9P  з Xا78ؤ 8ؤ  Not there.eؤ W  0! JUM ɡ!No room to insert.( lpo-˄*ǀ2á ǀ-)!&-á&ȡ  ) po-!Ä -Í   #-+á psĄ-pÄ- ˄ %Ąۄ{-)á  h-áOȡ& ڶȡ  ]ڶġR*Editor almost full!!   ) ˡܡ    -&á -!-áثd; š Editor Full!!-+áz z B 0Ʉګڂ٥*č:c)o$p낾)átr f-&áO- ç z ^ġ)š (š  * ç,<öÍ (ç)Íɡ-n)ġ # ˄  ń ꂧ( d--á --'+) !&/-'+  ɡ P^!Ȅ0ɡášĶ  -)á-& F-ǀ?--   "ń? )á)      * á   ǀT ؂  ȡ  ! ɡ it#Ʉ5 á 8  ɡ    š   ˡP- á lšĶ   |$,<áZń7)á) -    ٕاsrġ - ؕ ؞ق)(ġ  ø ɡ Ʉ-ɡáĸ šTħo٫ګr    U ؂ \   0J Ins Í  = .*ȡ    "% Yˡ   ; š ert: Text { a char, a line } [ accepts, escapes]P  ˡOš  ^,ȡˡˡȡ ȡ 4[ p8 @4Lǀ zL[LLaA2LL š ɡ-ń šٮ 6á >   ؂  (á   3  X7&'؂ɡꂾ(Ä؂ fš ,dšBuffer overflow ݮ,-    0C Delete: < > { to delete, t( ˡ땫ꂧ(؂ ),o abort }P  --ߧá  á ߹ ߳  0K Adjust: Left, Right, Center { to leave }P --߹d- á,>á#$#h$d,<á#$V!R"N%Iá<,>,,!*35DBá --߹á   ߳0á<,>,  ȧ_% Oás\Jbٕ --˧-!˄ -!-!ámÄ L ٕ܄ɡ )Eܹ-r)1sڕ)$srڕr) 4-"á)zá )f"ٕٕ  ث ٕ٫  á ޶ O á r)/ ásڕ)srڕr) -!ˡ-!á۫,x ( l.á.á(+ "--á -)ö -*ˡ -ȡo,<á2# #ȥڷ0 $ĥڷw+P/-'+)/0- --Lá2-Vá%-Tá-Cá -Iá-P] *  =߹&+'',<á&'! #%߹Z- á,>á /- --P0 1zBáM-'+)   #$#l$h,<á#$Z!V"R%MšToo many%/*+ $) HFw`% Nfá /-E/- á.E)Eń  EE_-*áBC<DBFDFȡ,EȡD2áá   Dá2á *á   ߳EDEEDD-ˡ E-EE-EčآE آ!q &2L$ۂ 6+ȡLڂ)á-ń ۂڂS Lۂ áۂLۂá۶"H b3'+()(á!    =z  Replace' aborts, 'R' ~á ڧ"á ǀ ġۡڶ>ڧ˄KڶPá4ڶPreplaces, ' ' doesn't=--á -R˧-r˄xšWxš8Buffer full. Aborti#ڶNáڶNá lڳ aA, >پˡ ng Replace  xxɡ x8xxˡ x직x療xپعE٢I٢<٢-٢ ٢ LA6)x% >>̀̀ẁq̀̀á Find:=" Replace /from/to/ :=/01̀-"  0,0" % z2 á82ç çyǹ ʀȧل0:ʀ̀١!ނ߫ á>,<á ٪P&%ERROR: " Please press to continue.% áá6Y ġ? L ˡ     7f p86` ٓ"ʀńPattern not foundNo old pattern ʀ $R\0M Ed: Adjust Blen š=L ˡ  7lv9,>á98d Copy Delete Find Go Insert Jump Page Quit Replace Set XchngP --߭zá  á5)z  á Z;z')+   ߹k~ zxt plhd GCɄ zzöɄ  z)'+ ɡ š šȡá*ڧ%á  )" Repeatfactor > 10,000-߭` ꂾ)á) -@ȭ"ƁƂ<   š"á  á  á :Ɓ šB+Can't save the deleted text, delete anyway?P Y%ڕ󧁽 |UEx~P"&, * @ f P  D"ۊ)HۊܳHaFڂٕ ݞ݂)ˡ !U܂ZjڡD!٪P what marker? - ئ Щ,- V,Vȡ,-,,,<١1ۥ č&\7ȡ'eڤġeڤeڤ؂  t% . Type 1Error # . Type  á   ħɄ ؂ HZګ낾)uء-ŧ낾u˄낾)˄ ttá"ƁƂ<   š"á  á  á :Ɓtr ܕܕ܂( ) +'((áUEx~P"&, * @ f P  D"ۊ)HۊܳHaFá) 򧁾.ç Ä Äە sŧsrȍ: á܂)D!٪P what marker? - ئ Щ,- V,Vȡ,-,,,(r r)á7á '낾)ç낾uÍ ᓡ   t% . Type 1Error # . Type  á   !Rۂ+'(@ۂ(áݧۂ ۂ'á ܕ^l܂삧ݫ 5h-l)ڂ ٦P ۧ)ۧۥ ۧ ۂڞڂ)ˡ  !Uقč á3پš!   پ kۧ$á/پȡ ٦P 6ۧ)ˡ0Py^ )á)܂ ܂áؓɍš  ٚáء  QPپۿ ۧÚxV  šۊ)HۊܳHaF b ݂ɡ݂ەݕ 5 LD!٪P what marker? - ئ Щ,- V,Vȡ,-,,,ڂق؞ڂق؞-/š -0--ۍۡ t% . Type 1Error # . Type  á   # ,,Xá,Yá -M ,YˡD# of blocks ?  ɡ Bad #fO^@H#THIS IS A PROGRAM  BELIEVE IT OR NOT  program drawer;   var %xBase, yBase, x1, y1, x2, y2 : integer; %Filename : string; %datafile: text; %loop:integer;  {$i 'plot' } ( ( (procedure drawit; 0 0procedure drawfile; 0begin 0reset (datafile); 4repeat 8ReadLn(Datafile, y1, x1, y2, ,,Xá,Yá -M ,YˡD# of blocks ?  ɡ Bad #fO^Q@$ POINT(X, Y : INTEGER) ;  BEGIN 'AT(X, Y) ; 'IF (X >= XLWINDOW) AND ( X <= XHWINDOW) 'AND(Y >= YLWINDOW) AND ( Y <= YHWINDOW)x2); 8at(x1 + Xbase + loop*3, y1+ Ybase + loop*3); 8line(x2 + Xbase + loop*3,y2+ Ybase + loop*3); 4until eof( datafile ); (  end; ( (begin ,for loop := 1 to 25 do ,begin 0pen := white; 0drawfile; 0pen := black; 0drawfile; ,end; (end;  { (TERAK Graphics Package ( (Includes STARTPLOT, LINE, BOX, CIRCLE, ARC, AT ( DISPLAY, ERASE (  }   {$R-}  %begin )startplot; )repeat -Write('What file?'); -readLn( Filename ); -if Filename <> '' then -begin 2Write('What base CONST GRAPHIC = 3 ; ROWSIZE = 240 ; COLSIZE = 320 ;   TYPE (PENCOLOR = (NULLCOLOR, WHITE, BLACK, FLIP ) ; (SCREEN = PACKs? '); 2ReadLn(XBase, YBase); 2Close( datafile ); 2Reset( datafile, concat(Filename, '.text') ); 2drawit; -end; ) )untilED ARRAY[1..ROWSIZE, 1..COLSIZE] OF BOOLEAN ; (BITW = (ALOW, AMID, ATOP, 2GLOW, GMID, GTOP, 2B6, GENBUF, CLICKBIT, 2B9, B1 Filename = ''; %end. %  0, BEEPBIT, 2B12, B13, B14, B15) ; & (SCRCONFIG = SET OF BITW ; (SCP = ^SCREEN ;   VAR WHEREX, WHEREY, 'XLWINDOW, XHWINDOW, YLWINDOW, YHWINDOW : INTEGER ; 'NEWPLACE : BOOLEAN ; 'PEN : PENCOLOR ; 'DISSCR, DRAWSCR : SCP ;   PROCEDURE DISPLA,,Xá,Yá -M ,YˡD# OF BLOCKS ?  ɡ Bad #fO^Y( SCPTR : SCP; HOW : SCRCONFIG ) ;  VAR X : PACKED RECORD 'CASE BOOLEAN OF /FALSE: ( INT : INTEGER ) ; /TRUE : ( SETT :@ SCRCONFIG ) 'END ;   BEGIN &IF HOW = [] THEN .HOW := [ALOW..GTOP] ; &X.SETT := HOW ; &DISSCR := SCPTR ; &UNITWRITE(GRAPHIC, DISSCR^, X.INT) ;  END ;   PROCEDURE ERASE( SC : SCP ) ;  BEGIN (FILLCHAR(SC^, SIZEOF(SCREEN), 0) ;  END ;   PROCEDURE STARTPLOT ;  BEGIN (WHEREX := 0 ; WHEREY := 0 ; PEN := WHITE ; (XLWINDOW := 1 ; (YLWINDOW := 1 ; (XHWINDOW := 320 ; (YHWINDOW := 240 ; (NEWPLACE := TRUE ; (NEW(DISSCR) ; (DRAWSCR := DISSCR ; (ERASE(DRAWSCR) ; (DISPLAY(DRAWSCR, []) ;  END ;   PROCEDURE AT(X, Y : INTEGER) ;  BEGIN (WHEREX := X ; (WHEREY := Y ; (NEWPLACE := TRUE ;  END ;   PROCEDURE %  BEGIN { LINE } 0SX := X ; SY := Y ; 0WINDOW(X, Y, WHEREX, WHEREY) ; 0WX := WHEREX ; WY := WHEREY ; 0WINDOW(WHEREX, WHEREY, SX, SY) ; 0IF (X >= XLWINDOW) AND ( X <= XHWINDOW) 0AND(Y >= YLWINDOW) AND ( Y <= YHWINDOW) 2AND ((X <> WHEREX) OR (Y <> WHEREY)) 2THEN 4BEGIN { DRAW } 6IF NEWPLACE OR (WX<>WHEREX) OR (WY<> WHEREY) 8THEN POINT(WHEREX, WHEREY) ; 6DRAWLINE(JUNK, DRAWSCR^, 20, WHEREX-1, WHEREY-1, ?X-WHEREX, Y-WHEREY, ORD(PEN)) ; 4END ; { DRAW } 0 0WHEREX := SX ; WHEREY 'THEN 'CASE PEN OF 'WHITE : DRAWSCR^[Y,X] := TRUE ; 'BLACK : DRAWSCR^[Y,X] := FALSE ; 'FLIP : DRAWSCR^[Y,X] := NOT DRAWSC := SY ;  END ; { LINE }   PROCEDURE BOX( WIDTH, HEIGHT, THICK, SPACING : INTEGER ) ;  VAR I, LX, LY : INTEGER ;   BEGINR^[Y,X] 'END ; 'NEWPLACE := FALSE ;  END ; { POINT }   PROCEDURE LINE(X, Y : INTEGER) ;  VAR SX, SY, WX, WY, JUNK : INTEG { BOX }  'WIDTH := WIDTH - 1 ; 'HEIGHT := HEIGHT - 1 ; 'LX := WHEREX ; LY := WHEREY ; 'FOR I := 1 TO THICK DO 'BEGIN { SER ;   PROCEDURE WINDOW(VAR X, Y : INTEGER ; 1WHEREX, WHEREY : INTEGER) ;  VAR (SLOPE : REAL ; (DX, DY : INTEGER ;  BEGQUARE } /AT(LX, LY) ; /LINE(WHEREX+WIDTH, WHEREY) ; /LINE(WHEREX, WHEREY+HEIGHT) ; /LINE(LX, WHEREY) ; /LINE(LX, LY) ; /LXIN { WINDOW } (DX := X - WHEREX ; DY := Y - WHEREY ; (IF DX <> 0 THEN SLOPE := DY / DX ; ( (IF X < XLWINDOW THEN  := LX + SPACING ; /LY := LY + SPACING ; /HEIGHT := HEIGHT - 2 * SPACING ; /WIDTH := WIDTH - 2 * SPACING ; 'END ; { SQUARE },BEGIN { XTL } ,IF DX <> 0 THEN /BEGIN { TRIMX } 2Y := WHEREY - ROUND((WHEREX-XLWINDOW) * SLOPE) ; 2X := XLWINDOW ; /END   END ; { BOX }    PROCEDURE ARC(RADIUS, START, FINISH : INTEGER) ;  CONST &W = 0.0174533 ;  VAR &CX, CY, ST, FIN, STE{ TRIMX } ,END { XTL } (ELSE (IF X > XHWINDOW THEN ,IF DX <> 0 THEN 0BEGIN { TRIMXH } 3Y := WHEREY - ROUND((WHEREX-XHWINDOP : REAL ;  BEGIN { ARC }  IF RADIUS <> 0 THEN "BEGIN { DRAW } &STEP := 2.0 / RADIUS ; &ST := START ; &ST := ST * W ; &FIW) * SLOPE) ; 3X := XHWINDOW ; 0END ; { TRIMXH } + (IF DY <> 0 THEN ,IF Y < YLWINDOW THEN 0BEGIN { YTS } 0IF DX <> 0 THENN := FINISH ; &FIN := FIN * W ; &CX := WHEREX ; &CY := WHEREY ; &AT(WHEREX + RADIUS, WHEREY) ; & &WHILE ST <= FIN DO  7X := WHEREX - ROUND((WHEREY-YLWINDOW) / SLOPE) ; 7Y := YLWINDOW ; 0END { YTS } ,ELSE ,IF Y > YHWINDOW THEN .BEGIN { YTL &BEGIN { SEG } .LINE( ROUND(CX + RADIUS * COS(ST)), 4ROUND(CY + RADIUS * SIN(ST)) ) ; .ST := ST + STEP ; &END ; { SEG } "E} .IF DX <> 0 THEN 6X := WHEREX - ROUND((WHEREY-YHWINDOW) / SLOPE) ; 6Y := YHWINDOW ; .END ; { YTL }  END ; { WINDOW }  ND ; { DRAW }  END ; { ARC }   PROCEDURE CIRCLE( RADIUS : INTEGER ) ;  BEGIN &ARC(RADIUS, 0, 360) ;  END ;   {$R+} & BPROGRAM ABC(INPUT,OUTPUT);  VAR LOOP:BOOLEAN;  BEGIN; %LOOP:= TRUE; %WHILE LOOP DO 'BEGIN )WRITELN('HELLO THERE'); )WRITELN('THIS IS A BUNCH OF GARBAGE'); )WRITELN('THIS IS ALSO GARBAGE') 'END $LOOP:=FALSE;  END.  ,%DU$ FENG"F ,ˡ  áá^O^BE,%DU$ FENG"F ,ˡ  áá^O^' ABC LOOP ABC LOOP 2 ABC   ˡ.ɡ9 ˡU. is   characters long. -qړf2Do you want to Exit from or Return to the editor? ABC LOOP $. HELLO THERE*xx. 6NJˡ.PROGRAM ABC(INPUT,OUTPUT);  VAR LOOP:BOOLEAN;  BEGIN; %LOOP:= TRUE; %WHILE LOOP DO 'BEGIN )WRITELN('HELLO THERE'); )WRITEɡk)  ˡ.ɡ9LN('THIS IS A BUNCH OF GARBAGE'); )WRITELN('THIS IS ALSO GARBAGE'); 'END; $LOOP:=FALSE;  END.   ˡU. is   characters long. -qړf2Do you want to Exit from or Return to the editor? (  TO 4 DO 0BEGIN 0JJ := IEXT[I,NKNT]; 0IF JJ>0 THEN 3BEGIN 3IEXT[I,NKNT] := -JJ; 3K := PWROF2(JJ); 3XOR(JPAR[NKNT],K,N); 3IF N>0 THEN 6BEGIN 6I1 := TRUNC((N-1)/16)+1; (WRITELN('DIAGNOSTIC: I1=',I1); 6I2 := N-16*(TRUNC(N/16)); 6IF I2=0 THEN I2 DRAWFILEDRAWIT DRAWER XBASE X1 Y1 X2 Y2 YBASE FILENAME LOOP := 16; 6LL := PWROF2(I2); 6XAND(IPARI[I1],LL,L); 6XAND(KS,IS,M); 6IF (L=0) AND (M<>IS) AND (M<>0) THEN 9BEGIN 9JS[NETKNT] _:= KS; 9IPAR := N; 9JPAR[NETKNT] := N; 9SWITCH(JJ,IPT); 9IF INSTA[JJ]<>13 THEN INSTA[JJ] := 23-INSTA[JJ]; 9IF JFLAG=-1 THEN JFLAG := 0; 8{GOTO 50} 9END 6END 3END 0END -END; 6 'BEGIN 'IPAR := 0 ; JJ := 0 ; IS := 0 ; LL := 0 ; I1 := 1 ; NETKNT := 1 ; 'JFLAG := -1; 'FOR I := 1 TO 100 DO +BEGIN +JPAR[I] := 0; +JS[I] := 0 +END; 'INP(IPT,INSTA,INSTAC,DUMMY,JS); ' 'RADIUS VERIFY(I4SCOL,ISUM,IFLAG,JJ,IPT); 'IF IFLAG=1 THEN GOTO 140; 'IF IFLAG=0 THEN GOTO 9999; 'ORR(IPARI[I1],LL,L); 'IPARI[I1] := L; ' 'DIAGNOSE(IPT,I4SCOL,INSTA,IPAR,NETKNT,ISUM,IEXT); ' 'LETBAS[NETKNT] := JJ; 'NKNT := NETKNT; 'NETKNT := NETKNT+1;   140: TRANSPOS(JJ,NKNT,I1,IS,LL,JFLAG,IPAR,NETKNT,IEXT,IPT,JS,JPAR, 0INSTA,IPARI); 'IF NKNT<>1 THEN *BEGIN *SWITCH(LETBAS[NKNT],IPT); *NKNT := NKNT-1; *GOTO 140 *END; *  9999: END. &  7IF JFLAG>0 THEN :BEGIN :SWITCH(JJ,IPT); :IFLAG := 1 :END; 7WRITELN(' INPUT WAS FAULTY--EXECUTION TERMINATED'); 6 IFLAG := 0 7END 4END 0END; 0 PROCEDURE TRANSPOS(VAR JJ,NKNT,I1,IS,LL,JFLAG,IPAR,NETKNT:INTEGER; & VAR IEXT:EXXT;VAR IPT:MNETS;VAR JS,JPAR:NETS; :VAR INSTA:NPTS;VAR IPARI:EXT); ,VAR I,K,N,KS,I2,L,M : INTEGER; ) BEGIN ,FOR I := 1) " Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @ՎL@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡ ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ 6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7" 8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""ՇL@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ  Չ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉ ȡ1Չܶ      ՉՊ ȡ)Պ @  NETGEN  Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@  Ֆ^K ץ Ֆ論K ՖáՖwՖ§ ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITáՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁ION OF @ZՋ ȡiՋՋ   7ՋϹBՋ 䥁祁奁᥁⥁K祀  ՗٧ˡ'՗՘dK ՘"՘4՘OfM >( f , x    )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՂQՂ^Ղx,ՂՂ ġ.Ճ ՃՃ% ڏՃ66 NNPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս ՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" 7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎl* Ֆd́ʁȡ1Ֆ4Ֆ;dՖI私dՖ^K ץ Ֆ論K ՖáՖwՖ§:= KS; 9IPAR := N; 9JPAR[NETKNT] := N; 9SWITCH(JJ,IPT); 9IF INSTA[JJ]<>13 THEN INSTA[JJ] := 23-INSTA[JJ]; 9IF JFLAG=-1 THENáՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁 JFLAG := 0; 8{GOTO 50} 9END 6END 3END 0END -END; 6 'BEGIN 'IPAR := 0 ; JJ := 0 ; IS := 0 ; LL := 0 ; I1 := 1 ; NETKNT 䥁祁奁᥁⥁K祀  ՗٧ˡ'՗՘dK ՘"՘4՘OfM >( f , x  := 1 ; 'JFLAG := -1; 'FOR I := 1 TO 100 DO +BEGIN +JPAR[I] := 0; +JS[I] := 0 +END; 'INP(IPT,INSTA,INSTAC,DUMMY,JS); ' 'PWROF2 J K P2 UNPACK I J K PACK I ORR VERIFY(I4SCOL,ISUM,IFLAG,JJ,IPT); 'IF IFLAG=1 THEN GOTO 140; 'IF IFLAG=0 THEN GOTO 9999; 'ORR(IPARI[I1],LL,L); 'IPARI[I1] :=I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP  L; ' 'DIAGNOSE(IPT,I4SCOL,INSTA,IPAR,NETKNT,ISUM,IEXT); ' 'LETBAS[NETKNT] := JJ; 'NKNT := NETKNT; 'NETKNT := NETKNT+1;   I J K BOOLE VERIFY I J TRANSPOSI K  140: TRANSPOS(JJ,NKNT,I1,IS,LL,JFLAG,IPAR,NETKNT,IEXT,IPT,JS,JPAR, 0INSTA,IPARI); 'IF NKNT<>1 THEN *BEGIN  Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5N L M I2 KS NETGEN I I1 J K L  ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑM I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMՑȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATEDY Ւ~h  ՓyȡՓՓ  ՓšՓՓ  ՓՓdՔšՔՔՔ:DIAGNOSTIC: I1= ՔVՔráՔՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? 3IF N>0 THEN 6BEGIN 6I1 := TRUNC((N-1)/16)+1; (WRITELN('DIAGNOSTIC: I1=',I1); 6I2 := N-16*(TRUNC(N/16)); 6IF I2=0 THEN I2  ˡՕX  ՕráՕՕD ՕՕՕՕՕՕՖ:= 16; 6LL := PWROF2(I2); 6XAND(IPARI[I1],LL,L); 6XAND(KS,IS,M); 6IF (L=0) AND (M<>IS) AND (M<>0) THEN 9BEGIN 9JS[NETKNT] + NTEGER; ,NPTS=ARRAY[1..10] OF INTEGER; ,MCHAR=ARRAY[1..10] OF CHAR; ,EXT=ARRAY[1..4] OF INTEGER; ,MNETS=ARRAY[1..10,1..10] OF INTEGER; ,EXXT=ARRAY[1..4,1..10] OF INTEGER; 'VAR ISUM,IPARI : EXT; +I4SCOL,INSTA : NPTS; +JS,JPAR,LETBAS : NETS; +IPT : MNETS; +IEXT : EXXT; +INSTAC : MCHAR; +IFLAG,JJ,I,I1,I2,J,K,L,LL,M,JFLAG,IS,NKNT,NETKNT,IPAR : INTEGER; +DUMMY : CHAR; + 'FUNCTION PWROF2(J:INTEGER) : INTEGER; 0VAR K : INTEGER; 4P2 : REAL; 0BEGIN 0K := J-1; 0P2 := EXP(K*LN(2)); 0PWROF2 := TRUN(* ((*1-C -M ,YˡD# OF BLOCKS ?  ɡbO^C(P2) 0END; 0 'PROCEDURE UNPACK(VAR A:INTEGER;VAR ARAY:NPTS); ,VAR I,J,K : INTEGER; ,BEGIN ,J := A; ,FOR I := 10 DOWNTO 1E\| DO 0BEGIN 0K := TRUNC(J/2); 0ARAY[I] := J-2*K; 0J := K 0END ,END; 5 'PROCEDURE PACK(VAR NEW:INTEGER;VAR ARAY:NPTS); ,VAR I : INTEGER; ,BEGIN ,NEW := 0; ,FOR I := 1 TO 10 DO , IF ARAY[I]=1 THEN 3NEW := NEW+PWROF2(11-I) ,END; , %PROCEDURE ORR(VAR A,B,C:INTEGER); *TYPE NPTS=ARRAY[1..10] OF INTEGER; +VAR U1,U2,U3 : NPTS; /I : INTEGER; )BEGIN )FOR I := 1 TO 10 DO -BEGIN -U1[I] := 0; -U2[I] := 0; -U3[I] := 0; -C := 0 -END; )UNPACK(A,U1); )UNPACK(B,U2); )FOR I := 1 TO 1*SWITCH(LETBAS[NKNT],IPT); *NKNT := NKNT-1; *GOTO 140 *END *  9999: END. &   & 'PROGRAM NETGEN;  (* 'PASCAL 1-COMPONENT VERSION MARCH, 1980  *) 'LABEL 50,140,9999; 'TYPE NETS=ARRAY[1..100] OF I, .10] OF INTEGER; +VAR U1,U2,U3 : NPTS; /I : INTEGER; )BEGIN )FOR I := 1 TO 10 DO -BEGIN -U1[I] := 0; -U2[I] := 0; -U3[I]8END 6END 3END; 3 *PROCEDURE INP(VAR IPT:MNETS;VAR INSTA:NPTS;VAR INSTAC:MCHAR; 8VAR DUMMY:CHAR;VAR JS:NETS); 0VAR I,J,K  := 0; -C := 0 -END; )UNPACK(A,U1); )UNPACK(B,U2); )FOR I := 1 TO 10 DO -IF U1[I]<>U2[I] THEN U3[I] :=1; )PACK(C,U3) )EN: INTEGER; 4BOOLE : BOOLEAN; 4TAPE2 : FILE OF CHAR; 4BEGIN 4BOOLE := FALSE; 4RESET(TAPE2,'TAPE2.TEXT'); 4WRITELN('INPUT FID; ' 'PROCEDURE XAND(VAR A,B,C:INTEGER); ' TYPE NPTS=ARRAY[1..10] OF INTEGER; -VAR U1,U2,U3 : NPTS; - I : INTEGER; RST NET'); 4WRITELN; 4FOR I := 1 TO 10 DO 8WRITE(CHR(I+64),' '); 8REPEAT :GET(TAPE2); :UNTIL ORD(TAPE2^)>=48; 4WRITELN; +BEGIN +FOR I := 1 TO 10 DO /BEGIN /U1[I] := 0; /U2[I] := 0; /U3[I] := 0; /C := 0 /END; +UNPACK(A,U1); +UNPACK(B,U2); 4FOR I := 1 TO 10 DO 8BEGIN 8FOR J := 1 TO 10 DO 47 THEN BOOLE := TRUE;  '5' THEN BOOLE := FALSE; 13 THEN ;BEGIN ;IS := IS+I; ;IF K=19 THEN JS[1] := JS[1]+I ;EN; 8IF J=JJ THEN IEXT[I,NETKNT] := -JJ; 8I := I+1; 8J := J+1 8END 5END 1END; -WRITELN; -WRITELN; -FOR I := 1 TO 10 DO 1D 8END; /(* 4INCREMENT IPT /*) 4FOR I := 1 TO 10 DO 8FOR J := 1 TO 10 DO (5-I) THEN 7BEGIN 0 DO -IF (U1[I]=0) OR (U2[I]=0) THEN U3[I] :=1; )PACK(C,U3) )END; ) %PROCEDURE XOR(VAR A,B,C:INTEGER); *TYPE NPTS=ARRAY[1.EGER; 2BEGIN 2FOR I := 1 TO 10 DO 6BEGIN 6CASE IPT[I,JJ] OF 81,2: (* *); 83 : IPT[I,JJ] := 4; 84 : IPT[I,JJ] := 3 -  140: TRANSPOS(JJ,NKNT,I1,IS,LL,JFLAG,IPAR,NETKNT,IEXT,IPT,JS,JPAR, 0INSTA,IPARI); 'IF NKNT<>1 THEN *BEGIN CTION PWROF2(J:INTEGER) : INTEGER; 0VAR K : INTEGER; 4P2 : REAL; 0BEGIN 0K := J-1; 0P2 := EXP(K*LN(2)); 0PWROF2 := TRUNC(P*SWITCH(LETBAS[NKNT],IPT); *NKNT := NKNT-1; *GOTO 140 *END; *  9999: END. &  2) 0END; 0 'PROCEDURE UNPACK(VAR A:INTEGER;VAR ARAY:NPTS); ,VAR I,J,K : INTEGER; ,BEGIN ,J := A; ,FOR I := 10 DOWNTO 1 DO7IF JFLAG>0 THEN :BEGIN :SWITCH(JJ,IPT); :IFLAG := 1 :END; 7WRITELN(' INPUT WAS FAULTY--EXECUTION TERMINATED'); 6 IFLAG := 0 7END 4END 0END; 0 PROCEDURE TRANSPOS(VAR JJ,NKNT,I1,IS,LL,JFLAG,IPAR,NETKNT:INTEGER; & VAR IEXT:EXXT;VAR IPT:MNETS;VAR JS,JPAR:NETS; :VAR INSTA:NPTS;VAR IPARI:EXT); ,VAR I,K,N,KS,I2,L,M : INTEGER; ) BEGIN ,FOR I := 1 TO 4 DO 0BEGIN 0JJ := IEXT[I,NKNT]; 0IF JJ>0 THEN 3BEGIN 3IEXT[I,NKNT] := -JJ; 3K := PWROF2(JJ); 3XOR(JPAR[NKNT],K,N); 3IF N>0 THEN 6BEGIN 6I1 := TRUNC((N-1)/16)+1; (WRITELN('DIAGNOSTIC: I1=',I1); 6I2 := N-16*(TRUNC(N/16)); 6IF I2=0 THEN I2 := 16; 6LL := PWROF2(I2); 6XAND(IPARI[I1],LL,L); 6XAND(KS,IS,M); 6IF (L=0) AND (M<>IS) AND (M<>0) THEN 9BEGIN 9JS[NETKNT] := KS; 9IPAR := N; 9JPAR[NETKNT] := N; 9SWITCH(JJ,IPT); 9IF INSTA[JJ]<>13 THEN INSTA[JJ] := 23-INSTA[JJ]; 9IF JFLAG=-1 THEN JFLAG := 0; 8{GOTO 50} 9END 6END 3END 0END -END; 6 'BEGIN 'IPAR := 0 ; JJ := 0 ; IS := 0 ; LL := 0 ; I1 := 1 ; NETKNT  & 'PROGRAM NETGEN;  (* 'PASCAL 1-COMPONENT VERSION MARCH, 1980  *) 'LABEL 140,9999; 'TYPE NETS=ARRAY[1..100] OF INTE:= 1 ; 'JFLAG := -1; 'FOR I := 1 TO 100 DO +BEGIN +JPAR[I] := 0; +JS[I] := 0 +END; 'INP(IPT,INSTA,INSTAC,DUMMY,JS); ' 'GER; ,NPTS=ARRAY[1..10] OF INTEGER; ,MCHAR=ARRAY[1..10] OF CHAR; ,EXT=ARRAY[1..4] OF INTEGER; ,MNETS=ARRAY[1..10,1..10] OF IVERIFY(I4SCOL,ISUM,IFLAG,JJ,IPT); 'IF IFLAG=1 THEN GOTO 140; 'IF IFLAG=0 THEN GOTO 9999; 'ORR(IPARI[I1],LL,L); 'IPARI[I1] :=NTEGER; ,EXXT=ARRAY[1..4,1..10] OF INTEGER; 'VAR ISUM,IPARI : EXT; +I4SCOL,INSTA : NPTS; +JS,JPAR,LETBAS : NETS; +IPT : MNE L; ' 'DIAGNOSE(IPT,I4SCOL,INSTA,IPAR,NETKNT,ISUM,IEXT); ' 'LETBAS[NETKNT] := JJ; 'NKNT := NETKNT; 'NETKNT := NETKNT+1;  TS; +IEXT : EXXT; +INSTAC : MCHAR; +IFLAG,JJ,I,I1,I2,J,K,L,LL,M,JFLAG,IS,NKNT,NETKNT,IPAR : INTEGER; +DUMMY : CHAR; + 'FUN. +BEGIN +FOR I := 1 TO 10 DO /BEGIN /U1[I] := 0; /U2[I] := 0; /U3[I] := 0; /C := 0 /END; +UNPACK(A,U1); +UNPACK(B,U2); 4FOR I := 1 TO 10 DO 8BEGIN 8FOR J := 1 TO 10 DO 47 THEN BOOLE := TRUE;  '5' THEN BOOLE := FALSE; 13 THEN ;BEGIN ;IS := IS+I; ;IF K=19 THEN JS[1] := JS[1]+I ;EN; 8IF J=JJ THEN IEXT[I,NETKNT] := -JJ; 8I := I+1; 8J := J+1 8END 5END 1END; -WRITELN; -WRITELN; -FOR I := 1 TO 10 DO 1D 8END; /(* 4INCREMENT IPT /*) 4FOR I := 1 TO 10 DO 8FOR J := 1 TO 10 DO U2[I] THEN U3[I] :=1; )PACK(C,U3) )EN: INTEGER; 4BOOLE : BOOLEAN; 4TAPE2 : FILE OF CHAR; 4BEGIN 4BOOLE := FALSE; 4RESET(TAPE2,'TAPE2.TEXT'); 4WRITELN('INPUT FID; ' 'PROCEDURE XAND(VAR A,B,C:INTEGER); ' TYPE NPTS=ARRAY[1..10] OF INTEGER; -VAR U1,U2,U3 : NPTS; - I : INTEGER; RST NET'); 4WRITELN; 4FOR I := 1 TO 10 DO 8WRITE(CHR(I+64),' '); 8REPEAT :GET(TAPE2); :UNTIL ORD(TAPE2^)>=48; 4WRITELN; / = 0 7END 4END 0END; 0 PROCEDURE TRANSPOSE(VAR JJ,NKNT,I1,IS,LL,JFLAG,IPAR,NETKNT:INTEGER; & VAR IE I J K BOOLE VERIFY I J TRANSPOSI K XXT:EXT;VAR IPT:MNETS;VAR JS,JPAR:NETS; :VAR INSTA:NPTS); ,VAR I,K,N,KS,I2,L,M : INTEGER; ) BEGIN ,FOR I := 1 TO 4 DO 0JJN L M I2 KS NETGEN I I1 J K L  := IEXT[I,NKNT]; 0IF JJ>0 THEN 3BEGIN 3IEXT[I,NKNT] := -JJ; 3K := PWROF2(JJ); 3XOR(JPAR[NKNT],K,N); 3IF N>0 THEN M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMM6BEGIN 6I1 := TRUNC((N-1)/16)+1; 6I2 := N-16*(TRUNC(N/16)); 6IF I2=0 THEN I2 := 16; 6LL := PWROF2(I2); 6XAND(IPARI[I1],LL,Y L); 6XAND(KS,IS,M); 6IF (L=0) AND (M<>IS) AND (M<>0) THEN 9BEGIN 9JS[NETKNT] := KS; 9IPAR := N; 9JPAR[NETKNT] := N; 9SWITCH(JJ,IPT); 9IF INSTA[JJ]<>13 THEN INSTA[JJ] := 23-INSTA[JJ]; 9IF JFLAG=-1 THEN JFLAG := 0; 8{GOTO 50} 9END 5END 1END -END; 6 'BEGIN 'IPAR := 0 ; JJ := 0 ; IS := 0 ; LL := 0 ; I1 := 1 ; NETKNT := 1 ; 'JFLAG := -1; 'INP(IPT,INSTA,INSTAC,DUMMY,JSPWROF2 J K P2 UNPACK I J K PACK I ORR ); ' 'VERIFY(I4SCOL,ISUM,IFLAG,JJ,IPT); 'IF IFLAG=0 THEN GOTO 9999; 'IF IFLAG=1 THEN GOTO 140; # 'DIAGNOSE(IPT,I4SCOL,INSTI "XOR I "XAND I "DIAGNOSEI J SWITCH I INP *PROCEDURE VERIFY(VAR I4SCOL:NPTS;VAR ISUM:EXT;VAR IFLAG,JJ:INTEGER; ;VAR IPT:MNETS); * VAR I,J : INTEGER; 0BEGIN 0IFLA,IPAR,NETKNT,ISUM,IEXT); &  140: ORR(IPARI[I1],LL,L); 'IPARI[I1] := L; '  9999: $END. &  AG := -1; 0FOR I := 1 TO 10 DO 4BEGIN 4I4SCOL[I] := 0; 4FOR J := 1 TO 4 DO 8ISUM[J] := 0; 4FOR J := 1 TO 10 DO 8BEGIN 8K := IPT[J,I]; 8ISUM[K] := ISUM[K]+1; 8END; 4I4SCOL[I] := ISUM[4]; 4END; 0FOR I := 1 TO 4 DO 4ISUM[I] := 0; 0FOR I := 1 TO 10 DO 4BEGIN 4J := I4SCOL[I]-2; 4ISUM[J] := ISUM[J]+1; 4END; 0FOR I := 1 TO 4 DO 4BEGIN 4IF ISUM[I]<>(5-I) THEN 7BEGIN PWROF2 J K P2 UNPACK I J K PACK I ORR 7IF JFLAG>0 THEN :BEGIN :SWITCH(JJ,IPT); :IFLAG := 1 :END; 7WRITELN(' INPUT WAS FAULTY--EXECUTION TERMINATED'); 6 IFLAG :I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP 0 M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMY PWROF2 J K P2 UNPACK I J K PACK I ORR I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP  I J K BOOLE VERIFY I J TRANSPOSI K N L M I2 KS NETGEN I I1 J K L  Value range error Invalid value was 19,outside range of [1..4] In source line: XAND(IPARI[I1],LL,L); Variables in module TRANSPM I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMOS: I := 1 K := 4 N := 295 L := -19560 M := Y  -19558 I2 := 7 KS := -19548 Variables in program NETGEN: I := 439  I1 := 19 J := 5406 K := 1 L := 1023 M :=  I J K BOOLE VERIFY I J TRANSPOSI K N L M I2 KS NETGEN I I1 J K L 1 PWROF2 J K P2 UNPACK I J K PACK I ORR  IPAR IS DUMMY  1546 I2 := 8 NETKNT := 2 IFLAG := -1 JJ := 3 JFLAG := I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP  -1 LL := 64 NKNT := 1 IPAR := 0 IS := 683 DU I J K BOOLE VERIFY I J TRANSPOSI K MMY := '0' N L M I2 KS NETGEN I I1 J K L M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMPWROF2 J K P2 UNPACK I J K PACK I ORR Y I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP  I J K BOOLE VERIFY I J TRANSPOSI K N L M I2 KS NETGEN I I1 J K L PWROF2 J K P2 UNPACK I J K PACK I ORR M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMI "XOR A B C I "XAND I "DIAGNOSEI J Y  SWITCH I INP I J K BOOLE VERIFY I J TRANSPOSI K N L M I2 KS NETGEN I I1 J K L M I2 NETKNT IFLAG JJ JFLAG LL NKNT2 ՂQՂ^Ղx,ՂՂ ġ.Ճ ՃՃ% ڏՃ66 NPWROF2 J K P2 UNPACK I J K PACK I ORR ՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP " Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7 I J K BOOLE VERIFY I J TRANSPOSI K L@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡN L M I2 KS NETGEN I I1 J K L M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMPWROF2 J K P2 UNPACK I J K PACK I ORR Y I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP  I J K BOOLE VERIFY I J TRANSPOSI K N L M I2 KS NETGEN I I1 J K L  NETGEN M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMM Ֆ^K ץ Ֆ論K ՖáՖwՖ§Y áՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁䥁祁奁᥁⥁K祀  ՗ ^d l p 2 D  dՕ ՕdՕ1 Օ? 3  ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITáՔՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? ION OF @ZՋ ȡiՋՋ   7ՋϹBՋ  ˡՕX  ՕráՕՕD ՕՕՕՕՕՕՖ  )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՖd́ʁȡ1Ֆ4Ֆ;dՖI私dՖ^K ץ Ֆ論K ՖáՖwՖ§NPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս áՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎl䥁祁奁᥁⥁K祀  ՗ ^d l p 2 D  dՕ ՕdՕ1 Օ? ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @Վ NETGEN  ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ  Ֆ^K ץ Ֆ論K ՖáՖwՖ§6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7" 8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""Շ Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5L@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ   ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑՉ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉՑȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATED ȡ1Չܶ      ՉՊ ȡ)Պ @ Ւ~h  ՓyȡՓՓ  ՓšՓՓ  Փ Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@ ՓdՔšՔՔՔ:DIAGNOSTIC: I1= ՔVՔr4 ՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" 7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎl" Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @ՎL@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡ ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ 6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7" 8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""Շ Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5L@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ   ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑՉ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉՑȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATED ȡ1Չܶ      ՉՊ ȡ)Պ @ Ւ~h  ՓyȡՓՓ  ՓšՓՓ  Փ Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@ ՓdՔšՔՔՔ:DIAGNOSTIC: I1= ՔVՔr ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITáՔՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? áՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁ION OF @ZՋ ȡiՋՋ   7ՋϹBՋ 䥁祁奁᥁⥁K祀  ՗٧ˡ'՗՘dK ՘"՘4՘OfM >( f , x    )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՂQՂ^Ղx,ՂՂ ġ.Ճ ՃՃ% ڏՃ66 NNPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս 5  ˡՕX  ՕráՕՕD ՕՕՕՕՕՕՖՉuՉ| ́5ʁ5ȡ Չ@ ՉՉՉ0ġՉ߶Չ ́5ʁ5ȡՉՊ Ֆd́ʁȡ1Ֆ4Ֆ;dՖI私dՖ^K ץ Ֆ論K ՖáՖwՖ§6ʁ6ȡ]ՊՊ$Պ4/šՊMՊ[5šՊrՊՊ   0ՊՊՊͶՊՊ߶áՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁"INPUT STABILITY LEVELS--S, M, OR DՋ  ́5ʁ5ȡ$Ջ#Ջ)Ջ9 @3w1]d䥁祁奁᥁⥁K祀  ՗٧ˡ'՗՘dK ՘"՘4՘OfM >( f , x  Ջ ȡՋՌ ՌȡՌ-Ռ< ȡBՌTՌX   QՌlڧQՂcՂpՂ,ՂՃ ġ.ՃՃ!Ճ7 ڏՃH6 NQՌՌ ՌՌȡՌՌ ȡ7ՌՌ ՍՃՃ ȡ'Ճ áՃ ڕ/ FՄ" #"#ȡAՄՄ" Մ" ՍՍȡwՍ6Ս;ݕˡZՍWՍ\Mš ՍqՍzՍՍ' INPUT WAS FAULTY--EXECUT" Մ""ՄՄՄ" #"#ȡ6Յ" " ˡՅ(" ""Յ7HION TERMINATEDՍ~a ՎIՎ VՎLՎOՎ)TՎ7JՎFMՎSA5?@ ՅöՅζՅ ȡ Յ@ Ն ȡRՆՆ%Ն, ȡ/ՆDWՎwA5IՎR ̃XRʃXȡrՎՎRUՎĥ5R QՎ֧Q ˡ7ՎՎLULՎQáՏ d     ՆcՆj ȡ)Ն @ ՆՆdUՏ$RRՏEU ̃XUʃXȡ]Տ[R ̃YRʃYȡ?ՏqAU  R AU  R RRTHE PARITY IF THIS NET IS  Նġ)Ն@ ՇARE THE EUUՏ IPT(1,1)=A    ՏVA ՏUՏ֧UɡՏR ̃XRʃXȡՏՐXTERNAL INVARIANTSՇ;ՇFTHIS NET WAS DERIVED FROM # K  BY TRANSPOSITION OF R áeՐՐ$UdJdRՐ9RVáՐHUdJdVՐ^UUՐjRRՐxRRV@Շ@^$Ո ȡiՈՈ$   7ՈABՈL   )ՈcՐA5IՐTTOՐՐ:@*R  4  QáՏ d   ?A>'q Ɓ4Չ&Չ8 TAPE2.TEXTՉWINPUT FIRST NETdUՏ$RRՏEU ̃XUʃXȡ]Տ[R ̃YRʃYȡ?ՏqAU  R AU  R RR6 ՊѧMš ՊՊՋ Ջ' INPUT WAS FAULTY--EXECUTION TERMINATEDՋW~aՋvIՃs ȡRՃՃՃ ȡ/Ճ     ՃӶՃ VՋLՋOՋTՋJՋMՋȥA5?WՌ A5IՌ)R ̃XRʃXȡrՌAՌERUՌW5R ȡ)Մ @ Մ(Մ3THE PARITY IF THIS NET IS  Մ]ȡ)QՌiQ ˡ7Ռ|ՌLULՌQáՌddUՌRRՌU ̃XUʃXȡ]ՌR ̃YRʃYȡ?ՍAՄt@ ՄARE THE EXTERNAL INVARIANTSՄՄǶTHIS NET WAS DERIVED FROM #UUՏ IPT(1,1)=A    ՏVA ՏUՏ֧UɡՏR ̃XRʃXȡՏՐU  R AU  R RRUUՍ" IPT(1,1)=A    ՍR áeՐՐ$UdJdRՐ9RVáՐHUdJdVՐ^UUՐjRRՐxRRBVAՍ[UՍiUɡՍvR ̃XRʃXȡՍՍR áeՍՍUdJdRՍȧRVáՍץUK  BY TRANSPOSITION OF V@Յ@\8Յs ȡiՅՅdJdVՍUUՍRRՎRRՎA5IՎ=TTOՎ[Վi:@   7ՅBՅ   )Յ   ?A>'q Ɓ4Ն*R  LՌQáՌddUՌRRՌU ̃XUʃXȡ]ՌR ̃YRʃYȡ?ՍAՆ TAPE2.TEXTՆŶINPUT FIRST NETՆՆ ́5ʁ5ȡ Շ@ ՇU  R AU  R RRUUՍ" IPT(1,1)=A    Ս!Շ10ġՇMՇT ́5ʁ5ȡՇlՇr ́6ʁ6ȡ]ՇՇՇ/šՇՇ5šՇՈՈ   NETGEN  0Ո7ՈEՈPՈWՈb"INPUT STABILITY LEVELS--S, M, OR DՈ ́5ʁ5ȡ$Ո 5IՎ=TTOՎ[Վi:@Ո @3w1]dՉ\ ȡՉtՉ} ՉȡՉ*R  LՌQáՌddUՌRRՌU ̃XUʃXȡ]ՌR ̃YRʃYȡ?ՍՉ ȡBՉՉ   QՉڧQڧQՉՊ ՊՊȡAU  R AU  R RRUUՍ" IPT(1,1)=A    4ՊC ȡ7Պ[Պ_ ՊvՊՊȡwՊՊݕˡZՊՂcՂpՂ,ՃՃ(Ճ3Ճ>ՃE ȡ Ճ]@ 7 Պ4ՊC ȡ7Պ[Պ_ ՊvՊՊȡwՊՊݕˡZՂcՂpՂ,ՃՃ(Ճ3Ճ>ՃE ȡ Ճ]@ ՊѧMš ՊՊՋ Ջ' INPUT WAS FAULTY--EXECUTION TERMINATEDՋW~aՋvՃs ȡRՃՃՃ ȡ/Ճ     ՃӶՃ IՋVՋLՋOՋTՋJՋMՋȥA5?WՌ A5IՌ)R ̃XRʃXȡrՌAՌERUՌW5R ȡ)Մ @ Մ(Մ3THE PARITY IF THIS NET IS  Մ]ȡ)QՌiQ ˡ7Ռ|ՌLULՌQáՌddUՌRRՌU ̃XUʃXȡ]ՌR ̃YRʃYȡ?ՍՄt@ ՄARE THE EXTERNAL INVARIANTSՄՄǶTHIS NET WAS DERIVED FROM #AU  R AU  R RRUUՍ" IPT(1,1)=A     K  BY TRANSPOSITION OF V@Յ@^:Յ{ ȡiՅՍBVAՍ[UՍiUɡՍvR ̃XRʃXȡՍՍR áeՍՍUdJdRՍȧRVáՍץ   7ՅBՅ   )Յ   ?A>'q Ɓ4 K  BY TRANSPOSITION OF V@Յ@^:Յ{ ȡiՅUdJdVՍUUՍRRՎRRՎA5IՎ=TTOՎ[Վi:@   7ՅBՅ   )Յ   ?A>'q Ɓ4*R  LՌQáՌddUՌRRՌU ̃XUʃXȡ]ՌR ̃YRʃYȡ?ՍՆ TAPE2.TEXTՆͶINPUT FIRST NETՆՆ ́5ʁ5ȡ Շ @ ՇAU  R AU  R RRUUՍ" IPT(1,1)=A    #Շ)Շ90ġՇUՇ\ ́5ʁ5ȡՇtՇz ́6ʁ6ȡ]ՇՇՇ/šՇՇ5šՇՈՈ   NETGEN  0Ո7ՈEՈPՈWՈb"INPUT STABILITY LEVELS--S, M, OR DՈ ́5ʁ5ȡ$Ո 5IՎ=TTOՎ[Վi:@ՈՈ @3w1]dՉ\ ȡՉtՉ} ՉȡՉ*R  LՌQáՌddUՌRRՌU ̃XUʃXȡ]ՌR ̃YRʃYȡ?ՍՉ ȡBՉՉ   QՉڧQڧQՉՊ ՊՊȡAU  R AU  R RRUUՍ" IPT(1,1)=A    8 Չ ȡBՉՉ   QՉڧQڧQՉՊ ՊՊȡH4jjB!P$$>&''''*:)^++-z,-4.(0Z.020f3d4445T9:*5;<N^h HELLO THEREՀTHIS IS A BUNCH OF GARBAGEՀTHIS IS ALSO GARBAGE@ ABC ՀʹՀՀ   ˡ.ɡ9  ˡ.ɡ9 ˡU. is   characters long. ˡU. is   characters long. -qړf2Do you want to Exit from or Return to the editor?  -qړf2Do you want to Exit from or Return to the editor? PWROF2 J K P2 UNPACK I J K PACK I ORR 7>N"` HELLO THERE'8 6NJˡ.I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP ; M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMI "XOR I "XAND I "DIAGNOSEI J SWITCH I INP Y  I J K BOOLE VERIFY I J TRANSPOSI K N L M I2 KS NETGEN I I1 J K L M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMPWROF2 J K P2 UNPACK I J K PACK I ORR Y Ճ% Ճ9?ՃOՃf٫ Ճ}Ճ8Ճǀ% ՃՄ(Մ6ՄA ՄWՄiՄ{@ՄI "XOR I "XAND I "DIAGNOSEI J SWITCH I INP Մ Մ Մ ՄՄՅ^Յ<٫ՅLثՅ^ ՅnՅՅȄĄȄYՆFՆ' I J K BOOLE VERIFY I J TRANSPOSI K @ՆI-Նl M<+Ն ՆՇٕՇؕՇˡ ՇN L M I2 KS NETGEN I I1 J K L ߊՇɡ+ՈՈˡՈ*Ո8ՈkՈ/Ոš&ՈˡՈՈՉՉ%Չ:ˡ`ՉLɡ(ՉM I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMfՉsˡՉՉՉ˹/Չš&ՉՊˡՊՊJՊ^ՊnՊՊՊՊY ՊՊՋȄĄȄˍ1ՋՋˍˍՋՌ  ՌZՌqޫՌݫՌ ՍՍ+Ս@ՍOՍaȡXՍ|ՍՍۂՍڂՍՍՎ؂Վ؂Վ2؏ՎT؏ՎsՎc ՏˡՏ8ՏHAڊՏ_يՏo9=Տ؊Տ9=Տ Տ ՏڂՏPWROF2 J K P2 UNPACK I J K PACK I ORR < Ք˄˄qՔՔdՔՔdՕ Օ  ˡՕ)  ՕC  )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՂNՂ[Ղu,ՂՂ ġ.ՃՃ Ճ" ڏՃ36 NNPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս ՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" 7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎl" Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @ՎL@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡ ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ 6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7" 8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""Շ Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5L@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ   ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑՉ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉ ȡ1Չܶ      ՉՊ ȡ)Պ @  NETGEN  Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@  ¥Ֆ<& d * v   ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITՓՓdՓšՔՔ Ք'ՔCáՔPՔ\ՔrION OF @ZՋ ȡiՋՋ   7ՋϹBՋ = ՓՓdՓšՔՔ Ք'ՔCáՔPՔ\ՔrL@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡՔ˄˄qՔՔdՔՔdՕ Օ  ˡՕ)  ՕC6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7" ՕWՕo] n ՕՕՕՕՕՕՕՕ楁K ץ Ֆ論K Ֆ.áՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""Շ@PՖKáՖ]ՖpK ᥁Ֆ祁Ֆ¥Ֆ<& d * v  L@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ  ՓՓdՓšՔՔ Ք'ՔCáՔPՔ\ՔrՉ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉՔ˄˄qՔՔdՔՔdՕ Օ  ˡՕ)  ՕC ȡ1Չܶ      ՉՊ ȡ)Պ @  NETGEN  Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@  Ֆ^K ץ Ֆ論K ՖáՖwՖ§ ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITáՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁ION OF @ZՋ ȡiՋՋ   7ՋϹBՋ 䥁祁奁᥁⥁K祀  ՗ ^d l p 2 D  dՕ ՕdՕ1 Օ?   )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՂQՂ^Ղx,ՂՂ ġ.Ճ ՃՃ% ڏՃ66 NNPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս Ցȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATEDՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" Ւ~h  Փlȡ#Փ䥁  ՓšՓՓ  " Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7> áՖԹՖ祁Ֆ՗K ᥁՗Fd՗\⫁՗p՗㥁쥁N L M I2 KS NETGEN I I1 J K L 7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎl䥁祁奁᥁⥁K祀  ՗ ^d l p 2 D  dՕ ՕdՕ1 Օ? ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @ՎPWROF2 J K P2 UNPACK I J K PACK I ORR  ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP 8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐ I J K BOOLE VERIFY I J TRANSPOSI K  Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5N L M I2 KS NETGEN I I1 J K L  ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑM I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMՑȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATEDY Ւ~h  ՓyȡՓՓ  ՓšՓՓ  ՓՓdՔšՔՔՔ:DIAGNOSTIC: I1= ՔVՔráՔՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? PWROF2 J K P2 UNPACK I J K PACK I ORR  ˡՕX  ՕráՕՕD ՕՕՕՕՕՕՖI "XOR I "XAND I "DIAGNOSEI J SWITCH I INP Ֆd́ʁȡ1Ֆ4Ֆ;dՖI私dՖ^K ץ Ֆ論K ՖáՖwՖ§ I J K BOOLE VERIFY I J TRANSPOSI K ? ՇO" Շ\""ՇqՇՇ" #"#ȡ:Շ" " ÄՇ" ""ՇTY--EXECUTION TERMINATEDՐ~a ՐIՐVՐLՐOՐTՐJՐMՐL@ Ո{ՈՈ ȡ Ո@ Ո ȡTՈՈݶՈ A5?W ՑR ̃XRʃXȡrՑ5Ց9RUՑK5R QՑ]Q ˡ7ՑpՑuLULՑQáՑdd1Ո     ՉՉ$ ȡ)Չ< @ Չ]UՑRRՑU ̃XUʃXȡ]ՑR ̃YRʃYȡ?ՑAU  R AU  R RRUՉhTHE PARITY IF THIS NET IS  Չġ)Չ@ Չ˶UՒVA Ւ.UՒ'q Ɓ4ՋՋ TAPE2.TEXTՌ INPUT FIRST NETՌ'Ռ. ́5ʁ5ȡ ՌF@ Ռ_ՌeՌu0ġՌՌ ́5ʁ5ȡՂcՂpՂ,ՂՃ ġ.ՃՃ!Ճ7 ڏՃH6 NՌ ́6ʁ6ȡ]ՌՌՌ/šՌՍ 5šՍ$Ս3ՍI   0ՍfՍtՍՍՃՃ ȡ'Ճ áՃ ڕ/ FՄ" #"#ȡAՄՄ" Մ" Ս"INPUT STABILITY LEVELS--S, M, OR DՍ ́5ʁ5ȡ$ՍՍՍ @3w" Մ""ՄՄՄ" #"#ȡ:Յ" " ÍՅ2" ""ՅA1]d Վ ȡՎՎ ՎȡՎՎ ȡBՎՎ   QՏڧL@ Յ" #"#ȡAՅՅ" Յ" Ն" Ն""Ն)Ն9ՆF" #"#ȡQڧQՏ'Տ1 ՏFՏMȡՏcՏr ȡ7ՏՏ 6Ն[" " ˡՆp" ""ՆH@ Շ" #"#ȡAՇ.Շ3" ՇA" ՏՏՏȡwՏՏݕˡZՏՐMš ՐՐ" Ր?ՐJ' INPUT WAS FAUL@ ՂoՂ|Ղ,ՃՃ ġ.Ճ)Ճ-ՃC ڏՃT6 NՌ ́6ʁ6ȡ]ՌՌՌ/šՌՍ 5šՍ$Ս3ՍI   0ՍfՍtՍՍՃՃ ȡ'Ճ áՄ ڕ/ FՄ" #"#ȡAՄՄ" Մ" Ս"INPUT STABILITY LEVELS--S, M, OR DՍ ́5ʁ5ȡ$ՍՍՍ @3w" Մ""ՄՅ Յ" #"#ȡ:Յ-" " ÍՅL" ""Յ[1]d Վ ȡՎՎ ՎȡՎՎ ȡBՎՎ   ՏڧL@ Յ" #"#ȡAՆՆ" Ն" Ն!" Ն.""ՆCՆSՆ`" #"#ȡڧՏ'Տ1 ՏFՏMȡՏcՏr ȡ7ՏՏ 6Նu" " ˡՆ" ""ՆH@ Շ0" #"#ȡAՇHՇM" Շ[" ՏՏՏȡwՏՏݕˡZՏՐš ՐՐ" Ր?ՐJ' INPUT WAS FAULՇi" Շv""ՇՇՇ" #"#ȡ:Շ" " ÄՇ" ""ՇTY--EXECUTION TERMINATEDՐ~a Ցmȡ#Ց䥁  ՑL@ Ո{ՈՈ ȡ Ո@ Ո ȡTՈՈݶՈ šՑՑ  ՑՑdՑšՒՒՒ Ւ<áՒIUdJdVՒUUՒ̧RRՒڧRRՒ論A5IՓTOPՓ.TPՓI@1Ո     ՉՉ$ ȡ)Չ< @ Չ]@FjXJP bT  ( |  UՑK5R QՑ]Q ˡ7ՑpՑuLULՑQáՑddՉhTHE PARITY IF THIS NET IS  Չġ)Չ@ Չ˶$ NETGEN ARE THE EXTERNAL INVARIANTSՉՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITION Օ祁ՖՖ1@@FjX OF @ՊU@^&Պ ȡiՊՊ   7ՊBՊ   JPN P  3ͧ ՔE ˡ7ՔXՔ]䧁킫ՔkáՔxdd킚Ք)Ջ   ?A>'q Ɓ4ՋՋ TAPE2.TEXTՌ INPUT FIRSTՔ ́ʁȡ]Ք ́ʁȡ?ՔुA   A   Ք NETՌ'Ռ. ́5ʁ5ȡ ՌF@ Ռ_ՌeՌu0ġՌՌ ́5ʁ5ȡA Ք ́ʁȡ]Ք ́ʁȡ?ՔुA   A   ՔANTSՅ=ՅHTHIS NET WAS DERIVED FROM # K  BY TRANSPOSITION OF V@A ՕՕ$ɡՕ1 ́ʁȡՕIՕN áeՕgՕn  Օ꧁áՕ Յ@^$Յ ȡiՆՆ   7Ն8BՆC   )ՆZ    ՕՕՕ§ՕץAͥՕ祁ՖՖ1@@FjX?A>'q Ɓ4ՇՇ/ TAPE2.TEXTՇNINPUT FIRST NETՇlJPN P  3ͧ ՔE ˡ7ՔXՔ]䧁킫ՔkáՔxdd킚ՔՇs ́5ʁ5ȡ Շ@ ՇՇՇ0ġՇֶՇ ́5ʁ5ȡՇՈ ́6ʁ6ȡ]ՈՈՔ ́ʁȡ]Ք ́ʁȡ?ՔुA   A   Ք%Ո5/šՈNՈ\5šՈsՈՈ   0ՈՈՈζՈՈ"INPUT STABIV NETGEN LITY LEVELS--S, M, OR DՉ  ́5ʁ5ȡ$Չ$Չ*Չ: @3w1]dՉ  JdVՎ_UUՎkRRՎyRRՎA5IȡՉՉ Պ ȡՊ Պ/ ȡBՊGՊK   QՊ_ڧQڧQՎTTOՎՎ:@*R " LՍQáՍddUՍՊvՊ ՊՊȡՊՊ ȡ7ՊՊ Պ)RRՍJU ̃XUʃXȡ]Ս`R ̃YRʃYȡ?ՍvAU  R AU  R RRUUՍՋ ՋȡwՋ)Ջ.ݕˡZՋJՋOMš ՋdՋmՋՋ' INPUT WAS FAULTY--EXECUTION TERMINATEDՂcՂpՂ,ڨ ՂՃ ȡ%Ճ ˡ Ճ-. JՃՋ~aՌIՌVՌLՌ$OՌ.TՌ<JՌKMՌXA5?WՌ|A5ՒUՒkՒՒ˄˄qՒՒdՒՒdՒ Փ   ˡՓ"¶ՃͶՃ ȡ Ճ@ Մ ȡRՄՄ'Մ. ȡ/ՄF     Փ<áՓPՓh ] n ՓՓՓՓՓՓՓՓߥAͥץ   ՄeՄl ȡ)Մ @ ՄՄTHE PARIT ́ʁȡrՔՔ!Ք3ͧ ՔE ˡ7ՔXՔ]䧁킫ՔkáՔxdd킚ՔY IF THIS NET IS  Մġ)Մ@ ՅARE THE EXTERNAL INVARIB IՌR ̃XRʃXȡrՌՌRUՌɥ5R QՌۧQ ˡ7ՌՌLULՍQáՍddUՍ)RRՍJU ̃XUʃXȡ]Ս`R ̃YRʃYȡ?ՍvAU  R AU  R RRUUՍTEST (  IPT(1,1)=A    ՍVAՍUՍۧUɡՍR ̃XRʃXȡՎՎR áeՎՎ%UdJdRՎ:RVáՎIUdJdVՎ_UUՎkRRՎyRRՎA5IՎTTOՎՎ:@*R " LՍQáՍddUՍ)RRՍJU ̃XUʃXȡ]Ս`R ̃YRʃYȡ?ՍvAU  R AU  R RRUUՍ3,   b(PASCALSYEDITOR S2 S3 S4 S5 S6 S7 TEST S8 S9 INITIALIFINISH ENVIRONMBLEND EDITCORE P  D"ۊ)HۊܳHaFD!٪P what marker? - ئ Щ,- V,Vȡ,-,,, t% . Type 1Error # . Type  á    Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6TEST %$-ا6 $87؄8G2988 9988,ٕڶ7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&.TT-S -S .5454SYSTEM.آÄآXJd0X@XC 7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&.TT-S -S .5454SYSTEM.آÄآXJd0X@X.TT-S -S .5454SYSTEM.آÄآXJd0X@X  Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6 Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6%$-ا6 $87؄8G2988 9988,ٕڶ Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6%$-ا6 $87؄8G2988 9988,ٕڶ%$-ا6 $87؄8G2988 9988,ٕڶ7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&.TT-S -S .5454SYSTEM.آÄآXJd0X@X.TT-S -S .5454SYSTEM.آÄآXJd0X@X Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6 Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6%$-ا6 $87؄8G2988 9988,ٕڶ%$-ا6 $87؄8G2988 9988,ٕڶ7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&.TT-S -S .5454SYSTEM.آÄآXJd0X@X.TT-S -S .5454SYSTEM.آÄآXJd0X@X Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6 Place Bytes-ض8%ÍK7%ا9$&(+%8-ء 6%$-ا6 $87؄8G2988 9988,ٕڶ%$-ا6 $87؄8G2988 9988,ٕڶ7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&D Y L@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ  Չ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉ ȡ1Չܶ      ՉՊ ȡ)Պ @  NETGEN  Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@  Ֆ祁ՖՖΥK ᥁ ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSIT՗d՗⫁՗-՗L㥁쥁䥁祁奁᥁⥁K祀  ՗ &d * ION OF @ZՋ ȡiՋՋ   7ՋϹBՋ 7šڸ7šC6ڂ64{{{ Unused }}}   ,b.69#TáWriting&R  ՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? .TT-S -S .5454SYSTEM.آÄآXJd0X@XՂQՂ^Ղx,ՂՂ ġ.Ճ ՃՃ% ڏՃ66 NPWROF2 J K P2 UNPACK I J K PACK I ORR ՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" I "XOR I "XAND I "DIAGNOSEI J SWITCH I INP " Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7 I J K BOOLE VERIFY I J TRANSPOSI K L@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡN L M I2 KS NETGEN I I1 J K L 6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7" M I2 NETKNT IFLAG JJ JFLAG LL NKNT IPAR IS DUMMՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""ՇE  ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ  Ֆ祁ՖՖΥK ᥁8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐ՗d՗⫁՗-՗L㥁쥁䥁祁奁᥁⥁K祀  ՗ &d *  Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5R  ՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ?  ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑՂQՂ^Ղx,ՂՂ ġ.Ճ ՃՃ% ڏՃ66 NՑȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATEDՃՃ ȡ'Ճ áՃ ڕ/ FՄ|" #"#ȡAՄՄ" Մ" Ւ~h  ՓyȡՓՓ  ՓšՓՓ  Փ" Մ""ՄՄՄ" #"#ȡ:Յ " " ÍՅ(" ""Յ7ՓdՔšՔՔՔ:DIAGNOSTIC: I1= ՔVՔrL@ Յ" #"#ȡAՅՅ" Յ" Յ" Ն ""ՆՆ/Ն<" #"#ȡáՔՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? 6ՆQ" " ˡՆf" ""ՆuH@ Շ " #"#ȡAՇ$Շ)" Շ7"  ˡՕX  ՕráՕՕD ՕՕՕՕՕՕՖՇE" ՇR""ՇgՇwՇ" #"#ȡ:Շ" " ÄՇ" ""Շ  )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՖK ץ ՖC論K ՖcáՖuwՖáՖՖ祁ՖՖΥK ᥁NPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս ՗d՗⫁՗-՗L㥁쥁䥁祁奁᥁⥁K祀  ՗ &d * 7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎlR  ՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @Վ NETGEN F Չ+ Չ7Չ[ՉfՉm ȡ Չ@  Չ ȡTՉՉՉՑȡ}ՑՑޕˡ`ՑՒšՒՒ" Ւ3ՒI' INPUT WAS FAULTY--EXECUTION TERMINATED ȡ1Չܶ      ՉՊ ȡ)Պ @ Ւ~h  ՓyȡՓՓ  ՓšՓՓ  Փ Պ=ՊHTHE PARITY IF THIS NET IS  Պr  ġ)Պ@ ՓdՔšՔՔՔ:DIAGNOSTIC: I1= ՔVՔr ՊARE THE EXTERNAL INVARIANTSՊնՊTHIS NET WAS DERIVED FROM #   BY TRANSPOSITáՔՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? ION OF @ZՋ ȡiՋՋ   7ՋϹBՋ  ˡՕX  ՕráՕՕD ՕՕՕՕՕՕՖ  )Ջ   ?A>'q  Ɓ6Ռ Ռ TAPE2.TEXTՌIՖK ץ ՖC論K ՖcáՖuwՖáՖՖ祁ՖՖΥK ᥁NPUT FIRST NETՍՍ ́7ʁ7ȡ Ս3@ ՍLՍR Սb0ġՍ~Ս ՗d՗⫁՗-՗L㥁쥁䥁祁奁᥁⥁K祀  ՗ &d * 7ʁ7ȡՍՍ ́8ʁ8ȡ]ՍՍՍ/šՍ Ս5šՎ Վ Վ6   0ՎS ՎaՎlR  ՔՔՔՔ˄˄qՔՔdՕ ՕdՕ1 Օ? ՎsՎ~"INPUT STABILITY LEVELS--S, M, OR DՎ ́7ʁ7ȡ$ՎՎ Վ @Վ B)o$p낾)átr  ́7ʁ7ȡZՏՏՏ( Տ: ˡ/ՏMՏR߂Տ`áՏmdd߂Տ ́7ʁ7ȡHՏ f-&áO- ç(ç)Íɡ-8ʁ8ȡ0Տ       WHA'f  ՐՐ ȡՐՐn)ġ #ꂧ( d-- Ր ȡՐՐ ȡBՐՑ   ՑۧۧՑ+Ց5 --'+) !&/-'+-)á-& F-ǀ?-L@ Ո Ոɡ|ՈՈ ȡiՈՈ áNՈՈ  ߚՉߧáՉ   ՑJՑQȡՑgՑv ȡ7ՑՑ ՑՑG    ɡP^ Ȅ0ɡ #ĥڷw+] )  =߹%+&',<á%&! ášĶ     !#%߹E"m#i,<á"#[ W!S$NšToo many$0), $* -    * á   ǀń? )á)   ɡit"T ؂  ȡ  ! 8  ɡ    š  Ʉ5 ášĶ   |# ˡP- á l-    ٕاsrġ - ؕ,<áZń7)á) ġ  ø ɡɄ-ɡ ؞ق)(o٫ګr    U ؂ \áĸ šTħ Í = .*ȡ    0J Insert: Text { a char, a line } [ accepts, escapes]P    "$%&؂ɡꂾ(Ä؂  ˡOšǀ2á ǀ-)!fš ,dšBuffer overflow' ˡ땫ꂧ(؂ &-á&ȡ    #-+á psĄ-pÄ- ˄ %(,  0K Adjust: Left, Right, Center { to leave }P --á --߹á   ߳0á -!-áثd; 0Ʉګڂ٥á<,>,  ȧ_$ Oá(Eܹ-r(1sڕ($srڕr( 4-"*č:c z ^ġ)š (á(zá (f"O á r(/ ásڕ(srڕrš  * ç,<öÍ  ˄ ń( -!ˡ-!á۫,x 'ȡo,<á2" "ȥڷ0H ɡ ٕٕ  ث ٕ٫  á ޶  z)'+Ʉ á C ;   d V-á-á'* "--á -)ö -*ˡ   á:;4z fá:;   3Lǀ zL-P.-'+)./- --Lá2-Vá%-Tá-Cá -Ná- š 2á򥁿Lá}ŧ(˄ȍ'áPP .- --PP/ 0zB áL/- (Invalid delim ȥ  ÄLd9.۪PڪP0.P [All]iter. -E.- á.E)Eń  EE_-*áBC<DBFDFȡ,Eȡ[ ]ءPáIGca& Ogá2áá   Dá2á *áDEDEEDD-ˡ E-EE-EčEġ.Your pattern is too long آ   ߳ "*ȡLڂ)á-ń ۂEآ R1L$ۂ Lۂ áۂLۂá۶"H b2ڂS^+ȡˡˡȡ ȡ '+()(á8 @3Lǀ zL[L4[ p š ɡ,ńLaA2LL 5á >   ؂  šٮ ݮ+,    0C Delete: < > { to delete, to abort }P  --ߧá     6f p75` š=L ˡ  ߹ ߳|߹O"i#e,<á"#W S!O$Já<,>,,") 6lv8,>á874)z  á 46EC_]Kcٕ ,-˧-!˄ -!-!ámÄ L ٕ܄Z:z')+Ʉ zzöɄI ʀ $ \\0M Ed: Adjust Blend Copy Delete Find Go Insert Jump Page Quit Replace Set XchngP!Rۂ+'(@ۂ(áݧۂ ۂ'á ܕ^l --߭zá  á   ߹kۥ ۧ ۂڞڂ)ˡ  !Uقč~ zxt p lhd GC>*<~ ,  8 ,v jZHx b ݂ɡ݂ەݕ 5 LZ *!!`"#$$:%\&'&^''v(~|>\0M Ed: Adjust Blend Copy Delete Find Go Insert Jump Page Quit Replace Set XchngPڂق؞ڂق؞-/š -0--ۍۡ --߭zá  á   ߹kRepeatfactor > 10,000-߭` ꂾ)á) -@~ zxt p lhd GC aborts, 'R' replaces, ' ' doesn't<--á -R˧-r~á ڧ"á ǀ ġۡڶ>ڧ˄KڶPá4ڶP˄xšWxš8Buffer full. Aborting Replace  xxɡ x8#ڶNáڶNá lڳ aA, >پˡ xxˡ x직x療x >=̀̀ẁq̀̀á Find:<% RepپعE٢I٢<٢-٢ ٢ LA6)x%lace /from/to/ :<./0 ̀-z1 á81ç çyt̀ "  0,0" % ȧل09ʀ̀١!ނ߫ á=,<á  ٓ(ʀńPattern not in the fileNo old pattern. ٪P&%ERROR: " Please press to continue.% ááJ tr ܕܕ܂( ) +'((áUEx~P", * @ f P  D"ۊ)HۊܳHaFá) 򧁾.ç Ä Äە sŧsrȍ: á܂)D!٪P what marker? - ئ Щ,- V,Vȡ,-,,,(r r)á7á '낾)ç낾uÍ ᓡ   t% . Type 1Error # . Type  á   ܂삧ݫ 5h-l)ڂ ٦P ۧ)ۧS  is badSST  bad blocks{ 1%Zero directory of$Pd á3پš!   پ kۧ$á/پȡ ٦P 6ۧ)ˡ0Pd0&"d-ˡ2Destroy ?: ?  YˡDuplicate directory ?  ,,Yá  QPپۿ ۧÚxV  šۊ)HۊܳHaF,XáN,-ˡs-M ħ-M 'ȄX-M  blocks ?  ,,Xá,Yá D!٪P what marker? - ئ Щ,- V,Vȡ,-,,,-M ,YˡD# of blocks ?  ɡ Bad # blocksNew volume name ? P t% . Type 1Error # . Type  á    :á ō6d  CM  : correct ? ȭ"ƁƂ<   š"á  á  á :Ɓ Yá.0"d: zeroed l2777/UEx~P", * @ f P  D"ۊ)HۊܳHaF:4%E/Date set: <1..31>--<00..99> OR P'Cá No current dateD!٪P what marker? - ئ Щ,- V,Vȡ,-,,,W Today is C -tC-C   New date ? P <١1ۥ č&\7ȡ'eڤġeڤeڤ؂  t% . Type 1Error # . Type  á   ħɄ ؂ HZګ낾)uء-ŧ낾u˄낾)˄ ttá"ƁƂ<   š"á  á  á :ƁK TM-#0 -  markedN%w(j5%Crunch Pdd:M4~  2L,$dd"!h#d%((&*(*, -/:.f00123-4D3475j8h999:@>t?":@@NAn7ҦEJFiler: cSyS 0SSōSŧS Ʉ CS4ń? -M M ȡ-M -M ńMoving  SYSTEM.PASCAL??- SSȡ+SAĥSZȄSSAaSS?S Sȡ#tS? CS SS4F7M ܕۧUšUš܂܂ۂ ȡi02"ˡERead error, rel  , abs SyS 0SScȫ77 C Sd?- 00á-M C0 - New da 6܂܂ۂ ȡi02"ˡEWrite error, rel ݕ , abs te is C -tC-C  F3%Examine blocks on P 6ۂáݚނ0 -? : crunchedߡ Please re-bootddBlock number-range ?   1  ɡۀɡ ܫS:U `}s`6'5),, á%$&,Qá:075ҦEJFiler: Sܧ-M ɡ)Risk the directory ?  YˡT-M ̂Tʂȡ-TM ̂ʂʂĄbؓ%File(sGet, Save, List, Change, Transfer, Remove, Fast, New, Date, ?, QuitP7,?áQEHFiler: Bad-blks, Ext-dir, Krunch, Make, Prefix) endangered:ʂ ʂʂ ʂ TTء&Try to fix them ?  Yˡ, Vols, Xamine, Zero, WhatP7,x55EP,i+++ !|5$!5 55ܫT̂TʂȡBlock T 0ƁTƁ0ƁT"á 0T"Ɓ  may be ok$!^*ZV)R0N1J2F5B6>3:BZ2Xqmi":sH rlr(HR@0Hr|" * is badTɡTTšTTTɡá5Block   is still badLB4~  2L,$dd"!h#d%((&*(*, -/:.f00123-4D3475j8h999:@>t?":@@NAn7ҦEJFiler: locks   thru   are still bad Mark themء (may remove files!) ? Get, Save, List, Change, Transfer, Remove, Fast, New, Date, ?, QuitP7,?áQEHFiler: Bad-blks, Ext-dir, Krunch, Make, Prefix YˡءATT-M ȡ/-TM ̂ʂʂĄ TM-"TT-M Má d, Vols, Xamine, Zero, WhatP7,x55EP,i+++ !|5$!5 55C BAD.xxxxx.BADŜSʂġ. SܲnS0ܲnSSS-M T٧-TM ɡTT՚~لt>@VbX0hb8v6\T*0Hr|" L Get, Save, List, Change, Transfer, Remove, Fast, New, Date, ?, QuitP7,?áQEHFiler: Bad-blks, Ext-dir, Krunch, Make, Prefix, Vols, Xamine, Zero, WhatP7,x55EP,i+++ !|5$!5 55