IMD 1.18: 21/01/2023 17:55:55 PRQ-SFT-DBD-7 3RCC PERQ SYSTEM D.6 OPERATING SYSTEM BINARY DISTRIBUTION FLOPPY Copyright (C) Three Rivers Computer Corporation, 1982 single density, double sided Group name Command file OS.BINARY BIN.CMD LINK.CMD OS.MISCELLANEOUS MISC.CMD   floppy run' LINK.* T T 8 LINK [file] Link the Pascal program -file- run' LOGIN.* F F 8 LOGIN [name] Scommand the command name the user will type ! string explanation of the command ! In response to '?', thetart using the Perq as user -name- MOUNT F F 8 MOUNT flop|hard Start use of floppy or harddisk PATH F Shell removes the first four fields ! and displays the line !  F 8 PATH pathname Set the current path PAUSE F F 8 PAUSE [comment] Type -comment- and wait for RETURN run' RENAME F F 8 RENAME file newname Change name of -file- RERUN T F 8 RERUN [arguments] Execute last program with new arguments RUN T T 8 RUN [file] Execute program -file- run' SCAVENGER F F 2 SCAVENGER  Fix up the disk SCREENSIZE F F 8 SCREENSIZE n Shrink screen for next program run run' SETSEARCH F F 8 SETSEApPsys:part3>Segs> POS D.5 p-boot PaIOLOADCUIOREADTAIOSETFUNIOSETMODIOCURSORIOSETCURIOSERCH [path|-] Modify the system search list to include -path- STATISTICS F F 8 STATISTICS yes|no Start|stop displayingTTABIOREADCUIOGETTIMIOSCREENIOKEYDISIOKEYENAIOKEYCLELISTENTO fileSHR *SCAVENGER Run the disk#Login #ShellCommands ? F F 8 ? Print this message run' PASCAL T T 4 COMPILE [file]  run statistics SWAP F F 8 SWAP n|y [partition] Don't swap | Swap to -partition- run' TYPEFILE T F 8 TYPE file  Compile the Pascal program -file- run' COPY F F 8 COPY src dst Copy file -src- to file -dst- run' DELETE F Display -file- on the screen #havehelp Pascal Copy Delete Details Direct Edi F 8 DELETE pattern Remove files meeting -pattern- run' DETAILS F F 8 DETAILS Show the current system entor Floppy Print Rename SetSearch TypeFile #end ! The format of a line in the #ShellCommanvironment run' DIRECT F F 8 DIRECTORY [pattern] List files whose names meet -pattern- HELP F F 8 HELP [keywordds section is: ! word what Shell is to do to implement this command ! (use apostrophe bef] Explain -keyword- (may be a program name or empty) DISMOUNT F F 8 DISMOUNT flop|hard Stop use of floppy or harore special characters like space) ! T/F True if default file should replace empty argument ! T/F ddisk run' EDITOR T T 8 EDIT [file] Edit -file- run' FLOPPY F F 8 FLOPPY Transfer files to/from True if argument is to be new default file ! 1..8 when doing command, screen will be 128*(thisvalue) !  I. we"JzJ'GJ)-wRJ iMJz}&J  @~wJ&wJ@wJQwJ=swj  j IqwJ ,u~  45' 4JHdHH di jjȉ>3gq(#n';}jc} i} oy)}ogp'oHngn+Vn'ji/n''j)Control-shift-D dumpP)innm *Sm')rjiji!m'm'rrp' Xjjjjȼ `c}a'm ' //}j`c}i**m '*m09DX m0J,*͸c} jir` q'jjjjj  !<m09DX, KmH0J,*͚m09DX m0J+*̈́m09DX+ KmH0J+*f,+m0'm m9,mJm]^_ `>' m'm'm'*d/Segs> GETTIMESGetTimeStamp.PASboot Pascal.RunR *SCAVENGER  K}} 4}P %} }a'  }a'   }I(I)k  Run the disk EXCEPT Except.PASPASows use of default fileSHR *SCAVENGER Run the disk`c} c}}} }ʷ}}}mDX `m}ʷq}M(`8}ʷ}}k` }}} DISKINTRFLOPPYINSPEECHINGPIBOUTIGPIBININTABINTR Z80INTR KEYINTR RSIINTR RSOINTR PUTINTR GETINTR TABLETUPCURSORUP or off. Partq}Lm͡p_} He}Y}M}A}5})}`d is the partition for swapping.R +TYPE File CODE Code.PASxt file File.of default fileSHR }}߭} `}}ʷ}}1}}}}}}1} }1p& 1 + %IO_UNIT sys:exp>io_unit.PASASS    `d}}4}߭*}߭,`}߭*}߭MK+`}}߭}} ߭MM} }߭MLy(y(}((} )(3}}}8mg } ( }(}  )}yy'q,`}q}̓p(`u}%p,}7}+}`d }q`dX1}8mg m} kk)6kh nDX pn}ʷ}(Ungngdq(n' r+r}r)#kHm'}x( } kH98}ʷ} H}}8mg `A}}nDX Wn}ʷ}(<n.o` .ongpHq(p'q' d]}']}  }}`d 9#*k` }} } m} P`} ;`I`A`']c} mDXEm}ʷ}(-}}﷛ }q` } gq` s` ]c} mDXEm}ʷ}9`1`)`!`d}}ʷ}}1}}}}}}1}} (-}}﷛ }q` } gq` s` ] m ` c  ` \1G} ( }(} ) `d } c} }} k` ?Knk`c}ɺ}0 }@ 8(ϡ} ͎} ̀} p} `}}@K)n }n}nInHc}}Bnm}D}Gnm`}B``˼}I}Gɺ] w GPINIT GPAUXCOMGPPUTBYTGPFLUSHBGPITALKHGPHETALKGPTBLTONGPTBLTOFGPSEND GPRECEIVGPGETBYTGPD ``c```c`NN Nn' NNN NNH N , IBERROQP |6=>*  % dIO_UNIT IO_Unit.PASpNmoHNH N ,]N NmNH N '] ` N``˼}ɛ!` N`,#\PASCAL Z aIO_OTHER IO_Others.PASB.PAS`˼}ɛNN N( `  N`N` N`N` N`N`?`_` mH` N`N` DYNAMIC DYNAMIC.PASPIB.PASN`N`] N`N` N`N` N`N`?`_`@mH` N`N` N`N`]`} N`o`˼}000PP( ` ] N㰦 N] N`] `c}ao(o(o` o'nNpx<<x>|83478@T >VN`N` N`N`?`_` mH` N`N` N`N`] N`N` N`N` N`N`?`_`@mH` N`N` N`N`]`} N`o`˼}IO IO.PAS yP Psys:user>wjh>Editor> POS D.69 c-boot IO_INIT IO_Init.PGPIB sys:Part2>GPIB.PAS AS%QP |6=>*  % dIO_UNIT IO_Unit.PASp ,#\PASCAL Z aIO_OTHER IO_Others.PASB.PAS DYNAMIC DYNAMIC.PASPIB.PAS  '10 Febt  0 |6 )IOCREAD IOCWRITEUNITIO IOWAIT IOBUSY IOPUTSTAIOGEno'Nq #cqN]cc "`v}|k)}|c|H|k)c" : "`TSTAIOBEEP IOERR FLPERR DiskIO.PAS%8#\tw}|k)}|c|H|k)c" => "`x}|k)}|c|H|k)"cARITH Arith.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERSYSTEM System.Nw},Dv},Nx}|k)}}|N`|H|k)\}c} c}ɺaNkP}c} c}ɺa^`Lx!I`A`PAS_unit.PASASSSCREEN Screen.PASbupt.PAS 9`1`)`!`d}}ʷ}}1}}}}}}1}} PMATCH PMATCH.PASallows use of default fileSHR *SCAVENGER Run the disk  IO_PRIVAIO_Private.PASt.PASASSIO_OTHER IO_Others .PASQP|6>* dVIRTUAL Virtual.PASunit.PASASS MEMORY Memory.PAS! /$X0a 2( 2 CODE Code.PASa ^T ]5 mN }}, N}N\}}Nt''o}}H}}, N}N\}}levl wGETTIMESGetTimeStamp.PASf s>PASCALit ffNta'AN}t0'ta'tA't@'N}t*'t&'t#'N} ta+tz) t JNtN]p}, io_unit l ioDISKIO DiskIO.PAS%8#\t N }pNqN` aNqN]p})*}c}c}ɺaNq N\pHN]p2 ARITH Arith.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERSYSTEM System.cnc!cocNn0'o0+o9)NxnA'*oA+oZ)Noa+oz)NGPAS_unit.PASASSSCREEN Screen.PASbupt.PAS na'oa+oz)N,n@'%o0*o9,oA*oZ,oa*oz,N=2 cnc:coc  @D 3@ cA!3&!pA @Ba>8?|@>@ A~?>O `   $ - 6 ? H Q Z c l u ~    A 'H8  ) 2 ; D M V _ h q z                   % . 8 ?A @B @@ ?7 @ I R [ d m v                   $ - 6 ? H Q A @@ @@ ?Z c l u ~                   ) 2 ; D M V _ h q A  @" @@ ?A @ |z  'H@B`8|>@|?>H?Ꮘ@`1 HB |A 'H ?IA$ '| A B !BH&@A @# ?I  `D1cƘ!3 "!@E @ HP d ("$$ A@B !BH$@" @@ ?0BAA" dSA  I  ~~ G(H @ " @ DA A $"* AB !BH$@"$@ ?*$A8T@    @@8A Aq! @DT @B  cA!$A!"H CD|?PP0*  ?| =A?'IA?"A("I BHT a  ??p8?2  !$iA("A("I B(H @P"@b  @@ A $)I$A"ADBI~~ BP d( @ @@ @A d!9M"A%DA  c}c}ɺaNrH݋Cc [`vc:cuc]cvu(\ HN] (PATTCHECPERQ_String.PASs use of default fileSHR.SCREENSIZE Set the size of the screen.isk Except.PANbcc PattMatch: "`}c`c " Str: "`}c`"crNNc`}SASlows use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk STREAM STREAM.PASmp.9STATISTICS + (}(}}c}```aNKs-c ===> `cc`cc FAIL`cs| - Turn printing of statistics on or off.VENGER Run the disk WRITER WRITER.PAS- Turn swapping on or off. PartNȍ (N`c PattMap: "`}c`c` " Str: "`}c`"cc}}ɺ is the partition for swapping.R +TYPE File PATTMATCPATTMAP PATTDEBUISPATTERBADPATTENEXTCH UPCH CHMATCH STRPATT  a vNN }`}(}( }}}}```aN Jw,c ===> `}c`cREADDISKSys:Boot2>new>readdisk.PAS `}c`cx}|k)}}|N`|H|k)w}c} c}ɺaN| v}|k)Ϭ}|`aNkNPERQ_STRPERQ_String.PASs use of default fileSHR.SCREENSIZE Set the size of the screen.isk Except.PA`kN`kN`a]}}}}|`w`x`a N\0}}|N`c `c}}|SASlows use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk STREAM STREAM.PASmp.9STATISTICS + N`|H|k)T\}}}}v`w`x`aNZ}v`aNkN`kN`kN`a*k}}vN`| - Turn printing of statistics on or off.VENGER Run the disk WRITER WRITER.PAS- Turn swapping on or off. PartxH vH wH j]N}'}'\ s})r})ϤNt }c}c}ɺaN sHNt } is the partition for swapping.R +TYPE File PATTMATCPATTMAP PATTDEBUISPATTERBADPATTENEXTCH UPCH CHMATCH STRPATT  | A8~ABB$0| D8 ?##\CAL X aNEWBUFFEBADALIGN @  ??  ?` ` c` ` c` `Sides 2 Density SINGLE Fast ! OS.MISCELLANEOUS - OPERATING SYSTEM SPECIAL FILES ! Created 29 Jan 82 12:26:50 Get DEFAALIGNMEM sys:user>ssj>ftp>alignmemory.PASLoad_Display.pasr UL.PRO DEFAULT.PROFILE Get DELETE.CUR DELETE.CURSOR Get DIRTRE.CUR DIRTREE.CURSOR Get FIX13.KST  FIX13.KST Get SCAVEN.ANI SCAVENGER.ANIMATE Get SYSTEM.USE SYSTEM.USERS Get SYSTEM.CON   SYSTEM.6.CONFIG Get UTILPR.CUR UTILPROGRESS.CURSOR ! P 02`$"@@d€EI@K `@` 1Lp)p,p`o)opHJ, `o`c}opHJ``opHJ`q`N`q}ʷp}}HpMJrp'q`orH @H 0??`}qrN]  `0<>*SAT* UM *SIT* US *Cursor* UM *Screen* UM *Font* US *IO* UM System SW Stream SW Writer SW IOErrMessages SW Loader SW MEMORY Memory.PASP lsPsys:user>ssj>ftp> POS D.65 d-boot CODE Code.PAS>Reader SW Perq_String SW Screen SW FileSystem SW GetTimeStamp SW FileDefs SW Code SW Memory SW IO_Init SW RunRead SW F@C !BH$@*@ ?ƈ1$ A B !BH1@ ?ssj>ftp>alignmemory.PASLoad_Display.pasGETTIMESGetTimeStamp.PASB%. N`]}N`as'}}}N`s` }}}N`]H'\HKHLHcIm``m` PRHI`N`mp)4mNJ qI``qc`}qmHmp)mp)+mNJ I``qc`}qmHmp)DISKIO DiskIO.PASP PSys:Boot2>new> POS D.65 b-boot ARITH Arith.PAS}st)XsNJ u} s\p-u Isru,usu,uuJsHst)Шp \qNJ ttwQP|67>* wdFILEDEFS FileDefs.PAS-6ttttN`tttN`tNtNt}ttN`t}tqțmNJ n ##\CAL X aGETTIMESGetTimeStamp.PAS! (/$]NJ NNJ N)}Pk)N`}*k,`-\  mNJ nn6nnnnN`nX0a|67&%diskJ@MEMORY Memory.PASnew>readdisk.PASreaddisk.PAS3 She.SCREENSIZE Set the size of the screen.GETTIMESGetTimeStARITH ARITH.PAS(allows use of default fileMPSHR *SCAVENGER Run the disk  amp.PAS$BSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptDOUBLEADDOUBLESUDOUBLENEDOUBLEMUDOUB LEDIDOUBLEININTDOUBLDOUBLEBEDOUBLEMODOUBLEABDBLEQL DBLNEQ DBLLEQ DBLLES DBLGEQ DBLGTR  CONTROLSCONTROLSTORE.PAS use of default fileMPSHR *SCAVENGER Run the disk  }﷌}﷌}]}﷌}﷌}]}﷌}]}﷌}]}﷌}﷌}] }﷌}﷌}]}﷌}﷌}]o}ț}﷌}}}ɺʷu*N#}}}ɺʷ u*NNț}﷌}﷌ N]}﷌}﷌ N]}﷌}﷌ N]}﷌}﷌ N]}﷌}﷌ N]}﷌}﷌N] :<Nd~}  }+}}ʷ}}N} }`N}0}N}@}pN}R}N}}Pb,.FH`N}}?N}`}N}p}N}}Nop}}N}IN} }} SKFAILDOFLUSH FLUSHFAIDOFLUSH FLUSHFAIX%%%%readdisk - #\`c(. Delete some files then run Scavenger.`c)}P )]]]}c/HELP c]` cc**  WRITER WRITER.PASe*( PASCAL.RUN|6 7K)  !3STREAM STREAM.Unable to reset `cc}`c3}d 3]` cc** Disk Error: `cc}`c)}PAS% com readdisk 3~ % d< : :JREADDISKCHANGEDIREADHEADCHANGEHEFLP )]}amcREAD`ccWRITE`cc WRITE FIRST`cʹc` RECALIBRASYSTEM sys:exp>system.PASle(s) should be copied to floppy? pmatch.PasTimeStampN\LEX.SEGRUFSfj'K TE`c͒cFLOPPY HEADER READ`cgcFLOPPY HEADER WRITE`c<cUnknown operation `cd2Rrp(^})p`)JPc Error is: `cp``c = `cc}` ccE Address is `}ac`` I`}}ʷq'ψ}N߭c. HardDisk; Cylinder `}c``c, head `}Rc``c , sector `}c``cac. Floppy; Sector `}NcɭNrNrNct^C`c]Nrc}  m* JHmno) nHno)m``c} , cylinder `}Ncɭ``c` cc** Disk Error: `cc}`c on `k)]}Pc}N}m M0HN}}} JPPm Lm'δ}P}PN}N`}*k,`)}Pk)N`}*k,` -` cc** Flush Error: `cc}`c  on `k)N`}*k,` ` _N` ` N` ``vN`sNtNu`N﷜﷜﷜﷜)}Pk)N`}*k,`-           NNqN}y﷜ Nqc)}P cNq}PP  N`Z)vNxNwNr`,`` X` `|cConsole:````cConsole:```` `s''ss`tN`uN` ϸ]` cc** `cc}`c for `c*``cɺ4`c6`N߭N߭8`NN`` `Z,7USHDISWRITEDISWRITEHEAINITBUFFFINDDISKRELEASEBFLUSHBUFFLUSHALLCHANGEBUCHGHDR USEBUFFEBUFFERPOHEADERPOREADAHEAFORGETALFLUSHFAIDIc})`c. Run Scavenger.`c)}P)})P R` cc** No free blocks in `cc} ]}IoHIo'qoHJI}K,}}} ʷ}} ʷ}} ʷ} 㴄} P} qo} qqp} p㭄pr, qr+qp*qp*qr+sڼr} rH`q`aqr+&r} rHq'} roHr} rqqoH`p`aqp*4qoHp'&o} pH} pp'q} p㭄} qp} qo} P} q} } '}㭃}㮁6}㭃} J}  Hm'7'P}oGETTIMESGetTimeStamp.PASPsys:user>wjh> POS D.66 d-boot PASCCOMPILER KHn}nmJ' }nn}n}no]}ʷ}STREAM STREAM.PASmp.PASos.DRexp>3 She.SCREENSIZE Set the size of the screen.LOADCONTLOADMICRJU MPCONT   DYNAMIC DYNAMIC.PASllows use of default fileMPSHR *SCAVENGER Run the disk  CODE sys:part3>code.PAS      n*o*!no*!]n*o*!no)!]n*o*!no,!]n*o*!no+!]} }} ʷ} ` } @(} system /l syGETTIMESGetTimeStamp.PAS#\ N i 4X86SYSTEM COMMAND SETDDS SYSVERS CTLC CTLCABORCTLSHFTCEXITPROGHELPKEY CTLC CTLCABORCTLSHFTCEXITPROGBADPART PARTFULLFS STREAM Stream.PASe*( >pascal.RUN|6 =K) ;?OMPILERFILESYSTFileSysNOTFNDFSBADNAMHELPKEY RESETERRDISKERROPRINTFAIDISKFAILFLUSHFAIHER10I Ether10IO.PASW  xj`8XDN`3>dcc a``N` ``NLogIn.tem.PAS.PASle(s) should be copied to floppy? pmatch.PasTimeStampN\LEX.SEGRUFSfj'KSCREEN Screen.PASa#'d.Run J JPNNN] )Bd-'08 Feb| |6 =)dPERQ_STRPerq_String.PASPASle(s) should be copied toT)  floppy? pmatch.PasTimeStampN\LEX.SEGRUFSfj'KREADER Reader.PAS#\d08 Feb 68EFSRRD))P33RR33TTVh$JanFebMarAprMayJunJ08 gSepOLOADER Loader.PAS#\b##\(system >33j))- --)--*``NLogIn.>PASCALystemREADDISK ReadDisk.PAS@8E8$87  "`nd.Run J JPNNN] )BDISKIO DiskIO.PASFeb  system#||#\|{- |ARITH ArithEXCEPT Except.PASstem.PASle(s) should be copied to floppy? pmatch.PasTimeStampN\LEX.SEGRUFSfj'KIO_INIT IO_Init.P.PASff.c#\#\ALLOCDIS AllocDisk.PASm.PASle(s)ASQP|6=>* dIO_OTHER IO_Others.PAS l0 should be copied to floppy? pmatch.PasTimeStampN\LEX.SEGRUFSfj'KIOERRMESIOErrMessages.PAS#\ ##\X aIO_UNIT IO_Unit.PAS! (/$2(%X%>4>#'dETHER10I Ether10IO.PASW  xj`8XDX0a 2( 2 '(MEMORY Memory.PAS(ac'^T ]58W <`WRITER WRITER.PAS% eW]blevl wCODE Code.PAS;f. ?>PASCALm f.f.#\HSTREAM STREAM.PASdd#'ddD system.pas8R    H`}`a*}(}('m''c``` N=Ncc >System.Users````ccN] mn)Qm N=Nm N=MEMORY Memory.PASmp.PASos.DRexp>3 She.SCREENSIZE Set the size of the screen.CODE Code.PASPmNm N=帜m N=kPmHmn)Яc >System.Users````cccn >SystemASllows use of default fileMPSHR *SCAVENGER Run the disk GETTIMESGetTimeStamp.PASATISTICS + .Users```` mn)lm N=Wc `m N=cc`c `m N=cc`c| - Turn printing of statistics on or off.VENGER Run the disk NEWP DISPOSEPLT LE GT GE BITEACmHmn)Д]N)}Pc}*ɺa \ N=Ncc >System.Users````ccHUENLARGESN]+,+BTU=%|}i&\^)*=)+/@USERPASS#sys:os>programs>source>UserPass.PASN mNm N=帜m N=kPmHmn)Яc >System.Users````cccn >System .Users```` mn)lm N=Wc `m N=cc`c `m N=cc`c mHmn)Д]N)}Pc}*ɺa \ N=Ncc >System.Users````cc }ʷ}K}HH}H,ͨ`}K}HH`}K}Jc}}H`}MJM  H`}`a*}(}('m''c```}+}P}V}+k,Yk+XkX,kY+}T}+}+}V}Tʷ}}+]c >System.Users````c}U VkUkV)_},kU5m} ʷ} ` m`} @(m`qHIq'nHIn'm  m} ʷm}ʷ} N=Pc},},}3kU N=$}*kU N==kUNc\kUHUkUkV)СcN]N)}Pc}Uɺa$ }ʷ} PF}㴈ts}s㭇nsnMJnM qxH`}s`a st'u(u'u'}m}s}g)}*P }S}U=NN)}Pc}ɺa :NNk N= kNkHkk ' }]  < ,.:Nk N\ N=} N=N N=kSN N=)}*Pʷ N=}TP $@$@searcwfJtD,""[PerqManrinting of statistic`c```c```c```c```N``('%#!N  `Ȕs on$@$@#sys:user>brad>games>PerqMan.Profileg$rt | - TurnG lt is the partitiofor bX(  m(m(m( ('H' m'! }ʷ}}}}}}}N=E File Type the text file File.DewbX$`"}mN}m'R}tHK(H(}N!}N}NINe}'H'%1"+TYPE File  6,g$rt is the partition swapping. MAKEBOOTSEGCNTROLSEG D 9N}%}#%NIN#}#}Ȕ(  }](ELETEPAS4$.5 READERPAS%B CmdPa RENAMESEGAPPENDSEGCMDPARSE.SEGEGP FILEU ILSSGmdParse.SEG}% %%%! !!!}ʷ}}}}N ! OS.SYSTEM.BINARY - OPERATING SYSTEM SYSTEM SEGMENT FILES ! Created 26 Jan 82 13:48:13 Link SYSTEM.5=SYSTEM/SYSTEM  PROFILEPASSETS"2183J$ M4,4@4"[ANDTABSPAS6 BYESEG^T^h ! OS.PROGRAMS.BINARY - OPERATING SYSTEM PROGRAMS BINARY FILES ! Created 26 Jan 82 13:48:13 Link SHELL.5=SHELL Link LINK.5= RUNREADPAS'sh EXTLOOKUPPASbb CMDPARSLINK Link LOGIN.5=LOGIN ! OS.IO.BINARY - OPERATING SYSTEM IO BINARY FILES ! Created 26 Jan 82 13:48:13 ETHER10I#sys:user>ssj>ethernet>ether10io.pas Guestr  7$@$@>Default.Profile"[ a cr. $Ah,  Clem& $@$@>Default.ProfileJSys:boot [[UwjhTROL.R UNOL.RUN$@$@sys:user>wjh>.profileJ||,||"[venger. demotdtbmmsys:user>brad>sig>demo.profilee obootcreen. Sys:Boot>(dirk Sys:boot>X`NIN` KHHHHHLcn``n``mo) ``mNJc `mHmo)`  P4x(, %,GETTIMESGetTimeStamp.PAS $Tuuuuwς}] `,J,`%}%}﷼}%2$$2$ 1%\CAL8B8 ASTREAM STREAM.PASZP[#Gk`|laIO_OTHER IO_Others.PASSASxshe.SCREENSIZE Set the size of the screen.GETTSTAMGE ZerPass >UserPass 'x B'X"<zza' BWRITER WRITER.PASSCAL ..>binary>UserPassCZP"Y5 UserPass ~ ..>binary>UserPass UserP aFINDUSERVALIDUSEADDUSER NEWUSERFLISTUSERREMOVEUSENCRYPT ,GETTIMESGetTimeStamp.PAS $2$$2$ 1%\CAL8B8 ASTREAM STREAM.PASZP[#Gk`|laREADDISKsys:exp>readdisk.PAS.PAS J GETTIMESGETTIMESTAMP.PAS use of default fileSHR *SCAVENGER Run the disk H     }N`aq``}q`ʷȼ}N`ar``}r`ʷȼ}N`aq``}q`ʷȼ}N`aq``q` }n*o*!no+!]c}}߭}߭ q``ar'qJ  rH'qJ  v* vprograms>source> POS D.6 g-boot FILEDEFS FileDefs.PAS%QBYX;Hc'#sM'sdM'sM'!ut,5TcHu ,cHcu  oJo.*o, oȔ(  } Ȕ(  }(}'mN`}}}t`}ɺ /]}}ʷ}}ʷ}'}P Ϥ}(*}`}`} }}H }}} '=}`}SYSTEM System.PASsj>ethernet>ether10io.pasMEMORY Memory.PA`}}LK}}M}KH`}`}`}K`1}P &}(}}}ɺS;QP|6<>* ;dCODE Code.PAS0}  } ` }} }@}0}P}`]3d 33d3%$#\\CAL X aGETTIMESGetTimeStamp.PAS!  (/$}ʷ} }}T} }}B}'c`````} ` }}X0a|6<&%r10iJ@IO_UNIT IO_Unit.PASDDD@@ ZPY/ }K%}3da}B}3d} } a}}J ɺ}`vlvXETHERINTEtherInterrupt.PASDe1 ether10io.pas fDʷ} } }}T} }}BBYBYBY]}ʷ4} }ether10io.paDYNAMIC DYNAMIC.PAS%%%%ether10io.pas N D 48R }T} }E}}}T}}[\ `c[]ɺE10INIT E10IO E10WAIT E10RESETE10DATABE10GETADE10STATEE10WIO E10NINITE10NRESEE10BYTECE10DBYTEE10BADCOE10TOOMAE10STOOME10RECmn)mɺmH ɺ})ʷ[\ `c[}) })})Tσ})})}}N}NIN}(' }N ](  nLoKn( EI0a|6<&%r10iJ@IO_UNIT IO_Unit.PASDDD@@ ZPY/ oJo.*o, oȔ(  } Ȕ(  }(}'mN`}}}t`}ɺSTREAM Sys:part2>slb>pasreal>stream.PAS QRxzTV  }N}NIN}(' }N ](  nLoKn(   oNJ ]}oNJ ]#dDc PASsys>pascal readdisk ~ POS D.65 a-boot 10 Feb 82 13:31:14READDISKCHANGEDIREADHEADCHANGEHEFLN`]}N`as'}}}N`s` }}}N`]H'\HKHLHcIm``m` PRHI`N`mp)4mNJ qI``qc`}qmHmp)mp)+mNJ I``qc`}qmHmp)DISKIO DiskIO.PASP SPsys:exp> POS D.65 a-boot ARITH Arith.PAS}st)XsNJ u} s\p-u Isru,usu,uuJsHst)Шp \qNJ ttQP|6>* dFILEDEFS FileDefs.PASB%a6ttttN`tttN`tNtNt}ttN`t}tqțmNJ n##\scal X aGETTIMESGetTimeStamp.PAS! /$]NJ NNJ N)}Pk)N`}*k,`-\  mNJ nn6nnnnN`nX0a\B8XAaMEMORY Memory.PASaddisk.PAS.PASnnN`nNnN]Nk)N}*k,m` Nms) m`mHms)n&) Flush ALLPDYNAMIC DYNAMIC.PASddisk.PAS.PASoN`}r`-]Nk)N}*k,m` Nms)Im`mNJ NmNJ NmNJ m RX%= kNJ mHms)зn')s Forget ALLPoN`}r`-țmNJ NțmNJ NțmNJ mNJ nH]}WRITER WRITER.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERSTREAM STREAM.oNJ ]}oNJ ]#dDc PASsys>pascal readdisk ~ POS D.65 a-boot 10 Feb 82 13:31:14READDISKCHANGEDIREADHEADCHANGEHEFL PRHUSHDISWRITEDISWRITEHEAINITBUFFFINDDISKRELEASEBFLUSHBUFFLUSHALLCHANGEBUCHGHDR USEBUFFEBUFFERPOHEADERPOREADAHEAFORGETALFLUSHFAIDI $C:----GSKFAILDOFLUSH FLUSHFAIDOFLUSH FLUSHFAIX%= k--09--/`}r`-țmNJ NțmNJ NțmNJ mNJ nH]}WRITER WRITER.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERSTREAM STREAM.   ``` })})}) }}{ʷ}{}}ʷ}P}}t}}}} t}}0t}}@}}Pt }}p}{-t͊r'p'r',-jp' [p}'-^cp@Hc}r ' }{ q}{ '}{r}{}{L}{}{}2}P}2uk)"}2uazDX}2u}2uaJAHp}X,(+.(Hr ' J}c]}}ʷ}}ʷ}"(u}@uH}23}2CONSOLE:P帼3}2dc} au'#c}2`u`}}} CONSOLE3} CON3 }{}033}ɺ 3Jd3} 5}}\33}ɺ 3Jd3}'Y}_} RS3 }{G} eRSX3 }{+t3}d33}d 3s 3}d3}{@}ɺ+a r(}r}rH+ `}apJ(打(B'33&'( d]}ʷ}}ʷ}}H}}'Ϥ}} ' } ͉}`}`} }ɺ 3Jd333}ɺ 3Jd3}͓}}H}}'A} }J} ``a}}H}} 'J} '/}} L}K} M}LH}} L}}}ʷ}(퉓(33}ɺ 3Jd3 `c}a(쉓(33}ɺ 3Jd3r}X ?}'q}'r}ʷ}"(\}@}033}ɺ 3Jd3} 33}ɺ 3Jd3} ,5*}>' }} }r}}Hr}'r}'} '[r}(6 ``a(퉓(33}o} }oHo} '} *} }ʷ}ͽ}}}ͼ}}}qͤ}}ɺ 3Jd3}}} }}do }ɺ}}} }  }}B͌}}}3t}}}$\}}}F}}}0}}} yr *rr(\r}'} };r}'} } }r}X}Xod;screen.PAS.PAS  J  Jo,o n n ]m 'm '\m`nm`om`]mͼ` GETTIMESsys:exp>gettimestamp.PASH      ] }ʷ }H*G} }㮜 㭊 J  J0} } K0nmHaf]m+m)nn*o*!no+!]c}}߭}߭ q``ar'qJ  rH'qJ  v* v POS D.65 a-boot GETTSTAMGE H,l`mKL`mJJmJJm JJH HJ0 HJ0afmJ `o m`n` `` o m`n`   `}jc` }3``}j}7 k6dc}7:`c}7 k5Jc}7>`c}7}j }jc` MEMORY Memory.PASslb>pasreal>stream.PAS}ʷ}ͽ}}}ͻ}}q}ͣ}}B}͋}}3}s}}$}}}7d]x* J j\ [}}}E}}}/}}}d<=Si.]}}ʷ}}ʷ}FH573333A(6}@}P33}ɺ 3Jd3}'}ͱ`}`a(33}ɺ 3333333333333Jd3 `}`aoJ((߉(H''33}ɺ 3Jd333}ɺ 3Jd33333388883333333  `c}a(쉓(33}ɺ 3Jd3 `}`a(鉓(33}ɺ 3Jd3}44333333ty33L_33`sz,}}B}BYXV `c}a(}}B}BYX p '͉(33}ɺ 3Jd3f+)h". Z   ,  hdG}ɺ}( } }ɺ}}]}(}}}ɺ}(}}333333333333}ɺ]}}}ʷ}}ʷ}@}0 }'}'}cConsole:````cɺ }3333338888333333}}ʷ}}ʷ}"(E}@}033}ɺ 3Jd3} +}'}' }44333333ty33L_33`szɺ+a}3@} non-open filed}3'~}0#unknown character structured deviced}38}ConFILEDEFS FileDefs.PASPSys:part2>slb>pasreal> POS D.64 c-boot GETTIMESGetTimeStsole:d/}RS:d}RSX:d dK}3'} FileId = 0d)}3` a6 k6 amp.PASP}|6>*  a dIO_UNIT IO_Unit.PAS\O }device not mountedd\ }3` a5k5( k5J 5k5'$}partition not mountedd\ `i##\CAL Z aSCREEN Screen.PASslb>pasreal>stream.PAS  JHJHJp(q(}(`J`J`H`J`ɺ`J`H`H`H`ɺ.. l e  * j )) |f o p w  `J`J`J`H`ɺ`H`J`H`H`ɺ}(π  }0ʷJH H00a<8 (  p f}0HH}0HH H )}P `}0H`  0k0 k0 k0k0k0 6 ;{ x k0k0k0k0 k0 k0k0 k0 k0  k0 k0 ] JJIO_OTHER IO_Others.PASn.PAS.PASEXCEPT Except.PAJ J  HH HH]m'3 㭃  oJJ ^m*m,m Sreen.PAS.PASSYSTEM System.PASa  =mu 㭃uu u  u oJJu uuu t3qsJKHJoHHsJHrJH0sJHrJH0##\scal X aMEMORY Memory.PAS! /$af,qsJKHJsJHrJH0sJHrJH0afqsJKHJpnJHsJHn0sJHn0afprJKHJsJHrJH0sJHrJH0X0a\2( 2 CODE Code.PASa/g ^T ]5`ͯm m}ʷ},{ }H, ` } ﷎}㮜 㭊   J0} } afprJKHJqrJH0qrJH0af`sJ`rJ`qH`rJ`ɺ`sJ`pH`qH`pH`ɺ`sJ`rJ`sJ`pH`ɺ`qH`rJ`qH`K0onHaf }H d a4][9W0F]. }ʷ}HH}HH-`,`)+Ȝ }ʷpH`ɺtqsJHoHsr0sr0af] }}y}y }yyJ}y y J} y ]m*m,m  }JJ}JJ`}H`/P/m)A  /H)*/`*/H/̷Ȋ n n nnnnnnn n nn n n  n mPc}0 )+*}H/P1k/k1)}k/ k/H/.c}-c},ɺk0` ]m,m*0k0 k0 k0n n nnnnnnn n n n n n  n Ȝ }ﷺ} _k0k0k0k0k0k0 k0 k0k0 k0 k0  k0 k0 mm n mn)m mH`````) P帺  mnopq}] x *nKH%H,o*oKH%H ,pnHH,qoH H,q%*%p%*%onoqHJnpHJHHJr  EXTFNOTOPEN NOTRESETNOTREWRIPASTEOF UNITIOERTIMEOUTEUNDFDEVINOTIDENTNOTBOOLEBADIDTABIDNOTUNIIDNOTDEFNOTNUMBELARGENUMSMALLREABADB}tŷ}Ev7}w߄}y }@{Η}|½}~vo%I*3d33d 3͟d?ASE LARGEREAREALWRITNOTREAL OPENBLOCFSNOTFNDFSBADNAMOPENCONSOPENRS OPENRSX SENDCOMMADVANCE FULLLINEADDCHAR ERASECHAADVANCE $ )2;DMV_hqz %.7@IR[dmv#\STREAM STREAM.PASڋSJ@6XNDM%%( %%\nd!*}}]} }xLJx? }}vLJv? }} }tLJ |{HzHPASREAL !Sys:Part2>slb>pasreal>pasreal.pas3 H y)3d3&y+3d 3 }}}]3} 3Jd}}ʷ}}ʷ} }}FILESYSTFileSystem.PASpasreal>stream.PAS PERQ_STRPerq_String.PAS>slb>pasreal>stream N  : 4X  SYSTEM System.PAS*( PASCAL.RUN|6 K)stream !DISKIO DiskIO.PAScomp ~ d "%  OJ@6ARITH Arith.PAS%a%@ odHr}}%$}T.}=}L'}O } η} `B͹}Jҷͮ}ͣ}tndn  ,=~ /pas ||6 )ALLOCDIS AllocDisk.PASZfX?͘}F͍}͂}w}Aml}ɷa}V}<K}J@}!5}8#w*}$}LERYfDSys:part2>slb>paREADDISK ReadDisk.PASi#\dndm &}}4($ }).}+̼}/-}.}0_p}+2w̷}3ͼ}57ͱ}'7ŷͦ}8͛W%AxDYNAMIC DYNAMIC.PAS>stream   |%i#%$}:o͐}#< ׷ͅ}=̷z}?o} Ad}BY}zDN}F@C}GP8}tI$-}K"}L #\STREAM STREAM.PASڋSJ@6XNDM%%( %%\nd}nN(k }P}QC}hSԷ}U焷}V!}cX_}ZͿ}[ʹ}^]k ͩ} _#Ƿ͞}STREAMINSTREAMOPSTREAMCLGETB PUTB GETC PUTC PREADLN PWRITELNINITSTRESTREAMNAFULLLN STREAMKERESETERRREWRITEENOTT`x͓}Xb'׷͈}dx}}ehr}Sg·g}iQY\}joQ}Nl˷F}n9?;}o0}Iq%}r|o  T SCLEARCHLINE SBACKSPAREFRESHWWBADSIZEBADWNUM WTOOBIG STARTLINTOGGLECUNEWLINE SAVELINESFULLWINCURSOUTSCLEARSCRDOCLEANUDOCHANMOVEMEM sys:exp>os>MoveMem.PAS GElevl wGETTIMESGetTimeStamp.PASf s>PASCALn ff screen /l scIO_UNIT IO_Unit.PAS%= n SCREENINSCREENRESPUTCHR SSETCURSSREADCURSCURON SCUROFF SCURCHR SCHRFUNCSSETSIZECREATEWICHANGEWIGETWINDOCHANGETISETFONT GETFONT SCLEARCHLINE SBACKSPAREFRESHWWBADSIZEBADWNUM WTOOBIG STARTLINTOGGLECUNEWLINE SAVELINESFULLWINCURSOUTSCLEARSCRDOCLEANUDOCHANxc}m} ʷ} } Hn} ʷ} } HmKHim} ʷ} qI} qpPsys:part3>Segs> POS D.5 p-boot PaALLOCDIS AllocDisk.PASP4x`"w+'n} ʷ} oI} opKqK rK af0gjc}}}]  \READDISK ReadDisk.PAS"\ /noqueryAS/noquery.  4" 4COM MEMODYNAMIC DYNAMIC.PASile Src to file Dest.AY ,BEGIN CASE CONST GDELETE Del iles. "Delete /Help" for more details.EXPORTS 1FILE FDETAILS ParMEMORY.PAS/noqueryydetailMEMORY Memory.PASP Psys:exp>os> POS D.65 d-boot CODE Code.PASos. WRITER WRITER.PASmore in/noqueryAS IMPOLDIRECTORY Give a directory of files. "Direct /HeSTREAM STREAs>MoveMem.PASGETTIMESGetTimeStamp.PASBlevl wGETTIMESGetTimeStamp.PASf s>PASCALn ffM.PASOR (;DISMOUNT Device Dismount the device specified by Device.RAISE ;RECORINITMEMODATASEG CODEORDACHANGESIscreen /l scIO_UNIT IO_Unit.PAS%= nCREATESEINCREFCOSETMOBILDECREFCOSETINCRESETMAXIMSETSHARASETKIND MARKMEMOCLEANUPMFINDCODEENABLESWDISABLESCURRENTSUNUSEDSENOTDATASSCREENINSCREENRESPUTCHR SSETCURSSREADCURSCURON SCUROFF SCURCHR SCHRFUNCSSETSIZECREATEWICHANGEWIGETWINDOCHANGETISETFONT GETFONBADSIZE BADINCREBADMAXIMFULLMEMOCANTMOVEPARTNOTMSWAPINFAEDGEFAILNILPOINTBADPOINTFULLSEGMNOFREESESWAPERROSEGIDTOFFILEIDTOyydetail  N}0})}9)}eBEBYXb}N}0})}9) (}+=߄u }v>܄j }>_ }v?T }E>7I }>7> }E?73 }>ŷ( }>ŷ }?ŷ }=}o }|>zoB-BYX3d"3}-'N}N}0})}9) 3d"3sy # xK} }>~o }|?|o }I> }> }I? }!>ͺ }> ͯ }!?ͤ }>9?͙ }>:?͎ }?:?̓ }=0JH z', N z }N}0})}9) bkk }}|{kHk kk )}}˷x }N>˷m }>˷b }N?˷W }%>oL }>oA }%?o6 }>QY+ }>PY }?RY }=· }S>· } kHkk )cdRbcJl~|zxvtrpnlj>· }S?· })>h }>h })?h }>yͽ }>yͲ }?yͧ }=&׷͜ }X>%׷͑ }>'׷͆ }X?&׷hfdb`^\ZXVTRPNLJHFDB@><:86420.,*(&$"  kc'} k}{ }->xp }>xe }-?xZ } >"ǷO }>"ǷD } ?#Ƿ9 }=l . }^>i # }>l  }^?k }1> }kN' kJ}kJ kk )}}kHkk )}}}ukHNs }}r xI y'> }1? }> }> }? }=_ }c>_͵ }>_ͪ }c?_͟ }5>"͔ }>"͉ }5?!~ r3d 33d3} }}%Ix{H)x{H&)}}ɼx{H`ɺ͘%Ix)x&)%I{){&)"}>脷s }>脷h }?脷] }=ԷR }h>ԷG }>Է< }h?Է1 }:>C& }>C }:?C }> }> 3d3} B BY BYX}  }N}}  ϰN}N N N Nk}}{`ɼx`ɺ^-Ix)x&I)%I{){&)5}}x%H`ɼ{`ɺɼ%I`ɺ3d 30})}9) '}+B-BYX 3d"3͞}-'N}N}0})}9)Nn*nINn;͹ʹ ͯ ͪ ͥ ͠ ͖͛͑͋ͅy 3d"3Mw τ}0' kH} }}0J}>N }5+} }}smga[UOIC=71 +!%"#$% &dk,kJ}}{H}N}0})}9) ;}.'(}eBEBYX   3d"3T}}{NN}N}0})}9)3d"3w ώN} }}poI0J}:N }5+} }}N}}{)}}{J}0(N}}{}o]oH }=½ }p>Ž }> }p?½ }@>ϗͷ }>ϗͬ }@?ϗ͡ }> ͖ }> ͋ }? ̀ } *##\CAL X aSYSTEM System.PAS>MoveMem.PASJc}c}c~ɺaNl.) Switch cannot be a command file.P帺}3-) Command file name canIO_OTHER IO_Others.PASDDZPY not be nullP帺l (5)'Command file must be only item on line.P帺3}dc~a(Nl .c3)ölvlvCOPYSEGM:exp>os> POS D.65 d-boot CODE Code.PASo .CMD Pc}c~ c~  all(N} j}__   } ̈́}__ Nls>MoveMem.PASGETTIMESGetTimeStamp.PASB ( N}__ lΖ}``~ c`~ }~ }}~ }}c```` }*##\CAL X aSYSTEM System.PAS>MoveMem.PASlNK)Command file not found: }JP]}}} } }IO_OTHER IO_Others.PASDDZPY console:```` }`}}]} }ɺ }ɺ } 0} }ɺ } }`CMDPARSE$sys:user>brad>newos>d.6>cmdparse.PAS }}k 'kHk]c }}ɺaN]}N}'} N`p}} (`} !N`at(.}}`tJ`JP} N`}`a}u/'#}N }uH`auN  ,=~ /}tN`a'v }t''N tH̾}t (t(v N v tHN N wΎ}}u`tuJ`JP}t`a_ ,=~ /}tN`a o``}`}console:```` }N}o}]** }(*}t/'  N}tNtH N}}t`}HtJ`JPȼ}}}ɺaJPPN\ ]  ` )Command file not found: Nk (7c}`}kNc}}}}PkN]Np})0}p''p}'N }JP }PcN}@N`a l (2}}l H`}l J`p``pH] }}}}ɺaN** }JPPN\]  y}@n}@c}AX}?̷M}L@̷B}@̷7}? ׷,}#@ ׷!}@ ׷}?o }@o} '09BKT]fox#,5>GPYbkt}@o}Ao}?}Q@}@}?ŷ;}'@ŷͳ}@ŷͨ}?7͝}@7͒}@7͇}A7 (1:CLU^gpy $-6?HQZclu~}|}?q}V@f}@[}?w̷P}+@y̷E}@v̷:}?_p/} @ap$}@_p} A`p}?}[@}]} )}}}}J}}ɺ3} %}} }}H}}ɺ]}NJ}}@}?}/@}@}?̼} @˼Ͷ}@ͼͫ} A̼͠}?.͕}a@.͊}@.}0HN sx):}}}}}}sNJ}0HNsHsx)}16777215>}NJ0N}}]}}?$t}4@$i}@$^}?}S}@~H}@~=}A}2}?'}f@}@}?w}8@wrL}}u?s'u3d!3}4 *too_small_realP]}4^k]k^)/}_ʷ}_}4k]N}@w}?}@}@}A}?G͹}l@Kͮ}@Kͣ}? ͘}<@͍}@͂}k]H]k]k^)Nͤs't3d!3}  *too_large_realP]} ^k]k^)/}_ʷ}_} k]N?w}@l}@a}AV}?ɷK}q@ɷ@}@ɷ5}?m*}A@m}@m}? }@k]H]k]k^)N(sJ}s`a} s`ʷ}}} ]* JI%I J) J&)*}@}A}?}w@}@}?ͼ}F@ͱ}@ͦ}?t͛}@t͐}@tͅ}At  J`cc ɺ}ɺJ *  H  HH   H }ʷ}z}?o}}@d}@Y}?ҷN}J@ҷC}@ҷ8}?\B-}"@_B"}@_B}?η }@η} N Jnu)nHnu) }-N *Ϭ}0N}.N}0@η}Aη}?}O@ }@}?L'Ϳ}&@J'ʹ}@L'ͩ}?<͞}@=͓}@;͈}A=}N Inu)!,JnHnu)nu)9n)}}nNJN }0NnHnu)ͦ}?}=(k}n>%k}>)k}n?)k}>>͸}>ͭ}>?!͢}>͗}>͌}?́}}?.r}T@.g}@.\}?%$Q}*@%$F}@%$;}?0}@%}@}A}?Ƿdkjg=$v}t>$k}>$`}t?$U}C>PJ}>O?}C?P4}>@)}>@}?@}=}y> )2;DMV_hqz %.7@IR[dmv!*3<}>}z?}H>}>}G?}>ͻ}>Ͱ} ?ͥ}>͚}>͏}?̈́}?ENW`ir{ &/8AJS\enw"+4=FOXajs| d: ` l  c  c  d ~|zxvt"pnljhfdb`^\}k``J}}a'kH̚k},}c}cd}ZXVTRNLJHFDB@><:86420.,*(&$"  }k``JP}}k`}kJH`JPk})Z} l  ']} !}}}`}}]} "}}}`}}m(c }k``J}}a(kH̚k},,}}c}c}``c`  %'        }P }`Pc** ` mc c}` c  is an invalid switch` c c}` c c is an invalid command` c SNN~ ~~ }NNN}}巼c}c}c~ɺaN l N lϚN~``witch ` c c}` c  does not take any arguments` tc Command ` c c}` c  does not take c`~ }~ ~~~~~}P~  ~ ~~ ~c~any arguments` $c Illegal parameter for switch ` c c}` c lIllegal parameter for command ` c NXl!~}PNN1N}l' lHlHc}c}c~ɺaN l c}` ͬc Switch ` c c}` c  is not unique` lc Command ` c c}` c  is not 'l N l l'N~ 帺l'N~ 帺ͦl'l'N~ unique` *c c}` c  does not have any outputs` c Only one input allowed for ` c c}` ͹ l'l'l'W)FIf more than one input, separate them by "," and signal output by "~".P帺rl'(c Only one output allowed for ` c c}` ~c File ` c c}` c  not found` Dc  Dir)Separate outputs by ",".P帺Bl(:)-If more than one input, signal output by "~".P帺ͤl NP)ectory ` c c}` c t does not exist` c aIllegal character after ` c c}` c Cannot BOnly use "=" for arguments to switches. Use "~" to signal output.P帺Al'N~ ͚lO)>Only one "~" create file ` c c}` ͗c iCannot end a line with Quote` jc c}` Yc  ****** IMPOSSIBLE ERRORallowed since it signals the beginning of output.P帺E)8Illegal "~" since output already signalled by the space.P帺 ******` *d)\/jU >km(. c  c  c  k} kkN͆l'l ;).If more than one output, use "~" before first.P帺~ 6c "** Impossible character returnek)H}kNJ)}a' kHkkHkk)иk'kHk,kHkk})Z}  nu);n)}}nNJN }0NnnHnu)}.Nnu)=mnH)}}mnHNJIZBUILD_DIBASE2_TOFIXED_FOFLOAT_FON }0NnHnu)]HH+ HH CJJJII)I)& `HELPER "sys:user>brad>newos>d.6>helper.PAS cc ɺ}ɺJ}ʷ} N }-N}}NJN }.N, JJJmu)&}}mHNJNmHmu)}0Nrmu) mHmu)}eN *}-N }+N} G L0HN} G M0HN]3} 3JdN}} ?}`ʷ}`ʷ}} }} y}}} }퀀 }}pc3c```` 2``vc vHelp on:c c  }$B%BY^BY BY3^^c  (3^^c#} }  }}}}}}}cc} ɺk }cc} ɺk s  d}]   ς3^^c }X Ϡ3^^c Z3^^c  c  c  3^^c  3^^ !x"" $ prc  c3 .3^^c  c  3^^c C3^^c ^'_3^^c 3^^c ]@ B !-N }+N} G L0HN} G M0HN^'^ c  #3^^c  c  L3^^c %'3^^c $' 3^^c  ]3} 3JdN}} ?}`ʷ}`ʷ}} }} y}}} }퀀 }} c  3^^c Pc3^^c `3^^c ]3^^c  c  c  STREAM Stream.PAS PSys:Part2>slb>pasreal> POS D.64 c-boot FILEDEFS FileDefs.3^^c  3^^c  c3 .3^^c  c  3^^c 3^^c  'k,PASQP}|6>*   dGETTIMESGetTimeStamp.PAS02'Ϣc  c ** `c Too many entries in index `c c`c  c ** `c Next entry  3M#\Z aREADR WRITER TENPOWERREALMUL INT_POWEFRAC_POWNORMALwould be: `c c`c  aHxJk$'c c\,vJ P SQP|6>* dSTREAM Stream.PAS 0 v p#\X aFILEDEFS FileDefs.PAS! dp/$X0a|6&%r>brJ@GETTIMESGetTimeStamp.PASZPY ]   !"#$%&'()*+,-./0123456789:;<=>?lvlvFILEUTIL FileUtils.PASwos>d.6>cmdparse "#"sys:user>brad>newos>d.6>cmdparse @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  ,=~ /FILESYSTFileSystem.PASuser>brad>newos>d.6>cmdparse N ּ 4X DYNAMIC DYNAMIC.PASe*( PASCAL.RUN|6 K)6>cmdparse "!STREAM STREAM.c͓}}k``JP}}`kJ`JP}}k`}PAS5(4p 88D8C#\ 12:J K%%a%kJH`JP]klcdndn  ,=~ / ||6 )WRITER WRITER.PAS ZfX pFHuP,.K?LERYfD"!!sys:user>braCNVUPPERUNIQUECMREMDELIMGETSYMBONEXTID NEXTIDSTPARSECMDPARSESTRDSTRYALLvJ))R33RGDSTRYSWIINITCMDFDOCMDFILEXITCMDFEXITALLCDSTRYCMDREMOVEQUSTDERRORNEXTSTRIIMPOSSIBHAVEERRORESETERRFINDNONSHAVEERROCREATECUTREAM.))o`JP}}`kJ`JP}}k`}PAS5(4p 88D8C#\ 12:J K%%a%kJH`JP]klcdSHELLDEF%sys:user>brad>newos>d.6>shelldefs.PAS PERQ_STRPERQ_String.PASPsys:user>brad>newos>d.6> POS D.65 b-boot SYSTEM System.PA   to continue.`c  c \c  c A Type one of the key words indicated above and press RETURN.`cX0a|6&%J@STREAM Stream.PASrad>newos>d.6>helper.PAS  c C Press a button on the pen/puck for a PopUp menu of key words.`c  c 8 Press in the PopUp meSYSTEM System.PASf s helper ffnu for help on item selected.`c  c K Press in scroll area at bottom and move left or right to scroll menu. ,=~ /POPCMDPAPopCmdParse.PASr%%%= N f~ 4XJTcc```J``H`H`v HvHJ cc3 `c  c 2 Just type the RETURN key to exit the HELPER.`c   9 ] }C}c  c  ** ^Q for more **`   KJJJ00af`H`c ** `}>` a`Jd~c` c  c}c}kKHJ2J,b)HELPERPc~`c Couldn't find the entry for "`vJ c `c ",`c  c `** `c Missing fil\c}~c}vcc}`akkH'kkH'Dc ** "`c c}`c  " not found.`c  kke: `c c`c  \]} c] xJ߭}CvJ H'Hc ** "`c c}`c t" is not unique.`c  okkH'_kkH'2c ** No switches va>vJ .IndexJJJlid here.`c  #kkH' `}`kw}v 2}vc ~c]33 Jd3}d}CvJ .HelpJ43333' ( b)HELPERPc~Jdc3}c```` KJJJ00af`H`3^^c   $c  `3^^\c}~c}vcc}`akkH'kkH'Dc ** "`c c}`c  " not found.`c  kkc  3^^c ^'_3^^c 3^^c ^'^ c  #3^^c  c  FILEDEFS FileDefs.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot GETTIMESGetTimeSt73^^c  '3^^c  c  3^^c (3^^c c  ccKHamp.PASQP|6>* dPERQ_STRPerq_String.PAS#\J,c3 ] c  c #** Help file not found under name: `c c`c  c ** Press RETURN##\CAL X aSCREEN Screen.PAS!  /$ Sides 2 Density SINGLE Fast ! OS.MISCELLANEOUS - OPERATING SYSTEM SPECIAL FILES ! Created 29 Jan 82 12:26:50 Get DEFA}}]rG$DX 33} 3Jdr`4*}+}r*rIk,* *}+}+}3rk,/0k+126k6H6UL.PRO DEFAULT.PROFILE Get DELETE.CUR DELETE.CURSOR Get DIRTRE.CUR DIRTREE.CURSOR Get FIX13.KST-}/}3.}/}/}3}-}1}-}1}-}3}-}35k5 +}k6Jk57H }k6Jk50H}/ }1 ·k*k6H6} FIX13.KST Get SCAVEN.ANI SCAVENGER.ANIMATE Get SYSTEM.USE SYSTEM.USERS Get SYSTEM.CON k6J-k6H5q7k5k7)} }k5H5k657k5k7+}}k5J߭}k5J5]2 SYSTEM.65.CONFIG Get UTILPR.CUR UTILPROGRESS.CURSOR STREAM Stream.PASPAS,xexp> She.SCREENSIZE Set the size of the screen."FILEDEFS FileDefs.PASLONG PASLONG.PASllows use of default fileSHR *SCAVENGER Run the disk  PASASSS$BSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptGETTIMESGetTimeStamp.PASATISTICS +  | - Turn printing of statistics on or off. sys:exp>$ READD WRITED  PERQ_STRsys:part3>perq_string.PASNDM ZPYdf\ep  q*qIq$DX 33} 3Jdq`4}q}}ʷ}}ʷ} }} 33} 3J POPUP PopUp.PASyP Psys:user>brad>newos>d.6> POS D.65 b-boot CMDPARSE CmdParse.d3} B BY BYX}  }}}   }+'}}}-'}}PASQP|6>* dGETTIMESGetTimeStamp.PAS 0q *}0q/HD}09DAq6HDY}azDX }H}r}X 33} 3Jd3}}7 \u#\COMPILER}}r09DX }r0J }rH}}}}}k}}}}s5zk( 8zk( )zk(k(k( d}azDX }H}r}X 4z33} 3Jd3kks' }} STREAM STREAM.PASddndm ' c c c ** @`,c  `J`Jmn)X c mHmn)c \W%A  {  c})JH})c},c}+aNc},a k+},3},P,}},P` ]+*k*})<COM6WRITER WRITER.PAS%J@6Xnd}k* (/0}k*,9}k** k+K}k*H0J+k*H*̺k+}t'}T'N }f'}F'N]INITSHEL%sys:user>brad>newos>d.6>initshell.PAS. ~``c<`}}~~Vʷ` c} c~-}3\~V )c}ɺ)JPP׼ xOTHER  ? HELP PATH RUN RERUN PAUSE MOUNT DISMOUNT STATISTICSSWAP SCREENSIZE~ V  aJ~V9-l M'!l Ll+l ) ~V9l~V6))c}ɺ)JP׺aN~V7))c} CMDPARSE CmdParse.PAS*( PASCAL.RUN|6 K)!POPUP PopUp.PASNsyscom ~ POS D.65 b-bo   12:JIO_OTHER IO_Others.PAS%a% }y}}ʷc Number of Commands is `}c ``c  (table entries are `*c ``c  ndn  ,=~ / ||6 )IO_UNIT IO_Unit.PASad>newos>d.6>helper.PAS words)`c c c 8Command Implementation Add Set SSz Inx`c c }nk)STREAM STREAM.PASddndm φ}}nJ 帼} ` am'm},}m)c c}` c c c}m` c W%A  {  c}nJ*}ʷ}}}}m 'mJm)}m*c c}` c c c}m` c COM6WRITER WRITER.PAS%J@6Xnd})c `` c })c `` c })#c ``c  `})ic ``c GIVEHELPHEADER DOFF PRINT RESETERRHELPKEY RESETERRHELPKEY IO_UNIT IO_Unit.PASad>newos>d.6>helper.PASnHsc c *** Bad entry in #ShellCommands section of `c c`c c e** '`c c` SYSTEM System.PASllll~#\0/XEXCEPT Except.PA o, }o}~Hl, ~}}H~ll) ~l~llHlHS%e*#\%ADJUST CONCAT SUBSTR DELETE INSE~l}~]l,l, l},~~U}llH* }lJHlll)~RT POS POSC APPENDSTAPPENDCHUPPERCASCONVUPPESTRBADPAREVPOSC l}llHJlH~l}~]}o*\opH}rs)}oqH}rqHrH}oqHJ}}rHs, q}, }H}q tv+}trH}ttJr tv)}qtHJ}ttH}s]}READER READER.PASallows use of default fileSHR *SCAVENGER Run the disk  }}JP]}}pH`}pHo]nazDXn Jn]}op)$}oazDX}o }o JoH}kk)}kk'k\kH}kk+}kk'k\ kJ}}l JHll)I}llHJ}l'll) lHlJl'l lH̭.0uv[*,FH\L}}ʷ}}ʷ} }} 33} 3Jd3} B BY BYX}  }}}  ^}pH`}pHo]nazDXn Jn]}op)$}oazDX}oϳ}azDX}aJAH}qAZDX 33} 3Jd3}r* rH}rq}}}}o JoH}kk)}kk'k\kH}kk+}kk'k\ kJ}}lazDX}aJAH}qAZD09DYX Ϋ}r]}c}ɺ}  ψ} TRUE}FALSE}} *} }}JHll)I}llHJ}l'll) lHlJl'l lH̭}*}}}} 3 }0}}3 }33} 3Jd3}}ʷ}}ʷ} }}  .0uv[*,FH\ P}. N` a+k+(.}.}.`k+J` JP}.  Pc}.6N}.7N}.ASQP|6>* dSHELLDEF ShellDefs.PASB\8}.9k,k, ' }.:}):``<`})}):k,H,k,k-)ч   } >Default.Profile3)}Pe##\CAL X aPOPUP PopUp.PAS!  /$)c c c** Your profile file '`c c}`c ' cannot be found,`c c  (** or has no enX0a64?4e4?4>#\GETTIMESGetTimeStamp.PASZPY  try for '#ShellCommands'.`c c D(** Now trying to use '>Default.Profile'.`c >Default.ProfilePlvlvDYNAMIC Dynamic.PASrfilef s initshell/errorfile f ShellCommandsm |(|` 'c ``` ||` |``c`initshell/erMEMORY Memory.PAS%%%%errorfile ey﷛xOTHER ? HELP PATH RUN RERUN PAUSE MOUNT DISMOUNT STATISTICSSSYSTEM System.PASrad>newos>d.6>initshell.PASSTREAM Stream.WAP SCREENSIZEOTHER aJ L-Pl ShellCommands}JPASrrorfile nitshell/errorfile  POS D.65 b-bo   JIO_OTHER IO_Others.PAS>newos>d.6>i` }4,` }}Jɛ*)P)|``c}ɛ*K`}巛`nitshell.PASPERQ_STRPERQ_String.PAS}|`Pick a command:c}﷛㭁mk+ϖmJ }cmJ*}ʷ}} Pc}%%UTILPROGUtilProgress.PAS8%dndm ɺ)JP׺aN~V8))c}ɺ)JP׺a~V8,)~V8M(~V8~V8L~V8*~V8,)}6N})}7N})#}8N})i}9N}}:mJmk+j|` NNv~)c}ɺ)JP~,~V~P~V H~:巛~]c 2** No #ShellCommandN`  ]2  |{+|)*?s found at all, using defaults.`c ``c<`}), -k,k-)y})}.ʷ` }.xOTHER ? )*@z))1 ))Jɛ*)P)|``c}ɛ*K`}巛` HELP PATH RUN RERUN PAUSE MOUNT DISMOUNT STATISTICSSWAP SCREENSIZEk, KH` ` JCMDPARSE CmdParse.PASP .6>sPsys:user>brad>newos>d.6> POS D.65 b-boot PROFILE Profile.P }t}  }  tsHr ty)} }tHp} B BY BYX}   } }}   9} REALFUNCREALFUNCTIONS.PASuse of default fileSHR *SCAVENGER Run the disk (&tq*tH}t}} }}tq$DX 33} 3Jdq`4}}ʷ}}ʷ} }} 33} 3Jd3q,} }}qJ}}} }]}}ʷ}} ʷ}  } 33} 3Jd3} B BY BYX}  }}}  Ϲ }+'}}!}}  33} 3Jd3r+Ϣrq,qrts*}  }  "tH}tJ}} }tsq*s-'}}q *}0q0HD}09DAq JAHDY}azDX}aJAH}r}X 33}Hq ty)}tJ tH}  }  !sHr ty)} }tH͐} B BY BYX}   } }}  3Jd3}}r09DX r0JrAJ HkqK{HkIk|qK{Hs.z|, 0z|, %z  Y} ((tHtq)}tJ}} }tsq*sHq ty)}tJ tH]s)33} 3Jd|,|'k, d}azDX}aJAH}r}X Gz33} 3Jd3}|kH3}c} ɺ}  dIIskk)Ϧ}}k}kk)&}kazDX}k}kaJAHkH} }3s' }}I8^` 12k+sHk8k*1} }*}} } }3k+sHkkHRks,)33} 3Jd}  6q *}0q0HD}09DAq JAHDY}azDX}aJAH}r}X 33}8xk+ }kgks,)33} 3Jd} 87k+ }k&33} 3Jd} 8 3Jd3}}r09DX r0JrAJ HkqK{HkIk|qK{Hs.z|, 0z|, %z]}} ʷ} } ʷ}  }}  33} 3Jd3}  B BY BYX}   } }}   STREAM Stream.PASg.PASs use of default fileSHR.SCREENSIZE Set the size of the screen.isk FILEDEFS FileDefs.} +B-BYX} -'} }u} 09DX 33} 3Jd3} 0J} }PASSows use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk GETTIMESGetTimeStamp.PASATISTICS + ts ,s 'rq,s KrH} 09DX t 33} 3Jd3u }sI}s]}}ʷ}} ʷ}  | - Turn printing of statistics on or off.VENGER Run the disk READBOOLREADCH READCHARREADIDENREADINTEREADSTRIREADX }}  33} 3Jd3}qr+τrq,qrts*}  }   tH}t}} } READID  COMorfile l/eorWRITER WRITER.PAS%>newos>d.6>login.PASSPASndhey replace the` c cD default imports. The output file for the linker is the name of` c cM7 STREAM STREAM.PASPASON:uerr initshell/errorfile POS D.65 b-boot 22 Jan 82 14:54:21DYNAMIC DYNAMthe Run file. The syntax for the command line is:` c cF Link prog, imp1, imp2, ... ~ RunfileName/switch1/IC.PASerfcAS>\e#\INITCMDSDUMPCMDSPROCESSCBADENTRYswitch2=arg` c cE0 Where the runFileName defaults to prog.Run.` c c c Ordinary usage is:BADENTRYGETSTRININTVAL GETBOOL PNOTFOUNPNOTFOUNell/errorfileH  "z"initshell ` c c Link prog` c c c Switches are: ` c  mn)5c ` COMorfile l/eorWRITER WRITER.PAS%>newos>d.6>login.PASSPASndmJ)cc` c mHc \͚cFile ` ccC` ct not found` c ͧcError rLINK sys:user>brad>newos>d.6>link.PASd eading ` ccC` c ucMultiple program segments` c Fc`No program segment encountered` c  cc` cc` c cc` ccw` c cNumber too big` c ͣcc+ ` cc` c ~cgNegative numbers are illegal` c Kc Bad switch: ` cc` c c Error in Code File: Source file=` cc` c in ` c.SEG` c file ` ccC` c c cF The Link program is used to create programs that can be executed,` c cRD called "Run File͗c%Maximum stack less than initial stack` c \YVc +Error in import section: Import file name=` cs". A Run file contains pointers to a group of` c cE compiled files called "Seg Files". The inputs to the lic` c in ` c.SEG` c file ` ccC` c cSegment ` cc`` c frnker are` c cB the set of Seg files to use. The first file must be the main` c cEF program. om file ` cc` c not found.` c Zc File name "` cc` c " too long.` cW%A ell/errorfileH  "z"initshellThe files imported by that program will be added to the` c cD Run file. If other input files are specified, t ɺ}B}}} }}}?I` }?}N}w~}kks'NN}} }}?}}} }}}N}wN}IN} }N}1N}?;}}}}}}k}}}}}}^} }}} ;S} >}}}} }}:"} ? I` }} t} } } }.6[} O"} <=} *} }} } }L=\} ?}?} }} }}kH`ʷoJ}?}u?}%}j?}`?̷}W?Dͷ}}s}' }N }N}}} }}}N`#ʷ}}}N`#ʷ]}}}?N?$ͬ}E?*g͡}=?͖}5?͋}-??X̀}%?u}?2j}?7_}?÷T} ?ŸI}?ê>}?3N`#ʷ]}E}}\$}"?}k}N}wN}IN}}}}}*d4=FOXajs|}}]oJa}10${}ힱ`p}1 e}OZ}O}2B#} }}}}}9"} ? I` } } } ?B}} } } Ľ3}} } } ?} }} } } `ʷ}}}}=[}}}}>}}>}}k'Ak&I`ʷ}}ɺ"ʷ}}}}}I`} }k6}N}w~N}5N}}}kH}}kL`ʷ} .}} }}}}} } ɺ"ʷ}} } } } }}} } ɺ"ʷ}}} } } }ɺ"ʷA} } %}}} } }\}}}ɺa}}`ʷ}N}w~N}5N}}+} }??k%,}}}\k%0*}}}\}k%H%}}?I`k%*$}}??'kJ} }?}} ??}} }}}}} =~}}:?}}}}}}}$k%Lk$H#k#Kk%J"}@}u>}1?r}}k"H` ʷ}}}}}}k#`ʷ} 2q}}}} k}N}w~N}1N}} ^}} }}N}w}N}]N[}}}qɺ}}qɺʷ}}qɺʷ}GP0}} } }}\#}>  |H|m'c WARNING - ` m'+cK 3d{cg \poMoL}}ʷ}o`HL)}P帺 aHLͷw}dzͣ)}P帺 aHL͂)}P帺 aHL` } blocks (` q(4}}ʷ}q`` p(}__  } pQ]}}ʷ}1/4` C}}ʷ}aZS)}P帺 a ;` `2``(``d :mU}}͢]t ` ` cm File System.` cc!` cc.Run not found.` c c File System.` cc!` cE1/2` )}}ʷ}3/4` d }}ʷ}`K words)` } } a}  yb} } ʷ}} 9.Run is ill-formatted.` c scMultiple occurances of module ` ccv`` c /cSwitch ` c }}  ?}a 9}R3} [  }}  } } ̓yE}``c`_}}}}c` cD is not unique` c c IMPOSSIBLE!! ` cc` c ͸cMissing switch after /}巛_}}ɺ}}}4P}}a+k+}}JH(k+'}}}d,` c ͋cBad decimal value ` cc` c UcBad octal value ` cc` c !ccC}``}4V}}a+k+(k+}}JH'}}}JH`}`]``` c - Incompatable QCode Version` c c** Recompile ` ccC` c ͫc Aborting; \   }46k4k6+φ}k4>'r}}`k4`Jdcc}c}3c}3a5}k5' `` cɊ|`` c error` |( sc cI found` c EcNo room on Search List for ` c`3}dc\ k4J4rȜC}dk:cC).PASP帺cC).RUNP帺3Cd cC).SEc` c . Not pushed.` c c Directory ` cc` c not found.` c ͦcSysteGP帺}``c`}``3`] ]}﷛a a} _}}}ʷccCc}c}a}k'm.` cc!` c.Run was not linked as version ` cɉ `` !c c 9cSystem.` cc!` =``}}*NotFnd*R}}kdcPCd}C`C.SEGJ`Jc).Run has an incompatible run file format.` c cc` c Ϳc'There is only one output file fdP}_}]}}c3``}#' 0- 0-}k--' ``.+}}.' }J*or LINK.` c ͂cIllegal character after LINK.` c Nd"H^-Psa\3}*k-,k*1k,k1)s}k,0J/k/*k/k0+k0 ' ````9k0 'k+ ,k+ 'k/,k0'k++ `` k+k0Kk/Hbg"f./E]}+Can not create P}Error writing Pn ('m'c* ` ca** ` m'+k,H,̅k+k.K+k+]} U} }}R3``}c ` ao)}P帺 a `%ʷ]}}}?}?}}N}w}N} N0}}x}N}w~N};A1 A2 REDUCE SINCOS TANCOTANARCSINARARCTANARNg}N}wN}]N׳}}}??}}}kH}? I` }}L} }}} P} } }} ?}} }}}}}k,}}k3@}? }0}?} RUNREAD RUNREAD.PASllows use of default fileSHR *SCAVENGER Run the disk  }? }d }}]} }}ɺ& }}ɺ&ʷ]} 3} }}}\  }?I}ɺa}ɺaJu~+ }?"u{I* }}}}ɺ&ʷ} }I@}} }} }}] i?j"7    @ W X o jxz(PR 0op)VoM'*}oNJINN}oNJNoHop)ЪM(]}}} }}}}(\}}ʷ}}}}}(N}}}}}}}?k} } s Ns}} }  }} } ]}}}N`$ʷ}}}N`$ʷ}}}?9:YZuqJ})q' } }}\%} ?}?I`ʷ}} ɺ`N+q}@:<8  > p h&? I` Nk } }}kP} e } o?j} }} } @P}} }} }}}} }  @ W X o jxz(PR }N}w~N}IN}N}wN}IN}}q'2k'} }} }} } }SQRT EXP LN LOG10 POWER POWERI SIN COS TAN COTAN ARCSIN ARCCOS ARCTAN ARCTAN2 SQRTNEG EXPLARGE Z} -k'} }} }} }} }"k' } } } }} }}} ]}}`%ʷ]}}EXPSMALLLOGSMALLPOWERZERPOWERNEGPOWERBIGPOWERSMASINLARGECOSLARGETANLARGEARCSINLAARCCOSLAARCTAN2ZADX INTXP SETXP POWERBAD  ==> ` cc` c ]` }R3\C}.SEGJdccg } cg%`  cg `` cg GDB offset = ` } cg `` cg  Segment = ` } cg `` cCc}1c}1aJ} HJ'&``}} *NotFnd*R\}C`C.SEGJ`g }} }}͐|,Tcg cg**** ` cgɊ|`` cg errors detected ****` cg cg cgJdP}J` }m``c4`J`}m}}m1}mc4`J``e}}oʷ3cReading Seg file: cgSpecified Stack Size ` cgɊ`cg cgInitial Stack Size ` cgɊHLH`cg cgGlo` ccC` c e(&``}}*NotFnd*R\e[ [}``}oeRebals ` cgɊ`` cg words` cg cgIStack Size Increment ` cgɊ`cg cgInitiald}2a}2] /}2}oR9}2}*UNUSED*R}2}2}2a}2} 2` }2}oR9v}o``}2} Heap Size ` cgɊ`cg cgHeap Size Increment ` cgɊ`cg cgTotal virtual memory ` c}ɺ} `!`}`R3}}c}R3}}c}R38}).PASP帺2}o巛e8e9}o oJK}o pK}o }o H}o e:}o }o }o H}o H}o H}).SEGP帺}dȜ3d帜 c cc} a v='`"`帼}c}c}co54J`k5`e1pqk1kq)ς` 07Jrk0kr);}6k0ߛek4k4H4k4'k5H54J`k5`ek0H0̽}:d}c a}}}u`a ώcFile to Link: ` c c``c LLINK  ``c `}``3`}}rʷc(/c Imports ` cc` c +co Imports MainProgramJ}c}c}cc a[3``Pn)͝n.'zm'o)` c (L.PASa.PASJH'y.PASJ}r}6@}rdP}rnH`nJ`JP a c Using default version of ` cɉ `` c n0+n9)nJ }o}r}o}k1H1v]}a} g}}ʷ` }] } HLHq'%cg cg Segm'Nc).RUNP帺c`}` d}}} }` }}؊z{wment:` }cg`` cg File:` }cg` cg cgd GDB Size:` }cg `` cg words 33w`.RUNJ`Jdcw).MAPP帺{cgɛwc```` cg#Link V4.3. Typ Code Size:` cg} HL`cg Segment = ` }cg `` cg }}﷊{} cgImportse Link/Help for Help` cg cg cgc` cg |'\T|, ``Bc ` cc` c: ` cg } }}ʷ}} ʷ} cg`` }  Rcg from` } )} cg` c ɺ}k'D}}ʷ}}}}}}}}}} }}} }} Run the disk DYNAMIC DYNAMIC.PASASows use of default fileSHR *SCAVENGER Run the disk} }}} }}} }}}}k'Ϯ}'ϣ}xρ}``c `}  READRUNFREADSEGNREADSNARREADSTRIon or off.VENGER Run the disk DYNAMIC Dynamic.PAS Turn swapping on or off. Part } } } }}}}}ʷ}ɺ}}}}}}}} c}ɺ}}R is the partition for swapping.R +TYPE File MEMORY Memory.PAS file File.of default fileSHR ]``c}oHL`}}}dcops)TpM')}INN`}RUNWRITE RUNWRITE.PASlows use of default fileSHR *SCAVENGER Run the disk  N`pHps)ЬoM(}}}} }ɺ}}] v.X t-}} }}}}k'Ϯ}'ϣ}xρ}``c `}   } } } }}}}}ʷ}ɺ}}}}}}}} c}ɺ}}R]``c}oHL`}}}dcops)TpM')}INN`}}oM'(}oN}ooHo},δ}M(CODE Code.PASPAS.PASs use of default fileSHR.SCREENSIZE Set the size of the screen.isk GETTIMESGetTimeStqM'+}qNJN}qNJqHq,γM(}}}p}}amp.PAS use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk PERQ_STRPerq_String.PASTATISTICS + q}}r}}s}}t}}u}}v}}w}}x}}y}| - Turn printing of statistics on or off.VENGER Run the disk DYNAMIC Dynamic.PAS Turn swapping on or off. Part}} N} o}}ʷ}} N}k}}k'C}}ʷ}}}}}}}}}}}}}}}}}}} }}} }}} is the partition for swapping.R +TYPE File MEMORY Memory.PAS file File.of default fileSHR (}N}k'k'o``} c`} }} } } k'} }} } } } }ʷ}*SCAPsys:part3>Segs> STREAM STREAM.PASSllows use of default fileSHR *SCAVENGER  umber. Arg is version number.P帜 J)8SYSTEM Specify that this is to be a system run file.P帜C d""q%r%Y&NZ&' referenced` c  ^N|'5 ~[ [ cd|I~II``ec`a]_[ {z`  SK˼ } aɛ] cK { {*ccw` c written.` c |,``]')YSTEM.RUN3Ϭ `cSYSTEM.Jdc.RUN{Lcg cg WSYSTEM System.PAS| {P Psys:user>brad>newos>d.6> POS D.65 b-boot FILEUTIL FileUtilsriting new system run file ` cgc` cg cg cKɛc```` ` ȉ `c!}SYSTEM..PASQP|4+ dFILESYSTFileSystem.PAS .+!JPc}.RUN` 3}dc}Mc}MaLkL'C}d``` c}}c````I##\CAL X aFILEDEFS FileDefs.PAS! /$ ` c}`c}A}c}c}c`` c} } kA( ````kB (``}a巛a}kKkEHX0aRV% H<F<E=GETTIMESGetTimeStamp.PASHSHR#\ZPzY<HLK]c!```` c````    ]﷜   ɺ  [ `` ]lvlvPERQ_STRPerq_String.PASCz5 link 4 P  ϛ ɜ^ʷc^﷛c ncɜ`ʷ```巜` ```ɜbʷbASCAL link 6,z6MEMORY Memory.PAS%%%%link\N  j  8gɊ`cg cg ])#Link V4.3. Type Link/Help for HelpPJ)HELP Print this message.P帜J)bHc` ̉ ^[ ]﷜  Ϩ ɜ^ʷ^' [ yc* WARNING - Segment ` ^c=STACKSIZE Set the preliminary stack size. Arg is in blocks.P帜J)BSTACKINCR Set the preliminary stack increment.`` c from ` ^c` c is not referenced` c  ^N|'5 ~[ [ c Arg is in blocks.P帜J)`c . c c } Called from q'r '`]c  ^c`c  \Bi'ρnoqr)tc  [`c q``c s] (`mqHc ``SCROUNGE SCROUNGE.PASlows use of default fileSHR *SCAVENGER Run the disk J c c^) = `;mqHc ``C`c qH̆{BB'noqr)c  [`c q``c r] (`mqH c ``c k^) = `;mqH'c TRUE`c l;mqH'c FALSE`c Ac UNDEF  (`;mqHc ``C`) c c qH{Bc'nKoKHqr)ϣp'Zc c  [`qLc ``c s] (`mqLHc ``c ^) = `' c =mKqH c c ' `pHMqHWc  'ndzn  ,=~ / ||4 *UTILPROGUtilProgress.PASlink FOOSTc}) l B BYX l6c** Use: "Help name" or "Help"`c})'3>HelpDir>Shell.Indexdc~cIC6,zV%p $%.+STREAM STREAM.PAS#\ddndzmg ~ a(%3>HelpDir>Shell.Indexdzc7 This is the Three Rivers Computer Corporation PERQ.`ccW%ApWRITER WRITER.PASu   link linkCOMA Commands are either a System command name or a Run File name.`cc9 Type "?" for a list of valid system cz5DYNAMIC DYNAMIC.PASdommands or press`cc5 down with the pen or puck for a menu of commands.`cc: When the menu is READER READER.PASlin linklinLINK DOHELPdisplayed, press in the gauge area at`cc6 the bottom and move left or right while pressed to`cc ERROR ERR1 PRINTSIZGETSEGMEFINDSEG ADDREQEXREMEXT CHECKFORSRCHWARNSRCHERR PROCESSSS2I HANDLESWHANDLELIPROCESSCDOMAPS scroll the menu.`cc0 Type "" to run a program.`cc0 Type "Help " for help on .`c}}).HELPJP}R >HelpDir>z5DYNAMIC DYNAMIC.PASd}Jd3}Rdc~c~ al'&}R}d3}Rdc~c~ al'϶SHELL !sys:user>brad>newos>d.6>shell.PASse.PASS HaveHelp } J}4mc}c}c~aNc} }})3)})"A/HELP N"\} J̈l'Jc** No help on `cc})`c available.`c$"}R TypeFileN"]c3** Profile file not found. Commands available are:`c\] RUNREAD RunRead.PASad>newos>d.6>link.PASRUNWRITE RunWrite.PASlink Lz~ POS D.65 b-bo  13:JCMDPARSE CmdParse.PAS%a%T&] c"c})c~aNlOc}) HELP})a'})$PN N  d=display stack,`c c s*c=current, t=Top of stack, b=Bot of stack,`c c :s=stack, q=quit, p=proceekc  Program `c  Module `c c}``c  kVc Skip input and output? [Y]`cd, e=exception Args, ^=de-Ref ptr`c c Ⱥ  ]c c d Scrounge, `c eV0.14` c}&c+``c+}&n4 K kvJc  There are `k+c k``#c  an UNKNOWN number of `c c c  t` CiB c DEBUG>`c} c+``c+} 3 } c } - u;rH'7c  2 words. Offset (-1 for all, -2 for range) [Exit]: `+^^c φc} c+c+wI'  kJ SwI'Ff ** Currently at top of stack`c q;rH ;rH;rH;rHkkkz;zH;zHc First and last to print: `c} c+c} c+c+w w kvH`y`x`c+c  There are `c =mKqHc ``C`pHMqHtc Bs'c p [`c n``c P] (`mnHc ``c ^) ;zH;zH zu't` . k'k '8c  ** Currently at base of stack.`c t` c S = `=mnHKc  (`c p``c ) '`pqr)!=mnHKqH c qH' c c Type segment, offset, and then num values to print for ptr to dereference: [Exit] `+^^c Mc} c+c} c+6c ** Impossible mode `B c c .`` .`` \] H\. c H`c}}c} c+c+;v=vy``xyJJ`;I=Ic+ c  There are `c k``c 6 arg woSYSTEM.}Jdc}.RUN. c c}}c````. c c}ɉA`crds. Offset (-1 for all, -2 for range) [Exit]: `+^^c ϝc} c+c+wI'kkJkH``kJ`lwI'Vc}FɛDc}cɛFc` . c c}ɉA`} .`` .`` .`` .`` ]m;mH;mH first and last to print: `c} c+c} c+c+kkJkH`y`x`kkJkH`w`w`c+ k(k (t;mH;mH$;mH"$㭷"""c  Now at ro` c s 5c Uncaught Exception: `n`o````c r`u`s`c r c  There are `qpJutine ``````c c  There are `c ``c  local words, `c ``c  arc ``c ; exeption words. Offset (-1 for all, -2 for range) [Exit]: `+^^c ψc} c+c+wI'gument words, and `Jc ``c  result words.`c ț;H;H;H;Hp``qpJJ`]wI'Nc first and last to print: `c} c+c} c+c+p`y`x`p`w`w`c+[ k]c c 7x=radix, >=uplevel, <=down level, l=local, a=arguments,`c c .r=returns, g=globals, m=mode,C}'}}'k}k`ʷ} } k 'I4k)k)``??:?}?  secs.`c} }B}}}}} }} } }}} }}} }}m k` k` }c}c}c }"N}}c}c}cc}aNk)} }d ShellCommands cThe Commands available are:`c} J}4ύl} cDuty `}c` `.c}c` `c percent.`cc]c} N}NJl),c}c}c~aNlHll)}'4*c}}J`lHcc}`c} J)}P}NJ)}P}c}`a }N }NN d ]N} X} }gl')P )cc/To see programs you may run, type 'dir >*.run'.`c}"}},9HELP`}`J}3N}}̟]}"}}c}c}cc}aNc}c}cc}aNmkg}CR3Y" "J} }R3} }R3} kgcEnable statistics? `c}c``c}Jnk}R4 }P}c}c}c ]# P##,#"N##NU#}c}c}cc}aNak*} } } R4Nk8}c})YESP)NO## JP##`#`JP#P帺aNk } }ɺa }** P} Pcc}`c5Statistics takes "Yes" or "No" as the o# POS JP##DJP##nly parameter.`ccc}`c(It turns statistics gathering on or off.`c kN}c}c .JP##JP## JPc}c ]mMountcDismount}"}}c}c}cc}aN} }R3#N`## -boot JPc}}L4?L}P)#} }R3} kzc Device to `cc`cc: `c}c``c}}LJP }}}}}} }}} }c` `.c}c` `]cc}c}cc}aNMk)} } }R4NkB}c})FLOPPYP) HARcLoad `ɺ c secs.`c}}}cExec `}ɺ c  secs.`ccDDISKP帺aNk } }ɺa }** P} Pcc}`cc`c4 takes "Floppy" or "HIO `ɺ c secs.`ccSwap `ɺ c  secs.`ccMove `ɺ carddisk" as the only parameter.`ccc}`cIt `cc`cs the specified device.`c 7c  ~~~ Returning to program ~~~`c \ ͚c  quit Confirm [Y] : `c}&c+``c+}&y3}c New error is: `wvIc}c}c}c}c}c} ` c cA```A``?c`@c Wai&3\ Ac  There are `kkJc ``c 9 result words. Offset (-1 for all, -2 for range) [Exit]: ting for IO...`c done`c mq' n}Io}c `c Segment fault, segments``+^^c ώc} c+c+wI'k``kkJJ``wI'Pc first and last to print: `c} c+c|k)( c ;o|Hc ``|H͒c Division by zero`rc Overflow in multiplication`Hc } c+c+k`y`x` k`w`w`c+#c & Stack Offset (-2 for range) [Exit]: `+^^c c} cString index out of range`c !String to be assigned is too long`c Expression out of range`c+c+wI']wI'Nc first and last to print: `c} c+c} c+c+`y`x``w`w`c+ ,Parameter in STLATE instruction is too large`͈c  Execution of an undefined Q-code`Xc #Undefined devQ t` Fc  Old radix = `c ɉC``c  new? `cCc+c+c $** Illegal command. Typeice interrupt detected`%c J!Segment fault detected during I/O`c  Memory parity error`c $Exp ? for help`c ͺd xLb|zxvtrpnljhfdbression stack not empty at INCDDS`͚c /Overflow in conversion Long Integer ==> Integer`[c Uncaught Exceptk``c 8 local words. Offset (-1 for all, -2 for range) [Exit]: `+^^c ϓc} c+c+wI'kk`^\ZXVTRPNLJHFDBW><&I`c0,*(&(C v]m'n'n'm`n`o`p` ́}mH``kJ`ewI'Rc first and last to print: `c} c+c} c+c+kkH`y`x` kkH`w`w`c+ (n(jc +Scrounge aborted during Cleanup; Exception `c n``c  in `c m``c c  Mode = `B c c  new mode [CR for exit] : `c}&c+``c+}&3 }& }&?A( A`Am  ` }mm'n'm 'n'm'n'n'm`n`o`p` ͬm 'n' 3[c C Mode choices are: i=integer, s=string, c=char, B=Boolean, b=byte`c ͇}&iBsBYcBYbBYBBYX }&͗kc c Scrounge aborted; Exception `c n``c  in `c m``c `&m n Bc}& 3Sc  ** Bad mode `c c}&`c . Type "m ?" for help`c ks ϐc & Proceopm'n'] ` DFAcI;I=I  }mq'n'tHut\}jtϫw 'ved; Not a dump!! Confirm [N] : `c}&c+``c+}&y37c  ~~~ Returning to program ~~~`c \ 'v'v'  c ^C`c 'tc c *Scrounge aborted. Original exception was: `m`n````c  `Nͬl) Nx l+NlrNw}NwsNviNv_NUN`}N`Py  y﷛ N|uwNvxNwNx ``c`` c&c%c%c%5N`}N`d}}]}"N}}c}c}cc}ac%cz cLzD` )#LJP cC`````)#Nk)} } }R4Nk a k }** P} Pcc}`c`( CommandLJP       8ccc `c line is: ScreenSize nn /switch`ccc}`c3 where nn is 1..8 or a multiple of 128 up to 1024.`ccN !N`a(-  `J`Jc  c( @'B }R4Nkw}RR3ik \\cNew default path: [`cc `c] `c}c`c}`c Valid switches are:`ccc}`cN; ON OFF: The bottom portion will (not) be visi`cNk&k } }ɺa }** P} Pcc}`cRHPath takes a directory nameble.`ccc}`c9 BLACK WHITE: Specifies the color of the bottom part.`ccc}`c  as the only parameter. The final ">" may be`ccc}`c* omitted. Path changes the current path.`c HELP.`cN͎N}R3nc"Screen Size for next program: [8] `c}c``c}`}}dc} }}>(c}>N`3}dc}c} al(Ϗ} d }d3dc}c}3}8N }}}c}c}c k kk})n}k0Jk*k ,Gc** ' al' }dc * WARNING! `cc`c cannot be found using path `cc}`c!!`}kcc' is not a digit.`c\ kKkHkḦk)k) kKuWk*k,7c** Ba`cb N`)0* Are you sure you want to change to this path? P`}cak*&k'm }dd number to ScreenSize.`c\k@LHLKux NxwNvxNwcNext program will run with c New path = `cc `c)#LJP  N`}N``cɊu``c# screen lines. The bottom will be `w con`coff`c and `v}c}c}c ]NN}NJ)ONP}NJ)}OFFP}NJ)BLACKP}NJ)WHITEcblack.`ccwhite.`c] Nr  c^C`cNy ȼ3>HoldP}NJ)HELPP}} }}c}`al*}`R4%N`}N_Time.TimeStampd a{{`` ` {`` ]c````c````  N!"7809/QPR 33:N#B  4" 4COM Scro Copy file Src to file Dest.AY ,BEGIN CASE CONST GDT     7 8 @ |{ELETE DelWRITER WRITER.PASlete /Help" for more details.EXPORTS 1FILE FDETAILS ParScrounge.Pas/noqueryytailaUncaught Exception: `m`n```t`c t ϗr`I`u`c sςc+CONSOLE:````c+ c  Debug? [Ns. STREAM STREAM.PASmore in/noquery.Pas IMPOLDIRECTORY Give a directory of files. "Direct /HeREADER READECODE Code.PASs.PASows use of default fileSHR.SCREENSIZE Set the size of the screen.isk GETTIMESGetTimeStR.PASOR (;DISMOUNT Device Dismount the device specified by Device.RAISE ;RECORDYNAMIC DYNAMIC.PASery.PasAamp.PAS use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk MEMORY Memory.PASg.P9STATISTICS +  Fil COM Scrounge.Pas/noquery"\SCROUNGEGETSYSSEPRINTROUWRITELOCSHOWALL PRINTVBLCT| - Turn printing of statistics on or off.VENGER Run the disk FILESYSTFileSystem.PASws use of default fileSHLC GETSYSRURESETERRDODEBUG SETALL SHOWCURRINITCALLDOHELP HELPKEY DOCLEANUALL ALL AILS ParScrounge.Pas/noqueryytailR *SCAVENGER Run the disk SYSTEM System.PASASlows use of default fileSHR PERQ_STRsys:exp>perq_string.PAS *SCAVENGER Run the disk PERQ_STRPERQ_String.PAS-boot Pascal.RunR *SCAVENGER   Run the disk IO_UNIT IO_Unit.PASASows use of default fileSHR *SCAVENGER Run the disk  IO_OTHER IO_Others.PAS0:39:58 of default fileSHR *SCAVENGER 05 Jan 82 10:39:RUNREAD RunReadion: `m`n```t`(dr.#I5hfm 'n'n'n'"c `Control-C Abort`0c .PASSlows use of default fileSHR *SCAVENGER Run the disk SCREEN Screen.PAS`j`,aUncaught Exception: `m`n```t`c t ϗr`I`u`c sςc+CONSOLE:````c+ c  Debug? [N`j`i"\ POS D.5 p-boot PaSTREAM Stream.PASASlows use of default fileSo] `c}c+``c+}Iy3}Y3m`n`o`p`r`u` ac+u t`]X"MHR *SCAVENGER Run the disk EXCEPT Except.PAS","\  "ͻͶccc"`ccType to continue.`ckQ)N`Q)N`c"H6F8qrP`P9QQ+ccaN'",c"ɛ"J`32c** No file to run specified.`cTGc$** Need a fCMDPARSE CmdParse.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot CLOCK Clock.PASile name, not a switch: /`cc`cN"͈3;c%** No previous file specified to run.`cQP|6>* dGETTIMESGetTimeStamp.PASS#.N"+Q)N`Q)N`QP帼cccaN'4 NcH#\PASCALH#\PERQ_STRPerq_String.PAS!  /$c"`c RUN3c"ccaN'",c"ɛ"J`32c** No file to run specifiedX0a|6&%l J@SYSTEM System.PASDDDZPY .`c͡Gc$** Need a file name, not a switch: /`cc`cT*'@cɛJ`lvlvINITSHEL InitShell.PASf s shell ffJN"q@( Ny]"J shell /ell POPCMDPAPopCmdParse.PAS%%%shell= N  4X  c a cc`cNyPNyc c/ ~c(c  c a cc`cd %&V#+36GQ)#(x %Q)#KuwNvxNwc(" NyN""Z  yϸNJ߭b )Pc"cɛ ɛ ɛ N͠  "JJ J``a{NJ߭,;c(* WARNING - Tablet seems to be unplugged`c"4c"ɛ"J`#Ny`J .RUN49.RUNJP PNc#P`P9QQ+ a{{ ,{ JN"N`N`c0** Type ? for the current list of knohPJ,::,#PJJN#N# NJQ+И)#P uswn commands`c͓͐|Pc| |HELPa'N`N`0 vNtwNu  N(d  b   )) N`N`d stP {J*ɜQʷQ)iN` N`  e))fBDM )N       o, }o}~Hl, ~}}H~ll) ~l~llHlHSQP|6>* dADJUST CONCAT SUBSTR DELETE INSE~l}~]l,l, l},~~U}llH* }lJHlll)~RT POS POSC APPENDSTAPPENDCHUPPERCASCONVUPPESTRBADPAREVPOSC l}llHJlH~l}~]}o*\opH}rs)}oqH}rqHrH}oqHJ}}rHs, q}, }H}q tv+}trH}ttJr tv)}qtHJ}ttH}s]}ETHERINT#sys:os>io>source>etherinterrupt.PAS copied to disk? J) }}JP]}}pH`}pHo]nazDXn Jn]}op)$}oazDX}o }o JoH}kk)}kk'k\kH}kk+}kk'k\ kJ}}l JHll)I}llHJ}l'll) lHlJl'l lH̭.0uv[*,FH\X}NJ﷋J]HNJ}]N! ! !ɺ!(J(% ;% +N}%^}pH`}pHo]nazDXn Jn]}op)$}oazDX}o}%﷛%%}ɺ'J'jo }*,}o JoH}kk)}kk'k\kH}kk+}kk'k\ kJ}}lJHll)I}llHJ}l'll) lHlJl'l lH̭.0uv[*,FH\ETHER10I Ether10IO.PASP Psys:os>io>source> POS D.65 a-boot SYSTEM System.PASYSTEM System.PASP SPsys:exp> POS D.65 a-boot EXCEPT Except.PASsource>etherinterrupt.PAS copied to disk? POPDCB PUSHDCB E10SRV  ?LERYfDopcmdparse IO_OTHER IO_Others.PAS>newos>d.6>shell.PASse.PASSHELL CHECKHELCHECKTWOHELP PNOTFOUNLISTCMDSPNOTFOUNFIXDEFAUCREATETIUPDATETITIMEPROFILE Profile.PASad>newos>d.6>shell.PASse.PAS PRINTTIMDOSTATISDOMNTDISDOPATH DOSCREENDOSWITCHCTLCABORWRITETIMNOTAFILEPASLONG PASLONG.PASFILEACCEFileAccess.PASJ@6XndARITH Arith.PASshe shellH#||#\|{ |DISKIO DiskIO.PASomfcd0#.H#\ALLOCDIS AllocDisk.PAS>newos>d.6>shell.PASse.PASREADDISK ReadDisk.PAS##\2(%X%>4>#'dSTREAM Stream.PASrad>newos>d.6>shell.PASse.PASHELPER Helper.PAS% o#..H#\\DOSWAP DoSwap.PAS #'ddWRITER WRITER.PASSTREAM STR POPUP PopUp.PASe*( PASCAL.RUN|6 K)!SCREEN Screen.EAM.PASPASLONG PASLONG.PASPAS com shell ~'dF<  JFILEUTIL FileUtils.PAS>newos>d.6>sREADER READER.PAShell.PASse.PASFILESYSTFileSystem.PASfXDYNAMIC DYNAMIC.PAS kCircular Buffer FullP͡}!Logical Header SerialNum MismatchPr},Logical Header Logical Block Number Mismatchp 0z     @P9}Cylinder Out of RangeP}Device not readyP}Missing data address markP}Missing header address markPͪ}Floppy write-protectedP͇}Cylinder mis-matchPg}Sector not foundPI}Ove rrunP4}Undetermined equipment faultP }Sector out of rangeP}Time out errorP}Floppy recalibrate donePͪ}Disk recalibrate doneP͈}Can't find track zeroPf}*Unknown Error!!*PHdSIOERRMESsys:exp>ioerrmessages.PASi mP-Z1]-eDiK]*a address markP}Missing heade r address markPͪ}Floppy write-protectedP͇}Cylinder mis-matchPg}Sector not foundPI}Ove rrunP4}Undetermined equipment faultP }Sector out of rangeP}Time out errorP}Floppy reIOERRSTRESsys:exp>ioerrmessages.PASi dk)o}IO Complete OKP͛}NIO BusyP͆}Bad Unit NumberPj}.Raw Block IO to this device is not im plementedP/}} Write FailureP}BlockSize ErrorP}Illegal Command for this deviceP}Nil Hea der PointerPͭ}C Address ErrorP͒}Physical Header CRC ErrorPl}Logical Header CRC ErrorPG}Data CRC ErrorP+}Device Not IdleP}Undefined Error!P}C Device is not a character deviceP}x`p33??/       MEMORY Memory.PASP Psys:exp> POS D.65 a-boot CODE Code.PASeEXCEPT sys:exp>except.PAS.PAS  xcept.PAS.PASGETTIMESGetTimeStamp.PAS#\ #\>pascal X aVIRTUAL Virtual.PAS!  /$ X0a 2( 2 IO_UNIT IO_Unit.PAS an ^T ]5levl wDISKIO DiskIO.PASf s>PASCALt ff$}g`'ϣ'?} ` K HH`Pg}Y'8 ` Hexcept /l exARITH Arith.PASX%= tj 00$C=x p 0p` H` H` ````` ` ````` ` ]c} q } yHoJy } xH㭇p88(>`0p`@@@ 8?} xH㭆} xH x'} xHu'} uH*m(n(n(} uHn'} uHm'|'op ?'???>:} uH㭈y } wH wx(} wHt(} wHs(} vHx(v } wH wx(} uH*|' } uH|()|(|BBYX-|' m`n`o`p`op(} o`oHxtrs E))))8D @x< 9ypascal except ~ J@Ia82 1LVLLVRAISEP INITEXCEABORT DUMP XS&(6yBiAjvxIO_OTHERsys:exp>io_others.PASS  J H i53}}2}4JH}}}djq` m*m,mM( \ n3c}ɺ imJ4n1 " 2 1 27jo` }1}}}>>]m>i> (j]]5zIO_PRIVAIO_Private.PASers.PASSIO_UNIT IO_Unit.Pm6]`m`n`˼  㮃o( oJ oJ߭H]}c}} c} }}  ``}} }}  ``ASQP|6>* dSCREEN Screen.PAS_others.PASS}?}_}@mH``}}}} ``*]c}ɺ m5(5'` m'` m5t` c}ɺ SYSTEM System.PAS! /$}}s` i8@}afopjs` q` c}ɺ }}u` i8@}af}}ju` s` c}ɺ X0a 2( 2 VIRTUAL Virtual.PASa ^T ]5SYSTEM System.PAScept.PAS.PASSCROUNGE Scroungi7m 131 " 2 1 2jn` ]m* m,n* n4,4c}ɺ i6'(mn/ e.PASs>pascal except ~ J@Ia82 1LVLLVRAISEP INITEXCEABORT DUMP XSm&HK%nJKmnjo` ]m* m,n* n4,4c}ɺ imn/ m&HK%EGMENTXSTACKOVDIVZERO MULOVFL STRINDX STRLONG INXCASE STLATETOUNDFQCD UNDFINT IOSFLT MPARITY ESTACK OVFLLI OVERREALUNDEREALREnJK6'mnjo` ]c}ɺ i53}}2}4JH}}}djq` m*m,mM(ALDIV0REAL2INTHANDLEALITH Arith.PASX%= tj\ n3c}ɺ imJ4n1 " 2 1 27jo` }1}}}>>]m>i>   io_others ioCODE Code.PASX%= s}}}}m'}ʷ}ʷ}}} }0}@GETTIMESGetTimeStamp.PAS >pascal.RUN|6 K)  ?OMPILERDISKIO DiskIO.}`}}}}}}}}}]}o}}}(&}PASsys>pascal io_others ~ J@Ia82 1LVLLVARITH Arith.PASebupt.PAS }}']}ʷ}ʷ}}H}KHHH'?} '10 Febt  0 |6 )IOLOADCUIOREADTAIOSETFUNIOSETMODIOCURSORIOSETCURIOSEK}KKHH}`]}}ʷ}`}(#}@'}TTABIOREADCUIOGETTIMIOSCREENIOKEYDISIOKEYENAIOKEYCLELISTENTODOUNITIO s` c}}`}`}+p}}`}ppV}}`}p` GETTIMESGetTimeStamp.PAS >pascal.RUN|6 K)  ?OMPILERDISKIO DiskIO.op㭃o` }pp]m}ʷ}ʷ}1 }}} } }Y }PASsys>pascal io_others ~ J@Ia82 1LVLLVARITH Arith.PASebupt.PAS `ʷ ʷ}m@' }} } }n}ʷn}ʷ}KH}VIRTUAL VIRTUAL.PAS  } nkk@*k?pHoH`} m`k `˼ ɛ  ',kkJkkH HH  }ʷ}*}, }}J}J߭H} 'o' 'G ( p* 'p'  (σ m'=)RSwapping segment inP``ɛ ` -:)Swapping segment outP``ɛ ` -k'i]` 00afm`n`o`p` ], }a}aqpp d]o'p+}p`o`ʷ'}p`o`ʷ} ` 00af  c} }﷼ac} ` levl wMEMORY Memory.PASf s>PASCALhers fd ]} }qH㭄}qH㭅}qHp(}qH㭁]m'm}ʷm}ʷ}}`}@}   o}ʷo}ʷ} },ϯ}(o`}nnn} ʷo`n`} } ;<:R<>"QRHoKHH`n}moonnn}c}ɺoo']  np$ s t  x rt56 }}ʷ}}ʷ}}@' 00af}'* au'}u``    m㭁m m']mm㭁m}ʷm}ʷ}`}'} ʷ}}`ʷq}a'υ }Kvk)}v``}v vH q6} } ʷ} ʷ}']} c}ɺc}m`no?m}ʷ}K)}}H, }  m' 'R]mm߭}߭ q}}ɺ a}``}`}}oK}Ko}㭁m}ʷm}ʷ}`} }@'}  },}'Qc}ɺc}m`nm}ʷ}K)o}o}}o}}}z}c}ɺ}o}o}c} }}}}H, }  m' 'Cmm㭁m}ʷm}ʷ}`} }@'}  }k00af]  00afm`n`o`p`   ,}'Qc}ɺc}m`nm}ʷ}K)}}H, }  m' 'C H  00af  ] } o} oc} }c}o`o F_Z  FA<70+&!d  (]}ʷo}ʷ}'o`00af}mK}KJp'%}m}   }ʷ}` m}K)n}}H,  ' B BYXΓm}ʷ}m:m}ʷ}}HrqH}rI}r}o` a'6㯈}Ksk) st*}}Hmm`m` `a` m}ʷm}ʷ},}*X}}J}H``os sH`o`v}q'}mnom`͏m}ʷ}KqJ}}Hp'?r'}'.}}@'}}H)c}ɺm}ʷ}` m' m`C}:}}KHHmrImr}mno}mmo}}}c} }}K`m)`  ' ˼m``mnoom`n`o`p`]+,k00af㭃noo㭃n}ʷn` o)}}H, "  )  * d f z  ! ölvlvARITH Arith.PAS;f4Jan B  virtual f4f4 virtual rtuaMOVEMEM MoveMem.PAS SYSTEM System.PASe*( PASCAL.RUN|6 >K)!<IO_OTHER IO_Others.PAS(4rWgd8E#8E8D#\JFILEACCEFileAccess.PAS%a%o'qHprs)} }rHo'C}T}}R}}U}}E}ͩo'dndn<  ,=~ /al  ||6 >)ALLOCDIS AllocDisk.PASf4XS}F}}A}}L}}S}}E}P}U}}N}}D}9  ' ˼m``mnoom`n`o`p`]+,?LERYf4D\READDISK ReadDisk.PAS.RunШddndm<  "  )  * d f z-W%A-ZhEXCEPT Except.PAS{-  -|virtual c;<:R<>"QRCOMirtual dSCREEN Screen.PAS% 21:18:394t>  sys:part3>Shell.65.Run XXXndnp$ s t  x rt56RETURNSERELEASESNEWSEGMEMAKEEDGEDELETESESWAPOUT SWAPIN COMPACT KEEPSEGMFINDHOLEINCIOCOUDECIOCOUSWAPSEGMSEGIDTOFFILEIDTOCOALMEMORY Memory.PASP Psys:part3> POS D.65 b-boot CODE Code.PASPESCESETDISKADODISKIOALL XSTACKOVALL XSTACKOVCLEARRECMAKEHOLEDELETEUNSWAPOLDCSWAPOLDDSWAPONEIШddndm< ASGETTIMESGetTimeStamp.PASWf-W%A-ZhEXCEPT Except.PAS{-  -|virtual c##\CAL X aIO_UNIT IO_Unit.PAS! 0(/$COMirtual dSCREEN Screen.PAS% 21:18:394t>  sys:part3>Shell.65.Run XXXndX0a|6>&%ual J@DISKIO DiskIO.PASDDD-Zh-'ZPY< WRITER WRITER.PASallows use of default fileSHR *SCAVENGER Run the disk  ! " } }wH x  wz+}}wJ߭}wJ ]}Hqrs)} }rH}rs)}}d c}}߭}߭}]c}))}Pc}+ɺ})߭})߭}+]c}˼}}ɺ]}Pc}c*}r}rH]qG$DX 33} 3Jdq`4q*qI o*oIoIokJkHkqMkqLkc ,}c}H}}T L0H`}}T M0H`} `}$JanFebMarAprMayJunJulAugSepOctNovkHkqLkqMk +}kJk JAH }kJk0HkkH'ΩkkH}kJ-kHpkk)} }kHDec}cKJ``J} `}qdM L0H`}q M0H`} `}} L0H`}} M0H`}kkk+}}kJ߭}kJ]%&QR :`}} L0H`}} M0H`}:`}} L0H`}} M0H`]2, 22H2.+}}wJ߭}wJ ]}Hqrs)} }rH}rs)}}]}0+9).}, }} KH0Jq }o*}p,] (STREAM Stream.PASPASows use of default fileSHR.SCREENSIZE Set the size of the screen.isk FILEDEFS FileDefs. '2)]2k 'c}/``k-'}\Pka+kz)kA+kZ)}\* c}\k`0PASlows use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk GETTIMESGetTimeStamp.PASATISTICS + c}\ }3$JanFebMarAprMayJunJulAugSepOctNovDecPc}3 k0H0k0 ,}\}3k0KJ``J3k0 ,| - Turn printing of statistics on or off.VENGER Run the disk WRITEBOOWRITECH WRITECHAWRITEIDEWRITEINTWRITESTRWRITEXk-'c}1`c`k1+) k1H1k1P+ k1lH1k0BBYBYBYBY BY BYX+3k0'(k1M'k1dM'k1}E}}F}p,} }pJ}o}rq,$qHrst)} }sHqr st)}}sJ}sH]r)33} 3Jd3o*or,v s yz)} }yH }U}CLOCK CLOCK.PAS(allows use of default fileMPSHR *SCAVENGER Run the disk  }N}}D}}E}}F}]}}o}H s yz)} }yH  }  yz)}}y}yH ] o'φp  xz+} }xJ }-}}3}}2} }7}}6}}8}͉ o* oIxH }xJo M0Ho Lo'yxH }xJ-xH p wz)" # ++[npk0KJ``J3k0 ,Pc c~` c JSwap takes "Yes" or "No" as input and partition name to swap to as output.` c c c~` k-'c}1`c`k1+) k1H1k1P+ k1lH1k0BBYBYBYBY BY BYX+3k0'(k1M'k1dM'k1c  Default for partition name is ` c c` c c c~` c  It turns swapping on or off.` cGETTIMESGetTimeStamp.PASos.DRexp>3 She.SCREENSIZE Set the size of the screen.IO_OTHER IO_Others l}R3}P)}Pa1l1'Jc ** Unknown partition: ` }c ` . .PASPAS$BSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptPERQ_STRPerq_String.PASs use of defc c `l1 NJ a` c Swapping enabled to ` l1 NJc c` c * c ault fileMPSHR *SCAVENGER Run the disk SETTSTAMSETTSTRIGETTSTRISTAMPTOSSTRINGTOBADTIME NEXTCHSwapping disabled` c }c}c}c ] swap to as output.` c c c~`  GETNUM SKIPSPACCMDPARSE CmdParse.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot SHELL Shell.PASDOSWAP "sys:user>brad>newos>d.6>doswap.PAS QP|6>* dFILEDIR FileDir.PASg #\PASCAL X aFILEDEFS FileDefs.PASg  *   * )#\|6&%ap J@GETTIMESGetTimeStamp.PASZPY lvlvALLOCDIS AllocDisk.PASf doswap ff}}}}c}c}cc~aN} }R3} }R3} ljc Enabldoswap /swapARITH Arith.PASX%%%%doswap N G 4XM'!+++k/k+,c}.``k:'c}-`;`k:'c},`;`,k2})e swapping? ` c}c ``c }}c}c}cc~aN]l} } N})k1J})ck0})Tk/})k.})k-})k,]"))$RThjl;}c~)YESP)NOPaNl } 8}a ~=** P~ # $  3}  ͭ} '͝}K}} J}} }} J}} '}  }} READDISK ReadDisk.PAS*( PASCAL.RUN|6 K)  !DISKIO DiskIO.PAS com doswap ~dddF<  JMEMORY Memory.PASrad>newos>d.6>dL``}c` ?mt).nu)}m?NnNnHnu)mHmt)}?NN}?NN@}?NNoswap.PASFILESYSTFileSystem.PASnewos>d.6>doswap.PAS}?NN}?NNc}?NN}?NN} ?NN} ?NN} ?N IO_Others.PAS>newos>d.6>shell.Pddndm N } ?NN} ?NN@b}?NN}``}c` N`vMHqN``W%AWRITER WRITER.PAS{  ""!#\`I]``}c` 3)UtilProgress.Cursordc}c}am';m``}}``}c` N`vwap2READER READER.PAS%SndMHrN`c}c}cc}cc} JHnewos>d.6>shell.Pddndm H*IH,H*IHH``]}}} ʷ} } ʷ} "(N} @ 8} 0 33} 3JdW%AWRITER WRITER.PAS{  ""!#\3}  ͭ} '͝}K}} J}} }} J}} '}  }}wap2READER READER.PAS%Snd} wK}}} K}}* +``n))mn* UTILPROG(sys:user>brad>newos>d.6>utilprogress.PAS  +`` , .ST ~ IH,H*IHH``]}}} ʷ} } ʷ} "(N} @ 8} 0 33} 3Jd$ % ess  ,=~ /RANDOMNURandomNumbers.PASr>brad>newos>d.6>utilprogress N 2 4XZ)4r㭆r`r, rr'`,_``` `````` ` SCREEN Screen.PASe*( PASCAL.RUN|6 K)6>utilprogress &!DYNAMIC DYNAMIC```_Hru) r`rH``]}` 4}''}`} }`.PASad>newos>d.6>utilprogress.PASLOADCURSSHOWPROGQUITPROGSTREAMPRCO}@( }`ț}` 4}''}`} }`c}ɺm} ʷm}ʷn*MEMORY sys:exp>memory.PASSASS  n, m`n`nJo}, m`n`} h}(^o} K,=} }`"ʷ} KH oyk)} y``IO_OTHER IO_Others.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot SYSTEM System.PA Srad>newos>d.6>utilprogress.PASSTREAM Stream.PAS{ ##\CAL X aFILEDEFS FileDefs.PAS! il/$X0a|6&%r>brJ@GETTIMESGetTimeStamp.PASZPY |#}a}aqpp d]o'p+}p`o`ʷ'}p`o`ʷ} lvlvFILESYSTFileSystem.PASos>d.6>utilprogress s&'&sys:user>brad>newos>d.6>utilprogrd]``c `}ʷ`}`}㱥`}㲝 `}~`}ess  ,=~ /RANDOMNURandomNumbers.PASr>brad>newos>d.6>utilprogress N 2 4X`````a`p}ʷ}}}`}}}K` SCREEN Screen.PASe*( PASCAL.RUN|6 K)6>utilprogress &!DYNAMIC DYNAMIC}㭅}`HpI}}(`}q`p``c}``.PASad>newos>d.6>utilprogress.PASLOADCURSSHOWPROGQUITPROGSTREAMPRCOJIH`tKtKHJ`r㭆r}ʷ}@'}P )r}} ʷ} } }MPUTEPLOADBUSYRANDM FILESYSTFileSystem.PASos>d.6>utilprogress s&'&sys:user>brad>newos>d.6>utilprogrKHr'Ϊ`}ʷ}}H}KH```c` ``` c` ``% & aaoJ`` 'Fu} ʷu} ʷ} Ko+natK} KoJ} } Ho}  ?} o'5} 㲈}} to'up'vq's } 'c}sr'}s }rr`}}qH㭁 H tvItv} KoJt} } tu} } } } } @} P} 0}  ab t v   l n } } } pJ} qJ} } } `} }}ʷ}}o}u]c}ɺm    ` b   H  }ʷ}*}}H]c}ɺm}ʷm}ʷ},n' m`},n'ό}(Gm`} c}m`c}maa}K`})` }K`})` ˼m``Jn)}=}K`})` n'˼m``˼m``}n} c}ɺm}ʷm}ʷ}<>b t v   l n ,}*[}}J}'}'1}}@'}}H)c}]c}ɺn*n,     ` b   H   yH }  } Koo} K,i}` X} K}KHHo+8}㭄} K} KpKm`n`mnJ]c}ɺn*n, m`n`mnJ]c}ɺm0n]c}ɺm@nm}ʷn'C}}HH}pp`o} K,Z})m`},m`maao`})` c}m`ʷ}}c}T}}}$}mK}}]m㭁m`m ' r}ʷr}ʷ}r``}}H`}K}KK,m`m'  ] mm㭁m`n}ʷn`n`m']m`"ʷZ)Kt} r' rrvs' rsru}c ͚  Fc*** Mounting hard disk...`` cmdone.`c}  ʷ} o} K*vapK} KoJJ} } HoHHpqIpq} Kop}}pc}aJ`ʷɺ!a ]m㭁m}ʷ}`}f}K`m)` ' m m㭦Pgo*o,}`o`p*p,}`p`q*q,}`q`oq,}`o`9˼m``}@'m㲂mn`" m'p}r㭆r} ʷr} ʷ} `} @'& ' X0a 2( 2 VIRTUAL Virtual.PASa ^T ]5STREAM sys:exp>stream.PASSASS levl wIO_UNIT IO_Unit.PASf s>PASCALy ff memory /l meDISKIO DiskIO.PAS%= y ARITH Arith.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERSTREAM Stream.PASmory.PASSASSFILEACCEFileAccess.PAS.PAS  /]}}ʷ}}ʷ}'}P Ϥ}(*}`}`} }}H }}} '=}`} '10 Febt  0 |6 )ALLOCDIS AllocDisk.PASZfX`}}LK}}M}KH`}`}`}K`1}P &}(}}}ɺ?LERYfD8READDISK ReadDisk.PASb#\0 Feb}  } ` }} }@}0}P}`]3d 33d3%$$JanFebMarAprMayJunJ10 gSepODYNAMIC DYNAMIC.PAS@ }%XP>NEWSYSTEM.CMD %memory >}ʷ} }}T} }}B}'c`````} ` }}>PASCALemory X%rrmessM@Lac PZP{PZPY#\} nd}K%}3da}B}3d} } a}}J ɺ}WRITER WRITER.PASnewFeb"  memorytrssm.CMDX a-x !|STREAM STREAʷ} } }}T} }}BBYBYBY]}ʷ4} }CODE Code.PASmemory.PASSASSGETTIMESGetTimeStM.PASpafc>ioea.pas#\INITMEMODATASEG CODEORDACHANGESIamp.PASQP|6>* dMOVEMEM MoveMem.PASBiaCREATESEINCREFCOSETMOBILDECREFCOSETINCRESETMAXIMSETSHARASETKIND MARKMEMOCLEANUPMFINDCODEENABLESWDISABLESCURRENTSUNUSEDSENOTDATASb##\scal X aSYSTEM System.PAS! /$BADSIZE BADINCREBADMAXIMFULLMEMOCANTMOVEPARTNOTMSWAPINFAEDGEFAILNILPOINTBADPOINTFULLSEGMNOFREESESWAPERROSEGIDTOFFILEIDTO nd' ( }T} }E}}}T}}[\ `c[]ɺd;' }} }r}}Hr}'r}'} '[r}(6 ``a(퉓(33}o} }oHo} '} *} }ʷ}ͽ}}}ͼ}}}qͤ}}ɺ 3Jd3}}} }}do }ɺ}}} }  }}B͌}}}3t}}}$\}}}F}}}0}}} yr *rr(\r}'} };r}'} } }r}X}Xo( ) }}ʷ}}ʷ}"(E}@}033}ɺ 3Jd3} +}'}' }44333333ty33L_33`szɺ+a}3@} non-open filed}3'~}0#unknown character structured deviced}38}ConFILEDEFS FileDefs.PASP SPsys:exp> POS D.65 a-boot GETTIMESGetTimeStsole:d/}RS:d}RSX:d dK}3'} FileId = 0d)}3` a6 k6 amp.PASQP|6>* dIO_UNIT IO_Unit.PAS#\}]}ʷ}}ʷ}}H}}'/}`}`} }}H}]}}ʷ}}ʷ}A }device not mountedd\ }3` a5k5( k5J 5k5'$}partition not mountedd\ `(6}@}P33}ɺ 3Jd3} ,4} Jot) } }}o.oH} `}jc` }3``}j}7 k6dc}7:`c}7 k5Jc}7>`c}7}j }jc` }ʷ}ͽ}}}ͻ}}q}ͣ}}B}͋}}3}s}}$}}}7d]x* J j\ [}}}E}}}/}}}d<=Si.]}}ʷ}}ʷ}FH573333A(6}@}P33}ɺ 3Jd3}'}ͱ`}`a(33}ɺ 3333333333333Jd3 `}`aoJ((߉(H''33}ɺ 3Jd333}ɺ 3Jd33333388883333333  `c}a(쉓(33}ɺ 3Jd3 `}`a(鉓(33}ɺ 3Jd3}44333333ty33L_33`sz,}}B}BYXV `c}a(}}B}BYX p '͉(33}ɺ 3Jd3f+)h". Z   ,  hdG}ɺ}( } }ɺ}}]}(}}}ɺ}(}}333333333333}ɺ]}}}ʷ}}ʷ}@}0 }'}'}cConsole:````cɺ }3333338888333333) * ?LERYfDp *%READDISK ReadDisk.PAS#\d10 FebFILEACCEFileAccess.PASWRITER WRI$JanFebMarAprMayJunJ10 gSepODYNAMIC DYNAMIC.PAS@ }%XP>NEWSYSTEM.CMD %stream >TER.PASSTREAM STREAM.PAS>PASCALtreamSTREAM STREAM.PAS%rrmessM@Lac PZP{PZPY#\} ndPASLONG PASLONG.PASSTREAMINSTREAMOPSTREAMCLGETB PUTB GETC PUTC PREADLN PWRITELNINITSTRESTREAMNAFULLLN STREAMKERESETERRREWRITEENOTTREADER READER.PASEXTFNOTOPEN NOTRESETNOTREWRIPASTEOF UNITIOERTIMEOUTEUNDFDEVINOTIDENTNOTBOOLEBADIDTABIDNOTUNIIDNOTDEFNOTNUMBELARGENUMSMALLREABADBDYNAMIC DYNAMIC.PASASE LARGEREAREALWRITNOTREAL OPENBLOCFSNOTFNDFSBADNAMOPENCONSOPENRS OPENRSX SENDCOMMADVANCE FULLLINEADDCHAR ERASECHAADVANCE m >SHELL HELP PNOTFOUNLISTCMDSPNOTFOUNFIXDEFAUCREATETIUPDATETITIME PRINTTIMCHECKTWOCHECKHELDOSWAP#\>pascal X aSCREEN Screen.PASream.PASSASS>PASCALtreamSTREAM STREAM.PAS%rrmessM@Lac PZP{PZPY#\} ndMEMORY Memory.PASream.PASSASSALLOCDIS AllocDisk.PAS shell  ARITH ArithFILESYSTFileSystem.PAS.PASSASS.PAS-cREADDISK ReadDisk.PASPERQ_STRPerq_String.PAS= mt0Ja~tt66)JDISKIO DiskIO.PAS* SYSTEM System.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERDISKIO DiskIO.%X% FILEDIR FileDir.PASad>newos>d.6>shell.PASPASsys>pascal stream ~ POS D.65 a-boot 10 Feb 82 12:57:59ARITH Arith.PASebPAS.PAS  %r IO_OTHER IO_Others.PAS '10 Febt  0 |6 )ALLOCDIS AllocDisk.PASZfXPROFILE Profile.PAS6vBX* + LOGIN !sys:user>brad>newos>d.6>login.PASw  cReading profile file `cc`c} J}4>}}c}c}cc} a Qcc}`c in profile.`c** Profile ignored!!`c\}R4}R4} }  cc** Profile entry "`cc}`ci " is malformed. Profile ignored.`c\}cN`}c}cɺ} Jͷ}cɜo cɺo }c} ** Cannot fill search list with `cc}`c\c} *  3ϖ}*}dc 3) .Run Pc}*cn cn a)k)( }PMc** Could not find `cc}* Cannot fill search list with `cc}`c\ 3}dc 3 ]c** Cannot pop last item of li`c to be Shell.`c} }}0}}} }}}}]cc@ st`c\ c** Cannot pop last item of list`c\ c 3 ]o  o c Login allows a person to use the system. Type your name and`cc ? password. Use the UserControl program to `aͭ o P͸o R4_o -R3 Io 耜o >(o >N`o N` 3o enter a new user.`cc@ The null name (type a return) will usually login as "Guest".`cc> The d帺Fw o P4o (Bc`+** CursorFunction takes an integer argument`ceo 0Jm* switches to login, which can also appear in the user's`cc profile, are: `c mn);c m,Ic3** CursorFunction argument must be between 0 and 7.`cmv|o  o c`a DOSTATISDOMNTDISDOPATH DOSCREENDOSWITCHCTLCABORWRITETIMNOTAFILEPASLONG PASLONG.PAS `mNJ)cc`cmHmn)c\]}}}} } }c `ano READER READER.PASNto}P }PNHo }PD }PNNd t,}DYNAMIC DYNAMIC.PAS }}}} }}}}c** User profile file `cc}`c not foSHELL HELP PNOTFOUNLISTCMDSPNOTFOUNFIXDEFAUCREATETIUPDATETITIME PRINTTIMCHECKTWOCHECKHELDOSWAPund.`c}Default.Profile4$Default.ProfilePa\] }Login+ ,  is not unique.`cd[dmv͟o  o R4"o F' NN_N`P\]\]  y $}3y}3y|`|vNxNwNNP o N`>N`o N`d L\ io o ]ccco' En5k5N:c* Dismounting device `ck5``ck5` c 3 ]ccc$Q Type the date ater the secret password for user '`ccL`'ccc Password: ` }PcNond time in military (24 hour) format. Seconds are optional.`cc Example: 21 Jan 82 15:32`cc`c} a(pk`c} a(}pN`͍}Pc~}+}}J``NX}pN`jj]})P ϼ3 >Hold_Time.TimeStampdc}Sc}R a{{'kS(kR (:3>HoGd'P/cȼ}s cɜq c}cc})ld_Time.TimeStampd a{{`` ` <}T``c`{``}T ˼}Tc})c})})J`})3:c+Entera cc})`c\^q  s  +c** No ',' allowed`c\}cN`o c}cɺ date and time as DD MMM YY HH:MM:SS :`Jc#Enter time as HH:MM or full date: [`cc})`c] `^cccH Type in your login name or press the return key to log in as "Guest".`ccLwP^c c}cP`P` }})Pc})} N`a'}:N`a(})4O ]cc** Unable to find `cc}`cNJ c}c}aN) PLs P })` `J}JP }P) PNu ]c````帛L'TcPlease enter your name: `cLcP`P`c)LPLs P帛L' u P帛LGuestc```` eLogIn version 2.0JP   PuP帜q R4Auq P帛uue JPu'icI Password: `JP   POS JP  DJPc .cuɺ)uPus P帛uu JPNJJ)LP)uPca 6N`  JP  ` JPc N` c** Invalid user or password.`cHPNN 4 P3(  -boot JP) P NJ)1PATH set the default path to argumen͝NxͤNx͙Nw͎Nw̓N`o N`bc ** Parameter `o c`cPDefault.ProfilePWHNeed to create System.UsersPNN Default.Profile, - r))4X1))V`d 33ndn  ,=~ / ||6 )FILEUTIL FileUtils.PAS>newos>d.6>login.PAS332w33xL^3333K f )) IO_UNIT IO_Unit.PAS #\ddndm t.P帜NJ)?SETSEARCH push (or pop with -) argument onto search list.P帜NJ)t2SHELL set t J   33 I 63333 Vhe name of the shell program.P帜NJ)KCOMMAND set the first command to run. Use @ to run a command file.P4 P͔Pw 4$cw a w NN]NJ)>CURSORFUNCTION set the default cursor function. Arg is 0..7.P帜NJ)FSCREENBOTTOM set bottom ofr))4X1))V`d 33 screen. Args are ON, OFF, WHITE, BLACK.P帜NJ)HELPP帜NJ)LPOINTALLOWED pointing device is used? (TSYSTEM System.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot SCREEN Screen.PARUE implies popUp menus allowed).P帜 NJ)'PROFILE set the profile to use.P帛NJ)ONP帛NJSQP|6>* dCLOCK Clock.PASbrad>newos>d.6>log)OFFP帛NJ)BLACKP帛NJ)WHITEPNu P帜 P帜w P帜  P帜D EPin.PASGETTIMESGetTimeStamp.PAS!  /$ P帜o u  3cRInitializing for user: `ccH`c 4ϟ >(X0a|6&%J@PERQ_STRPerq_String.PASDZPY c >N`3 dcn cn a'`c N` c ** New path `cc `c doesn't exist.`lvlvMEMORY Memory.PASf slogin ffc P帜 3  :User>Guest>P帼3 dcn cn a' >Pc  dD 4 ,=~ /USERPASS UserPass.PASd>newos>d.6>login.PAS )D P 4 ) P)Shell..RunJCMDPARSE CmdParse.PAS*( PASCAL.RUN|6 K)8!PROFILE ProfileJP 4 P͔Pw 4$cw a w NN].PAS#com ~ POS D.65 b-bo   18:JFILESYSTFileSystem.PAS%a%- . STREAM STREAM.PASREADER REAs, simply press on the command.` c  c 2 To scroll the menu, press in the gauge area at` c  c D DER.PASDYNAMIC DYNAMIC.PAS the bottom and move left or right while pressed. When released,` c  c H the menu will stop scrolling. The fuLOGIN TRYSETSHAPPENDSWDOHELP CHECKSWIDOPROFILrther from the center you move,` c  c  the faster the menu scrolls.` c  c  2 * PNOTFOUNHANDLESWDOPUSH SRCHWARNSRCHERR DOPOP SRCHWARNSRCHERR READPASSHELPKEY HANDLELICHECKLOGHELPKEY RESETERRCLEARUSESRCHWARN }N``} `I`I`,`}k9 H}2 c c}`  c  c c}`  c  N:}2SRCHERR GETTIME HELPKEY BADTIME READER REA k8   N`N`}}2 k8   , c  N:}2 akW%AIO_OTHER IO_Others.PAS{   *$.cDER.PASDYNAMIC DYNAMIC.PASCOM6STREAM Stream.PASrad>newos>d.6>login.PASPOPCMDPA'sys:user>brad>newos>d.6>popcmdparse.PAS  SHELLDEF ShellDefs.PAS login POPUP PopUp .PASomfcALLOCDIS AllocDisk.PAS |2Ja| |6 )JARITH Arith.PAS2(%X% READDISK ReadDisk.PASD ]c} } kl)m}}kJ c} }}a'}}'k\kHDISKIO DiskIO.PAS%kkHkl)Гk' } Hk, } Hkx]c  c ) HELP ON POPUP MENUS:WRITER WRITER.PAS@6IvJX` c  c 6 The PopUp menu shows the commands you can execute.` c  c @ To execute one of the command. / 4ɺaȼ})}P}.}0}2}4}6k8N`N`a]N~c` ``}2c}2}Confirmc}2J H##\CAL X aSCREEN Screen.PASrad>newos>d.6>popcmdparse.PASYESc}2J NOc}0c c}` k/'c [Yes] ` k/'c k[No] ` })PERQ_STRPERQ_String.PASewos>d.6>popcmdparse.PASPc~4c}~c}2cc~r``al)_~4~c~c}0c}4al*~ ~ ~STREAM Stream.PASf s  popcmdparse fR4le~R3-}0 k/'k/'k/)~}2cɺal,l  ,=~ /FILEDEFS FileDefs.PASpcmdparse%%= N Ƚ )#.rc !** Illegal input. Type Yes or No` r   %c  or press for Menu: ` c : ` ~c~GETTIMESGetTimeStamp.PAS#\( PASCAL.RUN|6 K) !SYSTEM System.cl }0 ll~c}2c]}c}a1k1 (k1 (} H'}c}a1}R4t}PAS/com ~ POS D.65 b-bo   13:J K%%a%@'h} }}c} a c c}` c  } H}c\t} Ḧ́ndn  ,=~ / ||6 )STREAM STREAM.PAS ZfXk1 (k1 (k1~(} Hc}R3} HHc}`}k1c}  }}}?LERYfD popcmdparse WRITER WRITER.PASddndm :Χk:Ϣ}6 }6N}4};cɺ};(N`N`}.c}0}4};JJ c}0ca]89+2 120 9:* ` c  };NJ㭁};cN`N`}2__  :}2 }4 H}. c}0ec)}2c]}c}a1k1 (k1 (} H'}c}a1}R4t}c  \}2}ʷ}.}`` } }2 }.c ` c  }. c}>}>@3ρk9B@'h} }}c} a c c}` c  } H}c\t} Ḧ́c ** Command file not allowed` c  }.c:}.}2c}> a c c}>` c  -k9CMDPARSE CmdParse.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot POPUP PopUp.PAS}4 H\}.}0c}aN=k}4 HJk=='}4 H4}0R3}4 H}0}QP|6>* dIO_OTHER IO_Others.PAS#\/ 0 ALLOCDISsys:exp>allocdisk.PASPAS  jn NJUkU m'kU FkU N}+}kUJP)}+PnHnkT)ЖmNN c} c}* }}*3N}'\-}}>'c}}J`}:N`a+k+,Ϩ}.} `k+J`JP}}k+H`}k+J`JP,JWk,kW)9)k,NP)}.Pak,-&k,H,k,kW)\k+' c}``, Wk,kW)_k, NJ )k, NJP)}Pak-k, NJ 'k-'k,'\Jmn)mNNmHmn) mn)m NJ NmHmn)] no)n NJ n\\k,H,k,kW)С])}Pa1k1k1'\k1 NJ3k3 2k3 \k3 N}*k3ʷk3}*k3 }*knHno) ț NJ ' )}Pk)N`}*k,`-\ NJ]m NJp p  \p3}*k3}*.4k.k4)f},k3ʷ}, },  H.,k3 k3 ɼ`ʷk3k2`},`ʷpHp2,2}pʷ}p}p}p p]}N cqs)>}rqNJNr '}k.H.k.k4)К}, }, 4)Can't find free list headP)}P R.4k.k4)b},k3ʷ}, },qJ`\}qrNqHqs)]mN w\wN}N}Nm NHw}}wʷ}wcɺ``}  H.&k3 k3 ɼ`ʷk3},k.H.k.k4)О}, }, 4)Can't find free list tailc`}}B}zo?N ϯ}}zo?Nʷap NJ x Nx mx}zo?N}xcɺx}P)}P Rk3 Nk32Hk1`])}Pa)k)'\k) NJ*k* k*  \k* Nk*2Hk)`x}x}vx}xx}Nx }x}x NoH>}c`Jno)UnNp=]o NJ }vʷ}}} )vP )}}ʷ}v 2)Inconsistent free listP)vc Device # ` cn`` c Device name: ` pcc` c  mq)m NJr r n'ϼc P R}}}}a}vv}v v ɼ`ʷ}o` pq)1p NJ}rrW%AREADER READER.PAS{  c ` rcc` c : Start = ` rac` ` I` c End = ` rac` ` I` cCOM7f6XPOPUNIQUGETCMDLIGETSHELLGETCONFINULLIDLEIMPOSSIBIGETCMDLDOMENU OUTSIDE HELPKEY K%%a% Free = ` r ac`` c mHmq)#nHno)ѫ}mNPc}:N`mNN TnkT)0 1 levl wPERQ_STRPERQ_String.PASsk.PASPAS ap\ pHpq)țm NJ}}ʷ}}tp}}ta}tʷ}}t}DYNAMIC DYNAMIC.PASocdisk.PASPAS]}ɺ aq NJq`}N`r}r r ɼ`ʷq`ȼ}ɺ at NJt`}N`}}ʷ} a >pascal.RUN|6 K)ys:exp> ?OMPILERWRITER WRITER.}}uau}u u ɼq`ʷ}uuqHt`` UHPASsys>pascal allocdisk ~ POS D.65 a-boot 10 Feb 82 13:32:31STREAM STREAM.PASb:exp> )* )) )*.   O   G '10 Feb  |6 )aINITALLODEVICEMODEVICEDIMOUNTPARDISMOUNTFINDPARTALLORR))bB--DCDISDEALLOCDDEALLOCCWHICHPARDISPLAYPNOFREEPABADPART PARTFULLFREEPARTUPDATEPADOFLUSH FLUSHFAIGETPARTNUPPEREQUADDTOTAIRS N`r}r r ɼ`ʷq`ȼ}ɺ at NJt`}N`}}ʷ} a >pascal.RUN|6 K)ys:exp> ?OMPILERWRITER WRITER.}}uau}u u ɼq`ʷ}uuqHt`` UHPASsys>pascal allocdisk ~ POS D.65 a-boot 10 Feb 82 13:32:31STREAM STREAM.PASb:exp> )* )) )*.   O   GGElvlvGETTIMESGetTimeStamp.PASf s screen ffARITH Arith.PASyP SPsys:exp> POS D.65 a-boot FILEDEFS FileDefs. ,=~ /IO_UNIT IO_Unit.PAScreen%%%= N  4XPASQP|6>* dGETTIMESGetTimeStamp.PASBa SCREENINSCREENRESPUTCHR SSETCURSSREADCURSCURON SCUROFF SCURCHR SCHRFUNCSSETSIZECREATEWICHANGEWIGETWINDOCHANGETISETFONT GETFON;##\scal !aREADDISK ReadDisk.PAS#\ /$T SCLEARCHLINE SBACKSPAREFRESHWWBADSIZEBADWNUM WTOOBIG STARTLINTOGGLECUNEWLINE SAVELINESFULLWINCURSOUTSCLEARSCRDOCLEANUDOCHANX0a 2( 2 DISKIO DiskIO.PASa ^T ]5IO_INIT sys:exp>io_init.PASPAS  1 2  `a} }}}TBLTRY}}`a}} }}Z80 R}}}}(}߭'u`}'v`I gw`}`}``˼}}}x`}c}}`a}}}}RKEYR}}}KEY R͛}}` }c` }c` ]``}c` ``}c` }``}c` }`}`}``˼}}}~`}`a}}}}RSI RM}}}`a}}}}}'!}'}'`}c` }c` }c` -`>.```c` RSO R} }mr)mHmHl  }ʷ}'Q}ʷ}``:cD` `` c` ``c ` `` c ` ``c@` ``c@` ``c@` ``c@` `` }}H}ʷ}}}HN}ʷ}} }H}ʷ}} }H}}tSCRNR} `a} }PSTSRͷ}`a}}GSTSR Jnp) nͻ: b :b:bͳ:bͥ: b͗:b͉: b{:b͍}}PUTCRq}}GETCRU} }}CLK R-d(2c7yym:b_:bQ:b C: b 5:b '"d K;Ua{ao```-U}EnBBY BY BY BYXnH:612347I ?nq)!mr) nm` :nInH]no, ppHoJp]}}}ʷ}=}}no)n}ʷ}}mHnH         }}I}}}  Rn#}:}RSVDR3B`}} `a}   p 8     B]/dd}NETXRE`}}`a}}DSK Rͽ}}`a}} }%$5  ]``}c` ``}c` `}}}}}} }>FLP RI(I)k}}`a}}SPK R7}-}} `a} }}``} ``˼}}`}}}}``} ``˼}}`}c}}@}GPIBR*}}`a}}}@}GPIBR͟}}` }c` ``}c` ``}c` }``}c` }JJI gs`}}߭J`}``˼}2 3 ##\scal#\MEMORY Memory.PAS_init.PASPASCOMogin S STREAM Stream.PASnew>login.PASDPASCALit ff.PASomf0c8t  '(  STREAM STREAM.PAS'io_init l ioSYSTEM System.PAS%= t 5|0Ja| |67 )JWRITER WRITER.PAS c%SCREEN Screen.PAS% >pascal.RUN|6 K)ys:exp> ?OMPILERETHER10I Ether102(%X%4>4=#\READER READER.PASq f 8 q s:user>brad>newBoot2> Shell.65.IO.PAS>pascal io_init ~ POS D.65 a-boot 10 Feb 82 12:46:28ETHERINTEtherInterrupt.PAS Rune File. tistics. \bDYNAMIC DYNAMIC.PAS%pe the tex*+*path' sys:user>brad>newos>d.6>new> f f 8  '10 Febt  0 |6 )DYNAMIC DYNAMIC.PASZfXqType the text file FiLOGIN SHOWHELPTRYSETSHDOPROFILCURSERROSCRERRORPNOTFOUNCURSERROSRCHWARNSRCHERR SCRERRORREADPASSHELPKEY -c@` ``c` ``8c` /`6`@`J`T`^`h`ii`gH?LERYfDh INITIO INITINTEINITDEVISHIFTR INITCIRBINITCURSINITTABLINITGPIBLOCATEp`jq`  N!k k!)k H r`|` `}`c}`  N!k k!)k H `  DSFINDSIZE Screen.PAS% >pascal.RUN|6 K)ys:exp> ?OMPILERETHER10I Ether10N!k k!)k H ``"\ 7  b-24IO.PAS>pascal io_init ~ POS D.65 a-boot 10 Feb 82 12:46:28ETHERINTEtherInterrupt.PAS a.jl   [ ` ``c@` ``c@` `` ndn3  ,=~ /  ||6 7)FILEUTIL FileUtils.PAS>login.PASD* dIO_OTHER IO_Others.PASBRa:W%Asss:tIO_OTHER IO_Others.PASs:  :ONNSys:Boot2>new> login c3 4  | - Turn printing of statistics on or off.VENGER Run the disk CMDPARSE CmdParse.PAS Turn swapping on or off. Part  is the partition for swapping.R +TYPE File PERQ_STRPerq_String.PAS File.of default fileSHR *SCAPsys:part3>Segs> STREAM STREAM.PAS.5 p-boot Pascal.RunR *SCAVENGER 3}dc~c~al')}P)c}c````UUc} }#} Run the disk IO_Others.PASows use of default fileSHR *SCAVENGER Run the diskJ^^c  Ϙcc`` cc c~~c#3Rcc~+ c~ WRITER WRITER.PAS2 10:30:55 of default fileSHR *SCAVENGER 05 Jan 82 10:30:READER READER.c~+~+}3c c~\S>ȉUU(3z^^c ccPASallows use of default fileSHR 8VE9ERj $ `PNOTFOUNPNOTINITPFILEINIPFILEENT`` cc c}}#3帉'4Ά}))USERPASS USERPASS.PASlows use of default fileSHR *SCAVENGER Run the disk N TEFc}c````UUc} }#} J^^c  Ϙcc`` cc c~~c#3Rcc~+ c~ c~+~+}3c c~\S>ȉUU(3z^^c ccCHECKLOGHELPKEY RESETERRCHECKSWICLEARUSESRCHWARNSRCHERR GETTIME HELPKEY BADTIME ITER WRITER.PAS c%`` cc c}}#3帉'4Ά}))2(%X%4>4=#\READER READER.PASq f 8 q s:user>brad>newBoot2> Shell.65.FILESYSTFileSystem.PASSs use of default fileSHR.SCREENSIZE Set the size of the screen.isk FILEDEFS FileDefs.PROFILE PROFILE.PASllows use of default fileSHR *SCAVENGER Run the disk #  PASSows use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk GETTIMESGetTimeStamp.PASATISTICS + 4 5 }+}P}V}+k,Yk+XkX,kY+}T}+}+}V}Tʷ}}+]c >System.Users````c}U VkUkV)T},kUASp.PAS use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk FILEDEFS FileDefs.PASS9STATISTICS +  N=Pc},},}3$}*kU N==kUNc\kUHUkUkV)ЬcNN)}Pc}Uɺa$}g)}*| - Turn printing of statistics on or off.VENGER Run the disk GETTIMESGetTimeStamp.PASurn swapping on or off. PartP }S}U=NN)}Pc}ɺa :NNk N= kNkHkk 'Nk  is the partition for swapping.R +TYPE File STREAM STREAM.PAS file File.of default fileSHR N\ N=} N=N N=kSN N=)}*Pʷ N=}TP N=*SCAPsys:part3>Segs> POS D.5 p-boot Pascal.RunR *SCAVENGER Ncc >System.Users````ccN] mn)Qm N=Nm N=mN Run the disk WRITER WRITER.PASmp.PAS use of default fileSHR *SCAVENGER Run the diskm N=帜m N=kPmHmn)Яc >System.Users````cccn >System.Users` FINDUSERVALIDUSEADDUSER NEWUSERFLISTUSERREMOVEUSENCRYPT Run the disk GETTIMESGetTimeStamp.PASurn swapping on or off. Part``` mn)lm N=Wc `m N=cc`c `m N=cc`cmHmn)Д] is the partition for swapping.R +TYPE File STREAM STREAM.PAS file File.of default fileSHR N)}Pc}*ɺa \ N=Ncc >System.Users````ccN]MULTIREA MULTIREAD.PASows use of default fileSHR *SCAVENGER Run the disk } +,+BTU=|}iPR~)*=)+/@N=mN m N=帜m N=kPmHmn)Яc >System.Users````cccn >System.Users` ``` mn)lm N=Wc `m N=cc`c `m N=cc`cmHmn)Д]N)}Pc}*ɺa \ N=Ncc >System.Users````ccN]p*/)Attempt to read illegal blockP )``}c```} c`} m` ʷ}} }}ʷ}}}CMDPARSE CmdParse.PASlows use of default fileSHR.SCREENSIZE Set the size of the screen.isk ARITH Arith.PASpJ'} }ʷ} } ʷ} }ʷ}} }} }} }p}}}q@*q?kH|H`5 6 *SCAPsys:part3>Segs> IO_UNIT IO_Unit.PASASows use of default fileSHR *SCAVENGER q#$mJLH }}p`t`}`}}H]}|k){*}|H|H{m*m=H,6c Run the disk READDISK ReadDisk.PASSows use of default fileSHR *SCAVENGER Run the disk  IMPOSSIBLE in Fill; val=` c m`` \nb""afm`"``c}ɺ*&mJ DYNAMIC DYNAMIC.PAS 10:23:12 of default fileSHR *SCAVENGER 05 Jan 82 10:23:MULTIREAf. Part""af_""afm`"``c}ɺ*&mJ""afH}`k `˼} } }}'*qkJkkH} } } } H@}}ʷ}*}, }} is the partition for swapping.R +TYPE File ARITH Arith.PASt file File.of default fileSHR J}J߭H}'|'}'P}( k* }'k'$}(<)** Multi-read failureP``} POPUP !sys:user>brad>newos>d.6>popup.PAS  }` -q'}c`} c`],```} c`} m` ʷ}} }}ʷ}}} pJ'} }ʷ} } ʷ} }ʷ}} }} }} }p}}}q@*q?kH|H` }`k `˼} } }}'*qkJkkH} } } } H@}}ʷ}*}, }}J}J߭H}'|'}'P}( k* }'k'$}(<)** Multi-read failureP``} 8 mH KHn``c}s`}}} m} H KH}}c}q`}]}}N]mN`]c}c}NFILESYSTFileSystem.PASws use of default fileSHR.SCREENSIZE Set the size of the screen.isk FILEDEFS FileDefs.`` aNo ]N`}}c}}H`}no*nono,no}}}}tsH}}PASlows use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk GETTIMESGetTimeStamp.PASATISTICS + ]sKvHHL } y``y`}} }} s}} sK}} sK]? \0" af| - Turn printing of statistics on or off.VENGER Run the disk DISKIO DiskIO.PAS- Turn swapping on or off. Partc9=H`c;=HHL```Ⱥ} ] ] ]}kk)U*}k} is the partition for swapping.R +TYPE File ARITH Arith.PASt file File.of default fileSHR ʷ}JkkH|} } }JK0(afk}HkḤ]m'm=H'},q#$JLH"}AmJ 6 7 afJpHq0o"afI I c}c}`` a vI(tsH*trJ,uqH*upJ,tHH*tH, }$w#wH ̿}R3HkHHo GJ}*~GJr*s*c}c}`` a>skM*kMskMJ,u*uH,tHJJ,ϡJ'ͫHsJJ@u'H*/I wv(w,w```v p'H͂GkMJk@!o3G%GkG`k#` a#J},k#}*~L`` a },NwkN) },w~wH }$߼ },ak?H@uH J,2I wv(w,w```v Hq J>tHJJJ,wI*`HtHHLK"}c}c}ck"kK`} ckk"K`c}ɺkkk"} kk0afkJ(}Ec}Ccc}K?kkkk0kk0afkJJH* HHrJHutJHJJJHJLH v=H,=H HHJHvJJKHv(v' kJkHkH0kHkH0afkkk"}k"}afkkk"}k"}afoϮ kJNwkN)Kk"JOkkO)3wM'}w' rHJr HJv'v=H'w,w``I vw(w,w``v``v I wv(w,w```v xk"KkH}wk"KkHm[kHwH ̮kk"}k"}afk"KHkJkkJk"}kJk"}afkJkJk"}k"}aτ}vv'v=H'  hav,VvI'JvI'>vI'7tJ*tHH,uJ*uHH, f}R4F }0`kH`k`kJkJkHkH0kHkH0afkJ(χkkHkJJIkJkJJkHkI0kHkIJJJJm' ''=H'\H``  H H'H'``Jn\(]``c}mH`}( =H o)&  H `' c}ɺan' n'JHHH0HHHH0afJHHHnHJ0 J"afmI''''\J {L'mL* \L` = o)B& *HJ ``JJ J  'J  J'``JnJHHHH0HHH0af H ̶\yn' h #`Jm\>m``m``&m&m &m LHLJHHH0"af`` c}c}`` a HHJJHp`o` ' 'LJL]JH ,}mJ KH HHA}JH=]#H`G` aLJ*````vϷc}c}`` a rt*IrtJGu *=u*/u(*!uP*ud*H, J=HKJHHHLJ@,LJ@*@H% I m  w)$d x) H H prnKH`o`n`E` p`o``m*m=,m*m,H,J@]   ?t*p*pq,L}*c}(cc}ɺkHkKMtkM*\m'HHJ=HHJHmJJKHm(m' ' n %JpHq0Hq0``c}9k=H`}$}9o``c};k=HHL`}&};﷼ }帺a# k=NwkN):}$w߼ }AwJ 帺a}$wk#,7 8 Tfhpr PRPASsyscom ~ POS D.65 b-bo   13:J K%%a%FH ndn  ,=~ / ||6 )WRITER WRITER.PAS ZfX      P R & ?LERYfDpopup DYNAMIC DYNAMIC.PASddndm  F( j+,RW%AxBADMENU OUTSIDE MENU INITPOPUDESTROYRALLOCNAMDESTROYNIMPOSSIBIMPOSS2 GETACTIOSETCURSMTfhpr PRWAITNOPRMIN MAX GETFONTPGETSPAREDOCLEANUHELPKEY CTLC CTLSHFTCWRITESTRDRAWSTRISTRINGW FILL SCROLLONHANDLESCSELXOR FH CHECKCURALLOCATEWATCHCURSETUPCOMGETSIZES ||6 )WRITER WRITER.PAS ZfXMEMORY Memory.PASP Psys:user>brad>newos>d.6> POS D.65 b-boot CODE Code.PAS>?LERYfDpopup DYNAMIC DYNAMIC.PASddndm brad>newos>d.6>popup.PASGETTIMESGetTimeStamp.PASBE%W%AxBADMENU OUTSIDE MENU INITPOPUDESTROYRALLOCNAMDESTROYNIMPOSSIBIMPOSS2 GETACTIOSETCURSM@##\CAL X aDYNAMIC Dynamic.PAS!  /$WAITNOPRMIN MAX GETFONTPGETSPAREDOCLEANUHELPKEY CTLC CTLSHFTCWRITESTRDRAWSTRISTRINGW FILL SCROLLONHANDLESCSELXOR 0afo kkH JkIH0kK}Cafk@% kHkIH0kK}Eaf}Ec$` }Cc$` kkHkJHHJHkLkkHkJX0a|6&%J@SCREEN Screen.PASDDDxZPY HHJHkM kkHH {(> k`}k"``c} ɺkJk{JkHx0{k"}afxk{JH k`0`kH`c} ɺkH |JNwkN)w`lvlvPOPUPCUR PopUpCurs.PAS>newos>d.6>popup.PAS0`kH`c} ɺwH z(2 |`}k"``c} ɺkJzkHx0k"}af|`0`kH`c} ɺ]IO_OTHER IO_Others.PASup%%%=`  N @#\ F( j+,R IO_UNIT IO_Unit.PASe*( PASCAL.RUN|6 K)!SYSTEM System.8 9  8xk+ }kgks,)33} 3Jd} 87k+ }k&33} 3Jd} 8 ]}} ʷ} } ʷ}  }}  33} 3Jd3}  B BY BYX}   } }}   } +B-BYX} -'} }u} 09DX 33} 3Jd3} 0J} }L}}ʷ}}ʷ} }} 33} 3Jd3} B BY BYX}  }}}  ts ,s 'rq,s KrH} 09DX t 33} 3Jd3u }sI}s]}}ʷ}} ʷ}  ϳ}azDX}aJAH}qAZDX 33} 3Jd3}r* rH}rq}}}}}  33} 3Jd3}qr+τrq,qrts*}  }   tH}t}} }azDX}aJAH}qAZD09DYX Ϋ}r]}c}ɺ}  ψ} TRUE}FALSE}} *} }}}t}  }  tsHr ty)} }tHp} B BY BYX}   } }}   9} }*}}}} 3 }0}}3 }33} 3Jd3}}ʷ}}ʷ} }} (&tq*tH}t}} }}tq$DX 33} 3Jdq`4}}ʷ}}ʷ} }}33} 3Jd3q,} }}qJ}}} }]}}ʷ}} ʷ}  } 33} 3Jd3} B BY BYX}  }}}  Ϲ }+'}}!}}  33} 3Jd3r+Ϣrq,qrts*}  }  "tH}tJ}} }tsq*s-'}}q *}0q0HD}09DAq JAHDY}azDX}aJAH}r}X 33}Hq ty)}tJ tH}  }  !sHr ty)} }tH͐} B BY BYX}   } }}  3Jd3}}r09DX r0JrAJ HkqK{HkIk|qK{Hs.z|, 0z|, %z  Y} ((tHtq)}tJ}} }tsq*sHq ty)}tJ tH]s)33} 3Jd|,|'k, d}azDX}aJAH}r}X Gz33} 3Jd3}|kH3}c} ɺ}  dIIskk)Ϧ}}k}kk)&}kazDX}k}kaJAHkH} }3s' }}I8^` 12READER sys:exp>reader.PASg.PAS k+sHk8k*1} }*}} } }3k+sHkkHRks,)33} 3Jd} 9 :  ?NN?NN?NN?NN?NN?NN?NN ?NN?NN?NN?NN?NN?NN?N 6q *}0q0HD}09DAq JAHDY}azDX}aJAH}r}X 33} 3Jd3}}r09DX r0JrAJ HkqK{HkIk|qK{Hs.z|, 0z|, %z| c`c`c`c`c`]mFɖ``J``<``.`` STREAM Stream.PASP SPsys:exp> POS D.65 a-boot FILEDEFS FileDefs.``dE ]``c```c```c```c```c`?no)`mPASQP|6>* dGETTIMESGetTimeStamp.PASap)Mn?NmNn?NmNn?NmNn?NmNmHmp)гnHno)Рc c ?NN #\#\X aREADBOOLREADCH READCHARREADIDENREADINTEREADSTRIREADX ?NN?NN?NN?NNc?NN??NN?NN? READID ?NN?NN?NN?NN?NNc?NN?NNr:3ndn:  ,=~ /2>I ||6 -)IOCREAD IOCWRITEUNITIO IOWAIT IOBUSY IOPUTSTAIOGE?NN?NN?NN ?NN ?NN ?NNp ?NTSTAIOBEEP IOERR FLPERR DiskIO.PAS%%%%:part2>IO_Unit N =z 4:R zN ?NN ?NN8 ?NN ?NN ?NN ?NN ?NNARITH Arith.PASPGoY> @r PASCAL.RUN|6 -K)9(!:SYSTEM System. ?NN ?NN ?NN?NN?NN?NN?NNPASIO_Unit.PASSCREEN Screen.PAS%%a%?NN?NN?NN?NN?NN?NN?NNPOPUPCUR POPUPCURS.PASows use of default fileSHR *SCAVENGER Run the disk  ?NN`?NN?NN?NN?NN?NN?NN: ; ?NN?NN ?NN ?NNp ?NN8 ?NN ?NNNN}NN}NN}NN}NN}NN}NN?NN?NN?NN?NN?NN?NN?NN` }NNP}NN}NN}NN}NNU}NN }?NN`?NN`?NN`?NN?NN?NN?NNN}NN}NN}NN}NN}NN}NNN?NN ?NN?NN ?NN?NN ?NN }NN}NN}NN}NN}NNA}NN"}?NN??NN?NN! ?NN ?NN!!?NN !?NN}NN}NN}NN"}NNA}NN}N?NN?NN?NN?NN?NN ?NN!?NNN!"?NN"?NN!#?NN#?NN!$?NN$?NNN"?NN#?NN$?NN?%?NN?&?NN'?NN!%?NN %?NN!&?NN&?NN'?NN'?NN!,?NN-?NN.?NN/?NN/?NN0?NN0?N(?NN(?NN!")?NN`)?NN*?NN`*?NN! +?NNN1?NN1?NN2?NN2?NN3?NN3?NN4?N`+?NN!,?NN-?NN?.?NN /?NN 0?NN ?NN4?NN5?NN5?NN6?NN6?NN7?NN7?NNN?NN?NNc?NN?NN?NN?NNc8?NN8?NN9?NN9?NN:?NN:?NN;?NN?NN?NN ?NN ?NNp ?NN8 ?NN ?NN;?NN<?NN<?NN=?NN>?NN??NN?N?NN?NN?NN?NN?NN?NN?NN`N?NN?NNc?NN?NN?NN?NNcno)n?NNnHno)]``}$```}$`}NN}NN}NN}; < 4}1}tH P}tH }t c}t }1PtHs}}t Prq*ϡrH))}r P帺)J))}P)JQUICKSORsys:exp>os>quicksort.PAS1% QUICKSORT.PAS quicksort.pasRT.PASpasH 7qJ))}q P帺)J))}P)J5rq*0}1}q P}q }r c}r }1PY}1}t P }t }q c}q }1PqtJ`srJH`a )*k['Z}\k[J߭}\k[JJ߭k[J[qqtJsrJH,6srJH )qJ"k[ H[}\k[JqJk[H[}\k[Jtr/qtJ )r"k[H[}\k[Jsk[H[}\k[JrqJmJrk+ϫ))}r P帺)J))}rH P帺)J8l}}r PrH}qJ }q cqH))}q P帺)J))}P)J7η}qJ }no,nono*noc}) }})P]}mHm m ) v }sH}sH}srHL}srHLu}sHPrJNkZ n}1}tH P}tH }tsHL c}tsHL }1P}tH }s R84}1}tH P}tH}r,#}sH}sH}r}ru}s}r,}s}s}r}ru}sH}s,#}sH }s c}s }1P}t }s R80}1}t P}t }s c}s }1P}tH }t R84}1}tH}sH}s}susHr}s㭈qp*EqH}qt+pJ}pt)qp*}p}p}q}qu̵}s}s P}tH }t c}t }1PtHs}}t Prq*^rH}r }@7qJ}q }@5rq*0}1}q P}$@B&N}NN}NNU}NN }}p}pupsJ`rqJH`a )&w' } wJ߭} wJJ߭wJ ipsJrqJH,2rqJH )pJwH } wJpJwH } wNN}NN}NN}NN}NN}NN}NNJsq+psJ )qwH } wJrwH } wJqpJmJ3qk3+O}q}qH,5}q㭈qH}pJ}ppH}pIO_OTHER IO_Others.PASASs use of default fileSHR.SCREENSIZE Set the size of the screen.isk DYNAMIC DYNAMIC.Pt+}pJtqJ̪]}mH cm[m )ZpkZ }1}tH P}tH }tsHL c}tsHL }1P))ASASows use of default fileSHR *SCAVENGER Run the disk INITCURSDESTROYCSETCURS INITFOOT }tH P帺)J))}s P帺)J84}1}tH P}tH }s c}s }1P))}t P帺)J) )}s P帺)J80}1}t P}t }s c}s }1P))}tH P帺)J))}t P帺)J8< = J͌mJrk+g}r }rH R8K}}r PrH}qJ }q cqH}q }@7}qJ }PrJ̒]aNaN@ aN  aNs!aNj"aN#aNI$aNz%aNz&aN12z )R 0}@7qJ}q }@5rq*0}1}q P}'aN(aN)aN*aNe+aNg,aNY-aN.aN/aN"0aNPERQ_STRPerq_String.PAS1YPsys:exp>os> POS D.65 q-boot INTEGERSSTRINGSOMA1aNv2aN3aNo4aN5aN6?6aN7aNbU8aNzg9aN2:aNX MIN UPCASE ;aNf<aNyV=aN>aNX?aN@aNtAaN#BBaNCaN?DaN EaNFaNưGaN-]HaNIaNwJaNKaNDLaNMaN[RNaNxOaNUPaNQaNTRaNt%SaNJTaN#UaN VaN) WaN%oXRANDOMNURANDOMNUMBERS.PASuse of default fileSHR *SCAVENGER Run the disk d aNYaN+ZaNvm[aNe\aN]aN^aNB_aN*`aNQaaN((]c a'ccHcba'bbHbcaNߛcaN߭baN߭"caN߭]PDaN EaNFaNưGaN-]HaNIaNwJaNKaNDLaNMaN[RNaNINITRANDRANDOM MNUMBERS.PASuse of default fileSHR *SCAVENGER Run the disk d accHbMbaN!aNaNaNaNaNyaN8aNUaNiK q }r c}r }1P̜}1}t P}t }q c}q }1PqtJ`srJH`a )*k['Z}\k[J߭}\k aN aNG( aN1 aN; aNaN`)aN aN"aN7aN\a[JJ߭k[J[qqtJsrJH,6srJH )qJ"k[H[}\k[JqJk[H[}\k[Jtr/qtJ )r"k[H[}\k[Jsk[H[}\k[JrqNaNGaN<8aNUaN&aN,aNaNaN2aN= >  et PROFIL.SEG PROFILE.SEG Get USERPA.SEG USERPASS.SEG Get MULTIR.SEG MULTIREAD.SEG Get POPCMD.S Sides 2 Density SINGLE Fast ! OS.SYSTEM.BINARY - OPERATING SYSTEM SYSTEM SEGMENT FILES ! Created 29 Jan 82 12:35:43 GRS232BAU RS232BAUD.PASows use of default fileSHR *SCAVENGER Run the disk  et ARITH.SEG ARITH.SEG Get ALIGNM.SEG ALIGNMEMORY.SEG Get CONTRO.SEG CONTROLSTORE.SEG Get CODE .SEG CODE.SEG Get DYNAMI.SEG DYNAMIC.SEG Get EXCEPT.SEG EXCEPT.SEG Get GETTIM.SEG G ETTIMESTAMP.SEG Get LOADER.SEG LOADER.SEG Get MEMORY.SEG MEMORY.SEG Get MOVEME.SEG MOVEMEM.SEG  Get PASREA.SEG PASREAL.SEG Get PASLON.SEG PASLONG.SEG Get PERQST.SEG PERQ_STRING.SEG Get READE}96003*͠}E48003*͊}24003*t}12003*^}`6003*H}Y3003R.SEG READER.SEG Get REALFU.SEG REALFUNCTIONS.SEG Get RUNREA.SEG RUNREAD.SEG Get RUNWRI.SEG  *2}1503@*}1103W*+},k)N},N},k*N}-N}-!N}-AN}-aN `c RUNWRITE.SEG Get SCROUN.SEG SCROUNGE.SEG Get STREAM.SEG STREAM.SEG Get SYSTEM.SEG SYSTEM}+]**!} ````%﷼%a'} ````%.SEG Get VIRTUA.SEG VIRTUAL.SEG Get WRITER.SEG WRITER.SEG ! OS.PROGRAMS.BINARY - OPERATING SYSTEM PRO﷼} a`} V} B}c} c} xyJH v!xw(`,J,`%}%}﷼}%GRAMS BINARY FILES ! Created 29 Jan 82 12:35:43 Get CLOCK.SEG CLOCK.SEG Get CMDPAR.SEG CMDPARSE.SEG GIO_UNIT IO_Unit.PAS.PASs use of default fileSHR.SCREENSIZE Set the size of the screen.isk SETBAUD BADBAUDR et DOSWAP.SEG DOSWAP.SEG Get GPIB.SEG GPIB.SEG Get HELPER.SEG HELPER.SEG Get SHELL.SEG   SHELL.SEG Get INITSH.SEG INITSHELL.SEG Get LINK.SEG LINK.SEG Get LOGIN.SEG LOGIN.SEG G> ? `c(. Delete some files then run Scavenger.`c)}P )]]]}c/HELP c]` cc** Unable to reset `cc}`c3}d 3]` cc** Disk Error: `cc}`c)}P )]}amcREAD`ccWRITE`cc WRITE FIRST`cʹc` RECALIBRASYSTEM sys:exp>system.PAS TE`c͒cFLOPPY HEADER READ`cgcFLOPPY HEADER WRITE`c<cUnknown operationEG POPCMDPARSE.SEG Get POPUP.SEG POPUP.SEG Get POPUPC.SEG POPUPCURS.SEG Get QUICKS.SEG   QUICKSORT.SEG Get RANDOM.SEG RANDOMNUMBERS.SEG Get RS232B.SEG RS232BAUD.SEG Get SHELLD.SEG S HELLDEFS.SEG Get UTILPR.SEG UTILPROGRESS.SEG ! OS.IO.BINARY - OPERATING SYSTEM IO BINARY FILES ! Created 29 Jan 82 12:35:43 Get ALLOCD.SEG ALLOCDISK.SEG Get DISKIO.SEG DISKIO.SEG Get ETHER1.SEG ETHER10IO.NrNrNc^C`c]Nrc}  m* JHmno) nHno)mSEG Get ETHERI.SEG ETHERINTERRUPT.SEG Get FILEAC.SEG FILEACCESS.SEG Get FILEDE.SEG FILEDEFS.SEG]}Pc}N}m M0HN}}} JPPm Lm'δ}P}PN} Get FILEDI.SEG FILEDIR.SEG Get FILESY.SEG FILESYSTEM.SEG Get FILEUT.SEG FILEUTILS.SEG Get IO. ` _N` ` N` ``vN`sNtNu`N﷜﷜﷜﷜SEG IO.SEG Get IOERRM.SEG IOERRMESSAGES.SEG Get IOINIT.SEG IO_INIT.SEG Get IOOTHE.SEG ﷜ Nqc)}P cNq}PP  N`Z) IO_OTHERS.SEG Get IOPRIV.SEG IO_PRIVATE.SEG Get IOUNIT.SEG IO_UNIT.SEG Get PMATCH.SEG PMATs''ss`tN`uN` ϸ]` cc** `cc}`c for `cCH.SEG Get READDI.SEG READDISK.SEG Get SCREEN.SEG SCREEN.SEG c})`c. Run Scavenger.`c)}P)})P R` cc** No free blocks in `cc}? @ vNxNwNr`,`` X` `|cConsole:````cConsole:```` ` HGETTIMESGetTimeStamp.PASCZP"Y5 system )PASCAL syste*``cɺ4`c6`N߭N߭8`NN`` `Z,7mSTREAM Stream.PAS'''Q'system ' '{FILESYSTFileSysN`3>dcc a``N` ``NLogIn.tem.PAS.PASSCREEN Screen.PASs syste.Run J JPNNN] )Bm d"nsystem /stem | rr' PERQ_STRPerq_String.PASPAST) READER Reader.PASsystem TYPESTIC 68EFSRRD))P33RR33TTVhrh"V' comLOADER Loader.PAS  y#\"g 33j))- --)--*``NLogIn.'A999READDISK ReadDisk.PASz9HRH Q  system \ e`cd2Rrp(^})p`)JPc Error is: `cp``c = `cc}`.Run J JPNNN] )Bcc: Address is `}ac`` I`}}ʷq'ψ}N߭c. HardDisk; Cylinder `}cEXCEPT Except.PASstem.PASIO_INIT IO_Init.P``c, head `}Rc``c , sector `}c``cac. Floppy; Sector `}NcɭAS` P Psys:exp> POS D.6 h-boot IO_OTHER IO_Others.PASQ``c , cylinder `}Ncɭ``c` cc** Disk Error: `cc}`c on `k)P4x(   IO_UNIT IO_Unit.PASG&_$.$N`}*k,`)}Pk)N`}*k,` -` cc** Flush Error: `cc}`c  on `k)N`}*k,`y$.$-#\#0PASCALG<ZHaMEMORY Memory.PASZP[!G8k`Zla)}Pk)N`}*k,`-           NNqN}yZRV''xCODE Code.PAS''"<zz#\@ A 11 Feb0 DH4B'ETHER10I Ether10IO.PASDP#\D8C "iU}N߭IN}N߭NH}NpN}NpINo NH}}]} }N}N\} }  system 'dd>syWRITER WRITER.PASS&_8y#\} N߭IN} N߭NH} N߭ IN ys)HIs,s*sJN N sMsLtIN zossyss>sy9STREAM STREAM.PASS&_A y#\WvH tsMsLtIN t}NvNtNHuH}N?sKuL(H uKMuH}Nu} SYSTEM COMMAND SETDDS SYSVERS CTLC CTLCABORCTLSHFTCEXITPROGHELPKEY CTLC CTLCABORCTLSHFTCEXITPROGBADPART PARTFULLFSNv d,]}c}ɺ}}]}N߭'}N߭' }\mͭ}N߭ wIN wINwvNOTFNDFSBADNAMHELPKEY RESETERRDISKERROPRINTFAIDISKFAILFLUSHFAIHER10I Ether10IO.PASDP#\D8C "iUNuKtH vNuKtH w)J ]}N߭(J }N߭J rx)tM' tLtHrHrx)vKtH wL dDISKIO Sys:Boot2>new>diskio.PASDsys>>ARITH Arith)J`ʷa}^)J`ɼ^`ʷ<}`ʷ,}}`ʷd]}oN` ɼ.PASeb0&_ sys  system#\$ 0 ' dALLOCDIS AllocDisk.PASm.PAS`ʷoe}N}N߭b}N}N߭K}N}N߭4}N}N߭dIOERRMESIOErrMessages.PAS}}]m*m,mNJߛmNJ߭H]LJop)}oNoHop)}}}N߭ IN}}A B x``} c@`}} ﷼}N` N`˼}s`tN`aNrk;} wMN}1}N` N`˼}s`tN`aN}M Np --r    zk)Б dt'}ɺa`&}} wMN1} c@`kN]`6060af``}c```}c```}c`}}NARITH Arith.PASyP PSys:Boot2>new> POS D.65 b-boot FILEDEFS FileDefs.N}NI g}N}N߭NJ`} N``˼}}}}(}N߭'α}'N I g}PASQP|67>* wdGETTIMESGetTimeStamp.PAS#\N`} N``˼}}}}c`}c`}c`6060afw?`) DiskReset: Can't find#\PASCAL X aIO_UNIT IO_Unit.PASew>diskio.PASD)Illegal operationPtN`}` - db$]??h*w,HϚD:zZN\cv/FSfj'KSCREEN Screen.PASnew>diskio.PASDdiskio.PASDv v/FSfj'KMEMORY Memory.PAS%%%%diskio N  4XN\)DiskIO: FailurePtN`}ɛ$` --{i}ɛ&N`u`vN`aN\}ɛ&N`u`vN`aN; DYNAMIC DYNAMIC.PASew>diskio.PASD)-Unable to scavenge at runtime. Run Scavenger!P )``}c ` k`c}c} ɺ}k``}ɺ}yN}}k``}ɺ}c` }} ~0~0afN}o`ʷ}  }ʷ}}ʷ}}}I}}} pN} I} }} I} }} @J qx)} 4q?NqHqx) J qx)} qNqHqx)J qx)} qNqHqx)}}}}}ʷ}m+<m@*}I}4LmH}m@JLIJ}m@JMgmI,}I}4L@H HmIJHBm$I,}I}4I`}ɺa@}}ʷ}}}ʷ}}ɺ ɼ}ɺ s`]}}ʷ}I`}ɺa }NL@HmIJH}mI$JLIJ}mI$JM}} }p'NN]}}_}}ʷq*} }}q)p N p*IyI(z ϕy`c} c} ɺ}x`}}}ɺab}}ʷ}}wN}}ʷ}y`}ɺN } }}q+N }  v }}\ }} ̝}}ʷ} }}}}ʷ}w`}ɺa}a&}}}}}}N z y{H az -}}ʷ}}}}}}py'Nͤ{I'P}  }}}}` ʷ]}}ʷ}} }}} ʷ}u`}ɺa}  }} }}`  N:}}ʷ}p)!}ɺ }p`}}}ɺaNM} N:}}ʷ}p+!}ɺʷ]~0~0afNm`n`o`p` H)7Recursive call to Scavenge not allowed. Run Scavenger!P }p`}}}ɺaN]o*o`}o`} c} c} cɺaNu } } }  \}} ʷ} }} )N}}}}} }ʷ~0~0af} Ϝ}}ʷ}}}} r{H}}ʷ}}} ``}c` }  h}} ʷ} }}㯆} } } |Hr`c}c}ɺ}k``}ɺ}kC D PASp>($BSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptGETTIMESGetTimeStamp.PASATISTICS +  | - Turn printing of statistics on or off. sys:exp>$ DISKIO DiskIO.PAS- Turn swapping on or off. Part is the partition for swapping.+TYPE File ALLOCDIS AllocDisk.PASSws use of default fileSHR ]'%a2o(`!(`(` d}`2% }`*SCAVENGER Run the disk READDISK ReadDisk.PASASws use of default fileSHR *SCAVENGER    k6(}`c%%a }` %a }` 6} Run the disk EXCEPT Except.PAS.PASws use of default fileSHR *SCAVENGER Run the disk7ʷ}7' %}7}` ~`ad-\wuKPLFE{20.,*?  SCREEN Screen.PAS2 09:44:53 of def05 Jan 82 09:43:59R *SCAVENGER 05 Jan 82 09:44: FILEACC %X ~`o ('k#(%]````%````%}} ʷ}}B} } }} ʷ} }+}} a`ʷkHk* } } } }}}ʷ}}}} ESS.PASws use of default fileSHR *SCAVENGER Run the disk WRITER WRITER.PAS l }} }k}}ʷ}}B}}  }} ʷ}}} }  }} ʷ}}} pPsys:part3>Segs> POS D.5 p-boot PaSTREAM STREAM.PASQP4x`"w>'} }``}c` k`c}c}ɺ}k``}ɺ}kN} }k``}ɺ}c` }}}ʷkHkk)eop \DYNAMIC DYNAMIC.PAS|""\ HJ}}ʷk},k}*k(^}}ʷk},}k}} k}*}k}} } 4" 4COM FILECREATESPDESTROYSTRUNCATEREADSPICWRITESPIINDEX BADLENGTNOTAFILECHECKHEAFINDBLOCLASTSEGB}kHtmn   LASTNEGSSCAVENGEALL SEGADDR SHR *SCAVENGER Run the disk WRITER WRITER.PAS l ;<2s1 FILEDEFS FILEDEFS.PASlows use of default fileSHR *SCAVENGER Run the disk  ARITH Arith.PAS\xshe.SCREENSIZE Set the size of the screen.FILEDEFS FileDefs. D E FILEDIR FILEDIR.PASllows use of default fileSHR *SCAVENGER Run the disk  Jd}4},Ϥ}>N`a8k8( k8J,\}4}4 N }`k8J` J`.DRJP}}k8H`}k8J`Jd}4}4 N ..DRR3F}4 }4 N ...DRR3}4,}4}4J }4}4Ht}.3\}..3}4,}4}4J2},\}4}4 N }P}4}4Hc}`SN]}o NJ}3}dc}5c}ɺaNk \} c} }{k)|}{H{H{k)|M]}&}c}&  }a``}c` kkH}k`k`ʷk5Jkk)<} \}} }6k N N`ʷkHkk)}}]N3}dc}c}ɺaN`}NJ3kk3)ϋ}kN}4ʷk}4N}4W}}4c} }&}39}}4k}4N}k \}k`ʷ}drJkk)ϫ} \}}}k N `}k N J`k``}}c` \kHkk3)uk }}c` \kH}$}c}$  }a``}cJJdc}>N`}} }k N N`ʷkHkk)U} \} }rJ N }` kkH}k``}J1kk1)}kNV}}kNc} }$}3.)PutIdInDir when alrɺ}}}rJ N JdN}}dP]3}dc}5c}ɺaNk }\}k`eady thereP )W}kN}P}kN}}kNN}k``}}c` \kHkk1)5kʷk5Jkk)F} }\}}}} }6k N N`ʷkHkk)к} '}} }6k5J N GETTIMESGetTimeStamp.PASxshe.SCREENSIZE Set the size of the screen.COMPILER HN}'\}:N`as,+}}`s`J } s+ }>N`arsJJ,r'rs)\}}sH`rsJ`J}}rH`}rJ` JdP}}}J }})}Pa}'\N} NJ })}PaNc}}6ɺaN9k9 \}>N`a'+}}`}J`E F 78@BS>N`}} }k N N`ʷkHkk)U} \} }rJ N }LOADER sys:exp>loader.PASmp.PAS, FILEDEFS FileDefs.PAS.PASxshe.SCREENSIZE Set the size of the screen.GETTIMESGetTimeSt amp.PAS$BSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptFILEACCEFileAccess.PASSTATISTICS +  | - Turn printing of statistics on or off. sys:exp>$ ARITH Arith.PAS - Turn swapping on or off. Part is the partition for swapping.+TYPE File DISKIO DiskIO.PAS file File.of default fileSHR ,I ]c ** Loader-F-`cc}`cs not found.`c\] } Pc} } *SCAPsys:part3>Segs> ALLOCDIS AllocDisk.PASows use of default fileSHR *SCAVENGER .RUN a'c.Run cc````cɉ&`cɛ$cɛ"cɛ c`$ (ec * Run the disk READDISK ReadDisk.PASlows use of default fileSHR *SCAVENGER Run the disk* Loader-F-`cc`c% has an incompatible run file format.`cMc ** Loader-F-`cc PERQ_STRPerq_String.PAS46:56 of def05 Jan 82 09:43:59R *SCAVENGER 05 Jan 82 09:46: FILEACC`c is ill-formed.`c'\ BBYXIϟc ** Loader-F-`cc`c was ESS.PASws use of default fileSHR 8VE9ERj $ `WRITER WRITER.PAS l linked as a System,`cc- it cannot be run as a user program.`c'\( c ** pPsys:part3>Segs> POS D.5 p-boot PaSTREAM STREAM.PASQP4x`"w6'Loader-F-`cc`c was linked with System.`cɉ``c.Run`cc, but t \DYNAMIC DYNAMIC.PAS,"\\he current system is version `c``.ccc You must re-link.`c'\" 4COM FILEGETFILEIPUTFILEIDELETEFIGETDISK FILEHASHGETIDFROPUTIDINDPARSEFILGETROOTD FILEACCHLH]c ** Loader-F-`cc}`c. not found.`c'\I5}6kN`ʷ}]35TL35N  6$8O!PESS.PASws use of default fileSHR 8VE9ERj $ `WRITER WRITER.PAS l F G vH }} ̟}} c* ` 'c&``d`'  ````' c&`'  '  |6 )aPERQ_STRPerq_String.PASPASmp.PAS˝JJc( (*' c}) ])) P  3ZREADDISK ReadDisk.PAS#\d10 Feb5` ʷ}<}6 ʷk5F}G}<kG(kH(I}@}6 ʷkI}@}6 IkIc$** Loader-W-Hint failed for `33 XN33  } Jv*:c"** Loader-F-Overl cɉ&`"}i.SEG Jdcc}`c*, using string apping XST/GDB's.`c'} } J } X}} ʷ}v} vH }$} } ( }}}v}name.`c3}dc}8c}8a5}6k5` ʷ}<}6 ʷk5F}G}<c˼}F'ψ}@}6 ʷ}B}@vH }} ̟}} c* ` 'c&``d`'  ````' c&`' }>}B ʷ}@}B ʷ}:}@ ʷ}>9J4k4*k4,Ϭ cɉ&`"c ** Loader-F-`RUNREAD RunRead.PASP SPsys:exp> POS D.65 a-boot CODE Code.PASc`c.SEG`k4*"c contains no code.`c is too long.`c'\}>(ωQP|6>* dGETTIMESGetTimeStamp.PASa cɉ&`"c ** Loader-F-`c`c%.SEG - QCode version incompatability.`c2 #\#\X aSYSTEM System.PAS! /$'\c}D`a}Jʷ}Lʷ}J`}J}J@}JP}J0}J }J}JKk4}L}LX0a 2( 2 FILESYSTFileSystem.PASan ^T ]5k4J}L}L}L}L}L}L}:߭}L}:߭}Lk5}L}G}LkElevl wMEMORY Memory.PASader.PASmp.PAS '] J}$}" :}}ʷ}ppH} } HJo,o}}̻} 0}}ʷ} }VIRTUAL Virtual.PASder.PASmp.PAS HJo,o}}ț" " J }}"} }} ʷ}} } } Jv*:c"** Loader-F-OverlIO_UNIT IO_Unit.PASa >pascal.RUN|6 K) ?OMPILERDISKIO DiskIO.apping XST/GDB's.`c'} } J } X}} ʷ}v} vH }$} } ( }}}v}PAS>pascal loader ~4>444H4G#\:29ARITH Arith.PASeb:exp> G H  c}a(F))Can't overwrite old file with directory: P3}d \}N`3}dar'}r` ʷ}}ʷ}} N}r3}NoHo,N}oNJ3R4Npo'3c}N`}'\}33}d ʷ}3 }33}d3c}N`c}3N`}}3dc}c}ld 3o,3d 3}oNJ3dc}3NJ3,R43}d 3I5N6k5H5k5+ N aNnkn 2)Bad Partition name on P3}3d \}o}dc}oc}m aNnkn 2)CBad Partition name on 6}3k5HNJ3R4N6k6k5'3}d 3}3k5NJ3}dP]})})#,})"N})#P3}d \kmkl(=)!Files not in the same partition: P3}d \}f3}d ʷ}f +)File NU})})#  J})})`#` J$JanFebMarAprM10 Feb 82 13:2IO_OTHER IO_Others.PAS@ }%XP>NEWSYSTEM.CMD %loader >not found: P3}d \}j}fʷ}j'3}d3}h3}3d ʷ}f}h ]}f3}d ʷc}3}>PASCALoaderSTREAM Stream.PAS%E#8E8D#\c PZP{PZPY#\} ndf aNnkn .)Couldn't re-enter P3}3d \͝}h >3}3d33}3d}h3}3d ʷ}h FebSnONNsys:exp>   loader POS D.65 a-boot 10 Feb 82 13:28:30|WRITER WRITE c}3}f aNnkn *)Couldn't enter P3}3d \}f3}d ʷ}j}fʷ}j }3PP}fR.PASpafcaa#\STREAM STREAM.PASCMDXP>N]}c}N`} 3}d ʷ}  N\}}N} } ʷ}} ϼ} @|6;  |6 )JLOAD EXITPROGREADRUN RESETERRLOADCODELOADSEG FSN\}}ʷ}㰈Jt{)Y}tNA}}tNc}tH}}tN aN\tHNOTFNDLOADSTACSTREAM Stream.PAS%E#8E8D#\c PZP{PZPY#\} ndt{)Ч} }ʷ}} }@)Can't create file named P3d \} }dc} FILEUTIL FILEUTILS.PASows use of default fileSHR *SCAVENGER Run the disk } } J`` J\.DR41c} .DR }.DR } ROOT.DR3>)The n ame "ROOT" is reserved: P3}d \͡} .DR30)Null filename: P3}d \c3} dc}H I 4Ϟ}\ N` a2}3}\`k2J` JPc}\`k2` }}}3 | - Turn printing of statistics on or off. sys:exp>$ FILEACCEFileAccess.PAS Turn swapping on or off. PartJd3}d}.}0aRk(k'kk(},}dP3},d3}39I8k9},k98}k9 is the partition for swapping.+TYPE File ARITH Arith.PASt file File.of default fileSHR >'k98k9H9k8I,k8)}5}cKk8}3JJ,\4}5}}3`k8}3J` JP}3*SCAPsys:part3>Segs> DISKIO DiskIO.PAS.5 p-boot Pascal.RunR *SCAVENGER k8]}N`}'\}:N` a(-}>N` aHo'\\ooo3} Run the disk ALLOCDIS AllocDisk.PASows use of default fileSHR *SCAVENGER Run the diskdc}c}ɺ}.3.po's},}prJ`rH` ooo[}..30qo's},}qrJ`sqJrH` o READDISK ReadDisk.PASSows use of default fileSHR *SCAVENGER Run the disk FILEDIR FileDiroosp's})\sHps}3I33S/ffoT9h78.PAS.PASs use of default fileSHR 8VE9ERj $ `PERQ_STRPerq_String.PASl ?@55R))T33\\\\3333pPsys:part3>Segs> POS D.5 p-boot PaSCREEN Screen.PASPASows use of default fileS12 ] 3333  1 330HR *SCAVENGER Run the disk DYNAMIC DYNAMIC.PASASows use of default fileSHR })})  J})})} J})})`P`g77^  3.po's},}prJ`rH` ooo[}..30qo's},}qrJ`sqJrH` o J)})P }``c` m``}}}14}c` }``c` m``}}}14m``}}oosp's})\sHps}3I33S/ffoT9h78c` ]},R3}} (c} N` }},dc}N`}\}Pk'}\ 4Ϟ}\ ?@55R))T33\\\\3333N` a2}3}\`k2J` JPc}\`k2` }}}3 Jd3}d}.}0FILESYSTFileSystem.PASASxshe.SCREENSIZE Set the size of the screen.FILEDEFS FileDefs.aQk'!kH}kNJ3R4}\}P}}kNJ3}, Jdk'}\PAS.PAS$BSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptGETTIMESGetTimeStamp.PASATISTICS + I J IO IO.PASam (allows use of default fileSHR *SCAVENGER Run the disk      dk)o}IO Complete OKP͛}IO BusyP͆}Bad Unit NumberPj}.Raw Block IO to this device is not im]} } }}}巼}aa``}c ` }}ʷ}}1}}}plementedP/} Write FailureP}BlockSize ErrorP}Illegal Command for this deviceP}Nil Hea5}} } }}}]} } q}aa``}c ` }}ʷ}}der PointerPͭ} Address ErrorP͒}Physical Header CRC ErrorPl}Logical Header CRC ErrorPG}D1}}}5}} } }}}巼}aa``}c ` }}ʷ}}1}ata CRC ErrorP+}Device Not IdleP}Undefined Error!P} Device is not a character deviceP}}}5}} } }}}]/X -:`}YJ^˼}5%/Circular Buffer FullP͡}!Logical Header SerialNum MismatchPr},Logical Header Logical Block Number MismatchIO_INIT IO_Init.PASSSSASxshe.SCREENSIZE Set the size of the screen.IO_UNIT IO_Unit.PP9})Cylinder Out of RangeP}Device not readyP}Missing data address markP}Missing headeASP.PAS use of defaultBSETSEARCH {Parm} Modify search list. "SetSearch CR" will promptk IO_OTHER IO_Others.PASows use of defr address markPͪ}Floppy write-protectedP͇} Cylinder mis-matchPg} Sector not foundPI} Oveault fileSHR *SCAVENGER Run the disk FOO rrunP4}Undetermined equipment faultP }Sector out of rangeP}Time out errorP}Floppy re*SCAVENGER Run the disk FSDELETEFSSCAN FSRENAMEFSMAKEDIFSSETSEAFSPOPSEAFSPUSHSEFSADDTOTDELERRORRENERRORMKDIRERRSRCHWARNSRCHERR FSEXTSEARENTOEXIRENDIR FSGETFSDFSSETFSDFSREMOVEIMPOSSIBFSBADNAMGETNAME `PERQ_STRPerq_String.PASl IOERRMESIOERRMESSAGES.PASuse of default fileSHR *SCAVENGER Run the disk i J K x}a}aqpp d]o'p+}p`o`ʷ'}p`o`ʷ}  Mounting disk #` c n`` c ...` c n`c ...done.` c }nNʷ}} mNcalibrate donePͪ}Disk recalibrate doneP͈}Can't find track zeroPf}*Unknown Error!!*PHdMd]``2c` d4mn)3mNJ3dmHmn)}((}:mP-Z1]-eDiK]*a address markP}Missing headeN` ap,p'\} }`}J` J JdP͜}>'r address markPͪ}Floppy write-protectedP͇} Cylinder mis-matchPg} Sector not foundPI} Ove\}}`}J` J JdP4}}rrunP4}Undetermined equipment faultP }Sector out of rangeP}Time out errorP}Floppy re JdPo }dP]m` ]m` ]}d}dP]\]\] c}N`}'IOERRSTRESIOERRMESSAGES.PASuse of default fileSHR *SCAVENGER Run the disk i \}83}dʷ}8 \}<}8ʷ}4}<}6}< c}:}<}:}8ɺ a}8]3}d}4}6 a8k8k8'3}d3}3R43}d}}ɺa w(w}N`\  vx)ϳ}vNJ3(ϕ 3}vNJ3} Jd}}ɺa w(Dw}}vNJ3} JdP\vH vx)M3}d3ȼc3c}}4}6ɺa]3d3\ c}N`}'FILESYSTsys:exp>filesystem.PAS5 3}d3\}43}dʷ}4 Nmkmρ}6}dc}6c}iaNjkj6}4ki`N`ʷ}4 c}}4aN jNjkj $}4 }43}d3\}4``22}nʷc}kkm.}n}n N}n}n}n }k}n}k}n}kkm2 }PP}4``2}4ɺ a]}m` ʷ}``22}ʷ}'}n} oN}``2}n` ]}m` ʷ}n``}}m` ʷ}n``}mZ, maJmAJcK L 2:33<EFR><f(4&565*FSLOOKUPFSLOCALLFSSEARCHFSENTER FSCLOSE FSBLKREAFSBLKWRIFSINIT FSMOUNT FSDISMOUFSSETPREFSGETPREFILEIDTOSEGIDTOFFSSETUPSFIXFFILEDEFS FileDefs.PASP SPsys:exp> POS D.65 a-boot GETTIMESGetTimeStILENFSISFSDEFSNOTFNDFSBADNAMFSINTERNFSDIRCLOSTRLONG FLUSHFAISTRLONG eadDisk.PAS#\d10 Febamp.PASQP|6>* dDISKIO DiskIO.PAS 0$JanFebMarAprMayJunJ10 gSepOWRITER WRITER.PAS@ }%XP>NEWSYSTEM.CMD % filesysteN a##\X aARITH Arith.PAS! /$>PASCALilesys mSTREAM STREAM.PAS%rrmessM@Lac PZP{PZPY#\} nd}n`}ʷ} as' nN: J X0a 2( 2 FILEACCEFileAccess.PASstem.PASs NJ J> J3d 3NJ3dc FileName prefix set tALLOCDIS AllocDisk.PASystem.PASo: ` c c` c c ]}4 Pc}:N` a6k6k6,ύ}4}`k6J` READDISK ReadDisk.PAS= mJPP}4 6Jjk6kj)Gk6N,}7k6Ndc}7 }7}43\k6H6k6kj)й784JFILEDIR FileDir.PASa >pascal.RUN|6 K)ys:exp> ?OMPILERPERQ_STRPerq_St78  334<b0Le2K(0ring.PASpascal filesystem ~ J@Ia82 1LVLLVEXCEPT Except.PASlesystem.PAS2:33<EFR><f(4&565*DYNAMIC DYNAMIC.PASZfX333378 `TX--Z^La`k6J` ?LERYfDp *% ReadDisk.PAS#\d10 FebJPP}4 6Jjk6kj)Gk6N,}7k6Ndc}7 }7}43\k6H6k6kj)й784J$JanFebMarAprMayJunJ10 gSepOWRITER WRITER.PAS@ }%XP>NEWSYSTEM.CMD % filesyste78  334<b0Le2K(0>PASCALilesys mSTREAM STREAM.PAS%rrmessM@Lac PZP{PZPY#\} ndL