TDqi_E`,UCSD startup disk for HZ89/90 and H37 & H17 controllersdisk 1> !"n SYSTEM.INTERP SYSTEM.PASCAL((Loaded~1tpͥ!p"/!ŀ*/^#VS1"/ŀî!!9R!1M*/G #*/"/ !l͂͂*/^#V{/_z/W#^#V!e͂&# ͔TLсM̀ ! DM^,c |c >2 !"!!M!Co"$G>yxzå>= z!r~x!rˆ~x:rx>y:q{!qyw:s( >y{'{!ͮ>yy{>͙͹ۂ:s>y{{>2ͮͨ> ͙͹ۂ2q:!s6сͮ>y:rx>y!jC${>zvd!>!s6(62Yͮ>y{z:rx>y>*oC${zvè͹  > = z*$MF# (~d  '((((( 23w3y3{3}333,STARTUP@NaSYSTEM.STARTUP> EDITDEMO.TEXTP> COMPDEMO.TEXTNAMEFILEA P>" SCDEMO.CODE P>"&COPYSCUNIT.CODE&. UPDATE.TEXT P>.2 UPDATE.CODE P>26 READ.ME.TEXT P>6h SYSTEM.EDITORP>h SYSTEM.PASCAL"5SYSTEM.MISCINFO SYSTEM.FILER* SYSTEM.INTERP9-blks, E(xt-dir, K(rnch, M(ake, P(refix, V(ols, X(amine, Z(ero, O(n/off-line, F(lip-swap/lock [D.6]ORO ,8%J: <w ة  PASCALSYORIENTER8 DPASCALSY>T",e,hSCREEN28`m0Z/`,:^@3Y ORIENTER"2st tt t t 2st $t,u%tt ji!"17!skh #$!% u h!iʭsst sGih !! j""" hih ! s4t hsih ! s t hih !# ( (s u hحsIWes)s      )7E##uuy$i#h!! ՛ ! Ո((s"u !+$#$#s+uu"ʭ$ʈ#ʭ ʊssh ?  ʚ u ȭ((s uh ɦ ɦs h li!$Օmj"%5!(!(snk#&#ksnk#&#k"jƈ!ɦR R 1L L U U D D !ietSt tft twt ttt tt tt ttt ttt tt ttt tst ttt t(t t9t tFt tat !  bt k"0)rX"! "0(⼃` ! R "0(⼃h ! L "0'⼃o ! U v"0'⼃w ! D Z"~t E" 7" )"Ost ! s" k"0)⼃s,t Bst st s^u^P,Ps u  s^u,s)st st st s`Pt t `Pv)*s3t sYt sbt s`Pt t s`** * `u*v* )syt st st s`Pt t s u`vs^u,s) Tat !n!0(⼃V!0(⼃>!0!"!!!wT sih ! t h u CURSX::, CURSY::qS MAZE[]: =Maze: U(p D(own R(ight L(eft B(ack H(elp X(ecute C(lear Q(uit(  @@@ @  @  @@@ @@@ @ @ @@@ @@@ @ @ @ ! @ @@@ @ @ @@@@@ @@@@@ @ @@@@@ @@@  @  @I @@@ @@@ @ @ @@@ @ @@@ @ @ @@@@@ @ @ @ @ @ @@@ @@@@@ @ @@@ @@@@@ @ @ @  @ @@@ @@@@@ @ @ @@@ @ @ @@@ @ @ @  @5@@ @@@@@ @@@@@ @@@@@ @ @ @@@@@ @ @ @ @ @ @ m/ @@@ @@@ @@@@@ @ @@@@@@@ @@@ @@@ @ @ @ @ @@@@@ @@@@@ @@@@@@@ @ @@@ @ @ @ @  @@@  @@'%D(own - moves the cursor one box down! d(if no wall in the way)%L(eft - moves the cursor one box LEFT$Q(uit - terminates the maze program,," returns to Pascal Systemm'R(ight - moves the cursor one box RIGHT!U(p - moves the cursor one box up X(ecute - simulates execution off Byour "program" of movess# PRESS SPACEBAR TO RETURN TO MAZE$Maze wProgram has following commands::B(ack - backs up cursor,,! unsaves most recent commandC(lear - wipes maze clean# so you can start over again K% f ROW ROW YOUR BOAT4Data: I(nsert D(elete P(os R(ight L(eft C(lear Q(uittJEnter string to be inserted:   qThen press RETURN,Note: Use BACKSPACE (BS) to erase characterssJType an X for each character to be deleted above ] Then press RETURN,Note: Use BACKSPACE (BS) to erase characterssIEnter string to be located: @Then press RETURN,Note: Use BACKSPACE (BS) to erase characterss)K_`se YNPASCALSY"r STRINGOPEXTRAIO PASCALIOGOTOXY  ,!8O^\ 2IPROGRAM EDITDEMO;   PROCEDURE REPEAT1;  VAR S,SG:STRING; $L,N:INTEGER;  BEGIN "WRITELN( $'TYPE ANY STRING FOLLOWED BY ' )); "READLN(S); "N:=1; "L:=LENGTH(S); "REPEAT $SG:=COPY(S,1,N); $WRITELN(SG); $N:=N+1; "UNTIL N>L  END (*REPEAT1*);   PROCEDURE REPEAT2;  VAR S:STRING;   PROCEDURE REVERSE; "(*REVERSE THE ORDER OF CHARACTERS &IN S*)  VAR NB,NE:INTEGER; $(*BEGIN AND END POINTERS*) $SAVE:CHAR;  BEGIN "NB:=1; "NE:=LENGTH(S); "REPEAT $(*EXCHANGE CHAR'S NB & NE, &SHIFT N B & NE *) $SAVE:=S[NE]; $S[NE]:=S[NB]; $S[NB]:=SAVE; $NB:=NB+1; $NE:=NE-1; "UNTIL NB>=NE;  END (*REVERSE*);   BEGIN (*REPEAT2*) "WRITELN( $'TYPE ANY STRING FOLLOWED BY ' )); "READLN(S); "WHILE LENGTH(S)>0 DO "BEGIN $REVERSE; $WRITELN(S); $WRITELN; $WRITELN('TYPE ANOTHER STRING'); $READLN(S); "END;  END (*REPEAT2*);   BEGIN (*MAIN PROGRAM*) "WRITELN('START EDITDEMO'); "WRITELN; "REPEAT1; "WRITELN; "REPEAT2;  END.  ,!8O^\9 B; PROGRAM EDITDEMO;  VAR G1, "G2, "G3,G4:INTEGER; "B1,B2,B3:BOOLEAN;   PROCEDURE REPEAT1;  VAR S,SG:STRING; $L,N:INTEGER;  BEGIN "WRITELN( $'TYPE ANY STRING FOLLOWED BY ' )); "READLN(S); "N:=1; "L:=LENGTH(S); "REPEAT $SG:=COPY(S,1,N); $WRITELN(SG); $N:=N+1; "UNTIL N>L  END (*REPEAT1*);   PROCEDURE REPEAT2;  VAR S:STRING;   PROCEDURE REVERSE; "(*REVERSE THE ORDER OF CHARACTERS &IN S*)  VAR NB,NE:INTEGER; $(*BEGIN AND END POINTERS*) $SAVE:CHAR;  BEGIN "NB:=1; "NE:=LEN GTH(S); "REPEAT $(*EXCHANGE CHAR'S NB & NE, &SHIFT NB & NE *) $SAVE:=S[NE]; $S[NE]:=S[NB]; $S[NB]:=SAVE; $NB:=NB+1; $NE:=NE-1; "UNTIL NB>=NE;  END (*REVERSE*);   BEGIN (*REPEAT2*) "WRITELN( $'TYPE ANY STRING FOLLOWED BY ' )); "READLN(S); "WHILE LENGTH(S)>0 DO "BEGIN $REVERSE; $WRITELN(S); $WRITELN; $WRITELN('TYPE ANOTHER STRING'); $READLN(S); "END;  END (*REPEAT2*);   FUNCTION BLOWUP(X,Y:INTEGER):BOOLEAN;  VAR "I,LB,UB:INTEGER; "CH:CHAR; "A:ARRAY[1..10] OF INTEGER; &I BEGIN  LB:=X; "UB:=Y; "FOR I:=LB TO UB DO $BEGIN &A[I]:=I*I; &WRITELN(I,': ',A[I] ; $END; "BLOWUP:=UB > 10;  END (*BLOWUP*); "  BEGIN (*MAIN PROGRAM*) "WRITELN('START EDITDEMO'); "WRITELN; "REPEAT1; "WRITELN; "REPEAT2; "WRITELN; "IAF BLOWUP(5,15) THEN $WRITE('Upper Bound too large');  END.  `}Lawn's Nursery Inc. Lawn, Moe D.APDISK(7123 Shady LaneDE[*](Escondido, CA 92025V0z743-5555f San Diego Zooy Inc. Bare, Ted E.APDISK(7Park BoulevardDE[*](San Diego, CA 92101V0z297-5432fAce Veterinary Clinic Ritus, ArthurPDISK(7453 Ocean Avenue[*](Del Mar, CA 9203601V0z755-1735fRamona Stock Farminic Bull, TerryurPDISK(7 Box 48 RFD #2nue[*](Ramona, CA 920656013V0z789-1573fVista Antiques Storec Teek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fVista Antiques StorecTeek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fVista Antiques StorecTeek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fVista Antiques StorecTeek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fVista Antiques StorecTeek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fVista Antiques StorecTeek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fVista Antiques StorecTeek, AnnryurPDISK(727 Santa Fe Ave.[*](Vista, CA 920835601V0z724-3176fSCDEMO= 5CSRhORIENT28P0Z/P,:^@36  TYPE $SCCHSET = SET OF CHAR; $SCKEYCOMMAND = (BACKSPACEKEY,ETXKEY,UPKEY,DOWNKEY, @LEFTKEY,RIGHTKEY,NOTLEGAL); $  VAR  SCCH:CHAR;   PROCEDURE SCINITIALIZE;  PROCEDURE SCLEFT;  PROCEDURE SCRIGHT;  PROCEDURE SCUP;  PROCEDURE SCDOWN;  PROCE|DURE SCGETCCH(VAR CH:CHAR; RETURNONMATCH:SCCHSET);  FUNCTION SCMAPCRTCOMMAND(KCH: CHAR): SCKEYCOMMAND;   IMPLEMENTATION =4SCDEMO Rih !   h%i!ʆ!ʆ!ʆ!ʆ!ʆ+ʖ ii!# !r$r!!jh " r h" ! ! % rIs s ćx`PMF|s PASCALIOEXTRAIO  =aTESTSCUNSCDEMO9 5?b'S֕TESTSCUNab#sp` ?- %r sprrrr rրr t ptp$t pr11r 1sp0ݖl'Arrow keys move cursor; ETX terminates; BS erases visible charss 2PASCALIOEXTRAIO SCDEMO  W6  TYPE $SCCHSET = SET OF CHAR; $SCKEYCOMMAND = (BACKSPACEKEY,ETXKEY,UPKEY,DOWNKEY, @LEFTKEY,RIGHTKEY,NOTLEGAL); $  VAR  SCCH:CHAR;   PROCEDURE SCINITIALIZE;  PROCEDURE SCLEFT;  PROCEDURE SCRIGHT;  PROCEDURE SCUP;  PROCEDURE SCDOWN;  PROCE|DURE SCGETCCH(VAR CH:CHAR; RETURNONMATCH:SCCHSET);  FUNCTION SCMAPCRTCOMMAND(KCH: CHAR): SCKEYCOMMAND;   IMPLEMENTATION =SCDEMO bih !   h%i!ʆ!ʆ!ʆ!ʆ!ʆ+ʖ ii!# !r$r!!jh " r h" ! ! % rIs s ćx`PMF|s PASCALIOEXTRAIO  =H!8O^ r (*$G+*)  PROGRAM UPDATE;  TYPE "STRUCTURE= $RECORD &NAME,COMPANY:STRING[32]; &STREET:STRING[20]; &CITYSTATE:STRING[30]; &TEL:STRING[10] $END;  VAR "RECNUM:INTEGER; "BUF:STRUCTURE; "TITLE:STRING; "FID:FILE OF STRUCTURE;   PROCEDURE ZEROREC(VAR REC:STRUCTURE);  BEGIN "WITH REC DO $BEGIN &NAME:=''; &COMPANY:=''; &STREET:=''; &CITYSTATE:=''; &TEL:=''; $END;  END (*ZEROREC*);   PROCEDURE SHOWREC(REC:STRUCTURE);  BEGIN "WRITELN; "WITH REC DO $BEGIN &WRITELN('NAME: ',NAME)o; &WRITELN('COMPANY: ',COMPANY); &WRITELN('STREET: ',STREET); &WRITELN('CITY&STATE: ',CITYSTATE); &WRITELN('TELEPHONE: ',TEL); $END;  END (*SHOWREC*);   PROCEDURE GETREC(VAR REC:STRUCTURE);  LABEL 1;  VAR S:STRING; " "FUNCTION READIT(VAR T:STRING):BOOLEAN; "BEGIN $READLN(S); $READIT:=FALSE; $IF LENGTH(S)>0 THEN &IF S[LENGTH(S)]=CHR(27(*ESC*)) THEN READIT:=TRUE &ELSE (T:=S; "END (*READIT*);   BEGIN ""WRITELN('RETURN skips item with no change; ESC+RETURN skips whole Record'); "WRITELN; "WITH REC DO $BEGIN &WRITE('NAME: '); IF READIT(NAME) THEN GOTO 1; &WRITE('COMPANY: '); IF READIT(COMPANY) THEN GOTO 1; &WRITE('STREET: '); IF READIT(STREET) THEN GOTO 1; &WRITE('CITY&STATE:'); IF READIT(CITYSTATE) THEN GOTO 1; &WRITE('TELEPHONE: '); IF READIT(TEL) THEN GOTO 1; $END;  1:  END (*GETREC*);   BEGIN (*main program*) "WRITE('File title:'); "READLN(TITLE);  (*$I-*) "RESET(FID,TITLE); "IF IORESULT<>0 THEN REWRITE(FID,TITLE);  (*$I+*)  RECNUM:=0; "WHILE RECNUM>=0 DO $BEGIN &WRITELN; &WRITE('Record number:'); &READLN(RECNUM); &IF RECNUM>=0 THEN (BEGIN *SEEK(FID,RECNUM); *GET(FID); *IF EOF(FID) THEN ,BEGIN .WRITELN('Enter new Record:'); .ZEROREC(FID^); .GETREC(FID^); .SEEK(FID,RECNUM); .PUT(FID); ,END *ELSE ,BEGIN .WRITELN('Old Record:'); .SHOWREC(FID^); .WRITELN; .WRITELN('Enter Changes:'); .GETREC(FID^); .SEEK(FID,RECNUM); .PUT(FID); ,END; (END; 92 END (*WHILE*); "CLOSE(FID,LOCK);  END. ( ׋UPDATE= DS,hSTANLEY28~0Z/~,:^@3UPDATE oG!h   " - = C`DCrpr pr prpr p`r prpr p#r prpr p.r prp#r p>r prpD2Pr pr pii P**r prprp+*Jr p*^Pr p*HVr p*"0\r p*-br p*=+nCshr pEPr pr pnE$ߘsp nEs0ղrpnr prpr p0Յn0spnrpnrp+vr prpnnn0spnrpDr prpnrpr prpnn0spnrpHnspns NAME: COMPANY: STREET: CITY&STATE: TELEPHONE: ?RETURN skips item with no change; ESC+RETURN skips whole Record NAME: COMPANY: STREET: CITY&STATE: TELEPHONE: File title:Record number::Enter new Record: Old Record:Enter Changes::}& W#FILEOPS PASCALIO #oE^BBw "The quizzes mentioned in the BEGINNER'S MANUAL by Dr. Bowles are  not yet available. We will notify you when they become available  for sale. " "Dr. Bowles's book was written to describe the II.0 version of the  UCSD Pascal (tm) system. The IV.0 version of the UCSD p-System (tm)  differs with respect to units which are described in Chapter 9. The  UCSD Pascal Users Manual - Version IV.0 describes units correctly. *bE$-Fc@ | $HEDITPROGGETSTRINFLIPPZ INITIALIOUT COPYFILEENVIRONMPUTSYNTAEDITCORE  I(EDITPROGEDITPROGEDITPROGEDITPROGEDITPROGEDITPROGEDITPROGEDITPROG"TSACopyright 1980,81,82 by UC Regents and SofTech Microsystems 8h  ,BbGETSTRINLShq΃0Ί& r tr h#"r#"rhhրt!  h P΀!Ԑ! ȚuA! K?FLIPPZ ;S6""i!h!!Ȉ! Ȗs`\釂` INITIALIUSuVp᥃߆ݛDޛDih !  hր^?V! ! π ! ʖO! ʖaah  qxa! i!p!jL -  0Y  Ge  Nm  Sn  T n&&[&pmU %%  l&j&$k%"i! "ph! i" j!### "#pi!"%" "pj!Ԯg &  &"g g  V  g g  "!   "!%"g g  W  g g  %$   L L LgLyp xgL"!jիJa? ?a??ȇJY~ I K( r 7u u;u ` t?qV VVvV.t}` tb.t p5 5 05p 5 5|p Fq Lq` υʅ09 ACDFIJKMP Q R S V XZ<,->.+=/ ?"   Oʇ !   +ɥ>UP@ X .    ?q  lq00ȅ0p0 r zu uJ  ~ & P`  pq 7P7u 7* s΀!p 00 0  ) ) )q)     .$ P U P .  `  7P* p 05 505 5υąAZυAąazυAą09υAą熁  Ć  >q64q`  Unable to allocate enough memoryy- Edit: A(djust C(opy D(el F(ind I(nsert J(ump, K(ol M(argin P(age Q(uit R(plc S(et V(erifyy X(ch Z(ap [[IV.1 F6cc]:] ? H Insert: Text { a char, a line} [ accepts, escapes]]0 Ins: {,} [ accepts, aborts]] Ins: ,,,>A Delete: < > { to delete, to abort}0 Del: { deletes, aborts}} Del: ,,>< Adjust: L(just R(just C(enter { to leave}}1 Adj: L(ft R(ght C(en to leave Adj: L, R, C, ,>Edit::Reading Reading filee Disk errorrBuffer overflow..,EDITCORE,PASCALIO,FILEOPS,SCREENOPS,COPYFILEEUnable to allocate buffer..>Edit:::Workfile lost..5No workfile is present. File? ( for no file ) .TEXT.TEXTNot p-#resent. File? |q}XP= Q {OUT SB~,X r u uu uu u&u u<u uqqOԚRE r W 6hr Uu  u u_u sKt i!! '!  P! Ti!T!!q!iu .&TTP TxU TP.   {Pr u , ޛDbpVbp,bEt..t65M 06pi06b!pb!!p,bt6!.t65+bp06b56p,bt.t, uu 5uu uU=@&, , *u qqE q, ~>Quit::# U(pdate the workfile and leave E(xit without updating+ R(eturn to the editor without updating% W(rite to a file name and return '$' `writes to )Name of output file ( to return) -->$.TEXT.TEXT*SYSTEM.WRK.TEXTTWriting Your file is bytes long..SYSTEM.WRK.TEXT*SYSTEM.WRK.CODEE4Do you want to E(xit from or R(eturn to the editor?  Writing out the filee |#COPYFILES'qpU006p6q56qh`qqq=q pq64256566060pRX  j"! %) i!!"!d."!" .P." .P*d h d kd qp  q pd  #qp ##q p.k#.##q#k.k#. # #q#k.k#.##q#k+ .$..P ..U .P. X$#P#$j6"6"1qp  $06"p06"qj6"= t p:qp.t  p6agh a  ha Cqp&] x%S %x&&x%Ė 0 L Pg= t `p `v `pT   X   d=i M\qsp= MppʆMq (k&"* &"n'#%" &"%q&"'#%"*" '#%" "%q"pq]=q = = dImproper marker specification..Marker exceeds file bounds.[ F],.TEXT.TEXTBuffer overflow..Bad disk transferMarker not there. .& Copy: From what file[marker,marker]? # CopyQG: File not present. Filename?  Copy Disk Error.Y+U;-  ENVIRONMFS**+*u *Ɋl`Pf` P]`PT`PK`PB`P9`P0`P'` P`%P`)P `.Pր3`u  t*uAu * ɀF* Ɂu* Ɂlu+ihC u ! rB Du Gu uqqJPu ih !r hTƅTjT Zu ^u hq΃b#trt΃dՅt  0h΃ a fԪ ihu <r ju uu?ki!#"! -tTt!ijru r"u"rqqqhΊ7j6" qj," ?qj"?"qj"?""jր΃tHA" "ʊ "ʀ-t r?qqjր΀ 30uu u u uuu uuu uuu tuu uu uu  5uu 5uu uu`u uu N;u 'tu <u 'tuuWu uu Wh Bu Xu Wu!u uu#u  u (u u,u 1u 9u u?u uAu Ju Ou r MQq MrqiqgՑr֊~r @׊rrqqي\rqqڊFrqqۊ0ru "r q Mrr؊ցm qq!?qNONEEJanuaryFebruaryyMarchAprilMayJuneeJulyyAugustt SeptemberOctoberNovemberrDecemberr !, TrueeFalse @T or FFx@True False  9Set tabs: C(ol# T(oggle tab Column ##pCTA(uto indent F F(illing L(eft margin R(ight margin P(ara margin C(ommand ch S(et tabstops T(oken def bytes used, available. Patterns: = ' , = ' Markers::   Editing: unnamedCreated ; last updated w (revision )..Editor Version [[IV.1 F6cc]..+ Environment: {options} to leaveJATv1 Not optionn   ' PUTSYNTAS]4 9  o  ''p  P'ej+'}j!'j'j ' j j "t  P ii'dm'%d l' k %0Ȅ $0Ȅ #0Ȅ 0p: !ph !  p !h !p!i  !Ժ   P&! P! nPn&Ȅ &p 4)` `P`q  u`q u qq   )*SYSTEM.SYNTAXX!SYNTAX ERROR ## . type  EDITCORES8><r tqQMqqqڅ΀!B5 775 q55 qq642h060656p7675 0706p76 0706p0706p5 065qi!5j!jh6"qq66"qq64q=q F pq#aqa'Kh WaX  haX  +q xq64q=q #M1qqq!q4q 5>q րD΀! Rq Wڅ΀!ԨTׅr 6:q=q \qq;WqWWyr Wni!&>a!tiu X!u ku !u!imq qq=q ]AhWhbqb?Wni!&X!b!h!i熃X b 6 WWWMqqqhi E p M !!q !!q=q q:qq p36P!MqqqY q p63q63qq=63q63 q63 060356p 030653p563ࣥ63q=q qq5656060pq6qqp008 Ȗrl塅元֠΀!&5 06p6l006pj6"$iWnk#&$#x"##x!"q#k56ׅ塅΀ 6q  q ΀! qq64q642767i iqq r9 /qq r  qp# h  ? h  606 p6n06 ȅqq04 ۥ ٥  68068 p68 q22@0606 66q2206 q9 040264p"690404964p p690202 8Ȗq΃Ί  ց8允΃"ڠ6 066Ԝ  r  r r rr > >  u  >?h?h ! "!t !  r ! !t r !q f  ? r  r  >  u - -06p 06pq6i6!h څ٣ p--t r r0!0! p0!c p60! 0!ȅ 6j!q"٥ 0!8 8 rc u  T  06p *?*?q *!06*p06*p?* 5hMJqlq64266imׅ6402 02 ٢Ȅ q ,+r,+rk*C),)+r*u ,+r)k,+r u+>> l)+ r*u ,+r΃$y,? r tr, - . ,텃ڳ-,t*,)#,+r΋8 ,+r+606 Ȅ =q *$ql+r +r+ q8962 ,+rK6!P0M'qp"qqY!ΊΆMJq,+r ,+r,+rցM΃Y΀!!  i 01p1h!" 5  0 p h!ii>r!i# q rc98>q!"#5C  5>!q 6 q>q  & <> q =q  q hq2 :22q h4892 06p6qqq0 h 06p6i!5 !5 :,! 06p6i!5 h>6ɭ>>> >q54892 06p6qqq :6q q46:6:24:64 06 6q 06p6qq46:qqq $ 06p6h 6: 51: 6 q4>2 06p6h>>>  >56:qq h665 > >> >65qq> 64848q $5>q q88ᤀ024202 [42 040254p$5d\q%p 040254p24224q52402802 2qrr98qrFk 6 MKq lqq iq  qq  ΃dw<>h :R h" F$!&= 04pj$+8&%"8&څ٣"8٢&ցf :&!:ilr :&!:ilakKq 04pjq1l8&)l"8&lڅ٣"8٢&ցs ΀ q q΀ #:h li!$o >! k>' 06pj##"#kq##8#k# >! !i "ց ")pq2 ; 06p6" 4>$ 01p1rrr p#8qi 04ph04!! qp" rrMqr) pj pi!"qk#h5 5 qq+p 00 5qp 00 5qp  q5 5 q0!" 0" Ȋ0 Ȉ"0!"p0# "#qqD!qi`` !q`p!Ȳ` !ȣ` p?!>qpr!!p! p qh  p p?>pr*q΃OΊDrq3?r?q+)r+)r ,-ց‹.?q?Ʈr,+) p?rO r=΃1Țt?r?q΃΀!> pru rr  s r+2Mqr)F  - ,U0q q q )h :j "+) r!1 ha)h :j "+) r!1 h2 !:i:,# !:i:-΃q r΃C΀!> pru rr +h./  (Ί#$<#$ցpq ΊXq4q L(2pB >!:< !,($:": $ q>:"'ւ rNrrr*rrrr ΃#qq$h #>0 * hu aq j #" !"u !h 0 t h>&%r&i%#jh " ! riu h%#$jh "  t h&$jh "  t hljki 6nm$l m6n#k4p"!"!$#&h%n m"h!j i$h#l k $"#!6o&dbq '$"r&%3rH  6i q2j64lMIqqq n6  qq  ΃"[ΊI H!D< !62.:")<>r tr'ւ$6! 4΀!΀ q r΃0Pq!h$642"i΀ R6!qF6!q6!q62$!6 060!56p 0!065!p56!ࣥ6!qq46q 6!q6!  &m%%ql Ί 5 %ւ32q΃8 tU΀!qqpr tr+ r t΃:΃<6 3Vq   ւ>K 6qQ7qS7Wڅ_qqpi6)#! ! tr!i !t#!!i!Ի!iqqp"!Ėh 0!   h jI0 x  0 x xĊ xĊӖi pNp!\  0 ph h i.   0   :  Zj pNp"]5  i!!0 ph!h !j.   0   :  ;; Npq; qDN ڮ;ܮφNxφNx;;qN ⼀ ڮ;ݮ; qb     ?@>=<f U ?@   ; pNp 5 : nψxA_[ 00x0x 50 x0 x R*WP`UPM*q[t /tTuvu S  xu {u `u X!? =q ~: Aqq΀!q64qp |<636<635ȣqq64qp 0603<56p<63 0603<56p03, !")&' B<' 6 !,qq =.q q46qq"MLyLqqq"x͆MyqͅLqqu#  q  ΁AΊSq qNJFB>: 64 0 , (6h3 q64q=q q Cւ֖# D! Copy: B(uffer F(rom file D Invalid copy.No roomJump to Not there..$ JUMP: B(eginning E x(nd M(arker >BM$ h$ Inappropriate environment)  BMarker ovflw. Which one to replace? (Type in the letter or ) Set Set: E(nvironment M(arker > Invalid ZAP..L WARNING! You are about to zap more than 80 chars, do you wish to zap? (y/n))No room to insert..No insertion to back over..Please finish up the insertionnBuffer Overflow!!!!P6,K WARNING! You are about to discard more !* than 80 chars, OK to discard? (y/n)!g,sBuffer overflow CR8 eXchange: Text {, CURRENT line}}Edit buffer fulll!Buffer is filling up... watch it!<0v1 Kolumn: {, CURRENT line}Too manyy:@|,  ,@LVPPInvalid delimiter..Your pattern is too longg]: L(ittT(okk Replacee' aborts, 'R' replaces, ' ' doesn'tBuffer full. Aborting Replacee Find => Replacee V(fy =>>Pattern not in the fileNo old patter)n."tbi3P/z- M   % K $ g T  O$s  59fF,   RD ?EEDITPROGS%! !j j7! !j jvu u rh υɥΊO ɥ  i iMr r Mu )`*Pr r `u +t++b-Pp",r rr r  u bu ,pu ΃".y#hi0#%00##k!0# i0# !i!i#k"# !lr h1k# ? 8 r#9k 0#pi!?8 >j0#d"p0#" d"!Țd"u #!k h >#5ԛX06 6i6 mi$!i 0!p!i$$x$x#!h$x>1!"塠!$x> $#Ċ1!"$1k 0#p#j"6$$x"k 0#p#j#a h%? !6#Ėa` ! rhih i 0h!! (j j'602 2 02p22 29t! 5 3 Yjj! 0! 07pj?j>"jrx 0xph "i0xc!p0x! !ic!!Țc!u x Ė@#!r!r O98!6"= +!r!r 2h ? `98!!i!> 5Wih !$ x#  x"# h7#75 7"#O6j(04 ⼅p&52204 ڠ04 6iik2i8kk5!0!065!p0!0!# !i06 m06 ⼀ 06666h06 ⼃Y606- 06 606.06 06 66 l#$ڲڅ٣$'0! !i0! 0!0!ـ !ik60 0!$p06 106m'04 04ܰm%0!$  06 !i#$k!$i%(6!56!060!6p055"64 T,VPr r ,u \u aPu u a+h +a a  haUapUaa pW422040254p224 x2452402028 ȖD6h 980 90 8" 9p0 90 8" 9p0 8 p"98kw>  r    Śʖ_ERROR: & Please press to continue..Repeatfactor > 10,000KThere i s no room to copy the deletion. Do you wish to delete anyway? (y/n)  what marker? b*G"}ZS.cW J=kFILEOPS HEAPOPS STRINGOP EXTRAHEA PASCALIOEXTRAIO SCREENOP  E  Sf "%&*+\./2348X:"KERNEL GETCMD INITOPS HEAPOPS EXTRAHEAPERMHEAPCOMMANDISMALLCOMSOFTOPS STRINGOPPRNTERR OSUTIL CONCURREPASCALIOEXTRAIO USERPROG K< 2   #   - KERNEL pQFCopyright 1978-80 by UC Regents; 1981-82 by SofTech Microsystems, Inc.nc KERNEL XB!`"! kFĭĖR0 i k~jl"o' '}W' m)}' )}' )}' )}m$%l#ihn!&'{0!{0-/!h!i&/(yj"~Ҏ*x+$-&0 *p+pl#i#ko! ( '~!')y((|)y)x)x)y))( m'}( '}( '}( '}m$%l8! ($*x+-ԅ**x$Ė ..}k.}kld.zl17F(/|- +p/(lzk...}odcn'&-&g ..bc c&'j.}.}".} (.}b(jb.~ih!/x/y !he//%/y!%/ .}/ .}/ .}/ .} (ćyi!.~ҍ 1 /e//%/y %xh .~..b. 7.9h""|" ~" ~ ~" ~"! "Ė$ l)m%zn$$}i$}ijb$zj7oF '(j(zi& k$}& $}& $}& $}kb$#`$$$#%z1;$a#$$#`$%z1#`+%z1$$#$  7$&`&&0) p7jFk$("|--"$(h#z `#i"#!ĖM +0 ((n((xm`( 8  }{zo zo' ))}#y!*셀i 7 0! "2*z*z}"d+*z*z}ą'2d+ d+ր))}(%(&.u a`p$u(/z. .x*-բ/. .x*-i!ռ/!.! .x*-h ՜/ !.!  .x*- /. .x*- ok)Y #'ko /! '#'0.! '# .x*+- ('+' 'o,Թ) /. .x*-k/#.# .x*-l$-#k/#.# .x*-m%/%$l/. .x*-j"B." .x*-j"*/""j." .x*"-j/"-ҖL)`*Pp"``p` `p+_a#`!" lc%b$`#"#"i ! h nb$a#`"! mb$a#`"! mb$a#`"! m4 cj) c-j) 'h ) i( !! c"!0"j) h cp I)`*P``p+z)h OOha pa p)4``pp"`p`0,⼃ ` i4 e a +0 $ֆ+0+ ~ e0+ ֆ+5h +xh +x > --REBOOTT*STACK OVERFLOW***POOL OVERFLOW* Exec err #  Type to continueepo= o==/oS?'%+ H:BB:*** HEAPOPS GOTOXY PERFOPS GETCMD INITOPS FILEOPS SPOOLOPSCOMMANDICONCURREPRNTERR REALOPS DEBUGGERSCREENOP 5RGETCMD  x# jp/ Ė*a+P=h 1f fsf ĭɭsaPp, h͚Չ | yi!xkj"#l!l$"xZ$"xm%zn"$$xx $"Ċ6%y!1&y,&}!}&yx && pĊ&"jhhkĘϚh 5 yi!k##xxj"#"x! #" |hǖj"i!h!|#!k#x#y#y#xĚ~! #y i!"Θp\ih ! f hvih ! ׁj"" hfi!J! !! !` "ih !"  " " Aa hޖhߘsp *W ߘ    sp *& ߘ    *    n + )wop ) )( k #ե#j" "pi "! !"k*"!i ""j!" "pl"$j!" !pl!$i!"m%m%: f " %p %ȇ * $ hN ,  *    fA   h + f ć ćć` hsaf h a  h $   a % aeh a  h o  |o6!xh!````!x! Ė`՟```x ``x```x ``x`p`+`݇W```; &sIP)ć)x)Ĉ)xׁ(f'  ( J `Qsspթ(JՖR U V X sp$ [ | ć( 's ^ P1` ćaćb a(ć'ć@`w`ppc  S(D*` (έ(%sq ' P<p szP$s  P)x ć*)i glik!# !i!ׁm%x%yxk# axl$!ׁm%nxhV&` jK& g&` ɠ&` -&瀀  j&瀐 gx,jր" xĊSO+& +& +&` +&p x+&瀀 + &瀐 + %"x7$"_ di h 4! ! x! x!x͊ !  ! x ! xj"zk""##"zf"z # %# $fa### # ##Ą  Ʉ #Ċ#ĖC !ihf !wk h d p wd jbxp+d  ))7d h   p h!iT "!oͤ22'2zo'2|22ujkc"3#"j#" " S ! p p  ȭsQQ Q U Q_ QP`> > sP >f &@f`&@fb<le$ $f `> sP x xQi!Q !!iia >pia"#B!B!i! x232  22{W 22{ć2wjh"yn&&xxm% "h !yn&$""i%l"|j" !yn&$x' yĊ'Ė[rJuPwsP Ϙ   og '5s$ J^ s7t&   iΤćxՋUm%zݹ%%|m%5%zy %v%z} }Ěm%է%z}ᰇyՅ  }  }  sP}(}+} * +** *p ć %p%|mS!M) (?(f)    ( xyd$$xćxw,f f#sf ć̚ʖvRS cj"զS -1`as Ց9999 FF|F9s?:GGF G G1 G:S :cj9"Ԛ"S : 1 "TSi      0`     &     $ `  `+``. $` `  ,  ``Ț `sp/ ` 6     5ն? `  `IՐ`,~J`  %`  ` K`  ``.` `  $ `  L  spQ      s) s  r  |We _D2` `g.   i*u?j  n t   7= ᇁ= `Ȅ` ``p``uv up  ۄh.   up  *! Ur  h` ` ` `,     ,rhr   -u,u'u"  ց ԡ u;Ě;Ě;Ě:Ě9Ě9ě;ě:Ėdhiar ii   ar ,,+ ,X ,p ,$y ,),rhr   /  mid_}ix 5 <    ւCվim REALOPSx.TEXT.TEXTLibrary File is not a Textfilee*SYSTEM.LIBRARY(Too many libraries in library text file..*SYSTEM.LIBRARY*SYSTEM.LIBRARY.CODE.code.CODE.CODE not codeerror in reading code_dicttBad block #0 in Illegal file nameNo file *** REALOPS  Unit not founddUnable to allocate global dataaUnable to allocate global dataa No program in Linking....Must L(ink firsttREALOPS REALOPSUnable to load segment on heappWarning: library not found.: Cannot find Assembling... Compiling....:AssembleeCompile what text? .TEXT Can't find *SYSTEM.WRK.CODE[*]To what codefile?a $$.CODE[*]] Can't open SYSTEM.WRK.CODESYSTEM.WRK.CODE.CODEExecute what filee? redirection error.CODEFilename too long: Running....1Monitor: B(egin, E(nd, A(bort, S(uspend, R(esume "& no monitor openAS  pi="" pi= po=*SYSTEM.STARTUP *SYSTEM.MENUU+Command: E(dit, R(un, F(ile, C(omp, L(ink, -X(ecute, A(ssem, D(ebug, H(alt, I(nitialize, U(ser restart, M(onitor [IV.12 A]z3$ Linking.... U not allowed Restarting... XRdv B  7$pG0GL> a *** HEAPOPS PASCALIO STRINGOP EXTRAHEA EXTRAIO REALOPS COMMANDIDEBUGGERFILEOPS SCREENOP r eINITOPS PH8b`p`i```!`bp"k b + y@h+ i !i*!Mi!)+! b*+! x **xi!iҖZ)`PB B B`PD D`PEEI`(PLL`:PLɀBLɣL`RPcɀ_c`fP`y`p )u4zapp4zp r44a` p z5 pu%uLu BćuDćuEuMuR8uSćuTu%Z u" u" ʛTu"țTu"pp"erPrOěO ěOděOěO'ěZĚʖu`d&p"p & `j1%8ɚ ɢ''v'     /((/Y( 000(  0ć0ć0(ć0ć0(( /((/( 00|թ-(p"p՜(uՓ0| 00(z,@0`u`%u'!`u%| 1&&1+|&  |& (u&&̇((/% <@@)u() p D) +ɤ/**/++*@ȇ*ɣ+**̖1;Ě:Ě9ě;ě:Ě ĚĖ:՘; w`w; u: w`w: u9 w`w9 u;ě:ě w u wu$(*u*8&.` '    &  *`u%*ć%x'* &**u*A   %6&.@@@ &   ,   uu;u:u`;`u:`u%`9`u߂;ě:ě9ěěěĖ $`%`'`)`+`-`/`1`3`5` 7` 9` ;` =` ?`A`Cć%  $$""$""E"ć""ӛ%sNr %t r  %դ!՜rI @ N   Q   ^ D - `D - D  g  % +Error in FIRST SUBSIDIARY VOL NUMBER field.EOrror in HAS SPOOLING field..#Error in HAS EXTENDED MEMORY field..Error in MAX NUMBER OF USER SERIAL VOLS field..'Error in MAX NUMBER OF SUBSIDIARY VOLS.$Error in KEY TO MASK KEYBOARD field..Mount System diskSYSTEM.MISCINFO*SYSTEM.MISCINFO not foundd [IV.12 A]*:SYSTEM.ASSMBLER*:SYSTEM.COMPILER*:SYSTEM.EDITOR*:SYSTEM.FILERR*:SYSTEM.LINKER*system.startupCan't find system diskkCONSOLESYSTERMGRAPHICPRINTERREMINREMOUTTSERIALx:*SYSTEM.WRK.TEXTT*SYSTEM.WRK.CODEECONSOLE::S!3YSTERM:: *USERLIB.TEXT???JanFebMarAprMayJunJulAugSepOctNovDec?????????REALOPS Welcome , toU.C.S.D. p-System IV.12Current date is System re-initializedYeuO  EXTRAIO PASCALIO STRINGOP HEAPOPS EXTRAHEAF'ILEOPS COMMANDISPOOLOPSSCREENOP i.}HEAPOPS 3ߚ| sޛF$Ip$pH a7 aH!p$xII$Ik#Ip#x###ěFޖ ߚ| sޛF`I"` `  p%I"xi՘"rIpH"ěFޖ&p&nl`I'I b7 b'xՉ'xxm%.H'x&ĚH'x pH"pl'xy&l$;'xy&k%#%a'x&!#!'x a% Ia 'x`'''xp!ߚWYN| sޛF! Fޖ(W EXTRAHEAPERMHEAP EXTRAHEACaa`a`p(l$lFߚIob'm c7 c" "x cHpn"yn&%&mb"%$ Fޖ]1 3P5oikj2xml n2x&!Ս 2xh  aAh *j22xĄ 2xh 2x& 22xĊ; , #ko+#" _$5$ $l# i22xĊo22xċh%2x$o'65nJ"KPq  ~!!} !  ~ " Ցjol"yk#xmn&%$##&xi!!zl'o$&n$D#&xz!!y!!}' 塠!  '"|j"${b| ( (MMLI!JP ! Ոjol"yk#xmn&%$##&xi!!zl'o$&n$!xx!x!x r "!xxĖX0[P]ZYxk0}b-rab-p"!s"0Ysp"ld0Pvd'UvdYsp+ZY Z#xYxx Yx"#"Ċbr]ZY t\<߈p  [ [ ii/W[h=W hi?hWW ""WW h, ! Ȋ !!iWW ""ԯ!ȭWX ґ ґ "*"!  A)`+P҈8.҂+,҂,-`P* -P.[݄۬͛<ZччZ`-(ъ℀.02345UWՅ WWWXX ⼃6 XXX =խU `:(чч VXW^VWXZYYZDY SS; SaASSYWVYYVvXXUՋU "  d`XW`ZYYZ=[WYSSC SaAS`YSȇYYчXWuU `K(<@߂LݖS ]wfile already openWrite to what file? Gcan't open filecan't close filee.text   PIIPOOIOPL  *USERLIB.TEXTi=o=pi=po=i=""pi=""qG bY#f*** STRINGOPPASCALIOSMALLCOMFILEOPS PERMHEAP SMALLCOM iD6543x1:17W!xh!!xx`u!xh       p!6j64435!ĊU414`s 4y  h4z43 r rj4 u `p 4 `p! Ė'0 t.i==pi=.J$ UPERMHEAPEXTRAIO PASCALIOCOMMANDI B[SOFTOPS U!cOhh p    Ė9 *m- ( (z (xȋ-)ih((4) (!l(!%( (!(|( (((x ȋs(!l$%%l$(|շ(%$(y՝(#(!o h' (' Đ oh'!h]' G';((!!(((!(!Ċ(!(((ĊG(Ā o%m,+'+ (!(!$l-x'ȋS(#(!,+$p(!(!$+$ %$m%(yk#r(!i(  ( ( p ("&("(( (#)x(pp,( (#)x(pp(((!#R*%   h !i ml |  x  y; !% r ċ  !k !kN x  y3rć "ć  ć !!ċ  !k  !k%j"##j( "j"- "ć$ # !"p ! !"$"l%"m%o'n "Ր "ć ( 8 #pn #& &p #&&p  p # x pp}  9  p # x p #pp# #&p  ć !&'  x  y ! ć  zĖ *SPASCALIO  STRINGOP)M````p`ȖaaaDh a ph aapaȖ```p、Ȗ?"!*#"!h #"Ȋ #"!#" p##!Ȗ,/--1Wji-hc! 6! !"-!pi!  -!cpc!1!iŖ0r`) ***   PRNTERR "IBV%%miih hb 0% % m%! hb -b  p<` yh {zl|j$fxy&"pmfx%z&ig( dg(]g(Sg"(Ig.(?g6(5g?(+gG(!gR(g`( gh(go(gy(g(g(g(xg(og(fg(]g(Tg(Kg(Bg(9g(0g('g(g(g( g(ցg(rKg(Bg,(9g7(0g?('gG(gS(gY( < gh(ցogp p $pp "p !p BUnknown run-time errorrValue range errorNo proc in seg-tableeExit from uncalled procStack overflowwInteger overflowwDivide by zerooNIL pointer referenceProgram interrupted by userSystem IO error unknown causeparity error (CRC))illegal unit ##illegal IO requesttdata-com timeouttvol went off-linefile lost in dirr bad file nameno room on voll vol not foundfile not foundd dup dir entryfile already open file not openbad iynput formattring buffer overfloww write protect illegal blockillegal bufferrWaku IO error: Unimplemented instructionFloating point errorrString overflowProgrammed HALTIllegal heap operationn BreakpointtIncompatible real number size Set too large--Seg  P#  O#  continuess - STRINGOP :=OSUTIL hUl,c-Pc/Bhcjcic0i c! c 0i h"-!/!/.& %Ph&n& % PP% Phkli!$,&O!xj#"k# h% "0&O!xn!i# %P% Ȗ.10߇0{0s0x 0shke 0xe l0  h e`ar0l0z$Z$ k#0s#0{0ć0 eZڡ e ȇ/eP1 xĖ0?( -327688- 0(t8 PASCALIOSCREENOP gCONCURREg `b par! !n&o" '(y'(z'({'+s+p''+p''**'*& & '}' c!l)ěLc)e,%,!ĚNNLޖ LњNNJޛL``ߖ0LߚNL[ޛJߛLߊLޚp?ih !  p h6d xEXTRAHEAHEAPOPS  OPASCALIOh% #$pi!%K!j! %" #"$pi"%! ! "!j%" #"$piٚ! i! ! i! !  i(m%n&ս% % drċjh $ "$ x&x$ y&yj h"Ċu $ $ k$ xk&y#& K$ o'#' % $r p-%%%{%&#& &  d i     zi ޖ    yi ޖ8:i=5565zć5xȋ=kxx x k 5 kć=d 7785 7 8ɢdd7)5 5 jj!=yxx w5  <;ȊZ"& p$x ߄x"<;p އ<;ڡ<;w<;#"#<;p#;<5|*d5ć5 Ā =xȇ<;ȇ9 <;ath;;!i:!>=!! !!x!|sh !!x!|h Ė   ޖ !!{! !x!{!Ċ!!ޖ=  y  {  Ċ z  ޖ%%{%%y$ȊU% j$%xh" h#k$`ct% %$ #si %$ #"i$ !%y $$Ȋ%%y%{%%ޖ ,`u+`uĖ K` pp^   `s4    p  `p ` !!h G  ! x |s1  p x |p  | x !ޖ###`!T! #!  ip:##"!s-#  # # p # "!Pp# !"Ċ #ޖb߇Ոzbh  hpKabć ! s7  p b p  bĊ ćޖ h! v'`u&``n(`& { k\k !raSPOOLOPS COMMANDI SMALLCOMEXTRAIO OSUTIL SCREENOPSOFTOPS FILEOPS  6WEXTRAIO Ph% #$pi!%K!j! %" #"$pi"%! ! "!j%" #"$piٚ! i! ! i! !  ##h O!C!#!t x"p'  # xr xp  xĊ #ޖcg+j"\"??i"i!h.c.p ) .-, *p.-, *p. ,-x"!j, *! +" (ߚ&ċ(i!%!Ջ!j$!l"x$h% %% m %"y#(t! %"yKγ!z"y m%Ċ}! '&% #! m% #!!$%!!!!ĊB! '&%$#! l$ #,$l$$'&$pl$l$ !$%Ċ (ޖ  ^NPASCALIOSCREENOPSOFTOPS  !USERPROGXB'a#`!" l/z. .x*-բ/. .x*-i!ռ/!.! .x*-h ՜/ !.!  .x*- /. .x*- ok)Y #'ko /! '#'0.! '# .x*+- ('+' 'o,Թ) /. .x*-k/#.# .x*-l$-#k/#.# .x*-m%/%$l/. .x*-j"B." .x*-j"*/""j." .x*"-j/"-ҖV`aĈ! !l$m%'%%%%&% $ b(!kj%(b v!xh!````!x! ĖV`՟```x ``x```x ``x`p`+`݇W```lcc$&mi!%c!!i譅cchcccdcׁY pcׁli!$cׁmc9!x!xz eĈ!!xċ%`!ժcĈ#n&&&&&& %!y& %!xY& e%`!& %瀐!xĊ& &&&%瀀!bĈ"n&#&&Ĉc!"!icׁh cիc p $`!!!!`ʖwa%xMjh "?! k# # # #l $ $ $ $ $ $ ho xz dph UdUpU yU y U U XXUX  XX݇dn`UXB xp~ąąxąxąćU XXUX  XX݇UX xYh ećedćU ep ᥀󘤅TWW0aׁ WgWxWWc[[`a[ׁWW: W"瀀Wɥ󇆟`W W&f瀐Wxćfgĭh 瀐Wz瀐WzVVVćVVᇅ瀐WzVVxspxćxx{Ċ6fgVVVćVVᅀΤcZZaZׁVVVWZ[h`V#瀐Va[ׁ WhhzZVxS瀀VSćSćSfSz VSz瀀VćSz ećSS{ćVV(ZZ[WxTĄ[WxTWyxY`y_瀐Wy^^mdn`p``^] ]B\\Ei\n_xć___dn`p``_\\i*>[WxyxbmVV[WxybpcZZՄVViaZׁ ViI[WxymZVxĄZVxZVx{ćVVZZr]]WW[[χTͥͅ떆& 0ĆFk#{l#$#{##{$$$$$x`a #{! !i!im% 7n&#z!%}%Ċ%%}Ċ %# z!%}%{%}%}%{%}j%%{"Ė h k# z.k# |h# 2p l$ z$$~ĆFm7n$~o' ' i$}' $}' $}' $}i$${!$ &$'$' p'j '''|($~($~Ė  Jh   00Ė p"ąx7aĆx !a! Fa 8` yyє Too many dicts in SYSTEMMSYSTEM.MISCINFO SYSTEM.PASCALKERNEL USERPROGKERNEL MC *** GOTOXY missing unit GOTOXYt-= s{ FILEOPS 6 #6"`p`i```!`"pO$& ' %gpxW(( !g  Ą   //M c Ջhɣi! %! !hcih!i  D 4 ć.ćć%ć% '&bf h i!b$!!!!!! h ɣaeh a  h oV.[PZYXćW]i!.L-.!j" .!u" .!"aA!i˄.ն.*Z@.u.ui!ZZ<!.u!Z.d!ud.!uZO.ui!!i.i!.!Y.d!ud.!u.k#_.uh k# Fki.!j"Zk# XXx "0!i! #! .!*Xk#]#Y՝.YdYudP.WĊz.WĊj.WĊZ.W ĊJ.WĊ:. WĊ*.#WĊYdYud&WĖ\`!!!!`ʖaa%xMjh "?! k####l $$$$ $$  hY  Ɂڡl$ p Ɂڡl$Վa`p  ,  ɡl$epp  l$Nćykj"ppl# "p$a p$)Ė m%n%* o%|Fds%$ěF*%|p%xi!#%| (y(y %ӊi(x&& (&(թ((((MՉi('~h (G%| )))y)x) ) )  ɀd i %|  h!+(k%*%|#p%xi%!#'('(*% '(b( p! ! '*'%v%Ӗ 2 'ji)q)#)Ajhm)%Zj" )%0h%m%)"" i(!塤 !jh h) j" "Y |Nnj&|)&| dcp#&| ,j"!!j !)&| jpj"((h h n&| )&j" "3 n &)&&||'|d'x p nnih # !## j"%$"  ɀdi n hЖJ +,  Վd+ k  #) ()# d #k(V ) )ɢi#j) k +, #!( # "*~)x* #k( # + ,) h *+ + h+) +))Ė # i!$jh "# # h#$ % !!Ė !"h #   # i jhmTl"k### y# x#k"" y $%% i<k#"# x# y#i"k#k! " y"i"Mi!9! yn&o ʄ ʄʄ df! ! #h      "!!ᰠ x ! Ċ! Ċ !!Ė "i!!!!!!h !!!հ ! !!Ċ!!!!! h! !!!"~!  ! ! p !"! !#!!!!p! !#!!p !!&!!!#p! !#!!p!!!!!Ċ!(Ė?BPě߇D߇D ċf de }f`i!ޛߛ! ċ5! ćć !ć fć|ć|| ձ A jA"  ċ  " "  ċw%m $% j"%/ " yx yćyx " ċg"ċ[ " ! % " !^ | ċ" ć! }ć%ʇ, ćʇʇ ʇAĊćՈ!ć"ćA  Ċ ćSćAI#p    p  #xp #xpDAćĊ|{DrćDxĚ!ފćDޛޖD 'ߚ'l$$x9xՆ$_$m%P&3$$%  dn$$ $!$"$#$!$!p'$%  ɀd&$ b$ ċik!" #"! x%x"! y%yk!i#ċ!i&&"!  ɀd!" %" h ! " !!i"!  ɀd%  ɀd % D^%$D % D % "! %%x$$% $ $ $"! $ $ " &$$ -$Ě 'ޛޖ!ߚ!h ! | {!r Ċ !ޖZ&ߚ&}&k#l%#$#|`%#|%#|%#|@%#|@@i%#| % #| j"j!i$y$xh! ! "$  i$ j##### #!Ċ###!# # #!!#~#"<#"##  # # p # ##$x#ppg!#"0# !m # # p # ##$x!pp*####{##!#!"Ċ &ޖc j ;:[].TEXT.CODE.BACK.SVOL.INFO.GRAF.FOTO.BADDb  / 93wFbUg4 EXTRAHEASTRINGOPSPOOLOPSHEAPOPS PASCALIO gESCREENOPFS<``tK"! wkTrn"x!"!Ċ "x " Ėdh !   p ! ! pYY p}}||{{zz!h ! j!"#h # l%h# "<"i"<D!)>!  HyhRxhhb za {; |" }! u " !Ė;bi#"!z!|:ɰAc!zb!{!z# "!}: !z# Țu #"  h y  yĊ y xCh y z  yĊ y xdh x xĊ y xh x { xĊd iy iyk$x#x#x $u ii$xh !# ɡ!# 塠 h m    =x x [ h  Ė#"&;#""{ih ! h#"u u ćx x ćx`Ζ!p"9Ě u  u #`u `u j  Type > to continueetX9,(! UMC{4$GOTOXY EXTRAIO PASCALIOSTRINGOP SEGSCINIFSOdh ! !** !" d Ȋ d Ȇd "Ȇd !ʖ"$!  yh ! !** !"" ʆy "Ȇy !ʖ "/!  d*pypjh "   h)D:%ʆ:&ʆ;ʆ;ʆ;ʆ;ʆ;ʆ;ʆ* ۚۚ-jdȆd"""v"""""" %jky"" "" " " """" # # "dj"/_kc"scsc"sc 9_kc"sc"scsc"sc" sc ** ȆY pj" Y"ȊY Ț%ĆĆ:Ć:ĆĆĆq  }kPD* SEGSCPROFS*! i!i!jK`p`Ț`u : sm%%[%pl $$s sj%o*k z%"kq*u'i#nc$'n& 'p &(n'(o&#h ##'#pn& '$''po!'nn&ԝ%% v'&'&$ u $"'&oq q )? ):]?  (^}SEGSCCHEwFS'&xh jdk`qaq冀;ɠu u5qy&xxq!&xli!$'! _u !i&xj P`qE &x:jq _v v'&x q vqj&&x"%%x"Ė!c ⼭ ۃii! wᱡ"wh ⼭ ۃoi!  i!  h"   !" ! h! u "uky i  ian ⼃h  $ #" n % n ! wᱡĖn`%`qd`qynyy$Ėj!`{!sj`d`{`(|{`sxĊ +l##"`# wK""!`kth  y   z  " ! k{ h" y z! !" {sk!k..uh+-. $%p+. ^ۃC.+. + . ++ ++`+ pP+ .p*.`+*p`+*ȭ*,f `%G v%v ⼚ۃVV-, gi" ~ h 1  ! ""!i!i! """! Ԥ!k ~VP.Vwph #.ia aVS awph '.,, ,VS ,wph UV`',`("++`P +U +(VVU V.Zw&t..u[$Ma!i `!hj "!" %"j" .w !.wV  zyx` zxp`ixĖ L!f ,!I"**Ċ="*"x""x*Ċ "*"x""xĊ "*Ċց,"x   "a ՙhx2hcx4hSx7/hBx;_h1xBgh xIohxQxha x  aa),(,',x xxĭ &*h&xY [+~&x^ a+f&xd h+N&xk r+6&xu |+&x +&x +&x+++++++++t+g+Z+M+@+3+&++ +++++|++++++}+p+c+V+I+<+/+"+++++++++++++y+l +_ +R+E+8+++++++!+$+'+)+++-+/+1+3+u5+h7+[9+N=+AA+4E+'G+I+ K+M+O+Q+T+W+Z+]+`+c+e+~g+qi+dk+Wn+Jq+=s+0u+#w+y+ {+}++++++++++{+o+c+W+K+?+3+'+++ւ ++ 6 ,`dc zx $Hb+ zyp z"$p b+*p z"p e+*p e gf))a,(! H ĭ _xy!x 0 "h`i```! k"k*⼀ۀۀۀۀۀ-hd-xzx p**dx++x)ċdx++x)ċ dxdx++x)ċdxdfx++x)ċ )p b pdxbx2dxbx23 dxbx2)p b p++xbx2Ċz,dx-dx+d++x)Ċ\V)0Q(0L)(/ڡ)(18*o)2ڡ*o)1)'1yn-&{-x&z,+փ5 x xzxzx x)պ p `,*p  ,)p (p a,*pxx!{ (xp f,*p&/xn&o.%xzxx/xxfedcb.)-/%$#"///x&'Ċ%//x&'Ċa!j/!jhr {l$zԹ$ zbc" r yhrږcih !J j"+" /"g "c" "g  h#{h#y #-j"    zy #z aĂ! aĂ!  'n&rb&|&bq&&)' y' z&& & "&ɤ .&$& ' ' && ! afaqh  }%Ėah e a ) . - + *  ʖ   :`ba`ba.g z" !c8$(u$g!liep aփuHk#-#xq#|k##zxxsq!px h .px  h삄 h . px   px - h S##ba`ba`.5 ; ք !hj ⼮ ۃ&k#+"(#0 d"#0Ċ d"#A "j## ""j# ⼃4Ԗ"'dxi" !dxi px !Ȁ 76 h X R!hj"  px "" ~"- h  lh{9# y z!,!#x z##x"# {sl""xĊ "# {sl"l k|U#L9 =xbAjAxaAi|qh `#b."!%pq !u s;r{"i-"#D`{si"xĊi!"xk {yjH{a "x +"!x L`Dq"!xx C|0|qi!|{`D q!x CR1|z|{`D q{x C{ca`|#z{|a{s!{bD yq"CY{a  `Dyq! qxq!i C"l|T|qi!A$5j!"{$x"|k"yj"ry##`D"q CbiUph JGHI EFքvwp u ;j ";*ryhi  ri yh!ք9ijh "M k#4i W  #### #  h!|  &/w`6`4/`8w`   9h L N OPքٖ nkm lքR#Lj#Eih "&  < EM1?- Q(S$L @MB#T 8rօC w!ih ! 9 hw! Հh !cba #z" !d4h N +}      x   9" |tȚ+ɤ onm ` yi!{l+!yi+!G!z!{!{l!k#jyqyyxy or to continue, to stop #4:#5: Filename? .text First  Last  Nothing in file  error reading file  unable to open file &SLDCCSLDLLSLDOOSLLAASSTLLSCXGG=SINDDSLOD1SLOD2SCPI1SCPI2BNOTTINCIIDECIITJPLDCRLLDRLLSTRLLCTRLLEXRLLLDCNNLDCBBLDCIILCOLDLLLASTLLDOLAOSROLODLDASTRLDELAESTEINDSTOLDCLDMSTMCAPCSPLDBSTBLDPSTPMOVINCIXAIXPLANDDLORLNOTTLEUSWGEUSWABINGIADISBIMPIDVIMODIICHKEQUIINEQIILEQIIGEQIIFLTTNCRNDABRNGRADRSBRMPRDVREQREALLLEREALLGEREALLADJSRSINNUNIINTDIFEQPWRLEPWRGEPWREQBYTLEBYTGEBYTUJPFJPEFJNFJUJPLLFJPLLXJPCPLCPGCPICXLCXGCXICPFRPULSLBPTSIGNALLWAITTEQSTRLESTRGESTRASTRRCSTRRLPRSPRDUP11DUP22SWAPPNOPNATNATINFO(OBh+iv8K`S5\$ #z'4AN[=Jq~0u9FQ ERWdm,_lyXe1>rILLEGALp  (cd) [  No proc in seg Seg not in memKERNEL (rg) mp== sp== erec== seg= ipc= tib= rdyq==  ) :  AR /~~   Start  End Seg#? no such seg no such seg Delta lex level? no such proc no such seg  ES Mem address?  DU (bb) PNo breakpts set Set break #?  already existsRemove break#?  LS AR  "& EXTRALEXEXTRALEXLS the sib is  2~O(0<@DEBUGGER+\8y Hit break##Error # at  DEBUG [x17]DEBUGGER|gy@P`@  + T     D  { kp]W}I3 {kbUO/idYOJ* VWL%PDEBUGIN w &,28  &<GOTOXY 8g#k#OOk"j"j#"``Y` "` #`pn 6SCREENOP t#B| LFOQR~SVhn&o=GFILEOPS SCREENOPSEGSCINISEGSCPROSEGSCCHEDEBUGGEREXTRALEXPDEBUGINGOTOXY E SCREENOPSCREENOPSCREENOP2 DEBUGGER K8;COPYDUPDIR.CODE ;N ;N@ HJKCAlEPABDC? b8nr ABSWRITE.CODE8%r KERNEL.CODECODECOMMANDIO.CODEESCREENOWC 0FILERPROBUFF1 BUFF2 NONBUFF1NONBUFF2NONBUFF3(     1m-FILERPROFILERPROFILERPROFILERPROFILERPRO.TC#+ &FTOMS" RAf | .S | ;BUFF1 -C#j e a . . h ~e - - h ~a ea.-< 5rh טrpq q ol'''­q qn$k#00k #vjpq $#l&*n˜q16qw Fw :vwq ˜qDBB#131 |#qw wq ˜q1qwqp"q1 1 |h"1 }q ˜rpq q 6''"j"p6 ' 6 ' m % 6 6 q"vkpq "#q % w ' ' q$ wc 01 }i1r 11| !ć11 !11|r 61'212 ć12ʇ12 2 D 1Drpq ' '116  1 16 1q r r<qih:>H$(aq4`qiꆀ삀9Ԙ/86>`-r`**: *6 *r`q ))*)J*  dʇ<++. +A +6 +*<@`rpq @:9q ;`r?ph`였 `B ` `I `B `J `Z `K ` `L `>Z.FB98w q q .M:qNw w :v.w Sw q -UYqZ q B@-삀Z[9^8솀 p.ZFq9ka&  I8;d . e hq iCw sw 8 |w 8~   w W  րPut in Insert destination disk:TransferrTo whereeTransferrblockss# of blocks to transferTransferr *SYSTEM.WRK... *SYSTEM.WRK..,:.,Save as  ? Save asTEXTTCODEETEXTT*.CODEOld code removed, Text file saved & CODEECode file savedST^ 7!>BBUFF2 C# Hq `qil $k#00k1#$ppK$$#mj"%?1"pp)!ibq"w "w&w w"j$#l$ Ԏ!w*w wqD5 k5  Pk0A`1 p`qk&i lj"$! " i"j!k#mu(x'x'xj(xj5 k0w w #w w#4 F@ 'x(x  0 01(x ppq 1&x ppq  ԕ'&x (&xq# Ih  ɢli!$! m%~1%"!h!i  #xĖ q;?@q@LM5 y q q q w`W ( )-$5) .x5) y ..5) ) 5 o `\ 5 ( )-5) .y'..g.xo) ߚFw _w w,ew wʖ րmBad block scan ofScan forrblockssScan for how many blockssBlock  is bad bad blocksMoving SYSTEM.PASCALC:hrunchhFrom end of disk, blockStarting at block #forward back : cruncheddPlease re-boottBK k= NONBUFF1C#+%+Kqq+;q 2 |;qwJw :v+ %+w++!"h * *) ) H7w  w w = "w"wG&r q‚h c5 ‚(˜rpq 5c-,+*)(5 y'i:5 i : %+!r,qa2 |;-q w .v--5, .5, y.x.y.x('r('.w .w (w. w-v/.  /w -v.  wHՂ=M.xw. ww /. /w w 2.xw v/. /w ? !վ:Ֆ5, y5 -w/v5 w"w =&w 'w/w 6w )w8w <w *w>w pq b b wrpq rH6DGqhH`q*5 3r aKaOF5 aqȆ삀UԦ|V[`qJrqJw \w w삀cqwi! !ɣjh ".! k##w dw w#r h͖0hk,⼃,sqq,phq ր Ԩih !\ j p"p"< 6"0"'""" "ր hih ! p" hww wh Fri1!1 j"խ h1w"| w w "w :v"|X[ "v"}w]v1 "(w "w w "ww %q qqwh12w @w :vww <w :vw   ց < UNUSED >>Dir listing off#1:ListtWritingfilee filess, blocks usedd,  unused, in largestMountMountMounted NOT MountedDismountt : Dismounted : Dismounted,Subsidiary Volume: M((ount, D(ismount, C(learr M"CONSOLESYSTERMGRAPHICPRINTERREMINREMOUTT Vols on-line: # on volume : starting at block Root vol is - Prefix is - EV@jD t| PNONBUFF2C#)  q `ĭ)) `xppq q`  ` yx`   q ` ćʇMćwqw q 夃E` Dć qw q  ĊĊ` ` yq ) `xppq )) r&*`-r qqk`טrpq `q ))****ć* `rpq qFw :vBKZw !w w삀$n`r*q Q.% &w '+w w :v.w 98 2w 9w .?&@Ac3`-r98qBw q p 4wR[q\eqfoq)). )p )sq  4qww `r4.&h` ` `. ` `q>Ah`. ` ` w w qF.Z.j"hq i!"5.c" c. "   ." ..,&  h!x w w apjHqqw q  j" q3 55 (q w w w q솀:삀"였  였DqFw w q }cdF D3Jq3appq dw w w3 V  ɢh .; /~3'/rw /w w w hR fHqqw SwwSRRwwwRR5R5 5 RSSRCqwSRdVVd VqVVqw q pap pT USRdVVdw Vw1dVp1dVpp 1dVppdd w wkw wVq5RV5 yHUV5aayćTTTMɢ5 q aTVaTVćVUVV!ayqw  w +w q pqYʁbcDZ/aydVVdaVeeyWexXfTTf1Z TeyOTx0ȇeeyOTxćTT5 TW5T yTTWT5r VVyq6w fy   ց?#Zero subsidiary volume directory ? Duplicate dir ? Makee made not named Workfile is (not saved)) No workfileThrow away current workfile ? *SYSTEM.WRK.TEXTT*SYSTEM.WRK.CODEE*SYSTEM.LST.TEXTT.BACKRemoveeWorkfile clearedd:& Get.TEXT.CODE.TEXTText .CODECode No file loaded Zero dir ofDuplicate dir ? Are thereblks on the diskk# of blocks on the diskNew vol name ? : : correct ? : zeroedd : dismounteddExamine blocks onBlock-range ? Fix them ? Block may be okk is badMark bad blocks ?? (files will be removed !)) (Y/N) BAD.xxxxx.BADBad blocks markedGZy7KNc  %NONBUFF3nC#M`-rqz:պRV--V - -(: --˜( -zA -(**q\`טrpq `q )˜qq%)-- dʇ- -Zq-Z`rpq zձ˜Dq>q ,  35p5 F35pp+, +q 3 F@Jz3@F1z5 D15r as>D+>asOw Dw-v?D ?w -vD wX  րVChangeeChange to whatt:Changee:RemoveeRemoveeremovedUpdate directory ? %Date set: <1..31>--<00..99> Today is New date ? : The date is CR S@| c#/VFILERPRO C#s$s ,s c c i!!@?il jj!H"i!h !00h ww p0` ` !p";Ě`w a z aAh j`! jwFjzb‚(VRׂ(J N!  pqVY`ڇX`"PYc`#P]`-PT`5PK`>PB`EP9`NP0`WP'`^P`fP`pP `xPրJX`P`P`P`P`P`P`P`P`P`P`Px`Po`Pf`P]`PT` PK`PB`)P9`2P0`BP'`XP`eP`xP `PցX`**`P *Y *PY `pɡw Yw'w Xw`w WpYw 4,p4Yiww sp35r p &h !7! !! } ! a! z ! ! aA h!  !p(/-a+h5Q5 *Gw  v5 w vw w  h)5  ;aw w )ww )x*w p0 >5,w Fw w  pl[pDia( a/ a(ih !  0ȇ  hR  ( +~+ r jaga" 0ag " j"h$ rcgcrh c h Pw  w w gw w grh g pb)g/3J5$5 ih !b  5r h( B6E)C`-r`6rpGpG)2)w  v6w w  G `rp `rFaw :vw &h P(ha  w w aw w !!ڭpp *- : @w :v: <w w &P w  #" !8h7Zh'hhhւB &P  w   w  w pS b(bFZar p` ` BFFr5,1  1p"p 1 |  Z Z5r    5Cx hr iaV a a  a(Y+;Y+w  v w w ww4,p4YF .  ` 5 ` p` O ?+D(FCxջ5 B2 |2BA: wBJN 5  h )j5 *ʆj*F"j*j"**:*<ʆ ʆ h< BCCxĆ'@3JNCx5 4Y5Cx CCx< Cx)) )ʑCxBէa) )j  az[zpbh  :堡M R    z!  a0  b?  ():!J)!Cxʆʋ? ? Ef T *pTiJ *T-h $%=%?%%+*aT a(*T * *aT aw &P %w ,',w 2w 9w ւ? ", wwDw Lw p-` * *piׄ삂UNטw =E Vw \w aw w w ,pTT#p*옄WT WPT Pi ;?&* :&T*#T* $*** 炂cWW Wd W($&UU*S*#p`*P**Ȉ*Up`U*U`Up*P=&TT*?&TT*0F%:  $*T$ `:H+WWR We W> $WW䘀( W昀A W( S1NF3J삂fHSS:ט@ טDGIC7K*I`gP7Vjא#1JFH"삂hH*Rzb#L >,rZJF(h`F `i `Z `j ypw wMih !_ Q5 j zw w "w "w "xw"yww hv5P5 ih !65 y#x'"# Ċ5 x#xʆ ʊ h" #5 Ėj!x h y y !r x; y y 0 Ɂ#    Mj-]삂jkc' cK co c c c,s4ki!#j! l$S!mh %F$ 3 w !ww  ww h!im4\7m奁mwm(w 35Iw mSgw tw vwww w74{m4um4 7m4 ~7m4 c7m4Hl Non-Wild) carddIll file/vol nameIll change (Vol file) name+Nested subsidiary volumes are not permittedBad dest for files foundd%Can't Increase Subsidiary Volume Size"Not enough room for existing filess)Illegal SVOL size - no room for directory9CM%/CWuaMk expected I/O error # Filer error # ? (Y/N)  ? Invalid #Destroy : ? [*****] #Put : in unit  ?  -->  - 0,  : ? : not processed ...too long < file name scan string vol name  - char. max >>- Illegal formatt what filee what vol ? *::: Remove olddFile(s) endangered: Directory'Filer: G(et, S(ave, W(hat, N(ew, L(dir,$ R(em, C(hng, T(rans, D(ate, Q(uit, $B(ad-blks, E(xt-dir, K(rnch, M(ake, P(refix, V(ols, X(amine, Z(ero, #O(n/off-line, F(lip-swap/lock [D.7]TBWarning units  &  have the same name&buff1,buff2,nonbuff1,nonbuff2,nonbuff33&BUFF1,BUFF2,NONBUFF1,NONBUFF2,NONBUFF33Filer segments swappable.&BUFF1,BUFF2,NONBUFF1,NONBUFF2,NONBUFF33Not enough memory..&BUFF1,BUFF2,NONBUFF1,NONBUFF2,NONBUFF33Filer segments memlocked. Y [[ words]buff1buff2nonbuff11nonbuff22nonbuff33Prefix titles byy Prefix is BZ/g/gg//gSYSTEM.WRK.TEXTSYSTEM.WRK.CODE0???JanFebMarAprMayJunJulAugSepOctNovDec??( Bad CodeTextInfoDataGrafFotoSDirSVoll4FHANDLER,FILERPROG,HEAPOPS,EXTRAIO,PASCALIO,STRINGOPP;SCREENOP,SEGSCCHE,SEGSCPRO,OSUTIL,FILEOPS,EXTRAHEAP,SOFTOPSCOMMANDIO,SMALLCOMMAND,PERMHEAP4FHANDLER,FILERPROG,HEAPOPS,EXTRAIO,PASCALIO,STRINGOPP;SCREENOP,SEGSCCHE,SEGSCPRO,OSUTIL,F 9 4 ILEOPS,EXTRAHEAP,SOFTOPSCOMMANDIO,SMALLCOMMAND,PERMHEAP&BUFF1,BUFF2,NONBUFF1,NONBUFF2,NONBUFF33*5 L'cL+k|eY U &EXTRAHEAHEAPOPS STRINGOP PASCALIOEXTRAIO COMMANDISCREENOPFILEOPS  }    `|}^gq<2!+ 8  P #9rCiW ak -   "  CW  '' 9 > &Mw  } }6a ] }J -6h } rDsV  }}" ^ -    ``}}}  2Copy (c) 1978,1979 Regents, University of California, 1980,1981 SofTech MicrosystemsÜP e xxxxxxxxxxxx >2&>>͔*N.ÜK~.Ü.Ü.Ü C~OK~.Ü. Ü. Ü. ÜK~. Ü. Ü~.Ü.Ü"!"*"!"*"!ͱK~ o&^$V!9H!|2: y>2 !"A q}K~ o&^$V_"*^,V&o)>o>g)9|;}K!9|J} _W _ *^,V=bɯO>G*!9s,r#[s,r#,#*yx*s,r#:w,:w*~2-~2+V-^"^,V#""^,V#S^,V",#^,V"^,V-" * "~2##^#V*"+F-N* MD+-+V-^""+V-^^,V!*#"s,r-! o& o gM**R_*^,VM*^,VB_*M*2_*s,rM*s,rƢ_*^,VM*^,VM*M*s,r[MT]5^,Vs,r ͐^,VMM^,VMMs,r^,V_^,VM^,Vs,rC~ 2M* _>ګ:: +^-V= +V-^=C~ o& >ګ})+V-^=  3 o&)9^,Vs,r#=* "^,V#{=q C~N,F"^,V,#^,V{=z K~t ^,V**K~ 7 MC~)DMH7 ~C~OH "  *  *C~*N2G Ay #:կ¹ʹ=ù 9 * C~NP HK~^{w??C~CK^,Vxڨ GjS]­ ó ʳ :!j ~_,~WC~y!j N#Fo{_zW} o`ALbS\  o#!- {_zWy/w,x/w 2$ *MC~:R :R BKx~#~# ? )BKHMMMD{=P ) _ C~K ) o&Eo[z ! s*^,Vsz ! *s,rͰ o& DM*DM*{ozg}o|g}/o|/g}/o&@ |ڟ ² }ڟ ò !:[ {!S s x {/oz/g {/_z/W7yoxgɯO>Gz « ʻ + {/_z/WB#ɯo>g o>g>g#+RMDP MDe |K zK MDe zo }|s Ë z {zÌ Ì C~ù}Ÿ |ʲ !}² |ʟ ! z }| ß ß ! ! "  * *MC~BK* x#'C~E#)9~"##3NGOx_{w#zw#ylGw#w#*3{Gxʍ{/w#z/w#*3ڲxʫ{w#zw#*O!9Axw#w#*H+~+~C~E#)9N,#Y"!9xA!!OyDG{ *x?,#G믑Oxh/,/#q?믑OQC~x ! {z!qxgOFszg_~!l &o>^#V=x! G{_#zWx:w,w# €]#)9N,F#! !qxgFOxy_!~h&###)y,9 @ OxG!}|}| o g MD!MC~*N,F#^,V#:WxAOzS_|h{zmxvB)N,F:‹xAO*~ MD"2D_*^,Vzʾ*^,V#>:>(>(>2:o&:2**yoxg*KB*!>(*}=͜C~C~!" ͔ګOC~!" ͔ګ*!9""C~!"]C~!"[" ͔ګ*N*_^,V"^,V#""^,V#S^,V",#^,V{=*"^,V-" ~2##^#V*">͐*"*"!͜*!9r-s+V-^**{_zWs,r*<*^,V,#,#4,4C~ ʛ ͔ڶ*NC~ooC~ Ÿ _!|ڍ}ҝ^#V{=ʝC~>ʛ ͔ڶ*NC~ ʛ[" ͔ڶ*NC~""":͔*N ***C~*^,V*z9{Q"͜ʛ<+V-^s,rM"*" "}2|ʌ}D2)*^#V*+F+N*)9* MDK~ *͜ K~ *K~ **͜x 4NjMF0z! x.%x, %s x]TxxHx +x^ҋÎ͚ѧRk{# ¤¤{+ ±±xk{# {+ y_HH^,V,#^,Vxy!^,Vs-r,# !!,#^,V#"!^,V)DM*R"!"|rl}rHÝ^Ý,#^,V#"^,V,#^,V""!"Ý*,#^,Vz-+~-===K~*_*^,V^,V!W:=+V-^_>Wí"!+F-Nyʭ+V-^*:w#:w ^,V!^,V^,V,#^,V#^,V#)^,V;* "%()++++AND 'ARRAY ,BEGIN CASE CONST DIV 'DO DOWNTO ELSE END EXTERNAL5FOR FILE .FORWARD "FUNCTION GOTO IF IMPLEMEN4IN )INTERFAC3LABEL MOD 'NOT &OF OR (PACKED +PROCEDURPROCESS 8PROGRAM !RECORD -RE!pPEAT SET *SEGMENT !SEPARATE6THEN TO TYPE UNIT 2UNTIL USES 1VAR WHILE WITH !`á""""*> #w*^#V**` w_` A[0:#w*7{_zW*s#r*~p,#^,V*r-s! 6ͱ,~#~=,-+V-^s,rV-^5s,r!6,6*"*,#! 6=2}= ,#:+V-^MD-s,r-y=.} |^,V6-6**|W}W5"BK^#Vzf{jY+PYN#Fq#p*~DM ý2> ý!o&T]))))* ~#:+ڤ:ڤ,#~,#^,V*"!:o&)))>> >>21>T>T!>!"$!""}">l>l!">l!>T>Q>!"""""r!"$#^#V#~#"2**s#r*s#r!"> !ͽ!ͽ*1!!!O:O::!>:  *"+"******_n Á @G2xO!* ~2**:¼zʄ>Ͷ ͔ }>`}>z}y O:®:’͟ X:®q:„w#z¢Äq#:XÁ͈ ͪ :!!c>+zN#r  ͈ y! 0 = :( y( } 0 >Ͷ y b :b :<=[ >Ͷ K  >Ͷ :on $:!e G~!e w!e /w!e G~!e w!e /w*_n*+~ _ & %&%&Ð&Ý&Ä&ã&N"S"?"(G:"`#X&e&L&k&----&&&&))&&&&Mz!=!="=͐((((>U">E#{d"*N!"k!y2h!͐((2?!*m!#*i!"d!*k!|1#@#>2f!*N!R"k!ҷ""k!>2?!:g!·"*X!"d!Z%*d!MD(*Z!MD(:\!O(:g!"(*",*"!f!52#(;#÷":?!#*i"!*N!"i!ͅ$x":g!1#*i!*k!DM*X! x1#~#$#(*q!> 2#>2#2g!"q!"m!"k!"i!"o!"q!"i!"o!͐(*i!!͏#*N!͏#*L!͏#*J!͏#7#s#r#`iJ! *N!MD!ͼ${2b!:L!GOW_ڼ###½#<÷##w!P!*V!:o!#!:b!G:L!Oͼ$"_!:o!"$*J!z$${"Z!:_!B+$~+Z%?%#o&N!%:>!2>!7":!"!s!!$$*ɯ2>!!s!:%Z%:>!&:>!&B+4&/&!s!%q#67#&&Z%"q!}Oy !!$$*G,&!!:%Z%Í,4&&!!%G,'&w&!!$$*Q+&!!:%Z%+4&ʷ&!!%Q+'&Q+D&ï&> &*"@!J!͖#͎*4&'*H!͏# )&!͏#͏#"7#>7#*@!MM  ( (  2~- - - ---- @`--y./ ]*͉) ͢)*]**"0]**)[ )>>"!4 #4! 5 *6!^)##^#V#z(N#Fx( p+qx !T)Ml)=/0!"`)* )#" )| *)#")*(:r(w>)]**([r(#6#6]*)`iK(B ]*)*([r(#q#p*([r(#N#F*([r(*([r(:(7?*> >2'͉) (ͼ)y ]*(!'59*> Z%*(^#Vd  ,+͍%ڇ*!s!%M:' =2'*X!'!('"!")" )">2!t*">2!)" >2 !10"!>"v*'**'**'*yO>yy"Oi a >y y> (O>!' (y y`+ʒ+Î+:'ʒ+=v+:O+ʎ+Ò+:'O y /’+ɯO(O:'ʽ++y( +y > 2P+x2O+:'9,(( ,:'O y /(9,:O+ ͕+9,:O+ ͕+5,:P+=2P+(y 5,2O+ (y >(O:'{,‹,y( Ç,y > 2F,x2E,:',((,:'O y /(,:E, S,,:E, S,,:F,=2F,(y ,2E, (y" Я&(>>2-:-͔-:(GM0*˾x*͐-:(*͐-*(=g-ͧ-8w#->~->~ͳ-8#->~->:0O>yx (y -( y> = -(7G-(7x y:0:0y>zx{> = z*("-*"->y:v((˖~xP.8>y:((9-~(!y{x*->w> >z> = .QTz(W - yv.7>2x.*ˎ/.>!t(./i*:x.(J-6Y͆//>y*~x>y!-.C${>zv.!->-#6(62x.~."$G>yxz.>= ##>yz*~x*ˆ~x[d)! "d)*z ~xdi* *-˞~x*->w*:((9ˎ0Y-~(!>y{(5W~(z'{/>yy{>!t(./i*-~(>y{{(-~(>>>2-! "d)/>y:(z*~x>y*:-*(( 0C${zv0/>&0C${zv 0/>> = z*$M*("B0*"@0~n08ɯ*(>w> .tQT(W - y87ɯ 1i*[h)! "h)*@0z ~di* *@0˦*B0>w)`iy(0-1,10i*#> *@0@@:t(GOi*! "h)s1>͜1o1*(>=E1 >N2~f2#P1zf2f2f2f2*@0~>͜1ژ1*(-2ژ12w#…1B2 >-2122!(1212>22>=2}2|_W{>0=/2>~~>PWI2<27|=O2*@0~<f2 Z2>W_}g2{|Wa*22*222{+-2z2*22+-2=¶2V#^r+sV,^r-s,# 26#6# 2"v2"!B!# s#r# 3*H!ͫ!2!"*F!*B!|:3}:3!t2`5?3*F!T]"2"t2![t2H*t2~##[3*t2#~##h3**t2!!*v2;*t2~3*t22*t2 ^,V"2!"|2*t2"z2*z2^,V#*v2"2^,V#"z2"~2}4!**2*~2!9*2!9*|2s,r*|2,#"|2 ¹3*^,V"x2,#,#65,5 ^,V#N,Fo>g)9*x2,#s,r*);!*!!9"2!9"2*"2^,V"x2^,V#N,Fo>g)9"2*x2,#s,r**2!);*2 ~Ġ2!9"2*2^,V-+-^,V),#"2*2DMq,p- #Zg`q,p-*2"2!2H!"">2>2>2!">2*v"!"!@2OͰ#4 ILEOPS,EXTRAHEAP,SOFTOPSCOMMANDIO,SMALLCOMMAND,PERMHEAP&BUFF1,BUFF2,NONBUFF1,NONBUFF2,NONBUFF33*5 L'cL+k|eY U &EXTRAHEAHEAPOPS STRINGOP PASCALIOEXTRAIO COMMANDISCREENOPFILEOPS  }#   `|}^gq<2!+ 8  P #9rCiW ak -   "  CW  '' 9 > &Mw  } }6a ] }J -6h } rDsV  }}" ^ -    ``}}} #*!0Copy (c) 1978,1979 Regents, University of California, 1980,1981 SofTech MicrosystemsÜP e xxxxxxxxxxxx >2&>>͔*N.ÜK~.Ü.Ü.Ü C~OK~.Ü. Ü. Ü. ÜK~. Ü. Ü~.Ü.Ü"!"*"!"*"!ͱK~ o&^$V!9H!|2: y>2 !"A#q}K~ o&^$V_"*^,V&o)>o>g)9|;}K!9|J} _W _ *^,V=bɯO>G*!9s,r#[s,r#,#*yx*s,r#:w,:w*~2-~2+V-^"^,V#""^,V#S^,V",#^,V"^,V-" *$$"~2##^#V*"+F-N* MD+-+V-^""+V-^^,V!*#"s,r-! o& o gM**R_*^,VM*^,VB_*M*2_*s,rM*s,rƢ_*^,VM*^,VM*M*s,r[MT]5^,Vs,r ͐^,VMM^,VMMs,r^,V_^,VM^,Vs,rC~ 2M* _>ګ:: +^-V= +V-^=C~ o&$>ګ})+V-^=  3 o&)9^,Vs,r#=* "^,V#{=q C~N,F"^,V,#^,V{=z K~t ^,V**K~ 7 MC~)DMH7 ~C~OH "  *  *C~*N2G Ay #:կ¹ʹ=ù 9 * C~NP HK~^{w??C~CK^,Vxڨ GjS]­ ó ʳ :!j ~_,~WC~y!j N#Fo{_zW} o`ALbS\  o#!- ${_zWy/w,x/w 2$ *MC~:R :R BKx~#~# ? )BKHMMMD{=P ) _ C~K ) o&Eo[z ! s*^,Vsz ! *s,rͰ o& DM*DM*{ozg}o|g}/o|/g}/o&@ |ڟ ² }ڟ ò !:[ {!S s x {/oz/g {/_z/W7yoxgɯO>Gz « ʻ + {/_z/WB#ɯo>g o>g>g#+RMDP MDe |K zK MDe zo }|s Ë z {zÌ Ì C~ù}Ÿ |ʲ !}² |ʟ ! z }| ß ß ! ! "  * *MC~BK* x#'C~E#)9~"##3NGOx_{w#zw#ylGw#w#*3{Gxʍ{/w#z/w#*3ڲxʫ{w#zw#*O!9Axw#w#*H+~+~C~E#)9N,#Y"!9xA$OyDG{ *x?,#G믑Oxh/,/#q?믑OQC~x ! {z!qxgOFszg_~!l &o>^#V=x! G{_#zWx:w,w# €]#)9N,F#! !qxgFOxy_!~h&###)y,9 @ OxG$}|}| o g MD!MC~*N,F#^,V#:WxAOzS_|h{zmxvB)N,F:‹xAO*~ MD"2D_*^,Vzʾ*^,V#>:>(>(>2:o&:2**yoxg*KB*!>(*}=͜C~C~!" ͔ګOC~!" ͔ګ*!9""C~!"]C~!"[" ͔ګ*N*_^,V"^,V#""^,V#S^,V",#^,V{=*"^,V-" ~2##^#V*">͐*"*"$͜*!9r-s+V-^**{_zWs,r*<*^,V,#,#4,4C~ ʛ ͔ڶ*NC~ooC~ Ÿ _!|ڍ}ҝ^#V{=ʝC~>ʛ ͔ڶ*NC~ ʛ[" ͔ڶ*NC~""":͔*N ***C~*^,V*z9{Q"͜ʛ<+V-^s,rM"*" "}2|ʌ}D2)*^#V*+F+N*)9* MDK~ *͜ K~ *K~ **͜x 4NjMF0z$ x.%x, %s x]TxxHx +x^ҋÎ͚ѧRk{# ¤¤{+ ±±xk{# {+ y_HH^,V,#^,Vxy!^,Vs-r,# !!,#^,V#"!^,V)DM*R"!"|rl}rHÝ^Ý,#^,V#"^,V,#^,V""!"Ý*,#^,Vz-+~-===K~*_*^,V^,V!W:=+V-^_>Wí"%%+F-Nyʭ+V-^*:w#:w ^,V!^,V^,V,#^,V#^,V#)^,V;* "%()++++AND 'ARRAY ,BEGIN CASE CONST DIV 'DO DOWNTO ELSE END EXTERNAL5FOR FILE .FORWARD "FUNCTION GOTO IF IMPLEMEN4IN )INTERFAC3LABEL MOD 'NOT &OF OR (PACKED +PROCEDURPROCESS 8PROGRAM !RECORD -RE%pPEAT SET *SEGMENT !SEPARATE6THEN TO TYPE UNIT 2UNTIL USES 1VAR WHILE WITH !`á""""*> #w*^#V**` w_` A[0:#w*7{_zW*s#r*~p,#^,V*r-s! 6ͱ,~#~=,-+V-^s,rV-^5s,r!6,6*"*,#! 6=2}= ,#:+V-^MD-s,r-y=.} |^,V6-6**|W}W5"BK^#Vzf{jY+PYN#Fq#p*~DM ý2> ý!o&T]))))* ~#:+ڤ:ڤ,#~,#^,V*"!:o&)))>> >>21>T>T!>!"$!""}">l>l!">l!>T>Q>!"""""r!"$#^#V#~#"2**s#r*s#r!"> !ͽ!ͽ*1!!!O:O::!>:  *%******_n Á @G2xO!* ~2**:¼zʄ>Ͷ ͔ }>`}>z}y O:®:’͟ X:®q:„w#z¢Äq#:XÁ͈ ͪ :!!c>+zN#r  ͈ y! 0 = :( y( } 0 >Ͷ y b :b :<=[ >Ͷ K  >Ͷ :on $:!e G~!e w!e /w!e G~!e w!e /w*_n*+~ _ & %&%&Ð&Ý&Ä&ã&N"S"?%:G:"`#X&e&L&k&,,,,&&&&))&&&&Mz!=!="=͒((((>U">E#{d"*N!"k!y2h!͒((2?!*m!#*i!"d!*k!|1#@#>2f!*N!R"k!ҷ""k!>2?!:g!·"*X!"d!Z%*d!MD(*Z!MD(:\!O(:g!"$*"(*"!f!52#(;#÷":?!#*i%!*N!"i!ͅ$x":g!1#*i!*k!DM*X! x1#~#$#(*q!> 2#>2#2g!"q!"m!"k!"i!"o!"q!"i!"o!͒(*i!!͏#*N!͏#*L!͏#*J!͏#7#s#r#`iJ! *N!MD!ͼ${2b!:L!GOW_ڼ###½#<÷##w!P!*V!:o!#!:b!G:L!Oͼ$"_!:o!"$*J!z$${"Z!:_!>+$~+Z%?%#o&N!%:>!2>!7":!"!s!!$$*ɯ2>!!s!:%Z%:>!&:>!&>+4&/&!s!%q#67#&&Z%"q!}Oy !!$$*C,&!!:%Z%É,4&&!!%C,'&w&!!$$*M+&!!:%Z%+4&ʷ&!!%M+'&M+D&ï&> &*"@!J!͖#͊*4&'*H!͏# )&!͏#͏#&&@7#>7#*@!iMM  ( (  2/////// @`-3--M.p...& @t/w/z/}////p*(}i&;('r(z(͖#*r((("(T]))))))C(y2(C(*> Y*ͅ) ͞)*Y**&Y** )[ )>>"!'4! 5 *6!Z)##^#V#z(N#Fx( p+qx !P)Mh)q./!"\)* )#" )| * )#" )*(:t(w>)Y**([t(#6#6Y*)`iK(B Y*)*([t(#q#p*([t(#N#F*([t(*([t(:(7?*> >2'ͅ) (͸)y Y*(!'55*> Z%*(^#Vd  (+͍%ڃ*!s!%M:' =2'*X!'!*'"!" )" )"'>2!p*">2!)" >2 !e/"!>"v*'**'**'*yO>yyOi& a >y y> (O>!' (y y\+ʎ+Ê+:'ʎ+=r+:K+ʊ+Î+:'O y /Ž+ɯO(O:'ʹ++y( +y > 2L+x2K+:'5,((,:'O y /(5,:K+ ͑+5,:K+ ͑+1,:L+=2L+(y 1,2K+ (y >(O:'w,‡,y( Ã,y > 2B,x2A,:',((,:'O y /(,:A, O,,:A, O,,:B,=2B,(y ,2A, (yЯ&\&! -[t(>y>zx{> = z*("-)"->y:x((˖~ẍ́-8>y:((9-~(!y{x*->w> >z> = .QTz(W - y-7>2- *ˎ5./.>!v( .D.e*:-(J-6Yͺ.5.>y)~x>y!-.C${>zv.!->-6(62-ò-"$G>yxz,.>= >yz)~x)ˆ~x[`)! "`))z ~xde* *-˞~x*->w *:((9ˎ0Y-~(!>y{(5W~(z'{5.>yy{>!v( .D.e*-~(>y{{(-~(>>>2-&! "`)5.>y:(z)~x>y *:-*((>/C${zv8/D.>Z/C${zvT/D.>> = z*$M> > > > > > > > > > > > > > */0*/00{+-0z/*/0+-0=/V#^r+sV,^r-s,# 06#6# 0"/"!B! s#r# .0*H!ͫ!0!"*F!*B!|f0}f0!/2k0*F!T]"/"/![/H*/~##‡0*/#~##”0**/!!*/;*/~0*/ 0*6/ ^,V"/!"/*/"/*/^,V#*/"/^,V#"/"/&}@1!**/*/!9*/!9*/s,r*/,#"/ 0*^,V"/,#,#65,5 ^,V#N,Fo>g)9*/,#s,r*);!*!!9"/!9"/*"/^,V"/^,V#N,Fo>g)9"/*/,#s,r**/!);*/ ~/!9"/*/^,V-+-^,V),#"/*/DMq,p- q,p-*/"/!/H!"">2>2>2!">2*v"!"!@0OͰ:&&''''''''''