dumpfloppy 1: 18/01/2013 18:36:39 (PF handwriting) MICRO-PROLOG (MASTER) 4/4/86   1_!i˞~ ]~ >12fK!+``*!"`:`O 8GQ{eze*`"`!}d|d>Dh!`͠`͗`͗` !`͇`>2`2`7H!w`~#( OBoot !`͇``͠`!`͠`͗`͗`@0N#(~# w 6<---\X COPYRIGHT (C) 1979, DIGITAL RESEARCH _͌> ͒> Ò> Ò͘~#͌ì _2<ï2 ć!ʶ2:2a{_:ʷʖ:ʷ>Ľʖ:=2–!B!6#5ʖ:ʷĽ!ͬʧ )!F#xʺ~0wëw!" !~6ͽ:ý(!#͘*~ "ŷ"͌#>?͌͘ =_.:;<> OŅo$>!Y2*O"ʉ@G:ʐ:wÖx2p0ʹ#*©6?ëw˜0ï#6 ¹.0#*6?w0#6 #6" =qf^!~2>`~2ʯ2\!!B!~> >#0~O#Cx2͘1)ͽÂf zͧÆBAD LOADCOMf^: !ʶ Â$$$ SUB˙˥˫˱"C{2!"E9"1Aί22!ty)K!G_^#V*C͐~׃Eלץ׫ ,&-AGMSΛ!!ô!ô!Bdos Err On : $Bad Sector$Select$File R/O$:BA2!~6 O͐  :ηE B 2>: ηb# : ηy! 4 5~yy5 6yҐ^H@Oy H H: –ͬ  #H: ! ξ Hù H H $O͐: 2 *CN# x: 2 p&x~+é7̯2 H! >w_: ! ξ5ͤNkͱ¦ͱxʊ#Nx: η! Ζ2 ͤ! 5™#wO~x½p Hy<< ٷʑ :!qMD##~?  xDIR ERA TYPESAVEREN USER!yO#< Ty#O 3Ư21y_͸2y2ͽ:÷˜1͘A͌>>͌92^ :ʷ¥.!_~#fow]ȭɎɥ!v"!çREAD ERRORçNO FILE^:ʷ ! ~ 3#0 Wx x ŀ ł G ~ # 3x~#B!Y~ɯ2:ʷ=!ʾý:ʷ=!ʾ:ý^T!~  6?#ˆ:`O> K{͘A͒>:͒͢>:͒͢xK > K > ͒x  ͢ØÆ^ BRͧ9!5‚#~Y‚#"T<ÆALL (Y/N)?^ Tʧ͘!6!~ڇ ȯw4!Y~ʆ͌†t=ʆf ^ T ȯ2o&)|+!<ͧÆNO SPACE^ :Ty!B*O=?_s#"^sG!~Yɸpsp2mÆÆf ͧÆFILE EXISTS _: É: :ʷʉ=2)ͽÉ T!@k!}|q2E>! ^#V w#P:BO|^#V#"##"##"##"!O*!O*|!6ʝ6>ٯ*w#w*w#w'û*ٷ! J*""!N#F*^#V*~#foyx*{_zW+*yx#*DM*s#r*s#ryOxG*0MD!!N:ط EG>O: \ϷSπ*C :طqn& ^#V>O^"*}:*)=":O:ءo"*C *C!ͮ~2~2ͦ:ئ2ͮ:ϯO:؁w:w |g}o*د#  ):BO!yoxg*:BO}!N#F "*#*s#r^ ~!J! J*:؅o$*C~i6iw**{#zr+s{ozg**͕** о,w͜͸Ͳ!!N#F$**O!~#:Aξ#~$=2Ek͌  ::/GyO>2!q*C"͡ʔ*JҔ^:Oyʃ?|x | sҖ-|N-# S:2E!~Яw>T D^6k-äPYy 5*{zBK5ڋ>*Cw~#+w#w+ɯ2E22i^ *C :ط~w~͔͔# #  w ~>2!E5T*C!"C"C!w# F! w͌xЯ2͢*C ~<wʃG:ؠ!ئʎì 4~ʶ¬:<ʶ$ʶïZͻϯx>2>2ͻ:!ؾZԯ2:Eηẅ́͊Ͳ>2>2T*CGͻ:ẅ́n>2;O ^DM;}H>"*C :ط:ddslO s#r:Eη͊:==»y==»*Ww#*"͸*:G#š"͸:!ؾw4!iw:Z!E~=26:O͔|(~O6#:̈́ :̈́!:̈́ $:ͅ'*-:ͅ 036:̈́ 9<:̈́?BEH_~#fo!y(2o))))U.2:޷ 2y2y=2`i"&`i#z n&ɯ2>2$2#>2%b2$y2% >2:2:2 :2!:޷(1=2:!޾ $:! ޾ :!!޾ 4>@ 6! 42#2<2#s 12":޷2!~6(":!޾ :!޾ :!޾($:޷:2:2:2:#޷ۯ2:o&)))))))7[&:$޷ >2:%:" 2:"{ >E>F2 > 2>( !JQ!JQ>ʹo !ow( : E !r: O:ʹ͊>ʹ́:2͊!Q:O<2ޯa(<2>Dh: O7!C(!UG(&{dzd}e|eyʹ!́~# !w# : 2">: ސ2 :=2>2"ޯ2<ɴx 266"!^(!u*~| } !|Y8aBIOS Error NRWPY8aKY(>́(Oy@8(y2:́́(::(w @0ɯ!(Q>>́>́>́ϯ2*C!!~~#~O~G#n,-.‹! w! yG!x͢.:E<ʄ! q!pQ:E<. ʄ$.:E<ʄi6}2ExN! ~态O>G~G!~G} *C!r#r#r ^ͥ_y#x#{s+p+q-*C ͥ!!q#p#w*:BOYG}*MD "ã:!Bξw!>2*C~=2u:B2~2wE:A*Cζw>"!""د2B!"!rQQQâ~?ͦ~?rQ*"CQ-Q͜QüQrQ$Q*):B"*)*)Q;*"E:;:A2AQÓQÜQ*C}/_|/*ؤW}_*"}o|g":طʑ*C6:طʑw:2E**E}DQ>27ã(6dSDôÔÿt BootInsert PC-CP/M-System diskޅ(xޅHލޔhޢ@  ?1N:(22 22>۷(!3֯22!9(>!2"!2"2261222>2!"*!:G>(=#x(w#!} 56K CP/M 2.2 / 3.01 alphatronic PC Serial number 00000   |{0*w#"!4BIOS II alphatronic PC V 3.0 13.03.84  @$@B B HH II$@DI ABI$"$H$H@$$I! H*  $H@@A I $D!!$I"BI"I"@$BIIH$$$$BBI$@BI!"$$A DI$@ A$@$$@H! "!$$" @B$!!!DH$$"H @@BHH  !$$A"D@ "A" "BHA " !$ D B I $ !$$ H@BD D$ HI DIA!$$$ $" "$D ! $"  $AB " BDD $$D!"DI$!$BH!"IB I$"D HD" " $"! @H !BI " I  $I$I$DI$ !I$@"$"$! $I$I HA HA @@B  "$HA B  $I B! @@@BH@B@DH@!DHB!I HH    TRACE LOGPROLOG SYMPROLOG COM  SIMPLE LOG@MICRO LOG'MODULES LOGPROGRAM LOGUSER LOGSPYTRACELOGTOLD LOGMITSI LOG9ERRTRAP LOG EDITOR LOG( !"SIMTRACELOG#$DEFTRAP LOG %EXPTRAN LOG &EXREL LOG 'B LOG(CSMASK MSK4pqrsSTART COM tCOPY SUBuCOPY BAK}TEST ~REME CSD COMP CSD KEYDEF BAK+ASM COM@KEYDEF PRNUKEYDEF ASM*KEYDEF HEXSALES CSD<$$$ SUBCOMP1 CSD  trace-mod (??) ("y" n e s q f) ((COPYRIGHT 1984 LPA LTD V3-6)) ((ENTER z "y" (X|Y)) / (CL ((X|Y)|Z) 1 y) (PP z matches clause y) (??? (1|z) Z x)|x) ((ENTER Z / X)/ (R Y)(R x)(CON Y) (Y x)(PQ Z X)(test Z X)) ((ENTER Z n X) / X ) ((ENTER Z f X) / FAIL) ((ENTER Z s X) /) ((ENTER Z e X)/(RFILL (X)Y)(test Z Y)) ((ENTER Z q X) ABORT) ((ENTER z X Y) (P ENTER "y" n s(for succeed) f(for fail) q (to quit)or / followed by a command) (INTOK "CON:" Z) (ENTER z Z Y)) ((??? z () ())) ((??? (z |z1)(X|Y) x) (PQ (z| z1) X) (test (z|z1) X) (PQ(z |z1) solved X) (PP) (SUM z 1 z2)(??? (z2| z1) Y x) ) ((??? z ((/)|Y) (/ FAIL))/) ((??? z (/|Y) (/ FAIL))/) ((??? z (X|Y) x) (PP z failing X) FAIL) ((?? X)(??? (1) X x)) ((response x) (P " trace?(y/n)")(INTOK "CON:" x)) ((test z (NOT|X))/ (response x) (IF (EQ x "y") ((nottrace z X))((NOT |X)))) ((test x (FORALL X Y))/ (response Z1) (IF (EQ Z1 "y") ((FORALL ((PP trying generator of x)(??? (1 gen|x) X z1)|z1) ((PP t ((PP unnegated z failed so...)))) ((iftrace z X Y Z) (PP z test evaluation) (??? (1 test|z) (X) x)/ (PP z test solved ... entering then branch) (??? (1 then|z) Y x)|x) ((iftrace z X Y Z) (PP z test failed ... entering else branch) (??? (1 else|z) Z x)|x) ((ortrace z X Y) (PP z either branch) (??? (1 either|z) X x)|x) ((ortrace z X Y) (PP z or branch) (??? (1 or|z) Y x)|x) CLMOD  (OR X Y))/ (response x) (IF (EQ x "y") ((ortrace z X Y)) ((OR X Y)))) ((test z (? X))/ (response x) (IF (EQ x "y") ((??? (1|z) X x1)|x1) X)) ((test z (!|X))/ (P " trace?")(INTOK "CON:" x)(ENTER z x X)/) ((test z X) (SYS X)/(PP)X) ((test z X)(DEF X)/ (P " trace?")(INTOK "CON:" x)(ENTER z x X)) ((test z X) (P " No definition for relation")(PP) (ENTER z e X)) ((nottrace z X) (PP z unnegated) (IF (??? (1|z) (X) x) ((PP unnegated z solved so...)FAIL) rying test condition of x) (IF (??? (1 test |x) Y z2) ((PP test of x succeeds ... retrying generator)) ((PP test of x fails)FAIL) ) ) )) ((FORALL X Y)))) ((test x (ISALL X Y |Z))/  (response y) (IF (EQ y "y") ((PP finding all Y such that Z) (ISALL X Y (??? (1|x) Z z)(PP found answer Y to x)|z)) ((ISALL X Y|Z)))) ((test z (IF X Y Z))/ (response x) (IF (EQ x "y") ((iftrace z X Y Z)) ((IF X Y Z)))) ((test z (OR X Y))/ (response x) (IF (EQ x "y") ((ortrace z X Y)) ((OR X Y)))) ((test z (? X))/ (response x) (IF (EQ x "y") ((??? (1|z) X x1)|x1) X)) ((test z (!|X))/ (P " trace?")(INTOK "CON:" x)(ENTER z x X)/) ((test z X) (SYS X)/(PP)X) ((test z X)(DEF X)/ (P " trace?")(INTOK "CON:" x)(ENTER z x X)) ((test z X) (P " No definition for relation")(PP) (ENTER z e X)) ((nottrace z X) (PP z unnegated) (IF (??? (1|z) (X) x) ((PP unnegated z solved so...)FAIL) N }o|g)|! w#6Ʌo|g!"N !"P  , ! 6#  r > J ͜<==w s ͈ N#͝ ͨ ͖ ~̖ ] ~#è ͝ !ͨ 6 !p ! ͨ * " * * | }͝ This version of INSTALL is incompatable with theversion of WordStar you are trying to install.!Sͨ ͖ ! ͨ ó ͝ Do you want a normal first-time INSTALLation of WordStar?(Y = yes; N = display other options): sNʪY  ͳ͝ Y͝ This will INSTALL the WSU.COM on the current drive, savethe result on file WS.COM on the current drive, and thenrun the INSTALLed WordStar. OK (Y/N):sYa \ \Nij͝  ***** WordStar INSTALLATION OPTIONS MENU *****A INSTALLation of a distributed WordStar, INSTALLing WSU.COM, producing WS.COM, and then running the INSTALLed WordStar.B INSTALLation or re-INSTALLation of a WordStar COM file of your choice, placing the newly INSTALLed WordStar in a file of your choice, and then ex  0130 $MEMRY 0BAC BLTDCT 05D0 BNDTRW 0119 BODY 0105 BOHS 0103 BOLS 0130 BOS 03B5 BREAK 2F23 CHROUT 03BA CNTERR 07FA COLLCT 35A9 CONBUF 0698 CONS 0618 COPY 2F1C CRLF 0A6E CURMOD 03A5 DERROR 4586 ERRCAL 456A ERRCLS 03D1 ERREXT 03BF FILERR 012B FRELEN 41CE GBODY 41C0 GOAL 043F GROW 011D HEDARG 0680 INDIR 302A INIKEY 2F55 INTCHK 010F LEAF 011F LEFBAS 0129 LIMIT 06EE LINKDE 011B LITARG 0123 LSTTOP 2EBA MSG 2EC5 MSGOUT 3E23 NULH2 03C9 OVLERR 0162 PROLOG 113A RCLAIM 012D SDICT 1E62 SENDCH 0132 SLOT1 0138 SLOT2 013E SLOT3 0144 SLOT4 014A SLOT5 0150 SLOT6 0156 SLOT7 015C SLOT8 016F SOLVE 0C72 SYSDCT 038D SYSERR 0107 TOHS 0117 TOLS 0109 TOP 0113 TOPBAK 0121 TOPBAS 0115 TOPRST 06F8 TRWALK 010D TRY 06F2 TSTDE 0A76 UDICT 03C4 UNDERR 420B USRCAL 2165 UWNUM 0A21 WLKLST 0A2F WLKPRC 1341 ADDCL 4142 ALLCON 458B AMPDCT 17AC ARIDCT 0F21 ASSIGN 1E5F BAKCH 0A79 BITMAP 1188 CHAROF 14F0 CL2 0E31 CLMOD 0CD9 CMOD 0CCB COMENT 0BFD CON 0D48 CRMOD 0A6D D1H1 0A73 D1H2 0B7F DEF 14B0 DEL 0E46 DELMOD b EO )+ )+  +~@w,O »+>2=>2{ͩ5*0#6!A" !A"!$>"*"?* * " ""utut*^ V SU/*~º̀(º~º$>C###"+++̀º~ $ƒ*###̀"K*c" ?ƒ*^ V S*̀###*ƒ*[!̀ H* nf###NF^ V ̀(ºPYS"*0"  "æº["###[̀z*#[Rz*Rz*[!RK+B0* B8`i"K!* B(LES%*!~ 8*+R0+*R8# 6[%6#s#r ###[ * [!*RDM[S!" * "æ*!ͺ.!!&.*0{o! !! !!!{*E~(*0!#/"b!7.e!/o!kE" ?*!6#s#r*~@@No Space left Dictionary full Error: * "#* ~~~č)[[8 [RҠA*"!(6###" ###"###"###" ! [  S* ~* "^V *R(~(  ###6###~č   0C22 FAL 1E5B GET 1E5C GETCH 0FF0 MAKCON 0BB2 NUM 203E PRTERM 1E64 QUOTES 230B RDTERM 0E99 REMEXP 0C88 SLASH 4351 TOPMOD 1E65 VARTAB 1BA9 FADD 1CFA FDIV 1D9F FINT 1E01 FLOAT 1C58 FMINUS 1C6F FMULT 1B5E FNORM 1D8E FTEST 1C5D FZERO 1FE7 IODICT 1965 LESS 1B44 PACK 17B2 SUM 1763 TMPNUM 1B1E UNPACK 2971 FRMDCT 243A GETTOK 1F66 LEXTAB 23C2 LEXTYP 26DA LISTP 1F65 NOVARS 204B PRTRMX 1E59 RDSTAK 2310 RDTRMX 22E6 READP 2DA9 RSETUP 22D7 TRLC 214D WNUM 1FED WR 2195 WREAL 1FFB WRINL 2013 WRQ 2D66 WSETUP 2E0D CONDCT 2BC0 FORMTB 29F2 FRD 29CE FREAD 29D7 FREADP 299C FWR 2977 FWRITE 3D23 BAKDSK 2EE7 CONSOL 38CE DSKDCT 32FD FILE 3D17 GETDSK 2EF6 INKEY 2C43 KYLEN 2C42 KYPOS 2ED7 MONITR 2E31 RFILL 3D0B SENDSK 39EB CLSE 3978 CREATE 3B98 DIRECT 3AFE ERASE 392A OPEN 3B35 RENAME 3A29 SEEK 36FE SETFCB 3D32 SUPDCT CT 17AC ARIDCT 0F21 ASSIGN 1E5F BAKCH 0A79 BITMAP 1188 CHAROF 14F0 CL2 0E31 CLMOD 0CD9 CMOD 0CCB COMENT 0BFD CON 0D48 CRMOD 0A6D D1H1 0A73 D1H2 0B7F DEF 14B0 DEL 0E46 DELMOD * " ~ [!~  ### [    @K!(Z? SP~ HK(=?; #(R###*n f R8> *7R8#C>(>͘w#s#r#[6#s#r"ѿ~ ͘6#s#r###  ~  ### !0ʹ >0 E(+++>w#s#r~ ~ ###['!R *)[R8['!R( "'*[Rڠ"6###6+++R!26*^ V S!2*̀ S~_!:!2~($^Vnf(~º~w#s#r++º###"+++̀G '~ʺ6ututpO  ( ~("  ~((č~ >#º* ^ V R(Eq ###* R(^ V !*q *q !Eq ! Bq !7 "/ !s ! !v ! *n 7 !2~(q *$>(0~( ((č~ ###}| ###DM[ * (/nf $>B( ~ ###ut N F !  *  ~ "*'!++++++R8~˾ }|DM>*[R"+T]<<R[")~˿G(~ ,ʹ 8'̍ r  ~ ʹ 8###*7R?8*R!s !v ~ E~˿(4č~˿w  :˾### ###### ###č~˿č###~˿q q ###~q ###! ?/ERC   DEF!  *5~^ ( y  NUM! PWWW   VAR! >>>7   LST! %%%   CON!   " - * FAIL3  : SYS!A  *5r ^ *5~[̀*07R   /*nf"N F ^V *~ ߷B86###   /*   CMOD! *n "3>22Gz= p+s>!!!O!!!*0 [0RP%%L%%%!y ###Ϳ( ~w#~w CHAROF! *9:=:<*5###:;#~*5###~29>2:>28#~:=:<:;25>2522"3;STRINGOF!$ '!2K;*5K;[n*5[!5<̀ *̀(ʺ###(~w##~###>w"928̀ W####~(+ ###̀    6͘6#s#r"### " o&"5w#s#rAkJADDCL**^ V S̀2">2fB!2"e ~~>28"9"g ###[e 6#s#r*9Y6#s#r͘[9"e 6#s#r*###[̀  ̀MD*g Z~( B[e 6#s#rr $*n ###~(č߷R( ###![̀ ͘6#s#rB### 7> !e~(W^(##ut6 p#6*!*5:=K; Z~###*! B  OPMOD! *5~2 "n "q [n !ERH +Q CRMOD!X *5~r *n ###"i ###"k 2 "n ͘"q 6#s#r*;͘6#s#r*n 6*A! "/ *;! !"/ *A! ~ ?*k ~(6߷R "###+++*i *i 6#s#r###~*n 6:1:CLMOD!E"n "q [5*n R !ER(>!E###"i ###"k !"/ ! ######~:####N#F`iͥ*i ~ ,#^#V߷B ####*k ###6#s#r###! SPACE!:,?23>24>22&*[*̀̀"###̀2>2f_!2[̀[R(s ͘>}|DM_### O!e~(W^(####utqp6>#nEf>(>+++}| PYů255˿ 5!-͐(*n ͐(###͐( ###"k ͐33([͘###[k *k 6#s#r!5Ϳ((*k å6#s#r6###5w(#6>~~č### # ~ ###~( # (!y ~ # #^( (*5:IKG Z~" *?"K!8*>*C*#" y ~### qyKILL! 2[5!CAR(~F~6*n ######,*5~ *5º~ '~( ###~~ 6###ʺ ABORT*0{o"v*WLST!1!2"b !Z"b>2d> *b 6͘*b 6#s#r####"b |RLST! *5"b !"\!O"_>2d #:>(*!>[ (͘6#s#r####6#s#r[(:d ( o>2d }/*b [̀ $̀( ú####~+~###"b  !J"\!S"_>>2d !"\!O"_# UMI 23& ԣ7]I%923 Ԕg=3c? 5=0QS#4 =:2 gSUM!# #BmB!cͩ!cXwͩ!w]!cͩI2>"?!XcͩI22"3!XcͩI28"9m_vTIMES!}# #6^6!co!cÎ!coI2>"?!cI22"3!  cI28"9!2~ nf!  nf`i͟ >͘D> emLESS!t;!] 2!] 2 ((# *5[;### (#NSIGN!  ("928:=(*;R:7*5 } (|  ^(!!>T[INT!b% NT :7ú:7*5#~0+o&G> G~#"928W:= *;R*;#͌ :7*5*5: >!G>G!6+I~#~>#~~#~# #N#~(  T]+w# (  w#6#w y^>#^>#`iw#8+]#(PY  0<  o  'Owy ?+G0 (y ?~'Ow+##~8++>6^  >'w +~w^ ##~ #G~`i#6  _V0 8݆''wO+++^]srѿ:aaa:eG}(8 GY!f>v #<aWy(i&e!|( >-a|/g}/o#e! 8)8#}2"c^(>-a#~ց_!m+ !e{00" x=0\>.a0"P8"8>0a>.a(>0a 0"*x !e0">.a0"{(>Eak{&(&M!#~0a:dv"(,>"a~( 8 ~("( @>~aa#>"a~a#~#Aq( #~(K@y(#~(?#A 'Y %A Y(&V#^!..R $ #~( #y a{ "%"READ!"*5ͩ->2f8sY:$( _:$) >>|( &*5..R *5,- #:$)©#͘>#s#r#)ʩ# # sr ( (s#r{Yͺ.#f˿o&N!5~#q G#~(08M:8F!!!O!~(#nfB(##ngE>(+++>qpw>[#i Q(  ^ɿy([(#I( 33^>$^I(^>$A(͘%>Y(͘%>" 2!5<[ %"(~ [ A8`0@(w#6>a:$2525>!u6+w## [•%0(##~Gw#w     ' ?+8  ' ?+q#^0  ##~ր8R0NOJ>G# @A!(%jDMjjJOJ^({/_z/W33>|( |/g}/o#>  R8)8# } w#y A#/.H}H:n@MH:k@MH:l@2n@ _2FKJJ*g@##:o@2j@GA ~—HHw# H #ÍH w# H:i@!A~ Hw#ºHJ:7>HxH͙JOx=y I[A@2AJx H ATI͙JHT$I͙JT7͙JY7HL>I͙JS7͙JT7  AAA AAA ? W&" WRITE> '  WQ>2d!% *5:df-!"e*;K *^ V ̀ ̀ ###̀ > a>|à >(aa >)a M! Õ! >(a>)a ###7"č!~(ngR( ##y@(sr6&i!I( #w[•%. W[ u#I(  #wE(e 7[ U- >0#I(O x G[ 0zx(D_^{ƀ2d!c^͟ > ͘D> !528"9( ($&S&,&GETB!3&͌&29>282:Y&&a&RDCH!h&͌&2525"928*5ͩ-[&q)&PUTB!&*5f-:=:<:;a&&&LISTP!& >G*5>f-*n '######~~ ";͙'###*5>f-*;*5>f-*;~™'%('###''!'"/ ###! ! !1%('";~ ͙'L'~###Ͱ'###>(aa*;%((###~ '> aa' (> a> a~ .>(a'###~ > a >)a>|a' ###7" #~O!!!!!!!o,&! M! Õ!č>(a>)a MODTYPDW FILTYPS RELTYP VOb LSJT CN NL NMxX MRK=S LINKR   SLTLEN,S SLTSZES NOSLTSS SLTBND SLTDTA SLTINT SLTSKLTw)))FWRITE!)+*5f-:j(G!q(~ʺa#*o(w#"o() .)FREAD!)+*5ͩ-!q([j([Ny(w #  [ sY!*"\!*"_!e!q("o("m(*A[Kj(̀č~(\̀ U~ 65F*o(~#F> + #6w#s#r~<2l(:$( :,*m(^"m("o(#####̀N*!l(~( 5*o(~#"o( > *o(+"o(*;+Cj(!q("m( !)"b2d!esY*À x*m("o(~(j6 #= "m(̀ !ݾ:,###[o(F~(#6 ~:,M!$ ~:,͕!ºF*o(6####̀##4+[!esỲ̀º̀º! R(! R 766###̀ ̀ | yuںO#####{YZSFLG LLSTFLG ^UPARR EOFCHR :COLONB[ .DOT ..BARSUBV GRATOK ALFTOK QUOTOK^[ LETBIToZ NUMBIT2 1 #/>##/xʳ2>#/ :@,/2@,!1..˿ !1. ʎ0( ͱ1 ,1ʵ 0 @ (>~͑1 (͑1 ͳ2. $#/yo0b]+O(xʳ2!1. xʳ20y(Obk# 1H41x/D,1/D,bkx ~(# #/#.˿gxʳ2 1xʳ2.˿gx(v1x(oy(f.˿0.˿gx(S>#/ x` 1$| yg>#/% x('&O>#/(% 1x(&O 1x(% 0>#/:C,<(2C,2B,O!C, w222POLL:D-(28QT2!NOT1H!NOT1T1!%NOT1T2!+NOT1T3!7NOT2C!=NOT2H^]!IEQDn!gSDCT3!OEQRm]!UEQC1![EQ1H!aEQ1H1!mIF!SDCT4]!sIFR]!yIFC1!IFR2!IF1H!IF1H1^!IF1T1!IF1H2!IF1H3!IF1T2!IFC2!IF2H~^!ORD!SDCT5^!ORR^!ORC1!ORR2!OR1H!ORH!ORH2! SPEBITPZ GRABITo ONEBIT@\ SEPBIT VARBIT SGNBIT2d!.R !#/"b!/R !/!/R !/~¿"2~¿! =!.R !:0"\!0"_!#/"b!/R !/"\!/"_!/R !."\!/"_~¿"2~¿!="\!$="_../././%./01.2:.RFILL!A.1*A###~("2A, #E-~(# y>L2A,2D-!2"b>2d>2C,2B,!"e*5K !:0"\!0"_!#/"b#./~#/ > #CON:.:D-(O=2D-E-!F-.(> #/> !?,N 6W.(ʵ,1z_.:@,( ..(7!?,N6ʵ,1(% ("(G:D- (o<2D-x&E-wͳ26LST:U/_.PUN:U/_.RDR:!e-~(6.2e-KBD:!E- 2E-:D- ͳ2<2D- 0+.*0RCLEAR2C,2B,2D->Z2A,H:C,G:B, a:A,Z (i&M!D,:C,O|!0!0 #~#fo~(###ͳ2."1/> y<2C,2B,>Z2A,O<2B,!D, ~ !B,5 011 0I41X1D1Z1L1S2K32CI2,1BV2Rl2P2N2xʳORC2!OR2H!CL!SDCT6!CLR_! CLC1!3CLR2!CL1HFk!RN1H1!CL1T1!CL1T2!!Cͺ. Ǡ䠲򠸴 㩠* ˅""6[0Re!ͺ./<<<< }o""%%D!y 6#*R")!C,4Nx2B,> !&3>w!-=">2!65"E!65" B?ERROR?!&3~( !6#s#r#!6կ#~+: ~## !o7~(;.("#~(*.(#!> #~( "# LOG6!. ͺ.6>666<56.!~w6B~w6A~w6K.6$6$6$..<666~¿~6¨8.ʿT] ~~~6B#6A#6K!T].~6$#.6#s#r>w<~Ė<388%98LOGIN!8!&3>(!   .*5####>+~"A_W.+9s939OPEN!:9*5~(¿r ¿z7r ( Ͷ86}7y999CREATE!9*5~(¿r ¿7r ( %!..<6679:9CLOSE!9*5~r (*5̶8>6/:*!6:Sj:"9C?>282>*5~¿r ¿$.fnN~+j:[; :Aw###.!~ .<*;tu:Aw!.(!~. :0;;ERA! ;*5###e6. ɿ6;;=;REN!D;*5###e6*;###u6:u(G:eºx2e2ue.(;;3=;DIR!;*5###e6#h<h<.!8"5e.a<&o5:e(@>:~ (##~L #~O #~G #>.~#~#~#͘*56#s#r6#s#r#"5e.;*56~*(#6?#~¿##^4#w{̖ AAAy9BA#A&>)A9B5A=AJALISTCAAALLPAzAVA\AbACA hAnA&tA.AABAA&A.BAAA?AAB AA*AAAAAkBAABAABB  B B^=B#B)B/B5B  >;BABC >GBMBqBBSBYBBB _BeBAqBBxB~BBBBBCB BBBB2CB<>BBBBB BB BBBC >>BCBBC>CABCCB C&CC,CA8CXC@CDICTFCLCm s ^CyCgCSDICTmCsC CCCRCCBCC"ACCCPCC CCACCCPPCC CCACDDPQD D DD A%DQD-DSEEK3D9D@?DED*:KD >WDzD\D!bDhD nD tD DEDISALLDDDD D D=DDDDDD!D $>DDA >D^=!D DD E4#~*2w=OR=>>>  > >>> 0>2?6>CL<>f>B>BH> N>T>0>Z> `> >l>r>x>>~>>>   > >=>>>>>> > > > >|=>>> > > >>??? ??  ?0>&?~>,? >8??A?DELCLG??M?S?Y?~>_?q?0>e?~>k?> w?}?? >??>??>?@?LOAD???B??@+9B??B#A?*??B?@@">@@&@> @ @?B+@*1@O@7@=@I@ C@1 C@U@y@[@a@m@ g@A s@@ @@@>@@@  > @@@"@ =@@"?@H @ @ >@@@C B@/A@SAVE@|=E  E E#EFORALL)E/E>5E;E9=AEAGEMESEYEAB_E9=eEA >nEtEzE EE>RC&E#EFORALL)E/E>5E;E9=AEAGEMESEYEAB_E9=eEA >nEtEzE EBB  B B^=B#B)B/B5B  >;BABC >GBMBqBBSBYBBB _BeBAqBBxB~BBBBBCB BBBB2CB<>BBBBB BB BBBC >>BCBBC>CABCCB C&CC,CA8CXC@CDICTFCLCm s ^CyCgCSDICTmCsC CCCRCCBCC"ACCCPCC CCACCCPPCC CCACDDPQD D DD A%DQD-DSEEK3D9D@?DED*:KD >WDzD\D!bDhD nD tD DEDISALLDDDD D D=DDDDDD!D $>DDA >D^=!D DD E  query-mod ( "FIND:" "?VARTRANS?" APPEND CONS ON Parse-of-S Parse-of-ConjC Parse-of-SS Parse-of-Cond Parse-of-CC # @ + - ~ * % defined true-of reserved save load not forall isall = all is one which) (Expression-Parse end dict func function "?DECL?" postfix infix & and if then vars either or : ) ((COPYRIGHT 1984 LPA LTD V3-8)) ((defined x)(CON x)(DEF (x|y))) ((Parse-of-S X1 Z) (IF ( VAR Z) (("?VARTRANS?" Y X1)(P-S Y Z)) ((P-S Y Z)("?VARTRANS?" Y X1)))) ((P-S (X|Y) Z) (IF (VAR Z) () ((find (if) Z y x) )) (Parse-of-SS X Z x) (is-body (if) Y x () z)) (("?VARTRANS?" x (X1 (/* vars |Z1)|Y1)) (OR ((VAR X1)/(APPEND X ((vars |Z)) x)(listvars Z Z1) ( sub X Z1 (X1 |Y1))) ((shrink Z1 Z)(APPEND (X1|Y1) ((vars Z)) x)) )/) (("?VARTRANS?" x x)) ((listvars ()())/) ((listvars (x) z) (LST x)/ (listvars x z)) ((listvars (X|Y) ((x |X)|Y1)) (listvars Y Y1)) ((sub X Z X1)(CON X)(ON (X1 |X ) Z)/) ((sub X Z X)(VAR X)/) ((sub X Z X)(NOT LST X)/) ((sub (|Z) Z) ("?CEQ?" X x1 forall) (is-body (forall) X (x1|x) (then) y) (is-body (then) Y y () z)/) ((Parse-of-CC (ISALL X Y | Z) (X x1 X1|y) y) ("?CEQ?" Z x1 isall) ("FIND:" X1 Y x isall) (is-body (:) Z x () z)/) ((Parse-of-CC (# (EQ X1 Z1)Z2) (X x1 Z|y) y) ("?CEQ?" Z2 x1 =)("?EQNTEST?" Z2) (Expression-Parse (X Z) (X1 Z1) Z2) /) ((Parse-of-CC (# (X|Y1)Y2) (X x1 Y|y) y) (CON X)("?CEQ?" Y2 x1 #)("?EQNTEST?" Y2) (Expression-Parse Y Y1 Y2)/) ((Parse-of-CC (# (X|Y1)Y2) (X1 x1 Z|y) y) ("?CEQ?" Y2 x1 #)(Parse-of-SS (X|Y1) X1 ()) (Parse-of-ConjC Y2 Z)) (("?EQNTEST?" X)(VAR X)/) (("?EQNTEST?" X)(defined Expression-Parse)) ((find X () () ()) /) ((find X (Y|Z) () (Y1|Z)) (Mem1 Y X)(EQ Y Y1) /) ((find X (Y|Z) (Y|Z1) x)  (find X Z Z1 x)) (("?CEQ?" y x z) (OR ((VAR y)/(NOT VAR x)(EQ x z)) ((EQ x z)) )) (("FIND:" (Y x1 |Z) Y (:|Z) isall) (OR ((VAR Z)) ((NOT VAR x1))) (EQ x1 :)/) (("FIND:" Z1 Y Z X) (find (:) Z1 Y Z) (OR ((EQ Z (:|Y1))/) ((P "Syntax erro) Z ())/) ((sub (x|y) X (x1|y1)) (sub x X x1)(sub y X y1)) ((shrink ()())/) ((shrink ((X |x)|Y) (X|Y1)) (EQ X x)(shrink Y Y1)) ((is-body X () (x|y) (x) (x|y)) /) ((is-body X () () x ()) /) ((is-body (x) () (x) z ())/) ((is-body X (Y|Z) (x|y) x1 y1) (ON x X) / (IF (VAR Z) ((find (and &|x1) y x2 z)) ()) (Parse-of-Cond Y y z) (is-body (and &) Z z x1 y1)) ((Parse-of-ConjC X Y) (is-body (?) X (?|Y) () ())) ((Parse-of-Cond X Z x) (Parse-of-CC X Z x) /) ((Parse-of-Cond X Z x) (Parse-of-SS X Z x)) ((Parse-of-CC (NOT ? X) (x1 (x2|Y)|Z) Z) ("?CEQ?" X x1 not) (OR ((VAR x2)/) ((NOT ON x2 (either forall)))) (is-body (?) X (? x2|Y) () z)/) ((Parse-of-CC (NOT|X) (x1 Y|Z1) Z) ("?CEQ?" X x1 not) (Parse-of-Cond X (Y|Z1) Z)/) ((Parse-of-CC (! x1|X) (x1 Y Z1|Z) Z) ("?CEQ?" X Y !)/(EQ X Z1)) ((Parse-of-CC (OR X Y) ((x1| x) |Z) Z) ("?CEQ?" X x1 either) (is-body (either) X (x1|x) (or) y) (is-body (or) Y y () z)/) ((Parse-of-CC (FORALL X Y) ((x1|x)r: ")(PP missing colon in) (PP Z1)ABORT))) ((Parse-of-SS (X|Y) (X Y|y) y) (VAR Y)(CON X)/) ((Parse-of-SS (X Y Z) (Y X Z|y) y) (inf y X)/) ((inf y X)(testit infix y X)) ((post y X)(ON X (dict vars infix postfix))/) ((post y X)(testit postfix y X)) ((testit Z y X)(CON X) (OR ((VAR y)/(CL((Z X)))) (("?DECL?" X Z)) )) ((Parse-of-SS (X Y) (Y X|y) y) (post y X)/) ((Parse-of-SS (x1) (x1|y) y)(CON x1)/) ((Parse-of-SS (X |Z) (X Z|y) y) (CON X)(LST Z) /) ((Parse-of-SS X Y Y) (VAR X)/(P "Syntax error: ")(PP redundant & or and)ABORT) ((Parse-of-SS X Z x) (IF (VAR X) ((find y Z x1 x) (P "Syntax error: ")(PP| x1) (PP not a valid sentence form) ABORT) (FAIL))  ) ((all X) (which X)) ((which X1) ("FIND:" X1 X Y which) (is-body (:) Z Y () z) (Whichex X Z) ) ((one X1) ("FIND:" X1 X Y one)(EQ Y (:|z)) (Parse-of-ConjC Z z) (Oneex X Z)) ((Whichex X Y) (? Y) (PP| X) FAIL) ((Which  ex X Y) (PP No (more) answers)) ((Oneex X Y) (? Y) (PP | X)(P "more?(y/n)") (R Z) (IF (EQ Z "y") (FAIL) ())) ((Oneex|X) (PP No (more) answers)) ((is X) (Parse-of-ConjC Y X) (IF (? Y) ((PP YES)) ((PP NO)))) ((Mem1 X Y) (NOT VAR X) (ON X Y)/) ((APPEND () X X)) ((APPEND (X|Y) Z (X|x)) (APPEND Y Z x)) ((CONS X Y (X|Y))) ((ON x (x|y))) ((ON x (y|z)) (ON x z)) ((save X)(SAVE X)) ((load x)(LOAD x)) ((reserved (dict func data-rel infix postfix|Y))(DICT x1 y Y|Z)) ((@ x| y) (x|y)) ((true-of x y)(x|y)) ((# X) (Expression-Parse X X1 X2) (? X2)/ (PP X1)) ((# X Y) (? Y)/ X) ((% Y Z X) (TIMES X Z Y)) (("-" Y Z X) (SUM Z X Y)) ((+ Y Z X) (SUM Y Z X)) ((* Y Z X) (TIMES Y Z X)) CLMOD errmess-mod ("?ERROR?") (data-rel) (("?ERROR?" 4 (ADDCL ((X|Y)|Z)|x))/ (PP Cannot add sentences for X) ABORT) (("?ERROR?" 4 (Z X|x))/ (IF (CON X) ((EQ X Y)) ((EQ X ((Y|y)|z)))) (PP Cannot delete sentences for Y)ABORT) (("?ERROR?" 2 (X|Y)) (CL ((-P?" X1 Z) ("?VARTRANS?" (X|Y) X1) (Parse-of-SS X Z x) (Rev-body Y x "if~M~J ")) ((Rev-body () () X)) ((Rev-body (X|Y) (Z|x) Z) (Parse-of-Cond X x y) (Rev-body Y y "and~M~J ")) (("?DECLARE?" ((X|Y)|Z)) ("?DECL?" X dict)) (("?DECL?" X Y) (OR ((CL ((Y X)))/) ((ADDCL ((Y X)))))) ((edit X)(R Y)(edit X Y)) ((cedit X)(R Y)(cedit X Y)) ((edit X Y)(gedit X Y DELCL)) ((cedit X Y)(gedit X Y /*)) ((gedit X Y x1) (CON X)(CL ((dict X))) (CL ((X|Z)|x) Y Y) (Parse-of-S ((X|Z)|x) z) (RFILL (Y z) X3)(INT X3) (R X1) (Parse-of-S y1 X1)(EQ y1 ((X4|Y4)|Z4)) (SUM 1 X6 X3)(NOT SYS (X4|Y4))(x1 X Y)(ADDCL y1 X6) (IF (EQ X4 X) () ((PP relation changed to X4)("?DECLARE?" y1))) ) ((Acceptin X) (P X) (R Y) (OR ((LST Y) (ADDCL ((X |Y))) (Acceptin X)) ((OR ((EQ Y end)) ((P " " Y not a list)(PP)(Acceptin X)))) )) ((accept X) ("?DECL?" X dict) (Acceptin X)) ((delete (X|Y)) / (Parse-of-S Z (X|Y)) (OR ((DELCL Z)) ((PP No sentence (X|Y))))) ((deledata-rel X)))/FAIL) (("?ERROR?" X (Y|Y1)) (E-code X Z) (P Evaluation error X: Z )(PP)(PP trying : Y Y1) ABORT) ((E-code 0 "Arithmetic overflow")) ((E-code 1 "Arithmetic underflow")) ((E-code 2 "No definition for relation")) ((E-code 3 "Invalid form of use")) ((E-code 5 "File error")) ((E-code 6 "Too many files opened at once")) ((E-code 7 "Close all files first")) ((E-code 8 "Bad data in file")) ((E-code 9 "Write error")) ((E-code 10 "Disk or directory is full")) ((E-code 11 "Break !")) ((E-code 12 "Illegal use of modules")) ((E-code X " ")) CLMOD program-mod (add delete list kill edit cedit accept function "?REV-P?" "?DECL?") (Parse-of-S Parse-of-SS Parse-of-Cond CON ON APPEND which : Expression-Parse infix postfix "?VARTRANS?" dict func end yes all =) ((function x) (CON x) ("?DECL?" x func)) ((add X) (NUM X) /(LESS 0 X) (R Y) (add X Y)) ((add X) / (add 32767 X)) ((add X Y) (Parse-of-S Z Y) (SUM X1 1 X) (ADDCL Z X1) ("?DECLARE?" Z)) (("?REVte X) (CON X) (R Y) (delete X Y)) ((delete X Y) (IF (DELCL X Y) () ((PP No sentence Y for X)))) ((kill all)/ (P Entire program "?(yes/no)") (R y)(EQ y yes)(KILL ALL) (PP Entire program deleted)) ((kill X)(CON X) (CL ((X|Y)|Z))/ (KILL X)(remove dict X)(remove func X)(remove infix X)(remove postfix X) (PP Definition for X deleted)) ((remove Y X)(OR ((DELCL ((Y X)))) ())) ((kill X)(OPMOD X)/ CLMOD (KILL X) (PP Module X deleted)) ((kill X)(P "No sentences for ")(PP X)) (("?LIST-PRED?" X)(NOT DEF X)/(P "No sentences for ")(PP X)) (("?LIST-PRED?" X ) (CL ((X|Y)|Z)) ("?REV-P?" ((X|Y)|Z) y) (P | y)(PP) FAIL) (("?LIST-PRED?" X)) ((list all)/ (FORALL ((CL ((dict X)))) (("?LIST-PRED?" X)))) ((list X) (OR ((CL ((dict X)))) ((ON X (infix postfix dict func)))) /("?LIST-PRED?" X)) ((list X)(P X "definition has not been entered in sentence form")(PP)) CLMOD  postfix dict func)))) /("?LIST-PRED?" X)) ((list X)(P X "definition has not been   micro-mod (which all is one add kill edit cedit space delete list true-of accept function # save load dir defined ON APPEND CONS reserved @ % = ~ - + *) (yes c func end help vars Expression-Parse ) ((COPYRIGHT 1984 LPA LTD V3-15)) ((dir x)(DIR x X)(PP X)) ((save x)(SAVE x)) ((load x)(LOAD x)(SPACE X)(PP X K free)) ((defined x)(CON x)(DEF (x|y))) ((which (X|Y))(exp-parse Y Y1) (? Y1) (PP X) FAIL) ((which X)(PP No (more) answers)) ((all X)(which X)) ((one (X|Y))(exp-parse Y Y1) (? Y1) (PP X)(P "more?(y/n)") (R Z) (NOT EQ Z "y" )) ((one X)(PP No (more) answers)) ((is X)(exp-parse X X1)(IF (? X1)((PP YES))((PP NO)))) ((add X Z) (SUM 1 X1 X)(CL-parse Z Z1) (ADDCL Z1 X1)) ((add X) (INT X) /(LESS 0 X) (R Z)(add X Z)) ((add Z)(add 32767 Z)) ((CL-parse Y X) (OR ((VAR Y)/(exp-parse Z X)(vartrans Y Z)) ((vartrans Y Z)(exp-parse Z X)))) ((listvars ()())/) ((listvars (X|Y) ((x |X)|Y1)) (listvars Y Y1)) ((sub X Z X1)(CON X)(ON (X1 |X ) Z)/) ((sub X Zrogram deleted Y K free)) ((kill X) (OPMOD X) / CLMOD (KILL X)(SPACE Y) (PP Module X deleted Y K free)) ((kill X) (KILL X) (PP All clauses for X deleted)) ((delete X) (CON X)/(R Y)(delete X Y)(PP Clause deleted)) ((delete X Y) (IF (DELCL X Y) ((PP Clause deleted)) ((PP No clause Y for X)))) ((delete X)(CL-parse X X1) (OR ((DELCL X1)) ((PP No clause X)))) ((list all)/(LIST ALL)) ((list X)(LIST X)) ((accept X) (CON X)(P X) (R Y) (OR ((LST Y) (ADDCL ((X |Y))) /(accept X)) ((OR ((EQ Y end)) ((P " " Y not a list)(PP)(accept X)))) )) ((function x)(CON x)(OR ((CL ((func x)))/) ((ADDCL ((func x)))))) ((reserved (func data-rel|Y))(DICT x1 y Y|Z)) ((cedit X)(R Y)(cedit X Y)) ((edit X)(R Y)(edit X Y)) ((cedit X Y) (ed X Y /*)) ((edit X Y) (ed X Y DELCL)) ((ed X Y X5) (CON X) (CL ((X|Z)|x) Y Y)(CL-parse Z1 ((X|Z)|x)) (RFILL (Y Z1) y1) (INT y1)(R Z3)(LESS 0 y1) (CL-parse Z3 Z2)(EQ Z2 ((z|X1)|y)) (NOT SYS (z|X1))(NOT VAR z)(SUM 1 y2 y1) (X5 X)(VAR X)/) ((sub X Z X)(NOT LST X)/) ((sub () Z ())/) ((sub (x|y) X (x1|y1)) (sub x X x1)(sub y X y1)) ((shrink ()())/) ((shrink ((X |x)|Y) (X|Y1)) (EQ X x)(shrink Y Y1)) ((vartrans x (X1 (/* vars |Z1)|Y1)) (OR ((VAR x)/(shrink Z1 Z)(APPEND (X1|Y1) ((vars |Z)) x)) ((APPEND X ((vars |Z)) x)(listvars Z Z1) (sub X Z1 (X1 |Y1))))/) ((vartrans x x)) ((exp-parse x x) (VAR x)/) ((exp-parse (x|y) (x|y1)) (VAR x)/ (exp-parse y y1)) ((exp-parse ((x|y)|z) ((x|y)|z1)) (VAR x)/ (exp-parse z z1)) ((exp-parse ()())/) ((exp-parse ((= x y)|Z) ((# (EQ x1 y1) Y)|Z1)) ("?EQNTEST?" Y)/ (Expression-Parse (x y) (x1 y1) Y)(exp-parse Z Z1)) ((exp-parse ((# x|y)|Z) ((# (x| y1) Y)|Z1)) (NOT LST x)("?EQNTEST?" Y)/ (Expression-Parse y y1 Y)(exp-parse Z Z1)) ((exp-parse (X|Y) (X|Z))(exp-parse Y Z)) (("?EQNTEST?" X)(VAR X)/) (("?EQNTEST?" X)(DEF Expression-Parse)) ((kill all) / (P Whole program "?(yes/no)") (R X) (EQ X yes) (KILL ALL)(SPACE Y) (PP Whole p X Y)(ADDCL Z2 y2) (IF (EQ X z)() ((PP relation changed to z)))) ((space X) (SPACE Y) (P Y) (PP K left)) ((# X) (Expression-Parse X X1 X2) (? X2)/ (PP X1)) ((# X Y) (? Y)/ X) ((APPEND () X X)) ((APPEND (X|Y) Z (X|x)) (APPEND Y Z x)) ((ON X (X|Y))) ((ON X (Y|Z)) (ON X Z)) ((CONS X Y (X|Y))) ((@ x |y) (x|y)) ((true-of x y)(x|y)) ((% Y Z X) (TIMES X Z Y)) (("-" Y Z X) (SUM Z X Y)) ((+ Y Z X) (SUM Y Z X)) ((* Y Z X) (TIMES Y Z X)) CLMOD errtrap-mod ("?ERROR?") (q e s f c is-told tell data-rel) ((P-code 0 "Arithmetic overflow")) ((P-code 1 "Arithmetic underflow")) ((P-code 2 "No clauses for relation")) ((P-code 3 "Invalid form of use")) ((P-code 4 "Error in adding or deleting clause")) ((P-code 5 "File error")) ((P-code 6 "Too many files opened at once")) ((P-code 7 "Close all files first")) ((P-code 8 "Bad data in file")) ((P-code 9 "Write error")) ((P-code 10 "Disk or directory is full")) ((P-code 11 "Break !")) ((P-code 12 "Illegal use of   modules")) ((P-code X " ")) (("?ERROR?" 2 (X|Y)) (CL ((data-rel X)))/FAIL) (("?ERROR?" X Y) (P-code X Z)/ (P Error X Z)(PP)(PP trying Y) (P "error&(? for info)") RCLEAR (INTOK "CON:" x)(respond x Y)) ((respond q X) (ABORT)) ((respond e X) /(RFILL (X) Y)Y) ((respond c X) / X) ((respond tell (X|X1))/ (ADDCL ((X|X2) (is-told (X X2)))) (X|X1)) ((respond f X)/FAIL) ((respond s X)/) ((respond / X)/ (R x)(R Y) (x Y) (P "error&") (INTOK "CON:" Z) (respond Z X)) ((respond y (Y|Y1)) (PP to quit enter: q ) (PP to fail call enter:f) (PP to succeed call enter:s) (PP to line edit call and resume enter:e) (P or enter / "" (eg / add "",/ LOAD file))(PP) (PP or enter:tell(see manual))  (PP to resume enter: c) (P "error&")(INTOK "CON:" x) (respond x (Y|Y1))) CLMOD P) (PP or enter:tell(see manual)) ")) ((P-code 9 "Write error")) ((P-code 10 "Disk or directory is full")) ((P-code 11 "Break !")) ((P-code 12 "Illegal use ofmodules-mod (wrap save-mods unwrap) (Module) ((COPYRIGHT 1984 LPA LTD v3-9)) ((wrap X) (DELCL ((Module Y Z x))) (PP Regenerating module Y Z x in file X) (CREATE X) (WRITE X (Y)) (WRITE X (Z)) (WRITE X (x)) (LISTP X) (WRITE X (CLMOD)) (CLOSE X) (KILL ALL) (P Reloading module ...) (LOAD X) (PP)) ((unwrap X) (CON X) (OPMOD X) (DICT X Y Z|x) (P Unwrapping X ...) (CREATE $$$$$$$$.###) (WRITE $$$$$$$$.### (((Module X Y Z)))) (LISTP $$$$$$$$.###) (CLOSE $$$$$$$$.###) CLMOD (KILL X) FAIL) ((unwrap X) (LOAD $$$$$$$$.###) (ERA $$$$$$$$.###) (PP X is now in workspace)) ((save-mods X) (R Y)(save-mods X Y)) ((save-mods X Y) (CREATE X) (listp X Y) (CLOSE X)) ((listp X ())) ((listp X (? y|z)) (WRITE X (? y)) (listp X z)) ((listp X (y|z)) (LISTP X y) (listp X z)) CLMOD ;4::#4!;4x!::*;e";!;x *;*#;"#;*;*;͵";!";";";!;~6py_!";";͵";!;4~!!;4!;~::5*;"#;:;!;2;*;";*;|:#;*;)::G$%==xxy2&;>2'; :6;=|g}o|*#;&*6;**;R"*;";:ī͗ͻ͗͢Cs\ͫ -\ͫs\͢s\*;"0;:;UͫcͲ*;".;*;)*!;T]:: ڈ:ʐ*;Î*#;&*;*$;,;ͻͻ*!;(;*;&;*;R|";:6;w#~w+͎  ~# ͎O>G  %+~ !!x 6#.$%%$o>gAARDMxɅo|gg}o|g^#V#~#fo# ‚Gz—{xɾ~~/w~ͼ#ä   :.,;?!0?:ɷ @[A?a{['N#w@w#6:#6+Y T6.#Z6 dw# Ys0 {{:|sͥ_:§ {2b5_ͥ=!¼sü):OͥGHGxy"6X:VͽÊ>!*ey!5w+~#wz.!5"5"5P. G:a5Oxͱ:I x  yON#F ܔ ͱp+q ͔!o *7:IO&:H=! D3#:c5N%# H +9 .`ͫ" ? !!!!a5 È*`5>+,&í":`5 *`5-í">o͜:+A ]!Re:B6dbf:C6h:D6j͔$2'$Ù*6G*66*78ʙQc#^#VʏʔQln++O:d5Gyʱ¸:Þ¿>~͙܀ > :a5   >^@ :c5 ̎ !45 ͳ !a5 P H 4*7w#!6*7B +4:H=q :I*7e"7*7eB 5*7 *I&*7[gg> -¤ !!O: y#*`50> XO !X5 ws"g":[5!  program-mod (add delete list kill edit cedit accept function "?REV-P?" "?DECL?") (Parse-of-S Parse-of-SS Parse-of-Cond CON ON APPEND which : Expression-Parse infix postfix "?VARTRANS?" dict func end yes all =) ((function x) (CON x) ("?DECL?" x func)) ((add X) (NUM X) /(LESS 0 X) (R Y) (add X Y)) ((add X) / (add 32767 X)) ((add X Y) (Parse-of-S Z Y) (SUM X1 1 X) (ADDCL Z X1) ("?DECLARE?" Z)) (("?REV-P?" X1 Z) ("?VARTRANS?" (X|Y) X1) (Parse-of-SS X Z x) (Rev-body Y x "if~M~J ")) ((Rev-body () () X)) ((Rev-body (X|Y) (Z|x) Z) (Parse-of-Cond X x y) (Rev-body Y y "and~M~J ")) (("?DECLARE?" ((X|Y)|Z)) ("?DECL?" X dict)) (("?DECL?" X Y) (OR ((CL ((Y X)))/) ((ADDCL ((Y X)))))) ((edit X)(R Y)(edit X Y)) ((cedit X)(R Y)(cedit X Y)) ((edit X Y)(gedit X Y DELCL)) ((cedit X Y)(gedit X Y /*)) ((gedit X Y x1) (CON X)(CL ((dict X))) (CL ((X|Z)|x) Y Y) (Parse-of-S ((X|Z)|x) z) (RFILL (Y z) X3)(INT X3) (R X1) (Parse-of-S y1 X1)(EQ y1 T-PRED?" X ) (CL ((X|Y)|Z)) ("?REV-P?" ((X|Y)|Z) y) (P | y)(PP) FAIL) (("?LIST-PRED?" X)) ((list all)/ (FORALL ((CL ((dict X)))) (("?LIST-PRED?" X)))) ((list X) (OR ((CL ((dict X)))) ((ON X (infix postfix dict func)))) /("?LIST-PRED?" X)) ((list X)(P "No sentences for ")(PP X)) CLMOD ((CL ((dict X)))) ((ON X (infix postfix dict func)))) /("?LIST-P (X|Y)) (OR ((DELCL Z)) ((PP No sentence (X|Y))))) ((delete X) (CON X) (R Y) (delete X Y)) ((delete X Y) (IF (DELCL X Y) () ((PP No sentence Y for X)))) ((kill all)/ (P Entire program "?(yes/no)") (R y)(EQ y yes)(KILL ALL) (PP Entire program deleted)) ((kill X)(CON X) (DELCL ((dict X)))/ (KILL X)(remove func X)(remove infix X)(remove postfix X)  (PP Definition for X deleted)) ((remove Y X)(OR ((DELCL ((Y X)))) ())) ((kill X)(OPMOD X)/ CLMOD (KILL X) (PP Module X deleted)) ((kill X)(P "No sentences for ")(PP X)) (("?LIST-PRED?" X)(NOT DEF X)/(P "No sentences for ")(PP X)) (("?LIS((X4|Y4)|Z4)) (SUM 1 X6 X3)(NOT SYS (X4|Y4))(x1 X Y)(ADDCL y1 X6) (IF (EQ X4 X) () ((PP relation changed to X4)("?DECLARE?" y1))) ) ((Acceptin X) (P X) (R Y) (OR ((LST Y) (ADDCL ((X |Y))) (Acceptin X)) ((OR ((EQ Y end)) ((P " " Y not a list)(PP)(Acceptin X)))) )) ((accept X) ("?DECL?" X dict) (Acceptin X)) ((delete (X|Y)) / (Parse-of-S Z (X|Y)) (OR ((DELCL Z)) ((PP No sentence (X|Y))))) ((delete X) (CON X) (R Y) (delete X Y)) ((delete X Y) (IF (DELCL X Y) () ((PP No sentence Y for X)))) ((kill all)/ (P Entire program "?(yes/no)") (R y)(EQ y yes)(KILL ALL) (PP Entire program deleted)) ((kill X)(CON X) (DELCL ((dict X)))/ (KILL X)(remove func X)(remove infix X)(remove postfix X)  (PP Definition for X deleted)) ((remove Y X)(OR ((DELCL ((Y X)))) ())) ((kill X)(OPMOD X)/ CLMOD (KILL X) (PP Module X deleted)) ((kill X)(P "No sentences for ")(PP X)) (("?LIST-PRED?" X)(NOT DEF X)/(P "No sentences for ")(PP X)) (("?LIS->26!D6~/++! n1:7M*3.د27R1(:C6 .*7"73126|=Q3#.=b0.^#Vn126262626%>26/.3.26G:7l.x ʸ.?G~ʸ.|.o.#~ʼ.:7<#^#V++̂N26.}.26O~ʼ.###~ʸ.#ʡ.è.7#^#V|7!$/*`5o 0\/o .1/6/=r!~!"%/=r!8Í'>260\/ ͑!~!:7Z/!/v~Z/.%Z/6`]͑! ~!)(:7v/1=!60:7]͍'o :6!6͚o:7š/:6o:6/!6ڱ/!6ڽ/o&͔!o !<Ý/Q):6!606}:7G:Y5O*J6|!6/6:6!6ᠡ/6o ‡0($:D6!8:G6!8:610268I0x/I0͖0F0͜!"6o͢$:626:6f0!6~6!8*J6|!"J6͢$:626‡0>26!G6~6ȯ26:IPڣ0!7:E4 ~"8126×-:7O!60w:70:6=0w~=!6)!61)  user-mod ("")() (("") (CMOD X) (P X) (R Y) (check Y)/ ("")) ((check !) (last X) (RFILL X Y) (check Y)) ((check X) (CON X) (R Y) (save (X Y)) (do X Y)) ((check (X|Y)) (save ((X|Y))) (ADDCL (X|Y))) ((check X) (PP ?)) ((do QT X)/ (ask quit) QT) ((do KILL ALL)/ (ask all) (KILL ALL)) ((do |X) X) ((ask X) (P X "?(y/n) ")(PP) RCLEAR (GETB "KBD:" Y) (EQ Y 121)) ((last ())) ((save X) (KILL last) (ADDCL ((last X)))) CLMOD"?(y/n) ")(PP) RCLEAR (GETB "KBD:" Y) (EQ Y 121)) ((last ())) ((save X) (KILL last) (ADDCL ((lastPROGRAM LOGCDTRACE LOGEFUSER LOG((spypoints on)) spytrace-mod (spy unspy spying )(spypoints on off) ((COPYRIGHT 1983 LPA LTD (V 13-4))) ((goal 0)) ((spying on) (KILL spypoints) (ADDCL ((spypoints on )))) ((spying off) (KILL spypoints) (ADDCL ((spypoints off)))) ((reset Z)  (DELCL ((goal Y))) (ADDCL ((goal Z)))) ((upgoal X) (DELCL ((goal X))) (SUM X 1 Y) (ADDCL ((goal Y)))) ((spying X Y) (upgoal Z) (OR ((PP Z : X Y)) ((PP Z backtracking on X Y)(reset Z)FAIL)) (CL ((X|Y)|y) 1 z)(NOT EQ y ((spypoints on)(/)|y1)) (PP Z matches sentence z) (APPEND y ((PP Z solved : X Y)) X1)|X1) ((spy X)(CON X) (ADDCL ((X|Y)(spypoints on) (/)(spying X Y)) 0)) ((unspy X)(CON X)(DELCL ((X|Y)(spypoints on)(/)(spying X Y)))) ((APPEND () X X)/) ((APPEND (x|Y) Z (x|Y1)) (APPEND Y Z Y1)) CLMOD (CON X)(DELCL ((X|Y)(spypoints on)(/)(spying X Y)))) ((APPEND () X X)/) ((APPEND (x|Y) Z (x55???????????!ͱ6!Sͱ6ͩ6You are trying to run an uninstalled WORDSTAR.Please run INSTALL first.-ͩ6 ʹ6͢6~̢6 #ô6!%=#%=#%=#%=:`2Y5:c2+ͥ2b5~f!B6.:2c5K=~"=:b5é*͂="7:Il++"7"7="7+"7:Il++"7"7"7*:c5£=*HL&bj –=R+#"7"7*H-3#"7"7Q"7R"7:c5*HͿ-=|!]=>o&))))>=goR>.>O->26:H26=26=26S>:7*7>|& 7!!Y5~P>(P>6!"J6O-:H|>y|>6u>:I@|>|>~!8"J6>|&w- A4:c5:ª>®>:ʰ>>2d52e5>:2[5ͤ!ͮ!~"!N6 ! t6!q66.!66/:26ɛ>V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳ  told-mod (is-told)(yes no just ans) ((COPYRIGHT 1983 LPA LTD (V 29-1))) ((is-told X)( LST X)/(told X)) ((is-told |X)(told X)) ((told X)(P |X)(P " ? ") (R Y)(answer X Y)) ((answer X yes)/) ((answer X no)/FAIL) ((answer X just)/(match X)) ((answer X ans) (match X)) ((answer X x) (NOT EQ x ans)(P x ignored - enter: yes/no/ans ... /just ...)(PP)FAIL) ((answer X x)(told X)) ((match ())/) ((match (x|X)) (VAR x)/(R x)(match X)) ((match ((x|y)|X))/ (match (x|y)) (match X)) ((match (x|X)) (match X)) CLMOD ch (x|X)) (VAR x)/(R x)(match X)) ((match ((x|y)|X))/ (match (x|y)) (match X)) ((match (x|PROGRAM LOGCDTRACE LOGEFUSER LOGGSPYTRACELOGHPROLOG SYMITOLD LOG?((P " " MITSI - RML Version 1.0)(PP)) ?((P " " (c) Jonathan Briggs 1984)(PP)(PP)) MITSI-MOD ("" sum-of string-of less equals prod-of int-of belongs-to "?ERROR?") (list why not printing edit kill delete all and if /* vars , . ! ? a n "y" s o m sys load save quit yes no NOT infix dict last) ((copyright Jonathan Briggs 1984)) ((cl (X (/* vars|Y)|Z)|x) (CL (X|y)|x) (convert (X|y) (X (/* vars|Y)|Z))) ((convert (X (/* vars|Y)|Z) (X (/* vars|Y)|Z))) ((convert (X|Y) (X (/* vars)|Y))(NOT EQ ((/* vars|x)|y) Y)) ((string-of X Y) (STRINGOF X Y)) ((less X Y) (LESS X Y)) ((prod-of X (Y Z)) (TIMES Y Z X)) ((int-of X Y) (INT Y X)) ((term X) (VAR X) (err(illegal use of "x, y or z"))) ((term .)) ((term ?)) ((term !)) ((exp2 (NOT|X) Y Z) (OR ((? (X)) (bind X Y x) (revparse (x) y) (app y (is not untrue) Z)) ((bind X Y x) (revparse (x) z) (app z (is not known) Z)))) ((exp2 X Y Z) (known X Z)) ((exp2 X Y (unable to explain|Z)) (bind X Y x) (revparse (x) Z)) ((P-se󭭭 | 堠 |  L Changed logged disk drive | | R Run a program  F File directory + | P  | X EXIT to system  H Set help level |  |  孭 | E RENAME a file |  D Open a document file | O COPY a file | M Run MailMerge  N Open a non-document file | Y DELETE a file | S Run SpellStar   For maximum help (full menu display),  select Help Level 3 by typing ^JH3.  This message will clear when a key is pressed.  TO HYPHENATE, PRESS -. Before pressing -, you may  move cursor: ^S=cursor left, ^D=cursor right.  If hyphenation not desired, type ^B.  < < < M A I N M E N U > > >  | | |  ^S char left ^D char right |^G char | ^I Tab ^B Rentences () x)) ((P-sentences (x|y) z)(!P-sentence x z)(P-sentences y z)) ((P-sentence () x) (PP)) ((P-sentence (X|Y) x) (!P-sentence2 X x) (P-sentence Y x)) ((P-sentence2 if x) (P-if x) (PP) (P " ")) ((P-sentence2 and x) (P and) (PP) (P " ")) ((P-sentence2 X x) (P X "")) ((P-if list)(P if)) ((P-if exp)(P because)) ((exp-all () X ())) ((exp-all (X|Y) Z (x|y)) (exp2 X Z x) (exp-all Y Z y)) ((exp (why|X)) (exp X)) ((exp (printing|X)) (split X , Y Z)  (exp Z)) ((exp X) (parseconj X Y) (comp Y Z () x) (? Z) (exp-all Z x y) (P-sentences y exp)) ((nexton X Y (X Y|Z))) ((nexton X Y (Z|x)) (nexton X Y x)) ((intvars (X Y Z x y z))) ((lookup X Y Z Z) (belongs-to (X|Y) Z)) ((lookup X Y ((Z|x)|y) ((X|Y) (Z|x)|y)) (!intvars z) (!nexton x Y z)) ((lookup X Y () ((X|Y)))) ((var X) (STRINGOF (a n "y"|Y) X)) ((var X) (STRINGOF (s o m e|Y) X)) ((comp2 (X|Y) (Z|x) y z) / (!comp (X|Y) (Z|x) y z)) ((comp2 X Y Z x) (IF    (!var X) ((!lookup X Y Z x)) ((EQ X Y) (EQ Z x)))) ((tquery-all X Y Z) (? Y) (! bind Y Z x) (P " "|X) (PP) (FAIL)) ((tquery-all|X) (P " no(more)answers")(PP)) ((split (X|Y) X () Y)) ((split (X|Y) Z (X|x) y) (split Y Z x y)) ((ext-int X (Y |x) Z) (parseclause X y) (comp y (Y|x) () Z)) ((int-ext ((X|Y) (/* vars|Z)|x) y) (bind ((X|Y)|x) Z z) (revparse z y)) ((declare x)(sysword x)) ((declare X) (OR ((CL ((dict X) ))) ((ADDCL ((dict X) )))) (OR ((CL ((infix X)))) ((ADDCL ((infix X)))))) ((query-all X Y ()) (IF (? X) ((P " YES") (PP)) ((P " DONT KNOW") (PP)))) ((query-all X Y (Z|x)) (? X) (! bind Y (Z|x) y) (P " YES"|y) (PP) (FAIL)) ((query-all|X) (P " no(more)answers") (PP)) ((parseconj (X Y Z and|x) ((Y X Z)|y)) (!parseconj x y)) ((parseconj (not|X) ((NOT|Y)|Z)) (!parseconj X (Y|Z))) ((parseconj (X Y Z) ((Y X Z)))) ((tquery X) (split X , Y Z) (parseconj Z x) (comp (Y : x) (y : z) () X1) (tquery-all y (ADDCL ((X|Y) (/* vars|(x|z))|Z)|X1)) ((comp () () X X)) ((comp (X|Y) (Z|x) y z) (!comp2 X Z y X1) (!comp Y x X1 z)) ((comp X Y Z x) (CON X) (IF (!var X) ((!lookup X Y Z x)) ((EQ X Y) (EQ Z x)))) ((parseclause (X Y Z if|x) ((Y X Z)|y)) (!parseconj x y)) ((parseclause (not|X) ((NOT|Y)|Z)) (!parseclause X (Y|Z))) ((parseclause (X Y Z) ((Y X Z)))) ((query (why|X)) (explain X)) ((query (printing|X)) (tquery X)) ((query X) (parseconj X Y) (comp (X : Y) (Z : x) () y) (query-all x Z y)) ((query|X) (err(not a MITSI question))) ((command ()) (CL ((last X Y))) (app X (Y) Z) (edt2 Z x y) (record-last x y) (perform x y)) ((command (list X)) (lst X)) ((command (delete X Y)) (DELCL X Y) (IF (CL ((X|Z)|x)) () ((DELCL ((dict X)|y))))) ((command (kill X)) (kll X)) ((command (quit))(P "are you sure ? ")(R x)(EQ x yes)(QT.)) ((command (quit))) ((command (edit X Y)) (edt X Y)) ((command (save X)) (SAVE X) (P program saved as X )(PPz X1)) ((explain ()) (CL ((last X ?))) (exp X)) ((explain (X|Y)) (exp (X|Y))) ((explain x)(P unable to explain|x)(PP)(ABORT)) ((edt X Y) (cl ((X|Z)|x) Y Y) (int-ext ((X|Z)|x) y) (RFILL (Y y) z) (INT z) (R X1) (ext-int X1 Y1 Z2) (DELCL X Y) (SUM z1 1 z) (addcl Y1 Z2 z1)(update-dict X Y) (OR ((EQ X Z1)) ((declare Z1)(P relation changed to Z1)(PP)))) ((edt|X) (err(edit failed))) ((update-dict x y)(OR ((CL ((x|z)|X)))((DELCL ((dict x)|Y))))) ((kll all) (P "everything ? ") (R X) (EQ X yes) (FORALL ((CL ((dict Y)|Z))) ((KILL Y))) (KILL dict) (KILL infix) (SPACE x) (P all relations removed x k left)(PP)) ((kll all) (P OK ... nothing removed) (PP)) ((kll X) (KILL X) (DELCL ((dict X)|Y)) (P all sentences about X removed) (PP) (PP)) ((edt2 X (Y|Z) x) (RFILL X Y) (OR ((term Y) (ABORT)) ((rdln Z x)))) ((addcl ((X|Y)|Z) () |z)(declare X)(ADDCL ((X|Y)|Z)|z)) ((addcl ((X|Y)|Z) (x|z) |X1) (declare X) )) ((command (load X)) (OR ((LOAD X)(P X loaded)(PP)) ((err(X not found))))) ((command (sys x))|x) ((command|X) (err(not a MITSI command))) ((assert X) (!parseclause X Y) (!comp Y Z () x) (!addcl Z x )) ((assert|X) (err(not a MITSI sentence))) ((perform X .) (!assert X)) ((perform X !) (!command X)) ((perform X ?) (!query X)) ((record-last (why) ?)) ((record-last () !)) ((record-last X Y) (KILL last) (ADDCL ((last X Y)))) ((rdln X Y) (R Z) (IF (term Z) ((EQ X ()) (EQ Y Z)) ((rdln x Y) (app (Z) x X)))) ((prompt) (PP) (P ">>> ")) (("") (!prompt) (!rdln X Y) (!record-last X Y) (!perform X Y) / ("")) ((system (X|Y) Z) (sysword X) (? ((X|Y))) (revparse ((X|Y)) x)  (app x (is built in) Z)) ((belongs-to X (X|Y))) ((belongs-to X (Y|Z)) (belongs-to X Z)) ((sysword sum-of)) ((sysword equals)) ((sysword belongs-to)) ((sysword int-of)) ((sysword prod-of)) ((sysword less)) ((sysword string-of)) ((fact (X|Y) Z   ) (cl ((X|x) (/* vars|y))) (NOT NOT EQ Y x) (bind (X|x) y z) (revparse (z) X1) (app X1 (is stated) Z)) ((sum-of X (Y Z)) (SUM Y Z X)) ((equals X X)) ((b2 X X)) ((b2 X Y)) ((rule (X|Y) Z) (cl ((X|Y) (/* vars|x)|y)) (? y) (bind ((X|Y)|y) x z) (revparse z Z)) ((known X Y) (system X Y)) ((known X Y) (fact X Y)) ((known X Y) (rule X Y)) ((app () X X)) ((app (X|Y) Z (X|x)) (app Y Z x)) ((revparse X Y) (parseclause Y X)) ((bind X () X)) ((bind X ((Y|Z)|x) X) (b2 Y Z) (bind X x X)) ((lst all) (CL ((dict X)|Y)) (PP) (PP X :) ( lst X) (FAIL)) ((lst X) (NOT EQ X all) (cl ((X|Y) (/* vars|Z)|x) 1 y) (! bind ((X|Y)|x) Z z) (! revparse z X1) (P y " ")(!P-sentence X1 list) (FAIL)) ((lst|X)) (("?ERROR?" 2 (x|y))(P no sentences about x)(PP)(ABORT)) (("?ERROR?" 11 x)(P interrupted!)(PP)(ABORT)) (("?ERROR?" 3 y)(err(wrong use of built-in program))) (("?ERROR?" x y)(err(illegal use of MITSI))) ((err x)(P error ... | x)(PP)(errtrap-mod ("?ERROR?") (q e s f c is-told tell data-rel) ((COPYRIGHT 1984 LPA V3-15)) ((P-code 0 "Arithmetic overflow")) ((P-code 1 "Arithmetic underflow")) ((P-code 2 "No clauses for relation")) ((P-code 3 "Invalid form of use")) ((P-code 4 "Error in adding or deleting clause")) ((P-code 5 "File error")) ((P-code 6 "Too many files opened at once")) ((P-code 7 "Close all files first")) ((P-code 8 "Bad data in file")) ((P-code 9 "Write error")) ((P-code 10 "Disk or directory is full")) ((P-code 11 "Break !")) ((P-code 12 "Illegal use of modules")) ((P-code X " ")) (("?ERROR?" 2 (X|Y)) (CL ((data-rel X)))/FAIL) (("?ERROR?" X Y) (P-code X Z)/ (P Error X Z)(PP)(PP trying Y) (P "error&(? for info)") RCLEAR (INTOK "CON:" x)(respond x Y)) ((respond q X) (ABORT)) ((respond e X) /(RFILL (X) Y)Y) ((respond c X) / X) ((respond tell (X|X1))/ (ADDCL ((X|X2) (is-told (X X2)))) (X|X1)) ((respond f X)/FAIL) ((respond s X)/) ((respond / X)/ (R x)(R Y) (x Y) (P "erroABORT)) CLMOD X (Y Z)) (SUM Y Z X)) ((equals X X)) ((b2 X X)) ((b2 X Y)) ((rule (X|Y) Z) (cl ((X|Y) (/* vars|x)|y)) (? y) (bind ((X|Y)|y) x z) (revparse z Z)) ((known X Y) (system X Y)) ((known X Y) (fact X Y)) ((known X Y) (rule X Y)) ((app () X X)) ((app (X|Y) Z (X|x)) (app Y Z x)) ((revparse X Y) (parseclause Y X)) ((bind X () X)) ((bind X ((Y|Z)|x) X) (b2 Y Z) (bind X x X)) ((lst all) (CL ((dict X)|Y)) (PP) (PP X :) ( lst X) (FAIL)) ((lst X) (NOT EQ X all) (cl ((X|Y) (/* vars|Z)|x) 1 y) (! bind ((X|Y)|x) Z z) (! revparse z X1) (P y " ")(!P-sentence X1 list) (FAIL)) ((lst|X)) (("?ERROR?" 2 (x|y))(P no sentences about x)(PP)(ABORT)) (("?ERROR?" 11 x)(P interrupted!)(PP)(ABORT)) (("?ERROR?" 3 y)(err(wrong use of built-in program))) (("?ERROR?" x y)(err(illegal use of MITSI))) ((err x)(P error ... | x)(PP)(r&") (INTOK "CON:" Z) (respond Z X)) ((respond y (Y|Y1)) (PP to quit enter: q ) (PP to fail call enter:f) (PP to succeed call enter:s) (PP to line edit call and resume enter:e) (P or enter / "" (eg / add "",/ LOAD file))(PP) (PP or enter:tell(see manual)) (PP to resume enter: c) (P "error&")(INTOK "CON:" x) (respond x (Y|Y1))) CLMOD P) (PP or enter:tell(see manual)) (PP to resume enter: c) (P "error&")(INTOK "CON:" x) (respond x (Y|Y1))) CLe 11 "Break !")) ((P-code 12 "Illegal use of modules")) ((P-code X " ")) (("?ERROR?" 2 (X|Y)) (CL ((data-rel X)))/FAIL) (("?ERROR?" X Y) (P-code X Z)/ (P Error X Z)(PP)(PP trying Y) (P "error&(? for info)") RCLEAR (INTOK "CON:" x)(respond x Y)) ((respond q X) (ABORT)) ((respond e X) /(RFILL (X) Y)Y) ((respond c X) / X) ((respond tell (X|X1))/ (ADDCL ((X|X2) (is-told (X X2)))) (X|X1)) ((respond f X)/FAIL) ((respond s X)/) ((respond / X)/ (R x)(R Y) (x Y) (P "erro   editor-mod (EDIT) (vars t n s b f m c e o u v w k i a yes no) ((COPYRIGHT 1983 LPA LTD V11-24)) ((D-C () () ())) ((D-C (X|Y) (X) Y)) ((Rev-list () X X)) ((Rev-list (X|Y) Z x) (Rev-list Y (X|Z) x)) ((DownC X (() Y Z)) (NOT VAR X) (D-C X Y Z)) ((App-C () X X)) ((App-C (X|Y) Z (X|x)) (App-C Y Z x)) ((BackC ((X|Y) Z x) (Y (X) y)) (App-C Z x y)) ((BackC (() (X) Y) (() () (X|Y)))) ((NextC (X Y (Z|x)) (y (Z) x)) (App-C Y X y)) ((NextC (X (Y) ()) ((Y|X) () ()))) ((Delete-in-C (() X Y) (() () Y))) ((Delete-in-C ((X|Y) Z x) (Y (X) x))) ((Front-C 0 () X X)) ((Front-C X (Y|Z) x (Y|y)) (LESS 0 X) (SUM 1 z X) (Front-C z Z x y)) ((DisplayC (X () Y) "No term") /) ((DisplayC (X (Y) Z) Y)) ((shift-l X 0 X)/) ((shift-l ((X|X1) (Y) Z) x (X2 Y2 Z2)) (SUM x 1 x1)(shift-l (X1 (Y) (X|Z)) x1 (X2 Y2 Z2))) ((shift-l (() Y Z) x (() Y Z))) ((shift-r X 0 X)/) ((shift-r (X (Y) (Z|Z1)) x (X2 Y2 Z2)) (SUM 1 x1 x)(shift-r ((Z|X) (Y) Z1) x1 (X2 Y2 Z2))) ((shift-r (X Y ()) x (X Y ()))) ((Edit-in-C (X Y Z) i (X (x)o-P X Y "No clause") (LESS -1 Y)) ((SHIFT-L X Y Z x1 x y) (SUM x2 1 x1)(SUM Y x2 x3)(SUM 1 Y Y1) (IF (LESS x3 0) ((EQ x4 0)) ((EQ x4 x3))) (ADDCL Z x4)(DELCL X Y1)(SUM x4 1 x) (Goto-P X x y)) ((SHIFT-R X Y Z x1 x y) (SUM Y x1 x2)(ADDCL Z x2)(DELCL X Y)(SUM x2 1 x3)(FIND X x3 x y)) ((FIND X x3 x y) (Goto-P X x3 y3) (IF (EQ y3 "No clause") ((SUM 1 x4 x3)(FIND X x4 x y)) ((EQ (x y)(x3 y3))))) ((E-in-P X Y Z i x y) (R y) (EQ y ((X|X1)|X2))(Insert-in-P Y x y)) ((E-in-P X Y Z c x Z) (NOT EQ Z "No clause")(Append-in-P Z Y x Z)) ((E-in-P X Y Z m x y)(R x1) (IF (LESS x1 0) ((SHIFT-L X Y Z x1 x y)) ((LESS 0 x1)(SHIFT-R X Y Z x1 x y)))) ((E-in-P X Y Z a x y) (R y) (EQ y ((X|X1)|X2))(Append-in-P Z Y x y)) ((E-in-P X Y Z k x y) (DELCL X Y) (SUM 1 x Y) (Goto-P X x y)) ((E-in-P X Y Z n x y) (NOT ? ((EQ Z "No clause") (LESS 0 Y))) (SUM 1 Y x) (Goto-P X x y)) ((E-in-P X Y Z b x y) (SUM 1 x Y) (Goto-P X x y)) ((E-in-P X Y Z f Y y) (R X1) (NOT CL ((X|x)(/* vars |x1)|x2) Y Y) (bind  y)) (R x) (App-C Y Z y)) ((Edit-in-C (X Y Z) a (x (y) Z)) (R y) (App-C Y X x)) ((Edit-in-C X k Y) (Delete-in-C X Y)) ((Edit-in-C X m Y) (R x) (IF (LESS x 0) ((shift-l X x Y)) ((LESS 0 x)(shift-r X x Y)))) ((Edit-in-C (X (Y) Z) s (X (x) Z)) (R y) (EQ y (Y x))) ((Edit-in-C (X (Y) Z) t (X (x) Z)) (RFILL (Y) x)) ((Edit-in-C X n Y) (NextC X Y)) ((Edit-in-C X b Y) (BackC X Y)) ((Edit-in-C (X (Y) Z) e (X (x) Z)) (DownC Y y) (Edit-term y x)) ((UpC (X Y Z) x) (App-C Y Z y) (Rev-list X y x)) ((EdC X Y o) (UpC X Y) /) ((EdC X Y Z) (Edit-in-C X Z x) / (Edit-term x Y)) ((EdC X Y Z) (PP ?) (Edit-term X Y)) ((Edit-term X Y) (DisplayC X x) (Prompt() (x) Z) (EdC X Y Z)) ((Insert-in-P 0 1 X) (vartrans X X1)(ADDCL X1 0)) ((Insert-in-P X X Y) (SUM 1 Z X) (vartrans Y Y1)(ADDCL Y1 Z)) ((Append-in-P x 0 1 X) (vartrans X X1)(ADDCL X1 0)) ((Append-in-P x X Y Z) (vartrans Z Z1)(ADDCL Z1 X) (IF (EQ x "No clause") ((EQ X Y)) ((SUM X 1 Y)))) ((Goto-P X Y X1) (CL ((X|Z)|x) Y Y) / (vartrans X1 ((X|Z)|x))) ((GotZ X1 X3 () X2) (EQ Z ((X|x)|x2)) (EQ y1 ((X|x)(/* vars |X2)|x2)) (ADDCL y1 Y)(DELCL X Y) (vartrans y y1)) ((E-in-P X Y Z v Y ((X|x)|y)) (CL ((X|x)(/* vars |Y2) |y) Y Y) (ADDCL ((X|x)|y) Y) (DELCL X Y) ) ((E-in-P X Y (Z|x) e y Z1) (Edit-term (() (Z) x) ((X1|y1)|z)) (Update-p X Y ((X1|y1)|z) Z1 y)) ((E-in-P X Y (Z|x) t Y1 z) (RFILL ((Z|x)) y) (Update-p X Y y z Y1)) ((bind X () () x x)/) ((bind X (Z|Y) Y x ((X |Z)|x)) (VAR X)(NOT ON X x samevar)/(CON Z)) ((bind X Z Z x x)(NOT LST X)/) ((bind () Z Z x x)/) ((bind (x|y) X1 X3 x1 x3) (bind x X1 X2 x1 x2)(bind y X2 X3 x2 x3)) ((samevar x (y |z))(NOT ? ((EQ x a)(EQ y b)))) ((Update-p X Y ((X|X1)|X2) ((X|X1)|X2) Y) /(vartrans ((X|X1)|X2) Z) (ADDCL Z Y) (DELCL X Y)) ((Update-p X Y Z z Y) (EQ Z ((Z1|Z2)|Z3)) (Prompt (Put clause Z in relation Z1 "?(yes/no) ") ()X1) (EQ X1 yes) (Prompt ( Where?) ()Y1) (INT Y1) (ADDCL Z Y1) (DELCL X Y) (Goto-P X Y z)) ((EdP X Y Z o) (PP EDIT of X finished) /   ) ((EdP X Y Z x) (E-in-P X Y Z x y z) / (Edit-P X y z)) ((EdP X Y Z x) (PP ?) (Edit-P X Y Z)) ((Edit-P X Y Z) (Prompt ([ Y ])( Z) x) (EdP X Y Z x)) ((EDIT X) (NOT SYS X) (OR ((CL ((X|Y)|Z) 1 1)(vartrans X1 ((X|Y)|Z)) (Edit-P X 1 X1)) ((Edit-P X 0 "No clause")))) ((vartrans x (X1 (/* vars |Z1)|Y1)) (NOT VAR X1)/(shrink Z1 Z)(App-C (X1|Y1) ((vars |Z)) x)) ((vartrans x (X1 (/* vars |Z1)|Y1)) (App-C X ((vars |Z)) x)/(listvars Z Z1) ( sub X Z1 (X1 |Y1))) ((vartrans x x)) ((listvars ()())/) ((listvars (X|Y) ((x |X)|Y1)) (CON X)(listvars Y Y1)) ((sub X Z X1)(CON X)(ON (X1 |X ) Z EQ)/) ((sub X Z X)(VAR X)/) ((sub X Z X)(NOT LST X)/) ((sub () Z ())/) ((sub (x|y) X (x1|y1)) (sub x X x1)(sub y X y1)) ((shrink ()())/) ((shrink ((X |x)|Y) (X|Y1)) (EQ X x)(shrink Y Y1)) ((ON X (Y|Z) x)(x X Y)/) ((ON X (Y|Z) x) (ON X Z x)) ((Prompt x z y) (P| x)(PQ|z) (INTOK "CON:" y)) CLMOD rink Y Y1)) ((ON X (Y|Z) x)(x X Y)/) ((ON X (Y|Z) x) (ON X Z x)) ((Promsimtrace-mod (is-trace all-trace) ("y" n s f Parse-of-ConjC APPEND Parse-of-SS : "FIND:" Parse-of-Cond dict q #) ((COPYRIGHT 1984 LPA LTD V2-16)) ((ENTER x "y" (X|Y)) / (CL ((X|Y1)|Z) 1 x5) (Parse-of-SS (X|Y) X1 ()) (Parse-of-SS (X|Y1) X2 ()) (APPEND (matching x:| X1) (with head of x5 : |X2)X6)(PP |X6) (IF (EQ Y Y1) ((P " match succeeds: ")(PP |X1)) ((P " match fails")(PP)FAIL)) (effect (NOT EQ Z ()) (Parse-of-ConjC Z Z1)(PP new query :| Z1)) (OR () ((PP retrying x)FAIL)) (??(1 |x) Z z)|z) ((ENTER x / X)/ (R Y)(R Z)(Y Z) (effect (Parse-of-Cond X X1 ()) (P x : |X1)) (test x X)) ((ENTER x n X) / X (OR () ((PP retrying x)FAIL))) ((ENTER x s X)/) ((ENTER x f X) / FAIL) ((ENTER x q X) ABORT) ((ENTER x X Y) (P ENTER "y" n s(to succeed) f(to fail) q (to quit) or / followed by a command) (INTOK "CON:" Z) (ENTER x Z Y)) ((all-trace X1)("FIND:" X1 X (:|Y) which-trace) (Parse-of-ConjC Y1 Y) (whichex X Y1)) ((whichex X Y1) (??( 1) Y1 z) (IF (EQ z ()) , e.g. for tabular material:  Put .UJ OFF before table, put .UJ ON after table.  Space for next frame, ^U to return to editing:  SPECIAL CHARACTERS in HEADINGS (.HE) and FOOTINGS (.FO):  # prints as current page number  \ do not interpret next character as a special character  ^K do not print following spaces if on even-numbered page  PAGE NUMBER POSITIONING: If a footing text is specified (.FO  dot command), the default bottom center page number is not  printed. Use a # in heading or footing to position page  number where desired. ^K followed by spaces followed by #  may be used to produce alternating left/right page numbers.  Space for next frame, ^U to return to editing:  ***** Merge-Print Dot Commands *****  .DF filename specify Data File for .RV  .RV name,name,name,... Read Variable values from data file  .AV "prompt",name Ask operator for Variable value  &name& anywhere in doc't prints as variable va((P| X)(PP)(PP backtracking ...) FAIL) ((PP No (more)answers)))) ((whichex X Y1) (PP No (more) answers)) ((is-trace X) (Parse-of-ConjC Y X) (IF (?? (1)Y ()) ((PP Yes)) ((PP No)))) ((?? x () ())) ((?? x ((? X)) ())/ (?? x X z1)) ((?? (x| x1)(X|Y) z) (effect (Parse-of-Cond X X1 ())(P (x |x1) : |X1)) (test (x |x1) X) (EQ X (y|y1)) (OR ((EQ y #)/(EQ y1 (Z Z1))(Parse-of-Cond Z X1 ())) ((Parse-of-Cond X X1 ()))) (PP (x |x1)solved :| X1)(SUM x 1 x2) (??( x2|x1) Y z)) ((?? x ((/)|Y) (/FAIL))/) ((?? x (X|Y) z) (Parse-of-Cond X Z ()) (PP x failing :|Z ) FAIL) ((test x (# X Y))/ (response Z1) (IF (EQ Z1 "y") ((PP evaluating expressions using relations ...) (?? (1|x) Y z1)/(Parse-of-SS X X2 ()) (PP evaluating x :|X2)(IF (SYS X) (X) ((ENTER x "y" X)))) ((# X Y)))) ((test x (FORALL X Y))/ (response Z1) (IF (EQ Z1 "y") ((FORALL ((PP trying generator of x)(?? (1 gen |x) X z1)|z1) ((PP try   ing test condition of x) (IF (?? (1 test|x) Y z2) ((PP test of x succeeds ... retrying generator)) ((PP test of x fails)FAIL) ) ) )) ((FORALL X Y)))) ((test x (ISALL X Y |Z))/ (response y) (IF (EQ y "y") ((effect (Parse-of-ConjC Z Z1) (PP finding all Y such that:|Z1)) (ISALL X Y (?? (1|x) Z z1)(PP found answer Y to x)|z1)) ((ISALL X Y|Z)))) ((test x (NOT ? X3))/ (response Z1) (IF (EQ Z1 "y") ((PP x unnegated)  (IF (?? (1|x) X3 ()) ((PP unnegated x solved so ...) FAIL) ((PP unnegated x failed so ...)))) ((NOT ? X3)) )) ((test z (!|X))/ (P " trace?")(INTOK "CON:" x)(ENTER z x X)/) ((test x (NOT|X3))/ (response Z1) (IF (EQ Z1 "y")  ((PP x unnegated)(IF (?? (1|x) (X3) ()) ((PP unnegated x solved so ...)FAIL) ((PP unnegated x failed so ...)))) ((NOT |X3)))) ((test x (OR X1 X2))/ (response Z1) (IF (EQ Z1 "y") ((OR ((PP x either branch)(?? (1 |x) X1 y)|y) deftrap-mod ("?ERROR?") (q c is-told add if tell data-rel) ((COPYRIGHT 1984 LPA LTD V2-16)) ((P-code 0 "Arithmetic overflow")) ((P-code 1 "Arithmetic underflow")) ((P-code 3 "Invalid form of use")) ((P-code 5 "File error")) ((P-code 6 "Too many files opened")) ((P-code 7 "Close all files first")) ((P-code 8 "Bad data in file")) ((P-code 9 "Write error")) ((P-code 10 "Disk or directory is full")) ((P-code 11 "Break !")) ((P-code 12 "Illegal use of modules")) ((P-code X " ")) (("?ERROR?" 4 (ADDCL ((X|Y)|Z) |x)) (P "Cannot add sentences to" X)(PP) ABORT) (("?ERROR?" 4 (Z X|x))/ (IF (CON X) ((EQ X Y)) ((EQ X ((Y|y)|z)))) (PP Cannot delete sentences for Y)ABORT) (("?ERROR?" 2 (X|Y)) (CL ((data-rel X)))/FAIL) (("?ERROR?" 2 (Y|Y1))/ (PP No definition for Y)(PP trying: Y Y1) (P "error&(? for info)") RCLEAR (INTOK "CON:" x) (respond x (Y|Y1)) ) (("?ERROR?" X (Y|Y1)) (P-code X x)(P "Evaluation error: " X x)(PP) (PP trying :Y Y1) ABORT) ((respond q X) (ABORT)) ((PP x or branch) (?? (1| x) X2 y)))) ((OR X1 X2)) )) ((test x X)(EQ X (y|z)) (NOT CL ((dict y)))(DEF X)/ (PP) X (OR () ((NOT SYS X)(PP retrying x)FAIL))) ((test x X) (DEF X)/ (P " trace?")(INTOK "CON:" Z1) (ENTER x Z1 X)) ((test x X) (P " No definition for relation")(PP) (ENTER x e X)) ((response Z1) (P " trace?(y/n) ")(R Z1)) ((effect|X) (? X) FAIL) ((effect |X)) CLMOD  (IF (?? (1|x) X3 ()) ((PP unnegated x solved so ...) FAIL) ((PP unnegated x failed so ...)))) ((NOT ? X3)) )) ((test z (!|X))/ (P " trace?")(INTOK "CON:" x)(ENTER z x X)/) ((test x (NOT|X3))/ (response Z1) (IF (EQ Z1 "y")  ((PP x unnegated)(IF (?? (1|x) (X3) ()) ((PP unnegated x solved so ...)FAIL) ((PP unnegated x failed so ...)))) ((NOT |X3)))) ((test x (OR X1 X2))/ (response Z1) (IF (EQ Z1 "y") ((OR ((PP x either branch)(?? (1 |x) X1 y)|y)  ((respond tell (X|X1))/ (add (X X2 if is-told((X X2)))) (X|X1) ) ((respond c X) / X) ((respond / X)/ (R x)(R Y) (x Y) (P "error&") (INTOK "CON:" Z)/ (respond Z X)) ((respond z (Y|Y1)) (PP to quit enter: q ) (PP or enter :tell(see manual)) (P or enter: / "" (eg / add (sentence), / load file))(PP) (PP to continue enter: c) (P "error&")(INTOK "CON:" x) (respond x (Y|Y1))) CLMOD  add (sentence), / load file))(PP) (PP to continue enter: c) (P "erroCL ((X|Y)|Z) |x)) (P "Cannot add sentences to" X)(PP) ABORT) (("?ERROR?" 4 (Z X|x))/ (IF (CON X) ((EQ X Y)) ((EQ X ((Y|y)|z)))) (PP Cannot delete sentences for Y)ABORT) (("?ERROR?" 2 (X|Y)) (CL ((data-rel X)))/FAIL) (("?ERROR?" 2 (Y|Y1))/ (PP No definition for Y)(PP trying: Y Y1) (P "error&(? for info)") RCLEAR (INTOK "CON:" x) (respond x (Y|Y1)) ) (("?ERROR?" X (Y|Y1)) (P-code X x)(P "Evaluation error: " X x)(PP) (PP trying :Y Y1) ABORT) ((respond q X) (ABORT))   exptran-mod ( Expression-Parse ) (@ # + - ~ * % APPEND CONS func & and yes rel-form) ((COPYRIGHT 1984 LPA LTD V2-16)) ((less + x2)) ((less "-" x2)) ((less ~ x2)) ((op x) (NOT VAR x) (sysop x)) ((fn x) (CON x)(fn1 x)) ((fn1 APPEND)) ((fn1 @)) ((fn1 x)(CL ((func x)))) ((fn1 x) (PP x assumed not to be function name)FAIL) ((sysop +)) ((sysop ~)) ((sysop "-")) ((sysop *)) ((sysop %)) ((sysop /)) ((Expression-Parse x y z) (VAR z)/ (X-parse x y z ())) ((Expression-Parse x x z) (NOT CL ((rel-form)))(symbval z)) ((symbval ())/) ((symbval ((X|Y)|Z)) (APPEND Y1 (x) Y)/ (IF (sysop X) ((EQ Y1 (y1 y2))(EQ x (y1 X y2))) ((EQ x (X|Y1)))) (symbval Z)) ((name / %)/) ((name ~ -)/) ((name x x)) ((X-parse x x y y) (NOT LST x)/) ((X-parse (y1 x y2) z Z Y) (op x) (X-parse y1 z1 Z Y1)(name x x1) (X-parse y2 z2 Y1 ((x1 z1 z2 z)|Y)) /) ((X-parse (y1 x1 y2 x2 |Y) z Z X) (op x1)(op x2)/ (IF (less x1 x2) ((X-parse (y1 x1 (y2 x2|Y)) z Z X)) ((X-parse ((yexrel-mod (RPRED external listex listfile LISTEX LISTFILE open close internal) ("?REV-P?" opened) ((COPYRIGHT 1983 LPA LTD V3-2)) ((Exx X Y Z x) (DELCL ((Y|y)|z)) (WRITE X ( ((Y|y)|z) )) (SEEK X X1) (Exx X Y X1 x)) ((Exx X Y Z Z)) ((Ext X () Y) /) ((Ext X (Y|Z) x) (Exx X Y x y) (ADDCL ((Y|z)(RPRED X x y (Y|z)))) (Ext X Z y)) ((external Y) (CREATE Y) (R Z) (IF (CON Z) ((Ext Y (Z) (0|0))) ((Ext Y Z (0|0)))) (CLOSE Y)) ((test X Y)(CL ((opened Y)))/) ((test X Y)(X Y)) ((listfile Y) (OPEN Y) (int Y (0|0) y print) (test CLOSE Y)) ((LISTFILE Y) (OPEN Y) (int Y (0|0) y PP) (test CLOSE Y)) ((listex X) (CL ((X|z)(RPRED Y x y (X|z))))(OPEN Y) (int Y x y print)(test CLOSE Y)) ((LISTEX X)  (CL ((X|z)(RPRED Y x y (X|z))))(OPEN Y) (int Y x y PP)(test CLOSE Y)) ((print X) ("?REV-P?" X X1) (P|X1)(PP)) ((open X)(IF (CL ((opened X))) () ((OPEN X)(ADDCL ((opened X)))))) ((close X)(CLOSE X)(IF (DELCL ((opened X))) ()())) ((internal X)1 x1 y2)x2|Y) z Z X))) ) ((X-parse (x y Y) z ((CONS y1 Y1 z)|Z) Z1) (NOT VAR x)(EQ x CONS)/ (Zip (y Y) (y1 Y1) Z Z1)) ((X-parse (x|Y) z Z Z1) (fn x)/ (Zip Y Y1 Z ((x|Y2)|Z1)) (APPEND Y1 (z) Y2)) ((X-parse X Y Z Z1) (Zip X Y Z Z1)) ((Zip x x y y ) (NOT LST x) /) ((Zip ()() y y)/) ((Zip (y|Y) (y1|Y1) Z Z2) (X-parse y y1 Z Z1) (Zip Y Y1 Z1 Z2)) CLMOD x y y ) (NOT LST x) /) ((Zip ()() y y)/) ((Zip (y|Y) (y1|Y1) Z Z2) (X-parse y y1 Z Z1) (Zip Y Y1 Z1 Z2)) x z) (NOT CL ((rel-form)))(symbval z)) ((symbval ())/) ((symbval ((X|Y)|Z)) (APPEND Y1 (x) Y)/ (IF (sysop X) ((EQ Y1 (y1 y2))(EQ x (y1 X y2))) ((EQ x (X|Y1)))) (symbval Z)) ((name / %)/) ((name ~ -)/) ((name x x)) ((X-parse x x y y) (NOT LST x)/) ((X-parse (y1 x y2) z Z Y) (op x) (X-parse y1 z1 Z Y1)(name x x1) (X-parse y2 z2 Y1 ((x1 z1 z2 z)|Y)) /) ((X-parse (y1 x1 y2 x2 |Y) z Z X) (op x1)(op x2)/ (IF (less x1 x2) ((X-parse (y1 x1 (y2 x2|Y)) z Z X)) ((X-parse ((y (CL ((X|z)(RPRED Y x y (X|z))))(OPEN Y) (int Y x y ADDCL)(test CLOSE Y) (DELCL ((X|X1) (RPRED|X2)))) ((int Y x y z) (less x y) (SEEK Y x) (READ Y X) (z X) (SEEK Y x1)/ (int Y x1 y z)) ((int Y x y z)) ((less x y) (VAR y)/) ((less (x|y) (x|y1)) /(SUM y 2 y2)(LESS y2 y1)) ((less (x|y) (x1|y1)) (LESS x x1)) ((RPRED X Y Z x) (SEEK X Y) (READ X y) (SEEK X z) (OR ((EQ (x|x1) y) (? x1)) ((less z Z) (RPRED X z Z x)))) CLMOD (RPRED X Y Z x) (SEEK X Y) (R Y)(X Y)) ((listfile Y) (OPEN Y) (int Y (0|0) y print) (test CLOSE Y)) ((LISTFILE Y) (OPEN Y) (int Y (0|0) y PP) (test CLOSE Y)) ((listex X) (CL ((X|z)(RPRED Y x y (X|z))))(OPEN Y) (int Y x y print)(test CLOSE Y)) ((LISTEX X)  (CL ((X|z)(RPRED Y x y (X|z))))(OPEN Y) (int Y x y PP)(test CLOSE Y)) ((print X) ("?REV-P?" X X1) (P|X1)(PP)) ((open X)(IF (CL ((opened X))) () ((OPEN X)(ADDCL ((opened X)))))) ((close X)(CLOSE X)(IF (DELCL ((opened X))) ()())) ((internal X)   ((hates Susan Mary)) ((mother-of Mary Peter)) ((mother-of Susan Scott)) ((father-of John Peter)) ((father-of Peter Scott)) ((married John Mary)) ((married Peter Susan)) ((female Mary)) ((female Susan)) ((male John)) ((male Peter)) ((male Scott)) ((likes John Mary)) ((likes John Peter)) ((likes Mary John)) ((likes Peter John)) ((likes Mary Peter)) ((likes Mary Susan)) ((infix likes)) ((infix married)) ((infix father-of)) ((infix mother-of)) ((infix hates)) ((postfix male)) ((postfix female)) ((postfix defined)) ((dict likes)) ((dict male)) ((dict female)) ((dict married)) ((dict father-of)) ((dict mother-of)) ((dict hates)) d)) ((dict likes)) ((dict male)) ((dict female)) ((dict married)) ((dict father-of)) ((dict motheCOMP CSD KEYDEF BAK+ASM COM@KEYDEF PRNUKEYDEF ASM*KEYDEF HEXSALES CSD<$$$ SUBtppýpÜshse !.; ?DELETE? RENAME? NEW NAME? COPY FROM? COPY TO ? jq p'$:Y5!88:Y508͹$02Y526$:Y5!88ͥ!6+͟$:626%8͹$!S5L#ͤVq@_#~:Oq#ͤ^qp&q>͍ͩs{é7!4k$%Ñq!p~Žq4w#…qp~#͹$O*+*`5"6?1"6*6~!͔$a#͟$~^ry:7ĥGrrrrr8y=qͩ$8îqyr̈́rqy(r!7r8îq(r8îqy\r̈́r®q\r8͹$2'!Ur#~®q͔$}!+y)8ͩ$8îq!M6r:7ʦr!:r!vr!87r:C6ʾr!;r:4!;r# ͂8þrկ rMss.r#s sͤ71s&s s1ss>  's~2pGOy*77sx!:ͥ>*:ͮ>9?F#>.?J=~ O#x͡?{?> ͡?":";{2:!:::;2;!2>!:ͥ>*:\A*:::_>G{ʛ?H>G>y”?ʕ? O>xF͡?w?*:\A2 ;WG ҙ@ʙ@ʙ@?2;:?:?:?q>2;@@@>@A?::=$@<<=͖B@9@¢2:>3@N@?::)>@!:1A#yHͿ@::x :=*6;>AͿ@î@Q::@:::=@@z@z ::: @::: ! ZBZBZBZB*;#";o*:&K>A~1APYÞ*A*:&:;HAK*:":*:":!*:REAK*:":*:*9<|R":::_jA*:|*9 –B>!,<*:-,=AҵBAÙB!";0s`t!͎tt!8"J67:77Z1tt!75t!7#͎+Mẗ́twt2G6pvtLp::2J:v2:Z1$24: 7«p#8rs(%÷p%8xss2'vpp6sp87p2726:+2_5:^5y)[-'Cq:6 q\!4~6"qqv!Cë:!2p ë:'C!7:72:qv!7ëhq2'́qhqFq!7I*7yTJvM!7xVKJqJy£JqJ!"6!7xH*7͈C͟IҖqqJp:C6G-$ͱ$!8.͔ 2':D6:C6G-ôq8q8>25G*B6|!8s:C6s$:Y5r!8͔$:626n$:!4$r,p2JZ1%͹$*+?1*`5"6"6*6~!͔$a#+w#͟$~ʂrͨrږryrsږrGͤ–rxG8x͔$}!+y)8ͩ$8@rկ ®rsr.r#r rͤ7rr rrr>  r~   s#.:*? пͤ#~+:1s~1s@##ͥ7$:C6 tKsͱ$8Zs:C6tmsͱ$8.͔ 2':C6]sͱ$.pxs.0p!4:4̎sù$~ʤs ʤs.#ʧsÑs6.#7 ʹsw# ¬s+~.s#6Ê*ps!s#~͹$2'*7*7R!)͎?!=8"J6!_7t!:; ͂7?r JpQpWp4EDBACKUP$$$BAKNEW FILE:/25bp͒p͡pOqZ1:4:b2f5>0q:2i52g5:I!ڈp~<2k5>24!vi.>2vC!p ̀ʾp!p ̀p!8"J6×-!v.!6.292F2I2[[-*7"v"7p*7*7R|<2 72 7|D!"7>2 7%q)"7,q2 7!5wȷ!  .>2%!:C6!4̗!:~ͣwv:Jtqw::ʀq>26_7 !p ~87!p  :4=q!CS!7v!4:8:6q6 #:v+!4v8!5~8:4=r!SC2Iv2DvLs:&vogss&"GvDsnrtst=s͈tt$s"EvLs*EvDs*Gv&[tvuʨutsTsvu[t}uqs33"Ev!sKât͚tځuŠsnr͚tڛuʕu*Gv"+v:&vg$o"Gv2Dv2Ivt*+v"Gv7t|Ҙs˜s:&vs+Lrs[t:Gvg:HvGu|sDM vuums"Ev:Gv&oA:HvtyGeu>2DvmsmsTs͈C8LyG;rQ8LQt;LNt͈Cs͈tt |t |t͈tGx*Bv}”t7+"BvẍCKt!Avtʾt t6 6Út6Gͭt>xɯx t#t+:Dv2IvGux Gu #|t͝r+t:Dv1u||t:Gv)u|t>2Dv7=|t>2Dv:Hv|t|t)u> t`ueu}JuWu# }eu Gx*EvóGóG͈C>kD> kD!Þu͈C8L͈C:&vus  ¶u vu:Hvu|s8uo|uu%uEuͳoÊeu8t çpôp2vþp>2v25Ok$%p͹$!n5L#25yp>,cp͹$!5L#25>)c͔$v:6v> v&:>(r293r26p(%v!p :50q:+2^5:_5y)͉):C6Ărdr!8"J6:Y5=*J6!a!Z5r5!8"J6;!: ͂7?ɛu pcptp:*/Wͳṗp!vjvLzWvLPj!7I*7:*r̳G31!vPjnpͳpnp,p!vj͇p:*ʤp:Gv2Hvnp&q͆rv2'5k:*ƒqCÐpnp!vj!vj&q7p*7*7Rp!U*v͎> v&31AMG2'o ixg"6!7G*7*7w# q"7z̈CCp!"6Uq!vj:v>qnp>v&:*|t!Hv:Gv6q:*nq*"v|> v&}> v&:v>v&:v>v&͉qÐp*hv*7͎ҥr:u®qïq͎ҥrtWr|¦qqtqqq:IvLr={rڦqqLræq{ræq!Dv:Iv7ȷ:Iv=4rLr;r:Gvo&A> trr1ru(r;r>2IvxeÏq{rA%rQr*7#"7u>2Iv͈C>t:Iv={rLrnræqgo2Dv2Iv#C>2Dv>2Dv2Iv*Gv&"hv|2u͔ xr+!Dvf:Ivo=Lr{r}2Iv|2Dv"hv>2u*Gv|g*Gv͹R8L͉V*Gv"Gv2Av"Ev`i"Bv2?v<*`5!5 .>2525:59q~!p!5 L#rqo?q(:5Rq:5kk*5"5>r2'!vͨjͤq{q*5|!p!pà&:5q*5|ʎq+"5:5[qg:5JÔJ?1 ͎rxͨsڼq͎rq͈C2'͗qҭq:5kk7!!:5:55r:5.rĨrr:5:5*7eÈCMh:5*7eC*7!5mrͮG:5:55ro /*7lÈC!n5x:5Srmrermr>+wy<<+w#y25~ʈrr>  > # pr+q#:5:5 r8LãrK?ÈC! p"60͍''/r@Yr>N!d5 7*7~ % *6~!%r͑!~!r2'ͤr͡sys#?"sͩ$ 87B,s-2s>25G@s>2525NJs25WUs>25U`s>25> c"p$p͹$7~͡s#bk))ܝs0_ܝs"5|s!0?::5s!7s*7sÈC!7s*7ltüsIGyOxG7tt  t#s+at#ss#Ltt #0ttattѷt Btat# t~͡s>Ҳt~>ɛ   qpppp(p:pÈpÙpqKK7p+pCf+L;LMp@p#D*Pv:6O~`opyL`opop Zp~~wyL`…pDM2v6P[jKKDhËp:pv*g5iڳp*k5+++͓lڶp*i5"g52pv!vͭj1)*6"6!6Þ!dp!d"6>26!"6:6*v:vpviK2q!vj*vK2qqf!vv͉d>267ɯ2v{͹qq6q{͹q*q7?Cqͧq{xq͹qͶqʆqͧq>2v͹qͶqsqE7:v7͹qSʝqD q͹q-7+vM"v#{ʿq2'K? ܔ ڿq7*qɾ#45qs6RqhqwqÑq&rSrqqqqrrërrqq r9s{IQ0 ENTER space OR NEW LINE SPACING (1-9): LEFT MARGIN COLUMN NUMBERumn)? (ESCAPE for cursor col RIGHT For decimal tab stop enter "#" and decimal point column  SE24:C6:q!8"J6w-~͎!86q26̀1!|!. !!86q!~8!"|~2|!>"|:4=t!*pt%$p͔$!,uML#Ϳͤy6sq&p×q!y6C#6O#6Mq(p×qyͺr#yͺr23y4y~# qy͔$:42|!+~w26.wͅ"͗*y ?w-! !A4!~yR++R.!yyRR!yy[!Y|y[ͫst!~Y|[! Dկ r͎sr.r#r rͤ7 ss* s r ss>?ss> s s~+s#.: пկ  ps~ͅs#*?+sͤ#~+:¦s~Ҧs@##ͥ7~#fo"t#R"tstsottg*ts#zw+|s~w#+|s*tF#"txG s8$:Y5͢$:626n$%ͩ$"p>24,q$y!p \t>/v&!8t%!4,u%,p͔$:!,uL#Ϳͤy6sҠt&pqt±t(pqt#yͺrryͺr23y*** xm6lm6f161amTJUMNF TAB AT COL CLEAR./; A for all)? ͱ$Bp1< 2)!6~6tq61)!5DpͶq2i52g5<<<2k5===!g5w!i5w̓s1)=xq*"v|}q>q<>!  r!!Þ!"Þ!#Þ!$Þ!%͞?1!&1)Þ:'!(r!I8"J6!*rHp!5͈s͹q_z#?rhrhr1)y!I4.ÊrJp!5A͊sDr͹q_{q!I4eڃr)))){/w!4+ʢr~ʑr¢r{2H41)tksr+C!vͭj@s*v*i5R*k5*v|r7_}r!vj> kD-r!vjtkss+͈C=s:v́q:v=͛q1)rK*sv"v͒kͭ7ͣks *v"svK*sv"v:sv_͒kͭͣkSsKs!:r#?r-frKsÊs%͔$L#Gy¸sͤ#ʶs!¸sW#ͤ7ssͤ{ŒsҌs~:0#bk))es*u(q5tSPELSTAROVR #1 COMMAND? WHAT???   NOT FOUND  Enter name of program you wish to Run,  optionally followed by appropriate arguments.  Example (shows disk space): STAT CHECK / ADD TO DICTIONARY? ``0   0m͛l?ace system disk (if removed), Hit any key to return to Operating System: ~$z%{|1|*"|*"||͕{9|͘{y{ʊz|ʊzڊz!\!y͘{!4y͘{d{{:|{>1|*|"*|"!!|͐{!|͐{|{z!|ͣ{{! }ͣ{{-||9|3|$:|9|*|:|?|:| {!|ͣ{{! }ͣ{Gx{>2|1|Ïzyʈz 8{*|>2|2{2|͜|F{:|F{1|! }ͣ{Èz!y"*!a{͐{!!{͐{!|"Õ{H{:|x~# Ø{^#V+~#ʹ{{ê{!~ͪ{ê{O> {2|>*_y{{N#!{   5x>4!|B|!}B|!}B|!}!}ͣ{ͣ{! }ͣ{{n1&r *;Gw#6*;w#62::Z;2::2:2v;*":!"K;:2A;>2@;Z;!fG#:IODrN +y=!7#͎+ir͠r͓rXr!7͎Ҋ;r++++lr!8d Hit any key to return to WordStar: Replace diskette with file , hit any key: *** file  still not found *** *** file  bad (too big ??!@&*) *** *** file  bad (too short) *** ***  found is bad or incompatible version *** ^C Cannot return to WordStar. Replace system disk (if removed), Hit any key to return to Operating System: WS.COM Hit any key to return to Operating System: s(pp:7:C6s6͇2>up:C6up!D6~6Cp:B6Z1 >2:$:7]p)8!5+8q>2:2D6/2:2B6:7ěsB!:.4!$;!5r'8:7Ēqp+~!8¼p"J64p~#p!5~pZ1!9"sͩ$-8:6<26 r:6r!͟$=r  bDC HïC|ïC*7["7F`iDͼL W W OD WD ͋LbD;D͏GD G*7w#"7+ͰD`iDͰL8D͚DÃD*7"7ôD2vx0:*7R:'/̼ED|E E E#D*7+ [!"v"v"v͠Fx0 T%uEEx0  oE AE Ex0  Efg*v#"v*v#"v:'bE*v͎jE> ͧEE>ͧEEE:EE*v͙Es#r!"v*v#"v*v&)*vg:'2lv|bk+Ó_:v*v*v:'FͼE!EE!E]% FFLHTFPLiFMToFMBuFCP0FPAF% E> ͧE*v#"v% F>ͧEFEͧ%F% F*v*v#͎%FFͧ%FF%g}2 vÑF! vxF!vxF!vͧ%FF%ҊW{͘FͰF| FO: v> !f v*v*v* vR|F`h: v/<_F Fi`"vÊ 2vx%G  GG FJG`GF:'GJG`G3GF:vOqG*v+"v:XGJG>2v!v454T%*v+"v*v+"v͙E{"v*7RA|#O ʋG wGxMG:v1G*7NJ*7qG͋G0OG HGGºG ͐D  *7*7͎!7!7IxŠͣHz{!18!4ͧq)qr;!+5$rA8p:*5q,qr!A5/88s":;q!G5?88s"<;q!M5C8:B68s">;q r38!4:̧q58#ͧq#:4/78̧qw98͹$2'!:; ͂7?$qqN!q#+qAxq#~xpÿ*sqq>;!q#~͹$72'?:62626:626n$>(r>%͹$O*+?1*`5"6*6~!͔$a#+w#͟$~|rͪrڐrrG8y=ʢrx͔$}!+y)8ͩ$8Frͩ$8Frկ °rsr.r#r rͤ7rr rrr>  r~ s#.:*? пͤ#~+:3s~3s@##ͥ7$*`5&~!bk͔$L#ͤvsͤjs68LʲCڵC*7["7`iͰLzL͚D*7[F*7"7"7zL͏GïC*7"7RDͼL D HIG>͕&>2 7!7jH*v*6͎-H"6!7jHYHR*7͎GH"7*7͎UH"7Ê*Z7*\RI`i)\wH!7#͎+ڐHHͺHH!7͎ҊH++++ÓH!7I ͺHҫH####7͎I++ws#r+##s#rÊ++Iw#r+s+r+sÊ!7w[?II>ܘIڊI: 7GO IvIڊBI!64F! 7ZI=O: 7=G͟IsI hIÉ*7+:Vv7!Wv~‹I6!v̭j͈C*7#zI*6*7R*7͎*v*6͎vIdIM*6#"6"7*7JI:\7WlzTJI*6*7͎J*7YH͎&J:kKJ*7YH͎87>JdKJM*7+"7J"7:G+~# `J> iJÊJͣH?IPK*7!7CKãJJqJ!7)K*7ͼJJڲJ2\7"7 ¦JsIg77797~J#J7>>:9!777:v7qJI!7,K*7gvsI"7 KsI?I*7ͣH͎UK*7)$$VKNKO>͕&xHͣH͎eK)|Lɯ2 v8M:WvK͈CŽK*72 v/2 v*7ژK*7[:WvʾK:v¾K*v|KPY͎ڽKDMɯ2WvI*72 vKxK~# ! v~6K2 v*7*7[x  vMtJmKx7*7ɯ2 v8M*7%L*7[>2 v*7"L+LxEL+~ ! v~6cL=2 v!7w[xvMJLx7LͰLͼL͊LL    7L?®L ®L ɯo>g>_v:~CW o g _ Wz}|{ L*7͎*7͎>͕&MLL1M*7!M*7}o|g_Pg!\*MLAM{yM>ĕ&zʘM*7*7R#͎+nM͔JSM*7>áM<>ĕ&*7*7R͎ҘMJM*7z7>2 vg:H!CڵM~=26=26M~26=26h``i"Rv "Tv͠F>27×-N*6<͎#N:6#N!6~6N/ cN:6*6*67_N2626qN&* 3.GNy*N!ex *N*6"6"6"6y26x26:6!6nN26-vLvLíj:Y5ڸN͍'"%:6> 0026o $͖0o͢$:626ɯ2626:Y5o!ͩ$M88L K͈CKNNN!% O ܔ %7N!6~6ʦOʹPAO`i+~+++1O6! ^#V{rOV`?G1G:6[O>`Ox=e`ͣRckL7>~.`P͙QҲO*Rv~ʔO@_PÂOb` ʲOh_͍QÔOʹPAO͔QPPAO$PvP{ gT>~!kvU: v7T: v7Tɯ2 v:Wvz2%v*hv:?vPT+"&v:kv2(v>2=v:>v•T:2VvL;LԒU2VvM+LͨUxU+~  •U#xU+~ # +ëU>;L#:hvG:?v!:vUS#~bV*0v}CV#6{=(V=2>v2;v!kv:22v[bV:=v2;v8VW*-vp#"-vw#>2@v[bV#54+U:ivbV*0v*hv͎UGxG"0v26=2/v*+v ÉV!"hv9"+v!Wv~ʠV6>2VvvLz2]v>2\v:22v!:v#:* 2jvW:DvP:6e`2&w:vW!C?Q! 45QͯRP=6++++!CQEQ! ~QͯR!C?Q#Q#QbPLiUڂQ͉V͗LuQ_\_͏RPQzbg 整͏RͣRzWL_L:6=ÖQ>e`! ʬQ~wýQ ʷQ~½QQQͣRͅRQbPLͅR͉V ͣRͅRRzOR R R͗LiQ_ /R͉V͗L)RK^͏RͣRiQͅRR R͏RQ ~R͗LDRR0^iQ/R_ _RR jR WLͣRͅR_RRLQ:6!vvLzWL:v<2v_:v=ëRbP*C!&w####PS~RR###~R+++RzL`S~RS+~G+++ SxPS~PS~PS~4Sz!CPS++++~PSPSDMz!CPS!CPS2v26bP7`S>2?v T ƒS> ]ShX:hvoSŸS:%-T͕SXS:!e5ªS͕S]S͔ SSҾS:%S>^XSSS@XSdV*hv#"hv*Ev+"Ev*hv+"hvS@]SS! X )WX*hv*0v#R|}&X>=,XOyFX FXFX 3XxgðWWxGX'X*hv|}/<7:EvpX=sZ:Av:*2Ev.[:ͮXY:͙XY:;vʦX:2v 2jv͙X:\v2\v#́\X:͙X:"Y:͙XÝ\> )W]SͱX X:X:͙XKY YÝ\YY#:ͮX@+:@v[> O2?v:]v-TXv:\vMwO\GY͋\:*UY:AvzY:kvG_Yw#]Y:jvwo 2VvXvL:CvUY:2CvSZhX:Ev=W:kvGScYw#¸YpXïY:`v<2av=YYY*hvZ[j74ZMZWO$%Z.}Z.Ey=!Gv2Zx/Zw:*1y#RZ!CvGZRZw!v45!e~[>>NU:Fv:Bv4ZZ2`v2Fv=2Ev=2_v:]vZv !\zZ!_v4:*![ZZ:vZ>2kvÊ:]vv̗LfX?vԗL[[:*[:Gv<[:Hv<[2Avɯ:`v=ZZZ:Iv/!v!vZ*hvM|D!Gv~¯[][=2Dv>:Cvh[ڞ[:Hvګ[ʣ[O:`vŠ[:_v=ګ[ʫ[y!Bvp!Ev2BvÊŠGy/?]͙X\`i{= ]~ ]#]w#\!kv!d5:ÙX\:':(7ĭ]8\LH]PL]MT]MB]HM\FM\PC\PO\SR\UJ\BP\CW\PA\CP\PN\OP\HE\FO\IG\PF ]OJ ]IJ ]LM ]LS ]RM ]CS ]DM ]SV ]AV ]RP ]DF ]RV ]FI ]!vL;LT%ʼ];Lw\]b`o ] ]ͣR!6]bP0]bPL͉V *v1_^h__@_1c^ `y`!6p_L`1^p__y`C_!6`^_c^W:c5}^:{…^`͛^͛^T"!{j&~!x":6W0# *7[*7[!!W_:c5_:t_>^`:+^:6!6^:6^26ͳ)1)ͥ"> ͜ `'_'_!tÏ^:6W0#w 7_||g}o&wPY!x[!p0`i&wy_&wr_PY!x[!X_h_=‰_Mæ_DML_`0͹R`é_*w:CW __͗L___7 _::6h``ͭ+KͶd+Kd+2d:6!6did~‰dÌi*Pv~‰d͌iqd]ddid"PvKP>d*Pv####:6=L`1h``iÌi*RvÌi!"6:6/!+£)b` ‰dqd2d!65^:t!c5d>L`:6e` ]:+!6ª)*Rv++++~‰d:6!6>d$^e:{!c5b`]*Rv~1h_͔Q͉de!v~6.en1 K+!f5Þ:g5:v=f+g*7++͈C>2v2g5ڊe(͂N/*`52626(~! ҕef͡eMh!mv626-e!645enk!#45e>f!"45e#e:-fn ~:6/!mv!6qN<26áefkGfxԙMhf!v͜xkD Mh!65͌flMhhf26Khf Mhf:f5Mh~ MhC*Pv~###ʁf~fw+w+w###x͎kf f!vͭj!vj8L ·f;Lڷf#ͼʾf!qv4fD*"v+""vj*v-f!ļ!"pv"6:pv:f57:v=ȷffglg!6~61)!65:)=#g=g!f545;gMh> kD> kDhfKK]gTg+ Hē_w#>gÈC͈Cͯ_.g:i5!g5w1)( Ͷg@_=gPe͉i1( Ͷg͇_͔Qb` ʌg@_P͉dágV`g?<:vf8L~cDg*Pv~~wJhK3eOGh!v~yg4 :p ~&w!C)`:Ch`!C/8`W:C&w_H` :`G1Ox1!6/<12vog))Bw DM!BwA 4_}:)ʑ`>!f5FO:6ʟ` *6|ʪ`:D6!6O!: #~ ` ½`:I'`V(!4(́\`͡(C*v#a(C*v#a(a͡(C:v_*vͰL aͲa(C*v#Ͳa(C*"v#$%>aA>-c(a:$vc(*6|ja>+0((*7*6Re."6:f5!6V(~ʁa>͡( C:pvʏa>͡($Cʛa>%͡("C:)a>0͡((C0c(;aHa+|axa`i;ac(iÎ :6:6W?)O*7:I=G:&b:+:e5\b:1vWb:0v0bIbrb{!g5zAb!e5w# Wbb6+db> ^bw#\b6 ͟,z26>26{!i5ڙbb kDͭj:vjK8LͶKcdfC[j*Pv:!vah: v ih~~w++++~~w>2mvf͠h:pv!"v$"v+L;Lښhͼh#vMiҶh!""vgz:f5hK*"v͓l҈CKh+h#!"vh͈Cͯ_> k:"> f*"v͓lhf> kDi*"v:"'i{_Iiz=iig 7 i{/ikii2pvG1fi*k5͓l/i*i5͓li 7ȷ{!I4e~io&" v*Pv~ʛi++++Îi~ld›i"PvDM#^#V###N#fiR>2VviKi2Wv2VvÈC!")v* v|i{K+zj#!)v#:!vji+: vi+͈C8Lj͹j1Bj*&vZ~###j6͝_ͯj͝_lj!vw?1Ê͑j:d5vLz>v >͗L>:*#ڤj=w<6Rj6#w#w#wR}))v~wXj~~wXjj͹jj>v&>?1WDM5kʊz2'͈C26k!vjK2'?1!]AM͈Cko L{lk{XkPk|gk!gk  kD 7> ęԜkOG1!"vy͉lͮk>2mv2rv͟ltllͯ_tl*~v*k5R"v+|hlo:!nͯ_f"nͯ_>lg͈C26*"v*g5Ól*k5*"vÓlzʜl7?{tkK*sv͂lKͭ7l+́nl~w#ͣkål͈C*sv*g5"svRE̓oKgv>M!uv. ?ml> 2}v:yv:|vm!O8"J6?m!}v5 m*zv"~v*v"v*v"v|n͓n Qm3e7ͭ7_m>+w#_ͦmW*svͣk*k5*svm#͓lҟm:zvŸm"zv+v>M:zv{nʽmzn>m{m2|vz>Gg!uv~p#wzxmO#~q#wz2v*svm#"~v!yv4+xv>M=n: vL;Lw2 vgvL;LW4n6iK2|nSn͓nW:nͭ7+͈C:)=_g>kD> kD[n2'*g5"svE̓oK:rvMv͗L7Kʣnʣn+͈CKKnʪn̯_n3eên+nCKͼ zn+6 -:vvG:v!v64n!xv owOo!v4o<552vx!xv2vviKgKqo.og!vv5po:vSo!xv5bo!v5bo!v5bo=<.otoK.o:v͈C!vo~G~wogxړo>OxGͳGÆooÆo :$/!rv:vv!!vZ1 toK.o^tPC!vo~G%p͹$7>24>2v(r:Y51qS8͹$!"tPt:5Jq:5kk2'!vͨj͋qgq͛t!+p!)pà&26:5ĢrIrMh!!:5q!7q*7rÈC!7q*7lrqIGyOxr#*r r r# rr7 2r+ /r/r7͜r*7#C*7o /!'p"6͍'*6"ror!d5 *7~ % *r~!%‘r͑!~!or2'8LÈCKÈCg:5JÔJx ~#õr:Y52Y5k$2Y5%!~!tqܨr3ss-sPr26FsB"s2tIsDsSsr͗s-sr͛t*7tͮG7>26*7tG2t+#tWs_>ʐs2t?s}s}s'Hs ʅs ʅs ʅs ʅsÐs2t?s:t2t?sx2t*t~!:tD­s-p÷sSs/p͹$:tc1p3p*`5"ror*t"`5͹$Yt!2;:4q::p>24;=/p22;23;>q:>q:>q/25;/!7̗q:4.q/2E6>':4! Wq:4;! 2C6:B6ʔ Z1 n1&r *;Gw#6*;w#62::Z;2::2:2v;*":!"K;:2A;>2@;Z;!fG#:IODrN +y=!7#͎+ir͠r͓rXr!7͎Ҋ;r++++lr!7r ͓r҄r####7͎r++ws#r+##s#rÊ++rw#r+s+r+sÊw[ɛuàpàpqïtqÛt&5>Rd ???Action(F/B/I/D/S)?Spelling Check Completed Add to Dictionary:  Add to Supplement: (Y/N)? >2vqr2525~!Q8͹$!5 L#pګpqͤp#Bp>25Gp>25> c#p ADD!"<2:oz=*;S<<6#";!&*;":#>2:2:B~5I= BWo xq=!:~6i=::B2E6W2::;G:;W*::5;==!}>>x=!:y=!:zU=2:)>}>>| >x= >y=z!:5 >z=I=|xOzO>2:2:K>:;?>ɷH>::33ɯ2:d>:;?>::2:z>C>:;z>:;!:4><2:͚>::::!:ڃ>!:.?ͪo:4;!:!; .:>; ͵< > :>  ?>?>?~>?>i?#::E=2:! >!:ͽ>*:>Y?F#>N?͌WG +@+@+@:”?qBBBB¿?C>i=%@!:ʰB#z=:4;<̉B::!:A@ ::O::U@W@>!:`@ H::̔@:4;::@x :=CB͔@|@@ ::=Q::@:4;::@:=CB@ë@¾@ ::=::zA: O::@: O::@ɷ@z @ :4;@A::>By! %A+A *A*A!:4x!:4::ͳA!:=AG]ÀA!";o:onAͩA]A:=(=LX:Ox 3 O[[:%=7=Rd*;#WA::=2:> ;AóA:=A͗AA!8;A6A6:8;ͩAAB!9;4:=>29;ͩAB~B5>KA͗A!8;~4:=:9;?8B!AÊ:4;BÊ:4;CB!:~5N*:!:+#{ 2:yhB!:{Bw::!:5*:!:::+ʞBҕB#<2:w":~ʰBPY͞J 6ͩBBͩB:5;=#B<=/AB@?z@z ::: @::: ! úA::!:=@GW@z@!";o:oh@͠@W@:=(=LX:Ox 3 O[:%=7=Rd*;#Q@:=@͎@@!8;@6@6:8;͠@ê@@!9;4:=>29;͠@@~@5>E@͎@!8;~4:=:9;?A!@Ê*:&KaA~7APYÞ0A*:&!:0A A<=,@UA:;kAK*:":*:":!*:RhAK*:":::_ÍA >2:2:PAAPAADA ,@AA 82:!::|A,B!:~6B͜B͂B**:͵B":!:yw:ĩB!xhBB**:ͲB":!:~LBLBNPB!,B͜B!:~6pB!:x!mBPA!:xpx!hBʗBʗB,@PA!:yw:OPAy,@:O|8͎B!BRyKByOB#zxAɛ <<<"<5<ɯW<26;!:: !8!:>!":*; >N=N=N=N=N=N=N=N=!N=F6##>G=ͨ<~6# Ox>=":!::!;".2;::;?ͷ=͡2:2:AWo x’=!:~6=::ͱA2E6W>2:2;:;!:=*:*:R*:>*:>͎=2;^>į>ͪo:ͨ< .> +~*;++~:>V>>V>>>#*:A! D>!:>*: >ʔ>F##>‰>͛{u>> >":";{2:!:::;2;!2D>!:>*:A*:::_7>G{>H7>G#>y>> O7>xF>>*:A2 ;WG ???!?2;:9?:9?:A?q>2;a?a?a?j?A;?PAz?;?::Ç=?!:7A#<€?x$AAA!::APY+:A@ 8::AÛ=yH?::x :=*6;aA??Q::@:::=s ÉpÿpXpB READ? WRITE MARKED TEXT ON? 1:v!v}pj!vj>v&>v&!vj!vjsqp!vPj2'7!:ڹpJO:ͳGڙp!vjrsqpͺr2'!AMv!͗Lp*778͈Cp*7:vTJ7Mr7!4~#k$%͹$O*+?1*`5"6"6*6~!͔$a#͟$~ʦq,rںqºq8y=qy¤qq  wr~͌r#.:*? пͤ#~+:µr~ҵr@##ͥ7r!vj:vrr>v&:*r!Hv:Gvr:v>v&:v>v&!vj:*> v&  >V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳ!%=#%=#%=#%=:`2Y5:c2+ͥ2b5~f!B6.:2c5K=~"=:b5é*͂="7:Il++"7"7="7+"7:Il++"7"7"7*:c5£=*HL&bj –=R+#"7"7*H-3#"7"7Q"7R"7:c5*HͿ-=|!]=>o&))))>=goR-,ó -  COPYRIGHT (C) 1981 MicroPro International Corporation  MicroPro WordStar release 3.00 serial # XT43830Q  no terminal yet selected  I/O Master / O.E.M. Printer  No communications protocol  CP/M List Output driver (LST:) ">$2PPY S2  @ IxB@ @..Y[]{}AEIOU.:+-JP dccdxdBjKjPjVj0j1j2j3j4j5j6j7j8j9jkk  e>@ddvgggggBDDF-hCenk<Ie uh fie  Bj Kj 0!j 1"j 2#j 3$j 4%j 5&j 6'j 7(j 8)j 9*j     2 0.         i)       "$6& (*,.08:H4       (C))00n   -__7777w nw?VWx2z7W:Go~~56   YZRCDTTVV2CCTTBT2STTTTTTTTTTCBTTTTVUUUVUUVVSSVUfVVTVVTUVVgVVUTVTVUTTTTTTSTTRRTRfTTTTSSSTTfTTTTVTVU 6NIQYdXfjly%27?QXivYN @@@@ on () off () INTERNAL ERRORFATAL NAME OF  TO FILEMERGE-  Print a file РԠ Š *** FATAL ERR F25: NOT ENUF MEMORY $ File  not found. Menus &  messages will display as @@@@ only.  WAIT  PRINT\PAUSED merge-printing\ \editing\no\file\ ڽ ׽ *** Press ESCAPE Key *** INTERRUPTED***  E*** I***   F: G! e~x7*`;:Z;e*h;*\;R| !͎ "w;!"~;";#"|;~2y;#^#V## 2;~2y;+~2};##{l"z;R|";"z;O:Z;!<=O G q#s#r#ww#Gw!o;~#m #~ͪ*C6|/!N >2D6êo ͪ*C6|/ͧ ê*E;!9"E;Ê:B6C M ";ͧ 2 :C; x~>2 x:;*;";";ͼ*;͎. o ;2 "; ͧ !;w[wÎR R *@;W{k z!!4ʮ zy > W_ !Q;zV#>2@;{ ȯ2@;͌ x~ #à !9"G;! ]% >*G;:B6 "C:B6%C LH7 SRI UJ BPPL:4[}> [G!P;~6!4x!r;^Gz4x!0GO!P> W>~a>- S }!O;~<> STk ‹!"O;F F*Z;&*M;"M;*\;͎*M;|͑!"M;*K;#"K;2Q;u*Z;>*v;> :4*M;|:3;*\;‹͑> [*M;|ñ TW͔ J.S!O;~-5R;!G̞#~^T@!O;4!͌ڈ:4<:4/!4!D;6> ̜͜:C;7*K;*:;Î'ͪÜNħ >2D6ç ['ͧ ͪ¾Ņ ͪħ :4ͪ<:4>'Ng:;;!"B6"D6<=G:E67J*;~7Jp#~d_x2::;*:*:::g" ;yHG*:::g":::o&{2:y: ;ey_! ;*6;R:: ‚> ڲ!e::~œ=<<*6;-ʰҮ<>d lx_gQy2;:; !;4!;4x*;::e";͵";!Q MT] MBc HMi FMo CWu PC PO} PA CP PN OP HE FO !Z;>-w n!v;>< ![;-9 !_;T !g;T !c;T !k;T c >< !r;-\ !t;-Ғ \ -> V>2A;ͧ%ڼ ͑"K;uâ *; *;>oGw#%  % w#- 6> ͧ% !> ONOF͗%]% 4}ͧ% g%MCg ͆| !4sx:Ê͌>2B;!Q;~6͌ڥ:4!B;6>[:4!_; !;͵*;!|;͵!y;õ*<;*K;zĎ>2C;>*M;_:Z;<=*w;͎:4͆|*w;͋!g; )!y;͵3!|;͵> :7*;#~+:A;͑:o;G!t;z*K;|f} > :Ͷ42o;u"I;!Y; :+ <*I;"I;!R;~ :# <›Ì:i> :> ;#~+͑:o;G~4#~i\#~i.# *K;Ͷ .:K;#~i  +:!o:2;}X>:2;:o;c >!o;w:2;~q>n>[c o>^#~4> [Á*M;:3;ʠR|:Z;e͎:Q;Ì:3;N#{ ʘ> :> [> :+|#>Ø!".g|,-;4::#4!;4x!::*;e";!;x *;*#;"#;*;*;͵";!";";";!;~6py_!";";͵";!;4~!!;4!;~::5*;"#;:;!;2;*;";*;|:#;*;)::G$%==xxy2&;>2'; :6;=|g}o|*#;&*6;**;R"*;";:ī͗ͻ͗͢Cs\ͫ -\ͫs\͢s\*;"0;:;UͫcͲ*;".;*;)*!;T]:: ڈ:ʐ*;Î*#;&*;*$;,;ͻͻ*!;(;*;&;*;R|";:6;w#~w+͎  ~# ͎O>G  %+~ !!x 6#.$%%$o>gAARDMxɅo|gg}o|g^#V#~#fo# ‚Gz—{xɾ~~/w~ͼ#ä   :.,;?!0?:ɷ @[A?a{['N#w@w#6:#6+Y T6.#Z6 dw# Ys0 {{:|sͥ_:§ {2b5_ͥ=!¼sü):OͥGHGxy"6|&*7"787ͼ):7_71*`5!~! 8~!:7!7~6_7''<>|&Ð!eɷ v&do>!#{ |<ʎs#rɯ7Ê>G!"{}O)|! !!~6w<x7z! q#~w['^#V#o s^#V+ѷs~o #:7277>27!74!77!_8ͪͪ*7*͎l!7"J6:77͎?9͎({%}):7=!9=z27!97o >e!9e:͎ç!` .:7*7+##+6!.}1~6/ % ~6 %!!< nU6#~!͜>ͳ 1*5~*5~w#~<!5"5:c5/!*7~G:7w26 "7:[5>!:!*`5#!6~\!5*7~w27*`5ͫ":6o&{!͔!*`5͎ī"ͪ*6:6o*`5}ͧ!o!6:!<=:!g=!÷!÷!:c5~<=#~ͳ !!0:H=!:I"=O3#:c5T"~ &"# "ye +~ ," ~!!m~Į!S"A> ͳ J" 6 # Z"!!!~x"!ͮ!ͥ" *`5"~"!ͮ!ͧ*H-&"`53#!"7:[5{" ":Ͷ!:d#*^\:]"!J#!S#!X!!:`G{ʳ  i#d*7*7[*7Ro&U\*7:IOD# C#*+a#}!+y)>26*`5"6 ]$ ]$]$2'!t#ʜ#ʜ#«#*6!ͫ"o#!####U$## #*`5%~!_! #$$#!#$$- $!#45 $>!w)#ʣ)#ʪ)!oy^>Iy <26+q#$:Y5:H$<26262626$_!>ä$o$â$%_!>!`5ͧ!01:6!6$~:`5!6!"6"626262:ͳ *7+wF*|#6!26:?ͺÊ>X:VͽÊ>!*ey!5w+~#wz.!5"5"5P. G:a5Oxͱ:I x  yON#F ܔ ͱp+q ͔!o *7:IO&:H=! D3#:c5N%# H +9 .`ͫ" ? !!!!a5 È*`5>+,&í":`5 *`5-í">o͜:+A ]!Re:B6dbf:C6h:D6j͔$2'$Ù*6G*66*78ʙQc#^#VʏʔQln++O:d5Gyʱ¸:Þ¿>~͙܀ > :a5   >^@ :c5 ̎ !45 ͳ !a5 P H 4*7w#!6*7B +4:H=q :I*7e"7*7eB 5*7 *I&*7[gg> -¤ !!O: y#*`50> XO !X5 ws"g":[5!626r!$261$r!:1%:1%:1%:1%:GOͪO%:C6I% y̔ x4%ê!%2S%%_:S%W~ʑ%#ʂ%###r%~|%#^#VÓ%g% ʗ% ʗ%!͗%%%0% %T])))_%%%0% ڽ%|7%%x 7 7 77?}8}8}8}8}8U8W8Y8[8]8_8a8c8q8}8e8g8i8k8m8}8}8}8{8}8s8}8u8w8y8}8}8}8}8}8}88}88888888}888}8}8}8888}8}8!Ø&?'ͥ"K'oG-!?'?1͉-:626o!$K'>c31̓͹$26:626!&26%×-!6~6*5~̓!66:7!'!!à&͏G!6~6̀1ͪ:6'o&)&^#Vo&Di:7/!F6ˆ'5:6͎ *`5! ~!~! Î *6|!F6£'o 02F6*7"6':D6ʽ'(:7':C6'V(:B6'((!5((ć`:IO>(!:6*6^(*6^(:6c(>>(:626*7"6'O'G:IPx=(V(*7*6R@(> c(}c(| s(>^c(@!d5\‚(> Ç( ʈ(#*7++*6w͎ڞ(#"6:D6¼(:)ʹ(:f5!6V(0(^#V#(~#c((:&!+!7(26.)!6N61q!6F  wO1):6.):&><)26!6.)2626/262654>G1:k5!H4O)~o :7a:61Êͼ):+/y)>!+Fw>2626ó))26 :6Ÿ)26:6<ð):6=26!"626ó)g:7O/ G:+:6)o#}!6Ěx:+ʉ)o *:6=1Ê)!6͚G:6 *!6):6̐):6W:6)_:6!6<*:6´* + @+:6/<_y!6q*U*qy!6ڣ*<26͟,z<26o !6:7ʣ*:6ң*z26ñ*z±*!6U*26*7"6:6O:6G/!((ͥ*6+"6gx/+!(y+*>͡(:I>(:6Wß,!6452626*7"6:6=+2626͒ͅ,+:626Ħ,Ê:IO *76 #=M+#m+ x GV+:6G*6+F+N <ʙ+"6gʹ++F+N 26Êʹ++++DM>26>.!m,### ʡ+#~¸+  +m,ʴ+26*7"6*76+r+s ͎,:6,,+~w͊,+*6 !i, ~d,#-, :,~Z,\,6.#w#w#> *6<BAINuHEvREwCOxOVy$$z26͌"6g>26j*7ó,#p+qg+F+N <,#Vp+^qBK,+V+^ oʬ,,, ,,,!91C4 1 ` 1`:7133:6!6͚!6͚!6͚*7"7"7>26: /!6ɯ2L62r6~#26~26#"6Ñ1}26|26"6Ñ1~#26~#26"6:6=>$ԕ&ͽ11i`)2^#V*6 *6)))2N!6 :66i`)2^#V#^#V#͇2~#fo)DM!"q#p#N#F2 ~>)v& 2x2x2 2~>'v&#:6>,v&6 >*v&w!6Y2>+v&# N2^#V>(v&!6:6w>&v&͓2!$~v&><Cpy-M67-M6M6 M6M63M6M6#M6M6mM6tM6M6{s6M6'M6-M6dM6!M6gM6|M6  w3Ô3>e A:)2323:>!+}ˆ3::> A8->26!D6~/++! n1:7M*3.د27R1(:C6 .*7"73126|=Q3#.=b0.^#Vn126262626%>26/.3.26G:7l.x ʸ.?G~ʸ.|.o.#~ʼ.:7<#^#V++̂N26.}.26O~ʼ.###~ʸ.#ʡ.è.7#^#V|7!$/*`5o 0\/o .1/6/=r!~!"%/=r!8Í'>260\/ ͑!~!:7Z/!/v~Z/.%Z/6`]͑! ~!)(:7v/1=!60:7]͍'o :6!6͚o:7š/:6o:6/!6ڱ/!6ڽ/o&͔!o !<Ý/Q):6!606}:7G:Y5O*J6|!6/6:6!6ᠡ/6o ‡0($:D6!8:G6!8:610268I0x/I0͖0F0͜!"6o͢$:626:6f0!6~6!8*J6|!"J6͢$:626‡0>26!G6~6ȯ26:IPڣ0!7:E4 ~"8126×-:7O!60w:70:6=0w~=!6)!61)55???????????!ͱ6!Sͱ6ͩ6You are trying to run an uninstalled WORDSTAR.Please run INSTALL first.-ͩ6 ʹ6͢6~̢6 #ô6  >V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳ-,ó -  COPYRIGHT (C) 1981 MicroPro International Corporation  MicroPro WordStar release 3.00 serial # XT43830Q  IBM 3101 Terminal  Teletype-like printer  No communications protocol  CP/M List Output driver (LST:) ">$2PPY  @ IxB@ @..Y[]{}AEIOU.:+-JP dccdxdBjKjPjVj0j1j2j3j4j5j6j7j8j9jk!%=#%=#%=#%=:`2Y5:c2+ͥ2b5~f!B6.:2c5K=~"=:b5é*͂="7:Il++"7"7="7+"7:Il++"7"7"7*:c5£=*HL&bj –=R+#"7"7*H-3#"7"7Q"7R"7:c5*HͿ-=|!]=>o&))))>=goR>.>O->26:H26=26=26S>:7*7>|& 7!!Y5~P>(P>6!"J6O-:H|>y|>6u>:I@|>|>~!8"J6>|&w- A4:c5:ª>®>:ʰ>>2d52e5>:2[5ͤ!ͮ!~"!N6 ! t6!q66.!66/:26ɛ>V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳk  e>@ddvgggggBDDF-hCenk<Ie uh fie  Bj Kj 0!j 1"j 2#j 3$j 4%j 5&j 6'j 7(j 8)j 9*j     2 0.         i)       "$6& (*,.08:H4       (C))00n   -__7777w nw?VWx2z7W:Go~~56   YZRCDTTVV2CCTTBT2STTTTTTTTTTCBTTTTVUUUVUUVVSSVUfVVTVVTUVVgVVUTVTVUTTTTTTSTTRRTRfTTTTSSSTTfTTTTVTVU 6NIQYdXfjly%27?QXivYN @@@@ on () off () INTERNAL ERRORFATAL NAME OF  TO FILEMERGE-  Print a file РԠ Š *** FATAL ERR F25: NOT ENUF MEMORY $ File  not found. Menus &  messages will display as @@@@ only.  WAIT  PRINT\PAUSED merge-printing\ \editing\no\file\ ڽ ׽ *** Press ESCAPE Key *** INTERRUPTED***  E*** I***   F: G! e~x7*`;:Z;e*h;*\;R| !͎ "w;!"~;";#"|;~2y;#^#V## 2;~2y;+~2};##{l"z;R|";"z;O:Z;!<=O G q#s#r#ww#Gw!o;~#m #~ͪ*C6|/!N >2D6êo ͪ*C6|/ͧ ê*E;!9"E;Ê:B6C M ";ͧ 2 :C; x~>2 x:;*;";";ͼ*;͎. o ;2 "; ͧ !;w[wÎR R *@;W{k z!!4ʮ zy > W_ !Q;zV#>2@;{ ȯ2@;͌ x~ #à !9"G;! ]% >*G;:B6 "C:B6%C LH7 SRI UJ BPPL:4[}> [G!P;~6!4x!r;^Gz4x!0GO!P> W>~a>- S }!O;~<> STk ‹!"O;F F*Z;&*M;"M;*\;͎*M;|͑!"M;*K;#"K;2Q;u*Z;>*v;> :4*M;|:3;*\;‹͑> [*M;|ñ TW͔ J.S!O;~-5R;!G̞#~^T@!O;4!͌ڈ:4<:4/!4!D;6> ̜͜:C;7*K;*:;Î'ͪÜNħ >2D6ç ['ͧ ͪ¾Ņ ͪħ :4ͪ<:4>'Ng:;;!"B6"D6<=G:E67J*;~7Jp#~d_x2::;*:*:::g" ;yHG*:::g":::o&{2:y: ;ey_! ;*6;R:: ‚> ڲ!e::~œ=<<*6;-ʰҮ<>d lx_gQy2;:; !;4!;4x*;::e";͵";!Q MT] MBc HMi FMo CWu PC PO} PA CP PN OP HE FO !Z;>-w n!v;>< ![;-9 !_;T !g;T !c;T !k;T c >< !r;-\ !t;-Ғ \ -> V>2A;ͧ%ڼ ͑"K;uâ *; *;>oGw#%  % w#- 6> ͧ% !> ONOF͗%]% 4}ͧ% g%MCg ͆| !4sx:Ê͌>2B;!Q;~6͌ڥ:4!B;6>[:4!_; !;͵*;!|;͵!y;õ*<;*K;zĎ>2C;>*M;_:Z;<=*w;͎:4͆|*w;͋!g; )!y;͵3!|;͵> :7*;#~+:A;͑:o;G!t;z*K;|f} > :Ͷ42o;u"I;!Y; :+ <*I;"I;!R;~ :# <›Ì:i> :> ;#~+͑:o;G~4#~i\#~i.# *K;Ͷ .:K;#~i  +:!o:2;}X>:2;:o;c >!o;w:2;~q>n>[c o>^#~4> [Á*M;:3;ʠR|:Z;e͎:Q;Ì:3;N#{ ʘ> :> [> :+|#>Ø!".g|,-;4::#4!;4x!::*;e";!;x *;*#;"#;*;*;͵";!";";";!;~6py_!";";͵";!;4~!!;4!;~::5*;"#;:;!;2;*;";*;|:#;*;)::G$%==xxy2&;>2'; :6;=|g}o|*#;&*6;**;R"*;";:ī͗ͻ͗͢Cs\ͫ -\ͫs\͢s\*;"0;:;UͫcͲ*;".;*;)*!;T]:: ڈ:ʐ*;Î*#;&*;*$;,;ͻͻ*!;(;*;&;*;R|";:6;w#~w+͎  ~# ͎O>G  %+~ !!x 6#.$%%$o>gAARDMxɅo|gg}o|g^#V#~#fo# ‚Gz—{xɾ~~/w~ͼ#ä   :.,;?!0?:ɷ @[A?a{['N#w@w#6:#6+Y T6.#Z6 dw# Ys0 {{:|sͥ_:§ {2b5_ͥ=!¼sü):OͥGHGxy"6|&*7"787ͼ):7_71*`5!~! 8~!:7!7~6_7''<>|&Ð!eɷ v&do>!#{ |<ʎs#rɯ7Ê>G!"{}O)|! !!~6w<x7z! q#~w['^#V#o s^#V+ѷs~o #:7277>27!74!77!_8ͪͪ*7*͎l!7"J6:77͎?9͎({%}):7=!9=z27!97o >e!9e:͎ç!` .:7*7+##+6!.}1~6/ % ~6 %!!< nU6#~!͜>ͳ 1*5~*5~w#~<!5"5:c5/!*7~G:7w26 "7:[5>!:!*`5#!6~\!5*7~w27*`5ͫ":6o&{!͔!*`5͎ī"ͪ*6:6o*`5}ͧ!o!6:!<=:!g=!÷!÷!:c5~<=#~ͳ !!0:H=!:I"=O3#:c5T"~ &"# "ye +~ ," ~!!m~Į!S"A> ͳ J" 6 # Z"!!!~x"!ͮ!ͥ" *`5"~"!ͮ!ͧ*H-&"`53#!"7:[5{" ":Ͷ!:d#*^\:]"!J#!S#!X!!:`G{ʳ  i#d*7*7[*7Ro&U\*7:IOD# C#*+a#}!+y)>26*`5"6 ]$ ]$]$2'!t#ʜ#ʜ#«#*6!ͫ"o#!####U$## #*`5%~!_! #$$#!#$$- $!#45 $>!w)#ʣ)#ʪ)!oy^>Iy <26+q#$:Y5:H$<26262626$_!>ä$o$â$%_!>!`5ͧ!01:6!6$~:`5!6!"6"626262:ͳ *7+wF*|#6!26:?ͺÊ>X:VͽÊ>!*ey!5w+~#wz.!5"5"5P. G:a5Oxͱ:I x  yON#F ܔ ͱp+q ͔!o *7:IO&:H=! D3#:c5N%# H +9 .`ͫ" ? !!!!a5 È*`5>+,&í":`5 *`5-í">o͜:+A ]!Re:B6dbf:C6h:D6j͔$2'$Ù*6G*66*78ʙQc#^#VʏʔQln++O:d5Gyʱ¸:Þ¿>~͙܀ > :a5   >^@ :c5 ̎ !45 ͳ !a5 P H 4*7w#!6*7B +4:H=q :I*7e"7*7eB 5*7 *I&*7[gg> -¤ !!O: y#*`50> XO !X5 ws"g":[5!626r!$261$r!:1%:1%:1%:1%:GOͪO%:C6I% y̔ x4%ê!%2S%%_:S%W~ʑ%#ʂ%###r%~|%#^#VÓ%g% ʗ% ʗ%!͗%%%0% %T])))_%%%0% ڽ%|7%%x 7 7 77?}8}8}8}8}8U8W8Y8[8]8_8a8c8q8}8e8g8i8k8m8}8}8}8{8}8s8}8u8w8y8}8}8}8}8}8}88}88888888}888}8}8}8888}8}8!Ø&?'ͥ"K'oG-!?'?1͉-:626o!$K'>c31̓͹$26:626!&26%×-!6~6*5~̓!66:7!'!!à&͏G!6~6̀1ͪ:6'o&)&^#Vo&Di:7/!F6ˆ'5:6͎ *`5! ~!~! Î *6|!F6£'o 02F6*7"6':D6ʽ'(:7':C6'V(:B6'((!5((ć`:IO>(!:6*6^(*6^(:6c(>>(:626*7"6'O'G:IPx=(V(*7*6R@(> c(}c(| s(>^c(@!d5\‚(> Ç( ʈ(#*7++*6w͎ڞ(#"6:D6¼(:)ʹ(:f5!6V(0(^#V#(~#c((:&!+!7(26.)!6N61q!6F  wO1):6.):&><)26!6.)2626/262654>G1:k5!H4O)~o :7a:61Êͼ):+/y)>!+Fw>2626ó))26 :6Ÿ)26:6<ð):6=26!"626ó)g:7O/ G:+:6)o#}!6Ěx:+ʉ)o *:6=1Ê)!6͚G:6 *!6):6̐):6W:6)_:6!6<*:6´* + @+:6/<_y!6q*U*qy!6ڣ*<26͟,z<26o !6:7ʣ*:6ң*z26ñ*z±*!6U*26*7"6:6O:6G/!((ͥ*6+"6gx/+!(y+*>͡(:I>(:6Wß,!6452626*7"6:6=+2626͒ͅ,+:626Ħ,Ê:IO *76 #=M+#m+ x GV+:6G*6+F+N <ʙ+"6gʹ++F+N 26Êʹ++++DM>26>.!m,### ʡ+#~¸+  +m,ʴ+26*7"6*76+r+s ͎,:6,,+~w͊,+*6 !i, ~d,#-, :,~Z,\,6.#w#w#> *6<BAINuHEvREwCOxOVy$$z26͌"6g>26j*7ó,#p+qg+F+N <,#Vp+^qBK,+V+^ oʬ,,, ,,,!91C4 1 ` 1`:7133:6!6͚!6͚!6͚*7"7"7>26: /!6ɯ2L62r6~#26~26#"6Ñ1}26|26"6Ñ1~#26~#26"6:6=>$ԕ&ͽ11i`)2^#V*6 *6)))2N!6 :66i`)2^#V#^#V#͇2~#fo)DM!"q#p#N#F2 ~>)v& 2x2x2 2~>'v&#:6>,v&6 >*v&w!6Y2>+v&# N2^#V>(v&!6:6w>&v&͓2!$~v&><Cpy-M67-M6M6 M6M63M6M6#M6M6mM6tM6M6{s6M6'M6-M6dM6!M6gM6|M6  w3Ô3>e A:)2323:>!+}ˆ3::> A8->26!D6~/++! n1:7M*3.د27R1(:C6 .*7"73126|=Q3#.=b0.^#Vn126262626%>26/.3.26G:7l.x ʸ.?G~ʸ.|.o.#~ʼ.:7<#^#V++̂N26.}.26O~ʼ.###~ʸ.#ʡ.è.7#^#V|7!$/*`5o 0\/o .1/6/=r!~!"%/=r!8Í'>260\/ ͑!~!:7Z/!/v~Z/.%Z/6`]͑! ~!)(:7v/1=!60:7]͍'o :6!6͚o:7š/:6o:6/!6ڱ/!6ڽ/o&͔!o !<Ý/Q):6!606}:7G:Y5O*J6|!6/6:6!6ᠡ/6o ‡0($:D6!8:G6!8:610268I0x/I0͖0F0͜!"6o͢$:626:6f0!6~6!8*J6|!"J6͢$:626‡0>26!G6~6ȯ26:IPڣ0!7:E4 ~"8126×-:7O!60w:70:6=0w~=!6)!61)55???????????!ͱ6!Sͱ6ͩ6You are trying to run an uninstalled WORDSTAR.Please run INSTALL first.-ͩ6 ʹ6͢6~̢6 #ô6  >V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳ-,ó -  COPYRIGHT (C) 1981 MicroPro International Corporation  MicroPro WordStar release 3.00 serial # XT43830Q  Alphatronic/PC 1.0  Teletype-like printer  No communications protocol  CP/M List Output driver (LST:) ">$2PPY MM .>PzQ>P{Q PY }(P!PT]($OGyO>gk (p>gq>POG0(>Wgk> A6#(IxB@ @..Y[]{}AEIOU.:+-JP dccdxdBjKjPjVj0j1j2j3j4j5j6j7j8j9jk!%=#%=#%=#%=:`2Y5:c2+ͥ2b5~f!B6.:2c5K=~"=:b5é*͂="7:Il++"7"7="7+"7:Il++"7"7"7*:c5£=*HL&bj –=R+#"7"7*H-3#"7"7Q"7R"7:c5*HͿ-=|!]=>o&))))>=goR>.>O->26:H26=26=26S>:7*7>|& 7!!Y5~P>(P>6!"J6O-:H|>y|>6u>:I@|>|>~!8"J6>|&w- A4:c5:ª>®>:ʰ>>2d52e5>:2[5ͤ!ͮ!~"!N6 ! t6!q66.!66/:26ɛ>V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳk  e>@ddvgggggBDDF-hCenk<Ie uh fie  Bj Kj 0!j 1"j 2#j 3$j 4%j 5&j 6'j 7(j 8)j 9*j     2 0.         i)       "$6& (*,.08:H4       (C))00n   -__7P!00(>P!0> ì7w nw?VWx2z7W:Go~~56   YZRCDTTVV2CCTTBT2STTTTTTTTTTCBTTTTVUUUVUUVVSSVUfVVTVVTUVVgVVUTVTVUTTTTTTSTTRRTRfTTTTSSSTTfTTTTVTVU 6NIQYdXfjly%27?QXivYN @@@@ on () off () INTERNAL ERRORFATAL NAME OF  TO FILEMERGE-  !!E!:] (!566 5!Tj!Yj ^> ^.COM.GENyPQ> !]~ ( .(r:(#(ͺ8͞ z<̂:(>2!=z< {͘ʅ!%{͘z S_z͘ }{M :G J2Ϳ@K ~([!oF( a8{0_!wzM ˶ˮ:!q 5 6!~5(-6 >#2~>2>222:2RM kx,?0S] y, *Q|#~(&"Q27G!>p!#~("QTEMP.GENA:LOADA:BBC A:CPTTYPA:STATDIRA:WSA:GEN8A:SENA:PI 12345678.COM 12345678.GEN0123456789.+-=abcdefghijklmnopqrstuvwxyz0123456789-^@[]: <,./;  0123456789.*/=ABCDEFGHIJKLMNOPQRSTUVWXYZ=!"#$%&'()_~`{}* >\|?+ 6%zfy$8uy:%6z҈y$8.| IGENTEST1COMYSUBLIB GEN>%SPRITE BAK4NOPQRGEN80 COMW"#$&45TEST BAKA6=>?STEST GENA789TTEST ZSMA:2D6êo ͪ*C6|/ͧ ê*E;!9"E;Ê:B6C M ";ͧ 2 :C; x~>2 x:;*;";";ͼ*;͎. o ;2 "; ͧ !;w[wÎR R *@;W{k z!!4ʮ zy > W_ !Q;zV#>2@;{ ȯ2@;͌ x~ #à !9"G;! ]% >*G;:B6 "C:B6%C LH7 SRI UJ BPPL'   , j c , g;( p sg@ , SN-gH @.>( w# 6 #/ @(: (7 |(>>~g@I7F(M1:X2Z/ K : y \:N-A8U0Q2ZgK y(D 0@!~6#N-l fl . gK y(0!N-l s͹'IsL | 8 5~( 4 6H Eʹ(s/ !Zp w#g s6 # F 66:ow!6 E / 6 F | 8w"N | 8wS )/ H( |(! R8{2q 8w&sfl . gK y(>22 w6^4!%~w!%~w5!%~! %~! %6! %6~ ʖ, s[ |(66ZASM: COND/ENDC TOO DEEPLY NESTED I(R(C d~/w~ C;, !"-_6666666&666$6%6666 :jw":iw#gP pP;M* ͗ >`( >@I~ Mqb Ͷ>NN RMb: /ͮ  ͈͢ *-  [-R(PO () ~(=  "- :Q MT] MBc HMi FMo CWu PC PO} PA CP PN OP HE FO !Z;>-w n!v;>< ![;-9 !_;T !g;T !c;T !k;T c >< !r;-\ !t;-Ғ \ -> V>2A;ͧ%ڼ ͑"K;uâ *; *;>oGw#%  % w#- 6> ͧ% !> ONOF͗%]% 4}ͧ% g%MCg ͆| !4sx:Ê͌>2B;!Q;~6͌ڥ:4!B;6>[:4!_; !;͵*;!|;͵!y;õ*<;*K;zĎ>2C;>*M;_:Z;<=*w;͎:4͆|*w;͋!g; )!y;͵3!|;͵> :7*;#~+:A;͑:o;G!t;z*K;|f} > :Ͷ42o;u"I;!Y; :+ <*I;"I;!R;~ :# <›Ì:i> :> ;#~+͑:o;G~4#~i\#~i.# *K;Ͷ .:K;#~i  +:!o:2;}X>:2;:o;c >!o;w:2;~q>n>[c o>^#~4> [Á*M;:3;ʠR|:Z;e͎:Q;Ì:3;N#{ ʘ> :> [> :+|#>Ø!".g|,-  :4[}> [G!P;~6!4x!r;^Gz4x!0GO!P> W>~a>- S }!O;~<> STk ‹!"O;F F*Z;&*M;"M;*\;͎*M;|͑!"M;*K;#"K;2Q;u*Z;>*v;> :4*M;|:3;*\;‹͑> [*M;|ñ TW͔ J.S!O;~-5R;!G̞#~^T@!O;4!͌ڈ:4<:4/!4!D;6> ̜͜:C;7*K;*:;Î'ͪÜNħ >2D6ç ['ͧ ͪ¾Ņ ͪħ :4ͪ<:4>'Ng:;;!"B6"D6<=G:E67J*;~7Jp#~d_x2::;*:*:::g" ;yHG*:::g":::o&{2:y: ;ey_! ;*6;R:: ‚> ڲ!e::~œ=<<*6;-ʰҮ<>d lx_gQy2;:; !;4!;4x*;::e";͵";!687<>|&*7"787ͼ):7_71*`5!~! 8~!:7!7~6_7''<>|&Ð!eɷ v&do>!#{ |<ʎs#rɯ7Ê>G!"{}O)|! !!~6w<x7z! q#~w['^#V#o s^#V+ѷs~o #:7277>27!74!77!_8ͪͪ*7*͎l!7"J6:77͎?9͎({%}):7=!9=z27!97o >e!9e:͎ç!` .:7*7+##+6!.}1~6/ % ~6 %!!< nU6#~!͜>ͳ 1*5~*5~w#~<!5"5:c5/!;4::#4!;4x!::*;e";!;x *;*#;"#;*;*;͵";!";";";!;~6py_!";";͵";!;4~!!;4!;~::5*;"#;:;!;2;*;";*;|:#;*;)::G$%==xxy2&;>2'; :6;=|g}o|*#;&*6;**;R"*;";:ī͗ͻ͗͢Cs\ͫ -\ͫs\͢s\*;"0;:;UͫcͲ*;".;*;)*!;T]:: ڈ:ʐ*;Î*#;&*;*$;,;ͻͻ*!;(;*;&;*;R|";:6;w#~w+͎  ~# ͎O>G  %+~ !!x 6#.$%%$o>gAARDMxɅo|gg}o|g^#V#~#fo# ‚Gz—{xɾ~~/w~ͼ#ä   :.,;?!0?:ɷ @[A?a{['N#w@w#6:#6+Y T6.#Z6 dw# Ys0 {{:|sͥ_:§ {2b5_ͥ=!¼sü):OͥGHGxy"6X:VͽÊ>!*ey!5w+~#wz.!5"5"5P. G:a5Oxͱ:I x  yON#F ܔ ͱp+q ͔!o *7:IO&:H=! D3#:c5N%# H +9 .`ͫ" ? !!!!a5 È*`5>+,&í":`5 *`5-í">o͜:+A ]!Re:B6dbf:C6h:D6j͔$2'$Ù*6G*66*78ʙQc#^#VʏʔQln++O:d5Gyʱ¸:Þ¿>~͙܀ > :a5   >^@ :c5 ̎ !45 ͳ !a5 P H 4*7w#!6*7B +4:H=q :I*7e"7*7eB 5*7 *I&*7[gg> -¤ !!O: y#*`50> XO !X5 ws"g":[5!  *7~G:7w26 "7:[5>!:!*`5#!6~\!5*7~w27*`5ͫ":6o&{!͔!*`5͎ī"ͪ*6:6o*`5}ͧ!o!6:!<=:!g=!÷!÷!:c5~<=#~ͳ !!0:H=!:I"=O3#:c5T"~ &"# "ye +~ ," ~!!m~Į!S"A> ͳ J" 6 # Z"!!!~x"!ͮ!ͥ" *`5"~"!ͮ!ͧ*H-&"`53#!"7:[5{" ":Ͷ!:d#*^\:]"!J#!S#!X!!:`G{ʳ  i#d*7*7[*7Ro&U\*7:IOD# C#*+a#}!+y)>26*`5"6 ]$ ]$]$2'!t#ʜ#ʜ#«#*6!ͫ"o#!####U$## #*`5%~!_! #$$#!#$$- $!#45 $>!w)#ʣ)#ʪ)!oy^>Iy <26+q#$:Y5:H$<26262626$_!>ä$o$â$%_!>!`5ͧ!01:6!6$~:`5!6!"6"626262wO1):6.):&><)26!6.)2626/262654>G1:k5!H4O)~o :7a:61Êͼ):+/y)>!+Fw>2626ó))26 :6Ÿ)26:6<ð):6=26!"626ó)g:7O/ G:+:6)o#}!6Ěx:+ʉ)o *:6=1Ê)!6͚G:6 *!6):6̐):6W:6)_:6!6<*:6´* + @+:6/<_y!6q*U*qy!6ڣ*<26͟,z<26o !6:7ʣ*:6ң*z26ñ*z±*!6U*26*7"6:6O:6G/!((ͥ*6+"6gx/+!(y+*>͡(:I>(:6Wß,!6452626*7"6:6=+2626͒ͅ,+:626Ħ,Ê:IO *76 #=M+#m+ x GV+:6G*6+F+N <ʙ+"6gʹ++F+N 26Êʹ++++DM>26>.!m,### ʡ+#~¸+  +m,ʴ+26*7"6*76+r+s ͎,:6,,+~w͊,+*6 !i, ~d,#-, :,~Z,\,6.#w#w#> *6<BAINuHEvREwCOxOVy$$z26͌"6g>26j*7ó,#p+qg+F+N <,#Vp+^qBK,+V+^ oʬ,,, ,,,!91C4626r!$261$r!:1%:1%:1%:1%:GOͪO%:C6I% y̔ x4%ê!%2S%%_:S%W~ʑ%#ʂ%###r%~|%#^#VÓ%g% ʗ% ʗ%!͗%%%0% %T])))_%%%0% ڽ%|7%%x 7 7 77?}8}8}8}8}8U8W8Y8[8]8_8a8c8q8}8e8g8i8k8m8}8}8}8{8}8s8}8u8w8y8}8}8}8}8}8}88}88888888}888}8}8}8888}8}8!Ø&?'ͥ"K'oG-!?'?1͉-:626o!$K'>c31̓͹$26:626!&26%×-!6~6*5~̓!66:7!'!!à&͏G!6~6̀1ͪ:6'o&)&^#Vo&Di:7/!F6ˆ'5:6͎ *`5! ~!~! Î *6|!F6£'o 02F6*7"6':D6ʽ'(:7':C6'V(:B6'((!5((ć`:IO>(!:6*6^(*6^(:6c(>>(:626*7"6'O'G:IPx=(V(*7*6R@(> c(}c(| s(>^c(@!d5\‚(> Ç( ʈ(#*7++*6w͎ڞ(#"6:D6¼(:)ʹ(:f5!6V(0(^#V#(~#c((:&!+!7(26.)!6N61q!6F->26!D6~/++! n1:7M*3.د27R1(:C6 .*7"73126|=Q3#.=b0.^#Vn126262626%>26/.3.26G:7l.x ʸ.?G~ʸ.|.o.#~ʼ.:7<#^#V++̂N26.}.26O~ʼ.###~ʸ.#ʡ.è.7#^#V|7!$/*`5o 0\/o .1/6/=r!~!"%/=r!8Í'>260\/ ͑!~!:7Z/!/v~Z/.%Z/6`]͑! ~!)(:7v/1=!60:7]͍'o :6!6͚o:7š/:6o:6/!6ڱ/!6ڽ/o&͔!o !<Ý/Q):6!606}:7G:Y5O*J6|!6/6:6!6ᠡ/6o ‡0($:D6!8:G6!8:610268I0x/I0͖0F0͜!"6o͢$:626:6f0!6~6!8*J6|!"J6͢$:626‡0>26!G6~6ȯ26:IPڣ0!7:E4 ~"8126×-:7O!60w:70:6=0w~=!6)!61)   1 ` 1`:7133:6!6͚!6͚!6͚*7"7"7>26: /!6ɯ2L62r6~#26~26#"6Ñ1}26|26"6Ñ1~#26~#26"6:6=>$ԕ&ͽ11i`)2^#V*6 *6)))2N!6 :66i`)2^#V#^#V#͇2~#fo)DM!"q#p#N#F2 ~>)v& 2x2x2 2~>'v&#:6>,v&6 >*v&w!6Y2>+v&# N2^#V>(v&!6:6w>&v&͓2!$~v&><Cpy-M67-M6M6 M6M63M6M6#M6M6mM6tM6M6{s6M6'M6-M6dM6!M6gM6|M6  w3Ô3>e A:)2323:>!+}ˆ3::> A8Alphatronic/PC 1.0PF  Y   "pWS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS SUB|WS SUBvTERMCAP SYSCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tCOPY SUBuCOPY BAK}$$$ SUB~55???????????!ͱ6!Sͱ6ͩ6You are trying to run an uninstalled WORDSTAR.Please run INSTALL first.-ͩ6 ʹ6͢6~̢6 #ô6%C%D%E %G%F;RA%H;FF%I;IC%K;IC%J;IR%L;IR} !9":q!"N d!\ xp!x* Not enough memory $CS OVR CS.OVRw#x!*Calcstar customization for 480Z Version 1.0/PF/850429 480Z CS amendments Notice board ...  16-May-85 =============================================================================== Certain of the function keys have be reprogrammed for Calcstar F1 ... Return to Cell A1 F2 .. Recalculate A)ll entries F3 ..  Goto next row column A F4 .. Set/Clear form mode on current cell SHIFT UP OR DOWN .. Insert a column SHIFT LEFT OR RIGHT. Insert a row =============================================================================== Loading Calcstar...... %A%B  `7PASCAL/M.xxx Copyright SORCIM Corp. 1981 S/N- 1245,BCD 2.x804.01RU SWPI3740FilenameEXT&&(XÈP>P?CS OV2 T   WQjk#"ERlm)(>}>?}zz_z>}>=}z}{}!D J 9  O <  , F t T d _ o %4 Z f  =: i SrT8KDknt"@|KY!H}-<DKn2A"q )"4\hbp?+?? @o&L (!_^#V*MD2}~Bebob_x_*x@_*^#V!2"o&"*":ʝ!6u62::ʼ!6u6:! *)22!u6!"" 5!6u62*1.Å.}{ozz܄$21i`" Di`" F i`"ͻ D7 }o|g1Y 12Y 1b Y ڄ Y 24Y 24Ê 2>}ͭ 2ä!.?%*?%yH ) y ̈́$`i<) MD!xGyO){_zW #= ɯ A A x& ̈́$; a z8 8 Ä$ ̈́$?%| !1Y | N V Y | N f ?%N !1 ʕ !D ʈ !D ڈ • È ڕ ˆ Õ ڕ È ڈ Õ i`"! ; O' 4 2 {_y| }! z {2N2G Ay" # :ͻi`"KB@ ͻi`")MDG a # J J z?%zɯO>G i`"_!} ^#Vz `   é | DP  x   D}o|g }o|g ** ** à 2 **DDí2 ? **D"""Y **?%_>W>o>gz Wt / |怺2 z!+~ "~ *D!""!9+x> ¸ wxGyOzW{_# :2#:2#:2#:2+++~w#~w#~w#~w+++:D:D.Åi`".Å.Å!"".Å"i`""!>À.Å!!*ù). Å. Å. Åi`"*~. …ý)*MDi`"> } "i`""!>À.Å.Å".Å"".ÅPCO o g o g1 o&1!1!1!1*w*ͻ11*Î*ͻ^#V2Ó*é*ͻs#r2î _րW _ *^#V=ͻ ͻ1Îïn&1s2ͻi`"`i{=Ļ )D)11ͻi`"{OzGn%D `iG^#V#=MD2^#V#~#fo2i`"q#p#s#rD 2o&)+V+^=w2 ʛo&)9^#Vs#r#=’2ͻi`"KBn%D O>G2᯲1Å 2i`"|}2!N: ~# DS#11 _ 2i`"K ) :o&E6oDi`"CK^#Vx]GjS]bllzW{_b! ~_#~WDi`"y! N#Fڟo`ALbS\¦öʶo{_zWyOxG-¦y/w#x/wD =11{ozg1}o|}/o}/o|/+5» *}lg*}lgD**P ""**P """ᯕo>g>o>g[ "<{_zWyOxG] !""72xGyOzW{_*)"*)қ #""}o|g"}o|g ** *#"} *#":={ ""*"z OOx*X =  H_>W>O>G|C㴵DW * = *+ [Gxʞ{/w#z/w#`Þ|GOxʏ{w#zw#‚yʞGw#w#–*Dxʞ{w#zw#±ÞO!9Axw#w#*H+~+~Di`"E#)9~"## ѻ2i`"'O)9o`9]%D)EO/ɔ>2ʭ{½#z½#œ:ºý$:O*D{/#z/#:~/ѣ#~/#:$O%y7Az9-i`"x! {zyoxgyGM{ozg{2&^#Vʛ×=–x! G{_#zWxʸ³:! yoxgy_  z b ~9>o&D}K|K@}@|@KK2K@ ZO>G2*O ^#V7}O|G2i`N#F#^#V#""z}|DDxD}o|gD#)*N#F+}o|gMD2ͩ2ͩ*1ͩ**"*"N#Fq#p2ͩ*MD*#~=! V+^+F+N#KB21*+V+^" "*^#V TO* #~+~+ G*" ""*yvxʀ*~ĉ"2o&)) F+N q#p*$?%M*"*" i`"/<_**^#V7}o|g",~H^#V#N#Fo>g9͚  o>g9͚**##n%****!9" "**"*,"+V+^}O|G *c<*"*!òi`"͢>*MD"*!ò =i`"W*|ʚzFҚ'w ž!& #!B ~!͇=~! ͇=+ ~1#  +s'G'w+>GG Jx=Š#6ÊP''w+ xҊ#6|@"@wʜÜ! ! 2O~22O#!BH!B!~@w/2""""!"p""""<o****i`"2UͬrU" ~ڸҸw#6*w#6D̀z w#6{ w#6D{ W} _!DÃ|]}]D]!?#r$~#foF#~#}Ͳ%  #$%''''AND 'ARRAY ,BEGIN CASE CONST DIV 'DO DOWNTO  ELSE END EXTERNAL"FOR FILE .FORWARD "FUNCTION GOTO IF IN )LABEL  MOD 'MODULE !NOT &OF OR (OTHERWISPACKED +PROCEDURPROGRAM !RECORD -REPEAT SET *SEGMENT !THEN TO  TYPE UNTIL VAR WHILE WITH !> #w""^#V*z"D!arUir<. rD<< rD<]Tͬr< **<v~@2v8rH@PU8r! ک!A &>2"UʹD<****DD<****D""!J *r"""![ *r͸*|N}2o~! ͇*}D!͸*|~}2N}! ͘ڠ! s!:G~22ͮ*}|@g}@Ox~w #r#  !!ͬi~#YP~#YP^#V|h h ^#V#^#Vh z| Goxgx_xW! Ͳ Ͳ w+zŒ  !))Ҿ zP OzyW#´ BzWx  "! }|{z>2E !  !!"!DM!q#p#s#rq#p#s#r>2Jʹ$ ++**-( -,,-#-**E\......."$o$v"1bͻ"|Z"`i"t" w#"͆*/$>:$DxS}U$"y x%xD*%Do$MDy_xW{z/W{/_xzW{_Ì$$$$$$$$$}0>02$>0]T< $=kbG:$$> x>2$0~0~0#)~)# |*#A):"|)! 0)o^5)oV%|)X)!F(%>~)Oy~)~*w*T] FO>o)/Gwq#6D>2!9̈́$|D!"D#y% ʠ)>!%!s*)-'*`*%*k*%![*-''<2\!u*]͓%!\'! *-':@!6n% CalcStar ABORT ! Insufficient Memory Feature not supported by DEMO PC= FFFFh SP= FFFFh $$$ SUB*}2]*1{2*w#w2}2*{22y**29!(*&oS("6:8>*>2D͒-y*+!**.!+!D>+>28!`+">"<""A":͒-~ ʅ+:8I+~…+ͭ*~2@###^+*|ʻ+!~~+w*A*?%~+͠-w*Dx2~+ÿ+ï+]**<k.+:8).-!"û+2*>͂.**:{L,:8+NS,H,:@O ,y+͛,wH,,,&wH,͛,w{,,& $,> ,:t:H,6#{3,͠-wL,#+"û+:@ ,:Cy2Cu, = ͠,i,à,ƒ,>w  :7>â,>ʳ,YO,O,&ð,_>ê,*|~#"!"t-?',`'*, s#r> 2t-Xy$GN#x%%y_ѯ %#7# y:%'%%yz{x7# G%?%n% +~ xa%x~# n%x~aڋ%{ҋ%# {%~#Ó%7#Ü%zq#é%O:=@I·% ´%|%}%Ɛ'@'ɯ2&#~:+:%~@5&##%:<~>:77&.!&~.#!&y[&!7& [&:&7x7~f&#.[&*S&>?^&~# 7&G>  ^&x!5&|5&;5&=5&:5&@ʓ&#ʓ&*ʓ&?˜&2&a&{ w*%.*/$>*:õ&x:&Ƞ2&Ʉ&&OYy&OOy'_  'ɯ%'-' '^{#.'ͤ'6=(ͤ'#6^w#VwzW{_! 4!~oO ͧ%=(=(=(=( Y=(!!^#Vr+s=("',(' (,(( ( GCONSOLE#CON#CRT>READER5PUNCHGPRINTERLP5COMM1,COMM,NULL5TAPE15TAPE2/>2!"$ͧ%~|)|)O͘)X):|'>,t-',t-͹'>,t-'"t-͠-> p-**N͘)n-!'> p-*!'> p->2>28͔-ͭ*~ !D*!""N*~ɯ2>28i`"<"":"!-"*<k.-:y.*:-!*'.-x2y.".*:":-!"*:!n%͠-w**:'K.F.x2y."].!"*:":/.|)!!q#p*w$*6#~2,#~2,<̀1r<ͯ2r<2r<.r<0r<̓/r<ͬ0r~7 / @4>@#!4{/4ͬ!4444!448!{/44ͬ4!4o/# U/!4#!44)/@P`i ~77AAҠ//< ڶ/ Ҩ/ ¿/Wr#w+4!46A!4#0ʹ/!4+04i4!+048!444!444ͬ!30{/`4YP!48AA1b'v`?)CW5?2ab$c?4t5XU"`?7vG7Uh?A6y"?EqRb?Q 4hE?WY04?fE5gt#?x&33?Ps@@vd@7y'a0@()eF@8P̓/PY!0ͬA#XPA~0PY!#04!4~w4#0!'1`4!444ͬ  !444ͬ1!4BK4!#02YruT4&(W)$6Q"i77BP9P:3 ;8333='`Affg>&fffg?1%@%4!4~Gwx24-24 !=24ʹڻ1!4-24i1!E24ʹ1!4>w!4E24i1!524ʹ1!4E24i!4>w!4M24ͬ!444ͬU2!^2`4!4:4ͦ4AbSApyc&yIAG88GA1AY&SX@cfw#gYCwTg185`fW1cfQ 9V)!525!!=AG6FuA51?yi&&$agdYd u%Apyc&yI-2 PY!528DM̀1~2`i 4!4~w!4#0ʹ3@!#044!43ʹC3 !434ͬ!4#04i4!348!444!444ͬ!#0444!H448!4P44ͬ!4(4!448!444i44 ~y34!#048!444ͬ 3X4!448@3!5244i!4ͦ4!4@&yI$1A2V?aP?d3Fg1?hW(W)3333333@P"bD48@PBsPBsP@Q@`@EA4@R5wU0!4 448!~ʏ4!444ͬj4!444ͬ44845Ȯw:ʎ5i`":5*^#V{D{ O5*OWPC">O2p-͢!U~@/5"#l%*"K6!"*""+F+N}o|g"+F+N}o|g"* N#Fo>g9!9!!9"" ""!$$"}2:D*!9w$*Dé%!9)!p; 1'DA)x OvMLY5*MD2?%452y  5yo*MD}A: :ʈ5*~ʈ5i`"O*~^5m5ƒ5!9"5!v5u6Ã5y5i`"5*MD 5: 2͝5Di`"|5!@6 ͩ%*t"@6N#l%)6-'6͙$*n&5ʹ$*n&6ͫ$*#n& 6ʹ$5-' S:12 P#123 Lev 12 12345 - line executed. Entering Proc name - 12345678 :6!6@\6!7q6:!4n6!.6"2l%BKPpSTEP 95O7*7 7}|:A76~ 6 6,6;6|7 77a6{6 w#ï66#×6:A76~ 77#66#ï66go~7ѯx~ %7 )7#7~':7":72A76#2A79:~#]7<+w#_^#Vѯ71p?Z:!""""UC8 |}27>72,} :8-' *-'a:! CS.OV2 NOT found ! .OVR file NOT found ! CS.OV2 file ill-formed ! .OVR file ill-formed CalcStar runs only with CP/M 2.X !]͓%'<22\!"9:}2!:~o8 ;#T2p<%!9)!  w ?J& :4/21/<352:81 4.02 library.02 Library. 3aqaxaa{aq%a-` 2 aa aqapa.hcddddbdaa dpd2d2aa`c`P`a4aaa6aaJa`a6aa.a0aa6a6aa*a.~)`a4aa.`a6a.*`a4aaa%a4a`)a4`*a.N+B5Bۡ,B4BB6BBB,D-BȀƀۡLƀ,ƀƀ1Bƀa ƀ*`n. `bdbabadd4dd*d.d*d4dddd4dcddabba(i4ipci6iai.iacadadf2i4`*i0ii.e`i6ifei*i.i`ipi  i +2 `d e e (/`/d`b45b4bۡ#bb b6b b.ab`,bۡ`,b b`,&V vdddpdۡd &"<:<<c x0epdder6*d0 j1`/``d a`,d3`b1(adۡbdp`,b3U rA22Ar 22    T3A22Ar 22 <% R4b52bafDec,c02ddjc:b d!add*d4.-`bb p $bddcdۡ-ddcdd Fab ii ` ii.gh i*ݚ iiiۣi4iid ca dcA $`pd``peN ~5`bap5aeapf.$dGc`d62GUcd8 Z6A,Ap(8--+89A`A,`p `ۡA1A,`p+ B: 9A1 i72R3A,Apggpi472[ h;   :9 @ @;.8 ;Ee89;X#F6GgHGU !AU AaU a0U0728;x7a/22 7f6g g  g  dL ݚ$ ݝ$4  $а ݰ   e64g h fd  5h dc5h >> $(>hh( h(    `4aۡ aۡa,02Yz2d2  `2 a a &`2 a   a ݰa  :d  e=e. ge  f e     j<dd*<  dd.<  bffff  fb)fef4ۥb+f0ݰf. fef.f*ݜfbf6fff.f*ݚ  e  `p ` `p ` `r  `p ` *(D4`Dp D `` D2B>dbbbae `eabababa>af4b``bfpc`d ` dc`bee>0 =ab`= cba`a`a-ݰ`    eaed0`eaea`a`W/zJ ~  z V (DzXPL  Dpjd H@6HLZ|>CONSOLE:P``CRT:P`PrrT<< <R4:/(AHardware parity error(Unknown device specified(Illegal I/O direction(Undefined hardware error( Device referenced is not on-line(File not found on CLOSE(Illegal file name(No space for fil=!ba`a=#True Pa FalsePb`=0"a ``Ћb`=0$``Ћc`=0%a` l ml2   - Alg A`i iii(Aglg  = kn jnj ki 0`>.egZg#gg.i2g0.g0lmЋfa= &'`bЄcaЍacabbcbcbЃ2bPa#ca`dd`cab`b`6aabЌ`1a`bcd badbcbadbb`H`FabЄecЍce1b`d b`b`edbcb`ebbeTeSe deЄ egf3gfghdg gfdg e egg: fe(Bad random access("File not found on volume specified(Duplicate file name(File already open( File not open(xError reading Real or Integer(RPut not at EOF(; End of file(' nG)rN9 IO error: (? .Unknown run-time error(BDivide by zero(Exit from uncalled proc(rArgument out of range(Floating point overflow(Illegal PCODE instruction(Integer overflow(Value range error(Non-existent Proc/Seg called(Stack overflow($String length exceeds declared limit(Can't read Pcode file(Programmed HALT(Program interrupted by User(String Index out of range(Non-existant External called(Case out of range(Set element out of range(fPointer invalid or Nil(HAssertion failure(/(H4gS) ~`D ! ##%V* tu   Value= #%r60Enter new value: # iB`tJ@Value= #`t$`uJ , Limit= #`u$cVValue= #t$$Value = #sNil#s 16### T asCurrent dynamic length= #`$, Illegal index value= #at$" as`" v @@  File at 16### = #@   b+. P b :@b P #b B%F Bs 62 .*%, 24,.,&,.V` b`a`Ѝ b`Ѓa`Є (   a a*PASLIB* bnrа  nr nrk lnrknrk m`nrk  f``yEab kqabksFktgeH^beF ku  % H-&j:<>^BDFHJLNPRTVXZ\^`bdfhjlnprtv15#expected# 41@XJ 4PS 8ddۣ BO 6l iveɀŃ jpgjq dgfhdpi֔vf dff) VCfe hqfeˀhsˀɀơ(hrˀ diɀgfˀɀgQ \deee  da e cʀ` ɀbbɀ"`e cʀbɀ be c P d fЇ lЃ klj kۃ k jc L Gaɀ`ɀˀ`(4 af gg GG `jk j k/  ` jʀ jˀ N)   h cmC C#oh  m m$Q'C%7m"+= ! W;% 9k-& ( af lk d  c cd  #ffgf N  b vxcw )At S#ss P#ppp procedur I#iiii sp=1234 < ! Line #$ ifrom  -cE=continue, =quit?# d d cc 2 Resuming...#dN`f Pb.! ;<: = Not impld. N JaJ ,2J;2J ;BBBB BJJ1 END 1Z TRUE  1C FALSE  1, CLEAR 1 DISPLAY 12J 1 OJ0J!2J< 11 111 1111111 ^C )IA\"$&(*,.0246gg  I h   j   y i1 (1  Illegal value.#2/= ! uY q   M`E ЇЃll  2EˀG ɀɀˀ(G`E  E&V8 g֔vfptep eph e p p֔vfpt֔vfpv qffp֔vfpuuІ vv pd$d֔vfp$ Error in index#T& hb`/aˀ ɀCb  aCbab7 B bappɀ-2!`"ɀɣnEˀ< ɀ"E$> C   " EG; ɀG;CGGEGCCGGE"EGE EˀɀG" EG|!֔vF  $ `)ppE`-2#= !.z Too long.#!F6>  pRp  feepfgf g dp eepfgd p hˀɀ Error in last index#epˀhG ` b   ֔v obbppn  $8bpp ab  C( bp babp`bpc.df֔vatdef֔vave`bdjHa`a9aˀɀ  ab b.b aC \b`hg /   Ѕ   l lˀ i  = !;  D< Unknown mode# acgosuw ?#X=^f(dy4[ceMdap`:acgdbdbpbddydyda8dyddy`ddydToo many#{ `BOrpa44 <: Xa4Ma4B ?#5BXI ` "dN(*,KE Crˀɀˀɀnv` q֡Րpb bb$: ;Ր b!( ֔ve ededed֔veCtmtn[e ֔vId/qveveq , e) K4nCbyˀbɀcsˀdɀcrˀ`ɀɀɀbdvaɀŃ e ev9b$: ;dՐ d֔vdvaɀŃ pcq d֡dՐ) ɀ  l Gkapl lGk$i Oap= !lGlm)`l C C#l ap aIˀI֔vn֔vnv֔vntn[ pp$, ]=#IIo= !m*s.!')n811`O&1;` Not an array#_5 , or ] D19` Not a record#$5 .,^,/,\ v1abOb Too many fields#1c  ?#1cb111 abx 3 ` D֔vI 1 Z1 tʀɀuɀG,ɀBBC C#ɀˀ%֔vID 1 ; ֔vID v5 /,\  p  ˀ֔vI  D1 Boh x+Ȁap apapBaȀbqaB| Break at ##ƀ$Ua-2Iƀ-2# ƀ$<> xvrMC PASDDT#<!2`1135 /,\,[,^ 15 ; 4j-4jƀƀƀƀ<: Line# #$Breaks: #ƀyȀƀˌ*B# ƀBp$, BȀƀ Trace on.#CA`< ?#/6> %3, "$10 Exit PASDDT.#6tiNV  ~ 0 Df :h6pV:-;;<<G(>@"< G+2>DR=BD`v a>aDBE`֔v=>==l`v   a=$`CaaE>@> kv p = jidk֔vj j d'V ;=<G$empty symbol file#+2tȀEGM GE ECBbaȀE֔v=>===ȍGG=ȍToo many symbols.#Last symbol read: #>! in #vb !2Do you want to see the list of symbols available? #ȀƀcF`HJ  0 ihcdSeg##c$----- Procs -----#hceed khvb mmP# #mv$f#mf! lev#m$mq$ vars#mpmqnh֔vga`## !t$ u$ v$ $ *Y!\ x\F%CÚ LH SR UJ BP PL MT, MB2 HM8 FM> CWD PCU POL PAj CPd PNu OPo HE FO !J;>w͔ n!f;> !K; Ô !O;# !W;# !S;\ѷ-!>N d!\ xp!x* Not enough memory $CS OVR CS.OVRw#x!*Calcstar customization for 480Z Version 1.0/PF/850429 480Z CS amendments Notice board ...  16-May-85 =============================================================================== Certain of the function keys have be reprogrammed for Calcstar F1 ... Return to Cell A1 F2 .. Recalculate A)ll entries F3 ..  Goto next row column A F4 .. Set/Clear form mode on current cell SHIFT UP OR DOWN .. Insert a column SHIFT LEFT OR RIGHT. Insert a row =============================================================================== Loading Calcstar...... %A%B$ $## !ab c  pA / Print .#.\ Print change it to .#);{-}B Set/clear break at .#;P Proceed.##;{-}S Set/clear step mode.#$;{-}T Set/clear trace mode.#%CLEAR Clear all debug modes.#DISPLAY Display status.#END Exit to system.#  PASDDT#` 1.00#*`s   .SYM(a,„IIvI֔v 0JJIbLLLbJJJIaaJIII֡ 3[ "L+ %C%D%E %G%F;RA%H;FF%I;IC%K;IC%J;IR%L;IR} !9":q!"N d!\ xp!x* Not enough memory $CS OVR CS.OVRw#x!*Calcstar customization for 480Z Version 1.0/PF/850429 480Z CS amendments Notice board ...  16-May-85 =============================================================================== Certain of the function keys have be reprogrammed for Calcstar F1 ... Return to Cell A1 F2 .. Recalculate A)ll entries F3 ..  Goto next row column A F4 .. Set/Clear form mode on current cell SHIFT UP OR DOWN .. Insert a column SHIFT LEFT OR RIGHT. Insert a row =============================================================================== Loading Calcstar...... %A%B  w1|)dR 6=3/06/0478:=3%Comp 4.02 CS,, INITIALIǀǁD8TEMPFILEǀSTOLENʁC%CalcStar (c) 1981 c/o MicroPro Int'l -ȀʁCȁ}Ɓ}ȀƀʁCƀЃȀƀȁ}ƀ> ]MʁCSTOLEN SOFTWARE !!-ID.LCDID.LCD`ƀ¤ 'ʁCȁ}ǁ}ʁC-ǁ}CU1245K55ǁ}-" CSMASK.MSK" RNecessary file # CSMASK.MSK# not on default disk#2ʁzʁvˀǀ TERMCAP.SYSǀ F3Terminal not configured... type "INSTCS" to do this#2pƀ8ʀ#ɀˀʀ ʀʀȁ}ǁ}ʀǁ} ǁ}ʀ ǁ} ǁ}ʀǁ}ʀXʀЃɀ XȀYƀɀɀB.BSUMBAVGBMINBMAXB CNTBSLOPEBDEPDB REGRBPROJɀ2N  Printing in segments # 6Form length : CONTINUOUS#ɀ2bad form length4Stop on each page (y,n) ? #YN"Y  T   . To which file ? #PRINTER:# ɀ2> DISPLAYCONSOLE:PRINTER:::d.N%.DTA#.TXTcan't open file  Output width : 132#Printer width : 132#ɀ2aʀ`ۃ`Report Printing..##Make sure printer & paper are ready#B ABSB EXPB SQRTBLNBLOGʁo ǀ.\Writing Data file..#d. fcb h h,h"h`" h i&ha"" ha a `" < /h h ʀcha'c, cbS 5Z`P  # - hit space#  "2RVFILE WRITE ERRORɀ2 o0 2o% oa`a 6  Hit space to continue #  "[Fix ordinates (y,n) ? #YN"YYes#No#Title> # Є #ej  ǀOUTF ƀȀƀ?Printing segment..#ƀȁ Ɓ Ȁ ƀȁ ƀȀƀƀȀʀƀƀƀƀƀʀƀۄȀƀȀƀȀƀ[ƀʀȀƀ  1:#ƀ#ƀƀȁ Ɓ Ȁƀƀȁ ƀƀȁ Ɓ ȀƀƀȀƀ ƀ/PAGEƀǀ ǀǀƀ\ƀƀ$: ƀ#ƀƀȁ Ɓ %Ȁƀƀƀƀƀƀƀȁ ƀȁ ƀȀȀ ƀƀ..End of report#/K/8> 0(|r   a(empty, but allocated)#numeric#text:#`Zleft justified#P repeating#<right justified#"centered#4cN  ^^#ɀɀ _ɀ ʁZʁZɀʁZʁZʁZ)ɀi!^d4ɁuT-B#ˁuˁuL-R#6ɀrow, column = # # ---#, #ɀ # ---#Recalculate: A)ll E)ntry #AE"ˀɀɀɀE ɀɀ$ɀA$zapa`patLock: R)ow C)ol B)oth #RCB"ˀɀɀ\ɀRɀBʀʀɀCɀBʀʀɀɀɀɀ ɀˀɀˀˀˀɀɀ `P# #  # 2RB  Form mode (#set) #clear) # ʁZʁZFɀʁZɀɀ(ˀ  Auto aborted # ɀ?ʁZ#  ? too long! # vʀʀ  ? computing..#`` ` ʁZ`$ =#`ʁZ# ʁZ# ʁZGɁu ɀ ɀɀ ɀ ɀ ɀɀ ɀ ^ʁZ/bʁZˀʀʁZɀR=ɀL/ɀC!ɀPʁZ/PAGE# ɀ=ˀɀɀnɀɀ2^+ ʁZn ʁZ#{nʁZHn  !ʁZ! ʁ~ʁZ#  ʁZʁZ! ɀɀ$ʁ~#ʁZ#ɀɀ ɀIɀɀ#>  #ɀ#<  #ɀ^ۡ5ɀ+$  Auto complete # `\ɀ##ˀˀɀɀ    ʁC# rv_#1.2# F ɀɀ` Can't create  P)recision (#`E `$ʀɀ$ ) or W)idth (#ʀɀ$) or # FPW"ˀɀF``ۡ Column #ɀ ɀP Precision (0..12):#$ɀW Width (3..63)# 2 E iɀPi`ˀɀɀ  2ɀW1aa?Width must be 3..63 ʀɀa=aa Prec. must be 0..12 i `a ʀɀaˀW ɀɀˀɀɀ  &  ##2e&  Command> ##*?AMHPEIQRFSLCDOWG="ˀɀʀ#2ɀɀɀɀ  '!2ɀˀˀ2  Room for #E$ entries.#zɀɀ !ɀ 2c*Ww  "$&*v.246@BDFHJ TVXZ~i b ʁZ ^!^&ʁZ!!& [#p#] ʁZ#4ɁuL-R# T-B#ʁ~#ʁZЃʁZ*ɀˀɀˀɀɀ!!gg  g g g v' g#' eg hGg ag a &g ag aʁl ʁl#aa }a` ˀˀɀnoUfɀɀ YɁu ɀ ɀ <ɀɀ /ɀɀ "ɀɀ X0O' hʁZɀooJ >ɀ?o.ɀ; #ɀ@ ɀɀ ɀ^ j568n H  D "Y`P  # 2R8cbda`e a` 2epdede efe xe ! ee`e h iFh gh g!)h gh gb`h gh gcagg ea`$  \ > 2      eg Bad coord1    Bad range coordgp ep fjgpdiep(From coord (>coord) :# To coord (>coord) :# mlfdfdfdb`Sizes don't agreeb`fdNot along row/columnge j j mGR)elative or N)o adjustment ? #RN" kɀ2kRb`o1 gecagfedcba`hˀɀɀ H"vE? &ABORT: NOT COMPLETED- CHECK FOR DAMAGE# 2) pbvˀInsert: R)ow C)olumn #RC"ˀɀCEMEMORY IS TOO LOWɀb3ʀaʀaʀaʀaaʀɀʀɀ blɀ1ɀaɀNp -aɀ!ɀqɀaɀ%ˀˀɀɀ Xɀ.CSDǀ  Not found_ Password: #    KFNWUONWM  NOT OK# 2`ʀqˀrˀˁuʁo  ȀȀ  READ ERRORƀ Load position : ##ȀȀ7ǀǀ Bad offsetƀЄȀƀЄȀƀʃȀƀɃȀȀƀʃƀɃArray bounds exceededƀʃƀɃpȀ hȀƀ ȀƀьMȀƀ ƀ4ƀ ƀƀ ƀƀʃƀ ƀƀ ƀƀɃƀȀʀƀʃʀƀʃ]ƀƀȀƀ. ˀˀƀƀ !#;r `P  Write error: ## 2RFǀF File name: #ʁo#ǀ ǀǀʁoǀǀɀ2ǀ ǀȀǀǀǀ.CSDǀͬǀ RP`ɀ `ɀ`ˀɀ`ɀpɀ`ɀ%ˀˀɀɀ ZyKE`C`rˀ$Delete: A)ll R)ow C)olumn E)ntry #RACE"ˀɀE7ɀɀ  ɀɀɀɀA- 2ʀʁo ˀˀ ɀɀ2ɀRɀ&22ɀɀɀ&EppECqɀ$ɀpɀpˀDɀ"ɀɀɀppDɀ%ˀɀɀ ɀ&2 2ɀa3ʀ`ʀ`ʀ`ʀ``abɀ4ɀ`pppp `ɀp`ɀ%ˀˀɀɀ    :`a`a:``a`a8 `b`a`aaa( ǀINFˀ&File name: (make sure file is saved)# ɀ2 Ȁǀǀ File exists. #  Destroy old contents (y,n) ?#YN"ˀɀY2`[Verify password to remove: #ǀǀ `ǀǀ KFNWUONWM 2ǀǀʁoǀǀǀǀͬ Password (<CR> = none): #ǀǀIAgain: #ǀǀǀPassword not the sameǀ `ɀ`ɀ`FE`Ɂu`ǀ P(artial or A(ll #PA"AȀƀȡǀǀǀǀ 2ɀȀ``` ƀȡ`ƀ`ƀ  Saving row#ƀ $ƀq ۣqƀƀˊƀɌƀ̊ƀʌL] ```ʀ`ʀ` I/OpƀpȀ CloseSaved#. C `GAnd?#ˀɀ^ jdk# ~ y u qmi#SbN  "$&(*,.02468:<>@KUFHJL[PRnuXZ  \^`w   r j C``CCpE "D``DDpɀe{eqdld \d i jJ i h8i hh i hgcfbi hgai hf`h dpep:|e % ɀ iiq hh h  o oo onggemffd C ЃK,etc.# &2,  # Ѓ9ERROR: would delete ref(s) at # # Ѓohp ip #,.H&ɀcC`$cqb"b  b ba`$abp`cpJ6 \(`eUc$ag8cbdd  d dcb$ ɀbco`L t 0}-+.a.+bE_+-`+09.g 0+09`gg<,g7C 82*2*,&*& 2  ""*29[.ʁvʁz"e 9dʁz"ʁvʁvʁvʁzD :+:12--++!"' !/0\.!+(/0).+"'_3 +3\` ``3\+09.8AZ!  3a.a+AZa.a19!` ` 35AZ+1.B11111.(+.1}1}6dd\.ʁz)\!3   ʁ~Ѝ\ʁ~ ʁ~ 7    Ѝ\     ++*2 ,  ,"-`*2 . ./++~   +.! cb cc +!+`dd d ۡ`dd5 AZd5  >f  .+5j     .I=/!     0dgd       ii diij l6d d(d(Z "709Ra# 0cb d44?cb2cfbe22 ].ʁz2ʁz4z10d1 b1 D1 &<<, 1 ^.,+1 .).+1-&,',1% $:ʁzdd  ddʁz_.ʁvʁz;ʁzʁv#H|k 95. ,02W^`{WSj'44**T+,4 (%-&l33 `%d 3`/Q`/'<,%<, 22(i2=;;  ,`+z 11< h+>f+=g+hfgy!     1ghf 00de .;i0:= ;:\+\00:;\.A& *cdd $2d !""  !*  Value range #ERROR #o$-> #d ##gnk? d nd n (d%% n% n n#n#kd Ѝ?  hit space [#`a #] # "ˀˀd ddb a` da&Ɂu()ˀɀɀ $T@ $d !A(d ff,d'dg hg ee  Z   Form Control Mode # ɀa$aq``` `pap  2H=E ɀ  gekk kp gkˀkd2kj= k `iaa .`Piiia?i 0`Pj0.`Pa``ax`0`aa .`Pi  i 0i 0i-``PeQTP -`PuWl ~>ʀab b ʀabb `d#bˀb`bd#ɀ `d#'d"ɀd `b#`bd#dɀtɀd `bd# `bd#Xɀd `bd#ˀˀ;4 n'  Y[aXZ`# (a` ##`Oa# Pa#a`D!`zʀ ʀ#!b a^#Sʀ   ʀ#3#( # JE /&{ʁo  #[ ʁo #] <`pa`pz ``paA dg0de0de9f2f deЃ0ef> Nɀˀɀɀɀ-ˀ`   No form flags # 2aˀɀˀaɀɀ np x    @ *dd  ˀ! verify Y/N - #YN"ˀɀY8 oidɀddɀoGdɀo;dɀo/do$d~od}od|ood``<E:  6dɀe`e#`b#dɀee`e#nTb `?n?d#gb :bˀɀɀ ɀˀɀ`d#%bdc>d `!n!d#`d# UPh70aɀɀaˀ`ɀɀ`ˀɀaˀˀɀdɀgˀabˀbʀdۃPfVɀˀdɀ | * d ʀd#bʀdۃdɀˀfɀɀˀ| bɀ!ɀˀɀ idɀg`` cɀd$dɀ | * ɀɀq ɀ k1h hebʀeۃhp e ɀa khPhp e ɀ k5h. heabʀeaۃhp e ɀpˀbcɀ!dc -&/nM<ɀɀ?ˀɀʀɀɀۃPɀɀ#ʀɀɀۃɀˀL ^@a`ˀcɀ`cɀ`pˀ%`cɀɀɀ`pɀɀ`pˀɀbɀ4  abeaapʀdۃdapɀˀDbɀbɀɀˀɀ-aɀɀbeaapʀdۃd"s A`a`a 2`aAɀɀ1ɀʀɀۃɀ ɀɀ ~ɀpɀ`ˀ`ɀ`ɀɀˀɀˀaɀ:aɀˀɀˀ?cɀ?ɀcˀ@ɀɀaˀ`ˀ`aʀʀAɀJɀɀʀɀۃɀ#< ɀɀ>  #"CURSOR OFF SCREEN#ˀˀl dP//00//ɀ0//V <"ǁCONǁCONSOLE:`ȁ%Ɓ%="ac ǁcc#2abȁ%ǁQH~#ʀFaʀ` ʀ``ˁuˀˀˀˀˀˀˀʀɀ<W r ɀG@cPacЃd@ ɀɀ o` ɀɀ o` ɀɀ o` ɀɀ o` ɀɀ }dɀa!$ c?Pcɀoord # oɀɀɀaaˀˀɀɀɀDˀ~ɀɀDˀmɀSɀˀPɀʀɀۄɀaʀɀۄaʀɀۄɀˀ cvˀɀɀ $^|EE`Bu:` #U`(# Memory getting LOW #(# ** OUT OF MEMORY * #` #d "MASKF( !*!! ! ""6fr P ( N!V"~"#.h2$%B%j%%(&&'T(|D V `&~b)6)Zl&FD 32 ed Bad coordCepgpdpfp End > startCV eddeo D goto > A1# oA1 Iɀɀaɀɀɀ`ɀ"aɀˀ`ɀˀɀɀˀa`   Bad c]cbd ,d ccdca!cc#oc cco`o6*Ra`000P`0bd`0b `0b ``0```RP` `?Xr    Bedf fP \Q PBhAhZ2hAhZddph@dp2Bh1h92h0h9eep h0ep2Bepepdpdph\2ffdpfep[V ɀa`b,aapbqbpc dcpd`p`d3 H`P## # 2R4C32top left corner : A1#   A1P gf Bad coordC32 bottom right corner : # #  32 ed Bad coordCepgpdpfp End > startCV eddeo D goto > A1# oA1 Iɀɀaɀɀɀ`ɀ"aɀˀ`ɀˀɀɀˀa`   Bad c   -Cursor Movement- | -Commands- ; followed by | -Misc- Right |A Auto F Format M Merge R Recalc * Extend |@ Curs Pos ^S Left ^D Right |C Copy H Help O Order S Save = Lock |? Evaluate ^E Up ^X Down |D Delete I Insert P Print W What ? Space |^ Data Togl ^Z Col A next row |E Edge L Load Q Quit G or Goto |Cancel Col> Row+-------------------------------------------------------------------------- +-------------------------------------------------------------------------- cursor: current: current|| type: data || contents: edit: ---- Help page 1 ---- hit to continue ________________Main entry mode_____________________________________________ Cursor is controlled with keys E, D, X, and S with the key held down. Direction is up, right, down, and left in that order. (Control Diamond) moves the cursor right if no data has just been typed. Z moves the cursor to the next row, first column. Data entry: digits 0-9, +, - signal numeric entry. alphabetic characters or blank signal teCol> Row+-------------------------------------------------------------------------- +-------------------------------------------------------------------------- cursor: current: current|| type:  data || contents: edit:xt entry. /, followed by R, C, or L justifies text right, centered or left. ^ is used to switch between text and numeric if needed. /= duplicates entry across column. /P causes page break for print. ! sets special entry mode for arithmetic modification of input. Equations may contain numeric data, cell references, and functions. four-function arithmetic (+,-,*,/) may be used with any of these. @ refers to current cell location. Type one character and then move cursor to collect cell references without typing them. ! following a cell reference holds ref constant in relative copy. functions include: sum, avg, cnt, abs, exp, log, ln, min, max, regr, slope, proj, depd, sqrt.    ---- Help page 2 ----- Hit to continue ________________Extended commands_______________________________________ these commands are accessed by hitting the ';' key Auto enter Automatic entry mode. will abort.  Copy Copy a (range) entry to another (range) entry Delete Delete a row, column, entry or the whole array Edge set the window top left corner to the cursor position Format change column size or precision under e array to a file What if text, prints 1st column & row entries of cursor position ? print approximate storage space in terms of entries = lock column A and row 1 onto display * Switch between 10 (with menu) and 15 row screen display cursor Goto move cursor to a specific column and row Help display this information Insert Insert a row or column into the array Load Load a file into the array Merge overlay file onto array Order Change the evaluation (column/row) order of the array Print Print a report Quit exit the report generator Recalculate recompute entry at cursor or whole array in current order Save Save the array to a file What if text, prints 1st column & row entries of cursor position ? print approximate storage space in terms of entries = lock column A and row 1 onto display * Switch between 10 (with menu) and 15 row screen display    copyright(c) 1977, digital research $Error On Line $SUBNo 'SUB' File Present$Disk Write Error$Command Buffer Overflow$Command Too Long$Parameter Error$Invalid Control Character$Directory Full$Cannot Close, Read/Only?$!9"!͇͊!p+q* ͊!p+q*͍2!p+q*͍2!p+q*͊!p+q*͍!p+q*͍!p+q*͍2!s+p+q+p+q:=2ʦ** w*#"*#"!p+q(+*DM*p*& 6:ep\:=ͧ!t6>!t%\= >!t6:t<2t=O! ~2u b:<2O>9b!60+~9b!60+4:uat:u_2u:uMʉSͧ!v6!"v!|6:|Ҁ!x6 2}:} Hk:} h:}$6 2}$*}M3:}02}O> ͧ3!z6ͭ:}"!}5́ͭ́3*yM"h:}^a a2}O>Vͧ^:}>*z& ~ !z4í!{q*v#"v͙dͧ*vv :{w:x<2xO>}|ͧPIP b:=a:ws.com b:=a:wsovly1.ovr b:=a:wsmsgs.ovr b:=a:keyboard.com b:=a:ws.sub WSOVLY1 OVR()*+,-./01234567WSOVLY1 OVR8WSMEM COM|9:;<=>?@WSIBM COM|ABCDEFGHWS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS SUB|WS SUBvTERMCAP SYSQCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tCOPY $$$COPY SUB}$$$ SUBw-!6]:ͧz2~e:~2O! 6*~& 6$>!~_z*~& w!~5Bx:yͧ*v+"vv ~_{ozg001 $$$$ SUB ͊!p+q*͍2!p+q*͍2!p+q*͊!p+q*͍!p+q*͍!p+q*͍2!s+p+q+p+q:=2ʦ** w*#"*#"!p+q(+*DM*p*& 6:ep\:=ͧ!t6>!t%\= >!t6:t<2t=O! ~2u b:<2O>9b!60+~9b!60+4:uat:u_2u:uMʉSͧ!v6!"v!|6:|Ҁ!x6 2}:} Hk:} h:}$6 2}$*}M3:}02}O> ͧ3!z6ͭ:}"!}5́ͭ́3*yM"h:}^a a2}O>Vͧ^:}>*z& ~ !z4í!{q*v#"v͙dͧ*vv :{w:x<2xO>}|ͧ%C%D%E %G%F;RA%H;FF%I;IC%K;IC%J;IR%L;IR} !9":q!"28!"9:] !í 1  KEYBOARD WS WSOVLY1 OVR()*+,-./01234567WSOVLY1 OVR8WSMEM COM|9:;<=>?@WSIBM COM|ABCDEFGHWS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS SUB|WS $$$TERMCAP SYSQCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tWS SUBuCS SUBv$$$ SUBw>V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳ!%=#%=#%=#%=:`2Y5:c2+ͥ2b5~f!B6.:2c5K=~"=:b5é*͂="7:Il++"7"7="7+"7:Il++"7"7"7*:c5£=*HL&bj –=R+#"7"7*H-3#"7"7Q"7R"7:c5*HͿ-=|!]=>o&))))>=goR>.>O->26:H26=26=26S>:7*7>|& 7!!Y5~P>(P>6!"J6O-:H|>y|>6u>:I@|>|>~!8"J6>|&w- A4:c5:ª>®>:ʰ>>2d52e5>:2[5ͤ!ͮ!~"!N6 ! t6!q66.!66/:26ɛ>V<<2E4!9"C4ͨ<=:l2J:] @:4-:5-*C4͢=!~!!S!Ϳ   (INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE) COPYRIGHT (C) 1979, DIGITAL RESEARCH, PIP VERS 1.5$$$ SUB =.:,<> _[]INPIRDPTRUR1UR2RDROUTLPTUL1PRNLSTPTPUP1UP2PUNTTYCRTUC1CONNULEOFDISK READ ERROR$DISK WRITE ERROR$VERIFY ERROR$NOT A CHARACTER SINK$READER STOPPING $NOT A CHARACTER SOURCE$ABORTED$BAD PARAMETER$INVALID USER NUMBER$RECORD TOO LONG$INVALID DIGIT$END OF FILE, CTL-Z?$CHECKSUM ERROR$CORRECT ERROR, TYPE RETURN OR CTL-Z$INVALID FORMAT$HEX$$$$NO DIRECTORY SPACE$NO FILE$COM$START NOT FOUND$QUIT NOT FOUND$CANNOT CLOSE DESTINATION FILE$DESTINATION IS R/O, DELETE (Y/N)?$**NOT DELETED**$$$$$$$NOT FOUND$COPYING -$REQUIRES CP/M 2.0 OR NEWER FOR OPERATION.$UNRECOGNIZED DESTINATION$CANNOT WRITE$INVALID PIP FORMAT$CANNOT READ$INVALID SEPARATOR$1 :2L> ̈́M9 !p+q* !q*& *M *M !p+q*!!p+q*"!p+q*$!6  !kp+q*j> >ڪ Þ !qp+q/ *pDM9: :M2r:N!r !:r *r& N!r4 !6:͔: :ͳ.!ws+p+q+p+q:w=2wN *s*u w*s#"s*u#"u' !"*M^7 !x6:!xھ **DM͆ 2yʭ :yʗ ͯ *"*6:2x÷ *"!x4d !"/ !j}=2| !"*KM^'_ !z6:|!z1 * "}*}DM͆ ' ͯ *"!z4 :e !"͆ !z6:|!z '? 2*H#"H!{6:{ր!Ң *{& :{4 2!{4m *":ڹ ͯ !z4I '2!"!q: !4>!S :S! :2*M! ^#V͎ * :w*#" = = = = = ͯ  *M !6q  !6q  !6q  *& !6à  !6 à  !60à  *& !6  !6  !6  *& . 1 4 7 : = F P [ f q  221@:2!o6+6+6!6#6!6#6:G*o .!N6:^*M^!K6!6!6+6' :$::=2K  :ʤ\:ҷ\x'Ͳ:!\͢  :͈'! :$: $͈Ͳ!N6' :!Cwͯ !6:^͢c!6{:/>!/H{ͯ :<2Š ::=HҮͯ !6:Ҿ:2 !6::/H͈;!6:> !/>HHͯ :^!w:<2:0}:@E}:!S!W6: z!]6:cm!c6:_z!_6l ::,: HHҰͯ : 2ó:E:1:2v!q!*8!*6: >ͦ>ͦ!q:_  !p+q.*   !q*&!p+q*2!p+q*2!p+q*22!p+q*!p+q*!p+q*!p+q*2!p+q* :2!q: " *M n :c4 *M n :2!c:Q !c:2: !:cw>!n !5 Y : { !6!q:!lwҙ  â :0O !q:O| :O| !6:]2l:o'2o:n'2n:m'2m*mMͣ *nMͣ *oMͣ :]:   *}2D" * * *&"!q:UY: Y:ҩ: ʩ:_2ʘ:€!6<:<2!ژ!6 >!]Ҥ; !6:Q::H: !6*M : !6!q:a/>z!/H:_2:!q:A/>Z!/H8: 2::=O>m:W!Q} Hmd>9>!6:2*M!E ^#V͎ڗO **~2*#"m2m͖ 2m!6m!6m!6 m2mͯ m!62m!62m!62m!62m'2:2:TҒ:2!6*ME:2::Ҳ:<22ý: 2:} >ͯ :i:2:d*M:[    *M:>!(:=2%> >>!F!5+N! ~2!4<2T>>!b}*bMͭz:b2!b6:<2é>!`ҥ*`MͭҞ!`6!6> :é:(!q:!wO! ~2*& :w>!:!4!6>:N<2N!> *N& N2 !p+q!6!6+6 !6: S: M!6g8:N2M*M8p!6!6!6>!ڕ*&P 6!4z!6!6#6#6!6*M8:ھ:*͇g2ê::¿::,͡A<2O>*M8):[ͱ!N5!6ñ:5!6#6>!ڰ!6:<2O>/:!O!T *M͡H~K:¡!6[–ͱ!N5:2:2!4=:[¼ͱ4:!6:.2O8: :* ͇g:[ ͱ!N5!6:%:<2*6 * 6å!q!6> !d*&I :]>!4A>:<2O* :w:?†!6!q!6?!:ҠgÐ!q*&*~!6:22: :]Hں:A2O>: 2ͯ 2*">!b!ͯ >!`0ͯ !q:E:24J!46*}a!44EJ *KM^'́:‚ͯ !36'n::0:f9OY#9.3'ͳ.:020' 'ͳ'7 6'!j>A+!s!"@͓1!"<**"͓n "Dn"":!Q2҂:X!Wғä:ڤ*MEÓ:ұ@@:O2Mc;!6#6>!)*&P ~"::H:H:H:H"!6!4:_jYO jM*"S*" 3@bl*M1͓!""7 *M^͆ \͔!":͎H*#"ͧÝ/ :>͛9ͯ .*#":_!' !'6!36' :1/!aE*#">z?C9IͲÁ.!6> !ڇ*&' ~2 ʀ: y.*M!4Q>!қ:=2á:2:Ҭ\>!ҿ:=2K:2K!:!:K\: \!p+q͈*÷:S:QHI:N<22: H@"2Í202O> c!6Í202O> ڍ*&O*& !sc*&P :w:·>!ұͯ :22:_!6=!6>'!E!4!p+q*0 !r+s+p+q*~$7*>*>H&>*#"*#"> 2:R͎:!6!6=2:ʙ!6:“H9Ž>!6-e!6ͻ2=2ʺ-é:>>"ͻ2:!!5ͻ2ͬ!\-:>>!p+q:,!6*DM9:<!6:z 2W!6D*&L :w:<2Ov*:>=20O> ڒ:0:AO>Ҥ::A }}Hͬ!wͻO`idͻV[2O>2:!X!6:!:=O!L NE!4 E E:/.*&L 6$L9k9.Xͯ *KM^020 :020:121'ͳ':²ͯ !G6!"!"7 *M^n/ :a/:H!6:ͯ !&6DM!  ::=H-\:N2O_og_{ozg^#V))) _{ozg^#V) d^#V|g}o n_{ozgO{ozgi`N#Fogo&og H ©=¨!j>A+!s!"@͓1!"<**"͓n "Dn"":!Q2҂:X!Wғä:ڤ*MEÓ:ұ@@:O2Mc;!6#6>!)*&P ~"::H:H:H:H"!6!4:_jYO jM*"S*" 3@bl*M1͓!""7 *M^͆ \͔!":͎H*#"ͧÝ/ :>͛9ͯ .*#":_!' !'6!36' :1/!aE*#">z?C9IͲÁ.!6> !ڇ*&' ~2 ʀ: y.*M!4Q>!қ:=2á:2:Ҭ\>!ҿ:=2K:2K!:!:K\: \!p+q͈*!  KEYBOARD CS WSOVLY1 OVR()*+,-./01234567WSOVLY1 OVR8WSMEM COM|9:;<=>?@WSIBM COM|ABCDEFGHWS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS $$$TTT PTERMCAP SYSQCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tWS SUBuCS SUBv$$$ SUBwpip b:=a:ws.com b:=a:wsovly1.ovr b:=a:wsmsgs.ovr b:=a:keyboard.com   WSOVLY1 OVR()*+,-./01234567WSOVLY1 OVR8WSMEM COM|9:;<=>?@WSIBM COM|ABCDEFGHWS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS SUB|WS SUBvTERMCAP SYSQCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tCOPY SUBuCOPY $$$$$$ SUBw!   ..L-------!--------------!----------!-----R WSOVLY1 OVR()*+,-./01234567WSOVLY1 OVR8WSMEM COM|9:;<=>?@WSIBM COM|ABCDEFGHWS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS SUB|WS SUBvTERMCAP SYSQCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tCOPY SUBuCOPY BAK}TEST $$$REME CSD COMP CSD !Qgwiwss.sZ.s,s!Qgwiwss.sZ.s,s8*REME SECTION account 2͝5Di`" 8Totalsum(>d)-sum(>d)0)0). j=6 ͩ%*t"@6N#l%)6-'65* t:CU sum(>d)0)Gl%6- :CS sum(>d)0)(ͳ:!U?' CDF-:!j~#T]r$6-'! 9HItem of expenditure 7D6l68REMEx6Date!e9)p)))go787:Shootin\9X Budget 1985/6ѯ71p?Z:!"""p7)14.5.8614.5.86ay 1986file found  TCE450}27>72,} :89ZSpanners found ! CS.OV2 file il Bg67.97only with CP/M 2.X  9jPetrolns only with CP/M 2.X  B7437.34:͏6:”8B7U%! 9Extra Budget 3.4.86#~#fo*#6+ C1002Ô8\%Ҕ8:ʔ8! *Spanners found ! CS.OV2 file il Bg67.97only with CP/M 2.X  9jPetrolns only with CP/M 2.X  B7437.34:͏6:”8B7U%! 9EL6- :CS sum(>d)0)(ͳ:!U?' CDF-:!j~#T]r$6-'! 9HItem of expenditure 7D6l68REMEx6Date!e9)p)))go787:Shootin\9X Budget 1985/6ѯ71p?Z:!"""p7)14.5.8614.5.86ay 1986file found  TCE450}27>72,} :89ZSpanners found ! CS.OV2 file il Bg67.97only with CP/M 2.X  9jPetrolns only with CP/M 2.X  B7437.34:͏6:”8B7U%! 9Ext"  "sZ"s sЄ5"sZ"s sЄ5#5*Computing Dept. Account2͝5Di`"5x=5!@6 ͩ%*t"@6N#l%)6-'65*=n&5ʹ$*n&6ͫ$*#n& 6ʹ$= S:12 P#123 Lev 12  12345 -#D6j=======================6-'65*l6Balance6C>:-:'' >:-:''#6 P. Ford (Head of Dept.)5O7*Totalse|:A76~ 6 6,687DSy@ sum( >x)0)Gl%6-DRx sum( >x)0)(ͳ:!U?'7=7==X8 % of Budgetdget668AuPSc>:/*100:' '& >:/*100:' ''<22#8HItem of expenditure 7D6l68REME9 Date actioned!(!9)**(9:CREDIT7q6:!4n6!6:PF ammhDEBsional/M 2.X =Z10.02.86U?' Cardbox (RML)3.4.86#~#fo*#6+,>01.03.86C"w227.7\?'--Clawback WS & CARDBOX CARDBOXoC150!!Y5~P>(P>6!#$?9--Transfer from Subsids Subsids#yC130w1|)d#?:Disks (MDS2) -- RML purchase!U$C100|g"+F+N}o|g"*#H@ -- Tekdatap@5.2.86By79.80#@ -- DBSA5.2.86B333.12#A--Clawback (SALES)CD 70%sum(>)))#B INMAC paper/ribbons (Lent)8B15.01.86C3p193.37#BINMAC paper/ribbons (SummerITSTEP 9566*Sev#|9z-ool6~ 6 6,B#239-!9)"%"$!l%p<(9-a6{6 w#ï66CA sum:-)-sum(>)))go787:Shootin#  :X Budget 1985/6erm71p?Z:!""" H:)15.01.8614.5.86ay 1986file found  TDA4100.727>72,} :8# :Expenses to 01.01.86 : 15.01.8615.01.86 D""(2222.28# @;DTI assistance scheme 1985 h;:11.02.851.65G BP50# ;DTI Assistance scheme 1986 C100# J!General running costs (2% Budget) J 15.01.8615.01.86 B2% #<<Y480Z disk drive unitive unitfile ilCqdP716.45nly with CP/M 2.X #<--Transfer from SSCS%Comp 4.02 CSCF460#`=jWordstar profes)C100#XC--Clawback SSCS (Lent)C11.02.86ribbons4B0BE45D('U.-;#C--Clawback SSCS (Summer)(Summer)--BE45#!TD Micro-Text WP0478:=3%Comp 4.02 CS!|D(15.01.86 :Il++"7"7"!DBg67.85Q"7R"7:c5#"D: WS-2000 Modemu>:I@|>|>~!8"C150N6 ! t6!q66.#$ERepro Costs (Xmas) at 40%$E10.02.8621.01.86$C 0201.63#%DFRepro Costs (Lent) at 40%%B800#&FRepro Costs (Summer) at 40%&B@400#'IRepro Alphatronic PC'C1310#($JChemistry/Repro RML exchangeo(C150#*GVideo hire (1985/6)*"   ORG 100H FCB EQU 5CH REBOOT: EQU 0 CTRL EQU 77 SHIFT EQU 82 KFLAG1 EQU 0E48AH KFLAG2 EQU 0E46AH KFLAG3 EQU 0E46FH KFLAG4 EQU 0E48BH REPDEL EQU 0E471H REP1 EQU 0E47EH LASTKY EQU 0E48FH OLDKEY EQU 0E498H BDOS: MACRO @BYTE,@WORD LD C,@BYTE LD DE,@WORD CALL 5 ENDM DELAY: MACRO EX (SP),HL EX (SP),HL ENDM START: LD HL,COMEND LD DE,0E5B1H LD BC,LEN1 LDIR LD HL,COMEND+LEN1 LD DE,0E682H LD BC,LEN2 LDIR LD HL,COMEND+LEN1+LEN2 LD DE,0E4DDH LD BC,LEN3 LDIR LD A,(FCB+1) CP " " JR Z,CHCUR LD HL,FSP1 LD DE,FSP1+1 LD BC,27 LD (HL)," " LDIR LD DE,FSP1 LD HL,EXTN1 CALL FNAME LD HL,EXTN2 CALL FNAME CHCUR: XOR A LD C,10 CALL WRITE LD A,6 LD C,11 CALL WRITE JP REBOOT EXTN1: DEFB ".","C","O","M",0DH+128 EXTN2: DEFB ".","G","E","N",0DH+128 WRITE: PUSH AF LD A,C OUT (50H),A POP AF DELAY OUT (51H),A DELAY RET FNAME: PUSH HL LD A," " LD (DE),A INC DE LD HL,FCB+1 FNAME3: LD A,(HL) CP " " JR Z, Z,NOCAPS CP 061H JR C,NOCAPS CP 07BH JR NC,NOCAPS AND 05FH NOCAPS: LD HL,LASTKY LD (HL),A LD A,D CP CTRL JR NZ,NOCTRL RES 6,(HL) ;PERFORM CTRL KEY MODIFICATIONS RES 5,(HL) NOCTRL: LD A,(OLDKEY) CP (HL) LD HL,REPDEL JR NZ,EXIT2 DEC (HL) JR NZ,EXIT4 LD (HL),1 LD HL,REP1 DEC (HL) JR Z,EXIT1 EXIT4: XOR A JR EXIT3 EXIT2: LD (HL),255 AND A JR NZ,EXIT4 EXIT1: LD A,35 LD (REP1),A LD A,080H JR EXIT3 XX1: EQU $ ORG 0E682H ;AVOID DELAY SUBROUTINE IN MEMORY NOKEY1: LD (LFUNCT),A ;NO (VALID) KEY PRESSED SUBROUTINE NOKEY: LD A,0 ;PRESERVE FLAGS LD (KFLAG4),A LD (OLDKEY),A RET EXIT3: LD (KFLAG1),A ;END PIECE OF KEY WORKOUT LD A,(LASTKY) LD (OLDKEY),A RET SHIFTC: CP SHIFT ;CHECK FOR CTRL/SHIFT KEY IN A REG RET Z CP CTRL RET SCAN: LD DE,0FFFFH ;PERFORM THE ACTUAL KEYBOARD SCAN LD C,020H LD L,E SCAN1: LD B,8 IN A,(C) SCAN3: INC L SRL A JR NC,SCAN2 INC D RET NZ LD D,E LD E,L SCAN2: DJNZ SCAN3 INC C LFNAME2 CP "." JR Z,FNAME2 LDI JP PE,FNAME3 FNAME2: POP HL LD BC,5 LDIR RET COMEND: EQU $ ORG 0E5B1H KEYST: PUSH HL PUSH DE PUSH BC LD A,(KFLAG1) CP 080H JR Z,EXIT CP 088H JR Z,EXIT CALL FKEYS JR C,KEY3 CALL SCAN JR NZ,ERRX LD A,D AND E INC A CALL Z,NOKEY1 KEY2: CALL NZ,WORKOT KEY3: LD A,(KFLAG1) CP 080H JR Z,EXIT ERRX: XOR A KEY1: POP BC POP DE POP HL RET EXIT: LD A,0FFH JR KEY1 WORKOT: XOR A LD (KFLAG1),A LD HL,TSHIFT LD A,D INC A JR NZ,YSHIFT LD A,E CALL SHIFTC JP Z,NOKEY LD HL,TNSHFT JR WORK1 YSHIFT: LD A,E CALL SHIFTC LD A,D JR NZ,WORK2 LD D,E LD E,A WORK2: LD A,D CALL SHIFTC JR NZ,NOKEY LD A,E CP CTRL ;CAPS LOCK JR NZ,WORK1 LD A,(KFLAG4) BIT 0,A JR NZ,EXIT4 SET 0,A LD (KFLAG4),A CALL 0E8BFH ;HANDLE CAPS LOCK JR EXIT4 WORK1: LD C,E LD B,0 ADD HL,BC LD A,(HL) CALL KICKOF CP 255 JR Z,NOKEY AND 127 LD HL,KFLAG3 ;PERFORM CAPS LOCK IF NEEDBE BIT 0,(HL) JRD A,C CP 02CH JR NZ,SCAN1 RET FKEYS: LD HL,(FPOINT) ;CHECK FOR FUNCTION KEY GOING, IF SO LD A,H ;RETURN WITH NEXT CHAR CODE FROM DEFINITION AND A RET Z INC HL LD A,(HL) AND 127 CP (HL) JR Z,FKEY1 LD H,0 FKEY1: LD (FPOINT),HL  LD (LASTKY),A SCF JR EXIT1 KICKOF: CP 240 ;KICK OFF A FUNCTION KEY RET C CP 0FFH RET Z SUB 239 LD B,A LD HL,LFUNCT CP (HL) LD A,0FFH RET Z LD (HL),B LD HL,FTAB-1 KICK1: INC HL BIT 7,(HL) JR Z,KICK1 DJNZ KICK1 LD (FPOINT),HL RET LFUNCT: DEFB 0 ;FUNCTION KEY DEFINITIONS FTAB: DEFB 0FFH DEFM "TEMP.GEN" ;SHIFT fn KEY 6 DEFB 0DH+128 DEFM "A:LOAD" ;SHIFT fn KEY 5 DEFB "B"+128 DEFM "A:BBC A:CPT" ;SHIFT fn KEY 4 DEFB 0DH+128 DEFM "TYP" ;SHIFT fn KEY 3 DEFB "E"+128 DEFM "A:STAT" ;SHIFT fn KEY 2 DEFB " "+128 DEFM "DIR" ;SHIFT fn KEY 1 DEFB 0DH+128 DEFM "A:WS" ;fn KEY 6 DEFB 0DH+128 DEFM "A:GEN8" ;fn KEY 5 DEFB "0"+128 DEFM "A:SEN" ;fn KEY 4 DEFB "D"+128 DEFM "#  A:PI" ;fn KEY 3 DEFB "P"+128 FSP1: DEFM " 12345678.COM" ;fn KEY 2 - DEFINED ON COMMAND LINE DEFB 0DH+128 FSP2: DEFM " 12345678.GEN" ;fn KEY 1 - DEFINED ON COMMAND LINE DEFB 0DH+128 FPOINT: DEFW 0 XX2: EQU $ ORG 0E4DDH ;NON SHIFTED KEY TABLE TNSHFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2B,#2D,#3D,#FF,#FF,#61,#62 DEFB #63,#64,#65,#66,#67,#68,#69,#6A,#6B,#6C,#6D,#6E,#6F,#70,#71,#72 DEFB #73,#74,#75,#76,#77,#78,#79,#7A,#FF,#FF,#FF,#FF,#FF DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39,#2D,#5E DEFB #40,#5B,#5D,#3A,#FF,#FF,#20,#3C,#2C,#2E,#2F,#3B,#98 DEFB #84,#88,#85,#88,#7F,#9,#1B,#FF DEFB #7F,#FF,#9,#0D,#DF,#0C,#3 DEFB #FF,#FF DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 DEFB #44,#45,#46,#47,#48,#49,#4A DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#57,#58,#59,#5A DEFB #FF,#FF,#FF,#FF,#FF,#3D,#21,#22,#23,#24 DEFB #25,#26,#27,#1*" COPYRIGHT(C) 1978, DIGITAL RESEARCH  á 4êü /L9ASMPRNHEX28,#29,#5F,#7E,#60 DEFB #7B,#7D,#2A,#FF,#FF,#20,#3E,#5C,#7C,#3F,#2B,#83,#86,#81,#92,#84 DEFB #FF,#7F,#1B,#FF,#96,#FF,#09,#8E,#DF,#C,#3 DEFB #FF,#FF DEFB 240,241,242,243,244,245 XX3: EQU $ LEN1: EQU XX1-KEYST LEN2: EQU XX2-NOKEY1 LEN3: EQU XX3-TNSHFT #66,#67,#68,#69,#6A,#6B,#6C,#6D,#6E,#6F,#70,#71,#72 DEFB #73,#74,#75,#76,#77,#78,#79,#7A,#FF,#FF,#FF,#FF,#FF DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39,#2D,#5E DEFB #40,#5B,#5D,#3A,#FF,#FF,#20,#3C,#2C,#2E,#2F,#3B,#98 DEFB #84,#88,#85,#88,#7F,#9,#1B,#FF DEFB #7F,#FF,#9,#0D,#DF,#0C,#3 DEFB #FF,#FF DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 DEFB #44,#45,#46,#47,#48,#49,#4A DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#57,#58,#59,#5A DEFB #FF,#FF,#FF,#FF,#FF,#3D,#21,#22,#23,#24 DEFB #25,#26,#27,##  !4w_#~ ʸ A:4~~# ¼ > \ ?ʻ w# !ͼ ? !ͼ @2 0 0:x0_<2! wI2 2> 2 >2ɯ22 !~@_6^4#: w~$w: 0 q: A: A͋q: a{_2  2 - !ɯ2I:  ;*:  ͭͷ ͭ͋>9q>9: '!2 >9 7:! 6 >2>2: 2 Qͭ:Ğ! :lj<͖<j<|<: OʊQ>ÖH >2 2 û: B­>ôD> ¸!52 !"!N#~#A07O! ~*!) " :  '<ͭ'<>V$>O$:Ğà\ÞØ`rÍÖ![w#w#b!"!F#v2[G*##~w*##~<*}q!~ڬ6![^![^#fk"͎͘!G#*####*^#Vû!^*"*!)ͼ !ͼ :5͡ :6:6͡ :7͡ :\ ʻ 24!dͮ 25ͮ 27ͮ 26!8 ( ʃ !Y 1  :7ʞ !z 8  !"2D2X2#! 8 !ͼ z{* ! !"!8 w#  +6# *#"~!ͼ G:6QxJQS*!w#"! 1 !"!Y~~# …¡z!ͼ wʹ* ! w#" ! 8 !" ! zz_O4:  :6y:! G~#x=2> > ! >x6 #='G! ~ p( O*}O>4?:7w:#ĸ*"!͸* }w>ͪg( ʆ1 Y :7ʗ8 z !<ͼ CP/M ASSEMBLER - VER 2.0 NO SOURCE FILE PRESENT NO DIRECTORY SPACE SOURCE FILE NAME ERROR SOURCE FILE READ ERROR OUTPUT FILE WRITE ERROR CANNOT CLOSE FILES END OF ASSEMBLY G:7xʘ!#~ʄl͸Ä**!O {zʊ͸*"!!#^4!$wͯͯWƐ'@'ê>:ͪ!#^Ww*!{͚|͚}͚͚{!$~#͚͚> ͪ> ͪ{zA"*![N![ N#Fr+sq#p/>G=#w#w3#w#w!JSYMBOL TABLE OVERFLOW G*##~w*##~͎*_###s#r^#V`à 4 Wm ()*+,-/ABCDEHLMDBDIDSDWEIIFINORSPACIADCADDADIANAANDANICMACMCCMPCPIDAADADDCRDCXENDEQUHLTINRINXJMPLDALXIMODMOVMVINOPNOTORAORGORIOUTPOPPSWRALRARRETRLCRRCRSTSBBSBISETSHLSHRSTASTCSUBSUIXORXRAXRICALLENDMLDAXLHLDPCHLPUSHSHLDSPHLSTAXXCHGXTHLENDIFMACROTITLE  PF FP! ( 2/?'  v:P@< !  PP27 ( *"  NZZ NCC POPEP M x_BH!œ#¶ ¦{KÈCÈ<:JCR:  !6 s!#  ɯ<:O=_Z!F!V#fjQ̓E!^#Vo&)~#FxGyѯ<àn8!~ڢͅ6~44O! s#r!~ ڿ6ͅ^4!mw!wp!~ͅ!55N! N#fio&)^#fk$  z'{ͅ>ɯo>g"k!m6ů{_zW5>)D*kOxGd !m?FDM!xGyOڂÃ)sn55)=â|g}o=î--#zg{ozg{ozg{oÓ:: ;,!ɯ22=2l!"]!~H5_!m~0:ą:  *":  :‰:̅ԅ!^#=ʅVq”*qͦ1& O:lµ̅>2ly:_!w~!s!m~ùy !~=w_!m~ ͅͰ>2lyPLnR>UX:l̅2l͓*>E2C!" """ :ʼ:*1 |R|ͦ0FIL: R  R* } *" :¿::¿üX!C^#fk[@ :Œ:=ʌG!ʆF#H vÛc*| EH ͺ,^1 ͦ *""1 EH DH ͺ,1 ͦ :  1:  " > 2  0100 ORG 100H 005C = FCB EQU 5CH 0000 = REBOOT: EQU 0 004D = CTRL EQU 77 0052 = SHIFT EQU 82 E48A = KFLAG1 EQU 0E48AH E46A = KFLAG2 EQU 0E46AH E46F = KFLAG3 EQU 0E46FH E48B = KFLAG4 EQU 0E48BH E471 = REPDEL EQU 0E471H E47E = REP1 EQU 0E47EH E48F = LASTKY EQU 0E48FH E498 = OLDKEY EQU 0E498H N  BDOS: MACRO @BYTE,@WORD S LD C,@BYTE L LD DE,@WORD 0100 CD0500 CALL 5 N ENDM N DELAY: MACRO S EX (SP),HL S EX (SP),HL N  ENDM L START: LD HL,COMEND L LD DE,0E5B1H L LD BC,LEN1 P LDIR L LD HL,COMEND+LEN1 L LD DE,0E682H L LD BC,LEN2 P :|: |Ë  |*" ͩ !6="1 :  1}1:n:>BʋSSͦSSxS 1:  1"" ͦ 1 |R >O U!" 1 1!|_!^#fk $8AP`ixH ñññ81Ľ y0îH ñGîG  ñH ñ(Ľ yîH ñîîĽ y0îîH ñG 1: :,; c*| } 8OĽ y0G G t :):,.>C :|: Jü;r :R: ʼʋ!ʼR!ʼʋ>SR{ozg!~4ʧͦ !6 ! **̈́**̈́\iͩ !w#H USE FACTOR !* "z{*"* "I !" :1 R O*UR X* G:xl :  *̩ : l x͖ *#"EH DH 0:~ ! ^4! w͆ Æ *! 6z͖ {͖ 4>R>V>D >P >L >N LDIR L LD HL,COMEND+LEN1+LEN2 L LD DE,0E4DDH L LD BC,LEN3 P LDIR S LD A,(FCB+1) E0103 F40000 CP " " L JR Z,CHCUR L LD HL,FSP1 L LD DE,FSP1+1 L LD BC,27 P LD (HL)," " P LDIR L LD DE,FSP1 L LD HL,EXTN1 0106 CD1C01 CALL FNAME L LD HL,EXTN2 0109 CD1C01 CALL FNAME S CHCUR: XOR A L LD C,10 P010C CD1501 CALL WRITE S LD A,6 L LD C,11 P010F CD1501 CALL WRITE 0112 F20000 JP REBOOT L  EXTN1: DEFB ".","C","O","M",0DH+128 L EXTN2: DEFB ".","G","E","N",0DH+128 U0115 C5 WRITE: PUSH AF S LD A,C P0116 D350 OUT (50H),A U0118 C1 POP AF P DELAY S0119 D351$   ORG 100H FCB EQU 5CH REBOOT: EQU 0 CTRL EQU 77 SHIFT EQU 82 KFLAG1 EQU 0E48AH KFLAG2 EQU 0E46AH KFLAG3 EQU 0E46FH KFLAG4 EQU 0E48BH REPDEL EQU 0E471H REP1 EQU 0E47EH LASTKY EQU 0E48FH OLDKEY EQU 0E498H BDOS: MACRO @BYTE,@WORD LD C,@BYTE LD DE,@WORD CALL 5 ENDM DELAY: MACRO EX (SP),HL EX (SP),HL ENDM START: LD HL,COMEND LD DE,0E5B1H LD BC,LEN1 LDIR LD HL,COMEND+LEN1 LD DE,0E682H LD BC,LEN2 LDIR LD HL,COMEND+LEN1+LEN2 LD DE,0E4DDH LD BC,LEN3 LDIR LD A,(FCB+1) CP " " JR Z,CHCUR LD HL,FSP1 LD DE,FSP1+1 LD BC,27 LD (HL)," " LDIR LD DE,FSP1 LD HL,EXTN1 CALL FNAME LD HL,EXTN2 CALL FNAME CHCUR: XOR A LD C,10 CALL WRITE LD A,6 LD C,11 CALL WRITE JP REBOOT EXTN1: DEFB ".","C","O","M",0DH+128 EXTN2: DEFB ".","G","E","N",0DH+128 WRITE: PUSH AF LD A,C OUT (50H),A POP AF DELAY OUT (51H),A DELAY RET FNAME: PUSH HL LD A," " LD (DE),A INC DE LD HL,FCB+1 FNAME3: LD A,(HL) CP " " JR Z, Z,NOCAPS CP 061H JR C,NOCAPS CP 07BH JR NC,NOCAPS AND 05FH NOCAPS: LD HL,LASTKY LD (HL),A LD A,D CP CTRL JR NZ,NOCTRL RES 6,(HL) ;PERFORM CTRL KEY MODIFICATIONS RES 5,(HL) NOCTRL: LD A,(OLDKEY) CP (HL) LD HL,REPDEL JR NZ,EXIT2 DEC (HL) JR NZ,EXIT4 LD (HL),1 LD HL,REP1 DEC (HL) JR Z,EXIT1 EXIT4: XOR A JR EXIT3 EXIT2: LD (HL),255 AND A JR NZ,EXIT4 EXIT1: LD A,35 LD (REP1),A LD A,080H JR EXIT3 XX1: EQU $ ORG 0E682H ;AVOID DELAY SUBROUTINE IN MEMORY NOKEY1: LD (LFUNCT),A ;NO (VALID) KEY PRESSED SUBROUTINE NOKEY: LD A,0 ;PRESERVE FLAGS LD (KFLAG4),A LD (OLDKEY),A RET EXIT3: LD (KFLAG1),A ;END PIECE OF KEY WORKOUT LD A,(LASTKY) LD (OLDKEY),A RET SHIFTC: CP SHIFT ;CHECK FOR CTRL/SHIFT KEY IN A REG RET Z CP CTRL RET SCAN: LD DE,0FFFFH ;PERFORM THE ACTUAL KEYBOARD SCAN LD C,020H LD L,E SCAN1: LD B,8 IN A,(C) SCAN3: INC L SRL A JR NC,SCAN2 INC D RET NZ LD D,E LD E,L SCAN2: DJNZ SCAN3 INC C LFNAME2 CP "." JR Z,FNAME2 LDI JP PE,FNAME3 FNAME2: POP HL LD BC,5 LDIR RET COMEND: EQU $ ORG 0E5B1H KEYST: PUSH HL PUSH DE PUSH BC LD A,(KFLAG1) CP 080H JR Z,EXIT CP 088H JR Z,EXIT CALL FKEYS JR C,KEY3 CALL SCAN JR NZ,ERRX LD A,D AND E INC A CALL Z,NOKEY1 KEY2: CALL NZ,WORKOT KEY3: LD A,(KFLAG1) CP 080H JR Z,EXIT ERRX: XOR A KEY1: POP BC POP DE POP HL RET EXIT: LD A,0FFH JR KEY1 WORKOT: XOR A LD (KFLAG1),A LD HL,TSHIFT LD A,D INC A JR NZ,YSHIFT LD A,E CALL SHIFTC JP Z,NOKEY LD HL,TNSHFT JR WORK1 YSHIFT: LD A,E CALL SHIFTC LD A,D JR NZ,WORK2 LD D,E LD E,A WORK2: LD A,D CALL SHIFTC JR NZ,NOKEY LD A,E CP CTRL ;CAPS LOCK JR NZ,WORK1 LD A,(KFLAG4) BIT 0,A JR NZ,EXIT4 SET 0,A LD (KFLAG4),A CALL 0E8BFH ;HANDLE CAPS LOCK JR EXIT4 WORK1: LD C,E LD B,0 ADD HL,BC LD A,(HL) CALL KICKOF CP 255 JR Z,NOKEY AND 127 LD HL,KFLAG3 ;PERFORM CAPS LOCK IF NEEDBE BIT 0,(HL) JRD A,C CP 02CH JR NZ,SCAN1 RET FKEYS: LD HL,(FPOINT) ;CHECK FOR FUNCTION KEY GOING, IF SO LD A,H ;RETURN WITH NEXT CHAR CODE FROM DEFINITION AND A RET Z INC HL LD A,(HL) AND 127 CP (HL) JR Z,FKEY1 LD H,0 FKEY1: LD (FPOINT),HL  LD (LASTKY),A SCF JR EXIT1 KICKOF: CP 240 ;KICK OFF A FUNCTION KEY RET C CP 0FFH RET Z SUB 239 LD B,A LD HL,LFUNCT CP (HL) LD A,0FFH RET Z LD (HL),B LD HL,FTAB-1 KICK1: INC HL BIT 7,(HL) JR Z,KICK1 DJNZ KICK1 LD (FPOINT),HL RET LFUNCT: DEFB 0 ;FUNCTION KEY DEFINITIONS FTAB: DEFB 0FFH DEFM "TEMP.GEN" ;SHIFT fn KEY 6 DEFB 0DH+128 DEFM "A:LOAD" ;SHIFT fn KEY 5 DEFB "B"+128 DEFM "A:BBC A:CPT" ;SHIFT fn KEY 4 DEFB 0DH+128 DEFM "TYP" ;SHIFT fn KEY 3 DEFB "E"+128 DEFM "A:STAT" ;SHIFT fn KEY 2 DEFB " "+128 DEFM "DIR" ;SHIFT fn KEY 1 DEFB 0DH+128 DEFM "A:WS" ;fn KEY 6 DEFB 0DH+128 DEFM "A:GEN8" ;fn KEY 5 DEFB "0"+128 DEFM "A:SEN" ;fn KEY 4 DEFB "D"+128 DEFM "%  A:PI" ;fn KEY 3 DEFB "P"+128 FSP1: DEFM " 12345678.COM" ;fn KEY 2 - DEFINED ON COMMAND LINE DEFB 0DH+128 FSP2: ;fn KEY 1 - DEFINED ON COMMAND LINE DEFB 02H+128 FPOINT: DEFW 0 XX2: EQU $ ORG 0E4DDH ;NON SHIFTED KEY TABLE TNSHFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2B,#2D,#3D,#FF,#FF,#61,#62 DEFB #63,#64,#65,#66,#67,#68,#69,#6A,#6B,#6C,#6D,#6E,#6F,#70,#71,#72 DEFB #73,#74,#75,#76,#77,#78,#79,#7A,#FF,#FF,#FF,#FF,#FF DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39,#2D,#5E DEFB #40,#5B,#5D,#3A,#FF,#FF,#20,#3C,#2C,#2E,#2F,#3B,#98 DEFB #84,#88,#85,#88,#7F,#9,#1B,#FF DEFB #7F,#FF,#9,#0D,#DF,#0C,#3 DEFB #FF,#FF DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 DEFB #44,#45,#46,#47,#48,#49,#4A DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#57,#58,#59,#5A DEFB #FF,#FF,#FF,#FF,#FF,#3D,#21,#22,#23,#24 DEFB #25,#26,#27,#28,#29,#5F,#7E,#60 OUT (51H),A DELAY 011B C9 RET V011C 76 FNAME: PUSH HL S LD A," " L LD (DE),A L INC DE L LD HL,FCB+1 L FNAME3: LD A,(HL) E011D F40000 CP " " L JR Z,FNAME2 E0120 F40000 CP "." L JR Z,FNAME2 LDI U0123 F20000 JP PE,FNAME3 V0126 76 FNAME2: POP HL L LD BC,5 LDIR 0127 C9 RET 0128 = COMEND: EQU $ E5B1 ORG 0E5B1H VE5B1 76 KEYST: PUSH HL VE5B2 76 PUSH DE VE5B3 76 PUSH BC S LD A,(KFLAG1) PE5B4 F48000 CP 080H L JR Z,EXIT E5B7 F48800 CP 088H L JR Z,EXIT UE5BA CD0000 CALL FKEYS S JR C,KEY3 UE5BD CD0000 CALL SCAN L JR NZ,ERRX S LD A,D S A DEFB #7B,#7D,#2A,#FF,#FF,#20,#3E,#5C,#7C,#3F,#2B,#83,#86,#81,#92,#84 DEFB #FF,#7F,#1B,#FF,#96,#FF,#09,#8E,#DF,#C,#3 DEFB #FF,#FF DEFB 240,241,242,243,244,245 XX3: EQU $ LEN1: EQU XX1-KEYST LEN2: EQU XX2-NOKEY1 LEN3: EQU XX3-TNSHFT T: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2B,#2D,#3D,#FF,#FF,#61,#62 DEFB #63,#64,#65,#66,#67,#68,#69,#6A,#6B,#6C,#6D,#6E,#6F,#70,#71,#72 DEFB #73,#74,#75,#76,#77,#78,#79,#7A,#FF,#FF,#FF,#FF,#FF DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39,#2D,#5E DEFB #40,#5B,#5D,#3A,#FF,#FF,#20,#3C,#2C,#2E,#2F,#3B,#98 DEFB #84,#88,#85,#88,#7F,#9,#1B,#FF DEFB #7F,#FF,#9,#0D,#DF,#0C,#3 DEFB #FF,#FF DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 DEFB #44,#45,#46,#47,#48,#49,#4A DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#57,#58,#59,#5A DEFB #FF,#FF,#FF,#FF,#FF,#3D,#21,#22,#23,#24 DEFB #25,#26,#27,#28,#29,#5F,#7E,#60ND E L INC A PE5C0 CDA4E6 CALL Z,NOKEY1 SE5C3 CD92E6 KEY2: CALL NZ,WORKOT L KEY3: LD A,(KFLAG1) PE5C6 F48000 CP 080H L JR Z,EXIT S ERRX: XOR A LE5C9 C1 KEY1: POP BC VE5CA 76 POP DE VE5CB 76 POP HL E5CC C9 RET L EXIT: LD A,0FFH L JR KEY1 S WORKOT: XOR A L LD (KFLAG1),A L LD HL,TSHIFT S LD A,D L INC A L JR NZ,YSHIFT S LD A,E PE5CD CD84E6 CALL SHIFTC SE5D0 F2A4E6 JP Z,NOKEY L LD HL,TNSHFT L JR WORK1 L YSHIFT: LD A,E PE5D3 CD84E6 CALL SHIFTC S LD A,D L JR NZ,WORK2 S LD D,E L LD E,A L WORK2: LD A,D PE5D6 CD84E6 CALL SHIFTC L JR NZ,NOKEY S LD A,E PE5D9 F44D00 CP CTRL %   ;CAPS LOCK L JR NZ,WORK1 S LD A,(KFLAG4) L BIT 0,A L JR NZ,EXIT4 S SET 0,A P LD (KFLAG4),A E5DC CDBFE8 CALL 0E8BFH ;HANDLE CAPS LOCK L JR EXIT4 L WORK1: LD C,E L LD B,0 VE5DF 56 ADD HL,BC S LD A,(HL) PE5E0 CD97E6 CALL KICKOF E5E3 F4FF00 CP 255 L JR Z,NOKEY S AND 127 L LD HL,KFLAG3 ;PERFORM CAPS LOCK IF NEEDBE P BIT 0,(HL) L JR Z,NOCAPS E5E6 F46100 CP 061H S JR C,NOCAPS E5E9 F47B00 CP 07BH L JR NC,NOCAPS S AND 05FH L NOCAPS: LD HL,LASTKY P LD (HL),A S LD A,D PE5EC F44D00 CP CTRL L JR NZ,NOCTRL S RES 6,(HL) ;PERFORM CTRL KEY MODIFICATIONS S RES 5,(HL) L NOCTRL: LD A,(OLDKEY) E683 C9 RET E684 F45200 SHIFTC: CP SHIFT ;CHECK FOR CTRL/SHIFT KEY IN A REG SE687 C9 RET Z E688 F44D00 CP CTRL E68B C9 RET L SCAN: LD DE,0FFFFH ;PERFORM THE ACTUAL KEYBOARD SCAN S LD C,020H L LD L,E L SCAN1: LD B,8 PE68C DB07 IN A,(C) L SCAN3: INC L L SRL A L JR NC,SCAN2 S INC D SE68E C9 RET NZ S LD D,E L LD E,L L SCAN2: DJNZ SCAN3 S INC C L LD A,C PE68F F42C00 CP 02CH L JR NZ,SCAN1 E692 C9 RET L FKEYS: LD HL,(FPOINT) ;CHECK FOR FUNCTION KEY GOING, IF SO S LD A,H ;RETURN WITH NEXT CHAR CODE FROM DEFINITION S AND A PE693 C9 RET Z L INC HL S LD A,(HL) S AND 127 PE PE5EF F4A4E6 CP (HL) L LD HL,REPDEL L JR NZ,EXIT2 S DEC (HL) L JR NZ,EXIT4 P LD (HL),1 L LD HL,REP1 S DEC (HL) L JR Z,EXIT1 S EXIT4: XOR A L JR EXIT3 L EXIT2: LD (HL),255 S AND A L JR NZ,EXIT4 L EXIT1: LD A,35 L LD (REP1),A S LD A,080H L  JR EXIT3 E5F2 = XX1: EQU $ E682 ORG 0E682H ;AVOID DELAY SUBROUTINE IN MEMORY L NOKEY1: LD (LFUNCT),A ;NO (VALID) KEY PRESSED SUBROUTINE L NOKEY: LD A,0 ;PRESERVE FLAGS L LD (KFLAG4),A P LD (OLDKEY),A E682 C9 RET L EXIT3: LD (KFLAG1),A ;END PIECE OF KEY WORKOUT S LD A,(LASTKY) L LD (OLDKEY),A694 F4A4E6 CP (HL) L JR Z,FKEY1 S LD H,0 L FKEY1: LD (FPOINT),HL P LD (LASTKY),A SCF L JR EXIT1 E697 F4F000 KICKOF: CP 240 ;KICK OFF A FUNCTION KEY SE69A C9 RET C E69B F4FF00 CP 0FFH SE69E C9 RET Z VE69F 57 SUB 239 S LD B,A L LD HL,LFUNCT E6A0 F4A4E6 CP (HL) S LD A,0FFH PE6A3 C9 RET Z S  LD (HL),B L LD HL,FTAB-1 L KICK1: INC HL S BIT 7,(HL) L JR Z,KICK1 L DJNZ KICK1 S LD (FPOINT),HL E6A4 C9 RET L  LFUNCT: DEFB 0 ;FUNCTION KEY DEFINITIONS L FTAB: DEFB 0FFH S DEFM "TEMP.GEN" ;SHIFT fn KEY 6 P DEFB 0DH+128 S DEFM "A:LOAD" ;SHIF&  T fn KEY 5 P DEFB "B"+128 S DEFM "A:BBC A:CPT" ;SHIFT fn KEY 4 P DEFB 0DH+128 S DEFM "TYP" ;SHIFT fn KEY 3 P DEFB "E"+128 S DEFM "A:STAT" ;SHIFT fn KEY 2 P DEFB " "+128 S DEFM "DIR" ;SHIFT fn KEY 1 P DEFB 0DH+128 S DEFM "A:WS" ;fn KEY 6 P DEFB 0DH+128 S DEFM "A:GEN8" ;fn KEY 5 P  DEFB "0"+128 S DEFM "A:SEN" ;fn KEY 4 P DEFB "D"+128 S DEFM "A:PI" ;fn KEY 3 P DEFB "P"+128 L FSP1: DEFM " 12345678.COM" ;fn KEY 2 - DEFINED ON COMMAND LINE P  DEFB 0DH+128 FSP2: ;fn KEY 1 - DEFINED ON COMMAND LINE P DEFB 02H+128 L FPOINT: DEFW 0 E6A5 = XX2: EQU $ E4DD ORG 0E4DD57,#58,#59,#5A S DEFB #FF,#FF,#FF,#FF,#FF,#3D,#21,#22,#23,#24 S DEFB #25,#26,#27,#28,#29,#5F,#7E,#60 S DEFB #7B,#7D,#2A,#FF,#FF,#20,#3E,#5C,#7C,#3F,#2B,#83,#86,#81,#92,#84 S DEFB #FF,#7F,#1B,#FF,#96,#FF,#09,#8E,#DF,#C,#3 S DEFB #FF,#FF S DEFB 240,241,242,243,244,245 E4DD = XX3: EQU $ 0041 = LEN1: EQU XX1-KEYST U0000 = LEN2: EQU XX2-NOKEY1 U0000 =  LEN3: EQU XX3-TNSHFT  #FF,#FF S DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE  L TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 S DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 S DEFB #44,#45,#46,#47,#48,#49,#4A S DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#H ;NON SHIFTED KEY TABLE L TNSHFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 S DEFB #2E,#FF,#2B,#2D,#3D,#FF,#FF,#61,#62 S DEFB #63,#64,#65,#66,#67,#68,#69,#6A,#6B,#6C,#6D,#6E,#6F,#70,#71,#72 S DEFB #73,#74,#75,#76,#77,#78,#79,#7A,#FF,#FF,#FF,#FF,#FF S DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39,#2D,#5E S DEFB #40,#5B,#5D,#3A,#FF,#FF,#20,#3C,#2C,#2E,#2F,#3B,#98 S DEFB #84,#88,#85,#88,#7F,#9,#1B,#FF S DEFB #7F,#FF,#9,#0D,#DF,#0C,#3 S DEFB #FF,#FF S DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE  L TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 S DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 S DEFB #44,#45,#46,#47,#48,#49,#4A S DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#&  :10010000CD0500F40000CD1C01CD1C01CD1501CDA5 :100110001501F20000C5D350C1D351C976F40000D7 :08012000F40000F2000076C9B2 :10E5B100767676F48000F48800CD0000CD0000CDA1 :10E5C100A4E6CD92E6F48000C17676C9CD84E6F268 :10E5D100A4E6CD84E6CD84E6F44D00CDBFE856CD6A :10E5E10097E6F4FF00F46100F47B00F44D00F4A41D :01E5F100E643 :10E68200C9C9F45200C9F44D00C9DB07C9F42C0012 :10E69200C9C9F4A4E6F4F000C9F4FF00C957F4A410 :03E6A200E6C9C9FD :0000000000  LEN3: EQU XX3-TNSHFT  #FF,#FF S DEFB 246,247,248,249,250,251 ;SHIFTED KEY TABLE  L TSHIFT: DEFB #30,#31,#32,#33,#34,#35,#36,#37,#38,#39 S DEFB #2E,#FF,#2A,#2F,#3D,#FF,#FF,#41,#42,#43 S DEFB #44,#45,#46,#47,#48,#49,#4A S DEFB #4B,#4C,#4D,#4E,#4F,#50,#51,#52,#53,#54,#55,#56,#Є55ZsШTs0sЄ55ZsШTs0s5* Sales Ledger5: 2͝5Di`"5* Next Entry*n&6ͫ$*#n& 6ʹ$6B&26P#123 Lev 12 12345 - @6Total C'P sum(>'))X9=/=-t"@6N#l%)6-'6͙$*8Y=`Y= Y= =6*Customerto*#n& 6ʹ$5-' S:1 6Date"UC8 |}27>72,}7 Description<7hNumberTEP 95O7*7  d7 Unit cost6~ 6 6,6;6| 8Total*7ڲ8! :%Ҫ89Ô8DM7H-ering Proc name - 12345678 : 7-8-' *-'a:! CS.OV2 NOT found 8-08H-ering Proc name - 12345678 : X8H-ering Proc name - 12345678 : 8-*7ڲ8! :%Ҫ89Ô8DM8Library file NOT found ! CS.OV2 8h18.01.86med ! .OVR file ill-f8 MD2 disks$9TA 2!]͓%'<22\!"9: L9A038 ;#0:*:" "%Ҫ89Ô8DM9Classics?%"!" 2Ô8\ 9918.01.8618.01.86>T2p<%!9)!9 MD2 disks:TA 2!]͓%'<22\!"9: @:tA038!9)! No Machine code f 4A`>0:*:" "%Ҫ89Ô8DM:j Hackett Rd address too large ! No :i18.01.8618.01.86 *͓%6,#"6 : MD2 disks ;TA 2!]͓%'<22\!"9: 4;A03ͧ&"!Gl% 4A`>0:*:" "%Ҫ89Ô8DM ;Library('ͳ:!j~#T]r$6 ;20.01.8620.01.86\?'0: * :" "%Ҫ89Ô8DM |< Johnson DMg9!9!!9" <22.01.86!$$"}2:D*!9 < MD2 disks <TB10!]͓%'<22\!"9: =4A03#Y<:w#:w#q#p#~ 4B0 >0: * :" "%Ҫ89Ô8DM p=( Hackett R6 = 24.01.8686.01.686 = MD2 disks =TAP5!]͓%'<22\!"9: >A03=3/06/0478:= 4B >0: * :" "%Ҫ89Ô8DM d>ZHarvey JBOXoð= >27.01.86C150! >FD2 disk >TA1!]͓%'<22\!"9: ?A`6C150 4A` >0: * :" "%Ҫ89Ô8DM X?:Classicspurchase!Uͬ>5.2.86 ?28.01.86> ? MD2 disks ?TA`6!]͓%'<22CS$ARD CS KEYBOARD$ WS COM|IKLMNOPwKEYBOARDCOMJPIP COM:xyz{CS SUB|WS SUBvTERMCAP SYSQCS OV1xRSTUVWXYCS OV2Z[\]^_`abCS COM cCS OVR6defghijklmnoCSMASK MSK4pqrsSTART COM tCOPY SUBuCOPY BAK}TEST ~REME CSD COMP CSD KEYDEF BAK+ASM COM@KEYDEF PRNUKEYDEF ASM*KEYDEF HEXSALES CSD<$$$ SUB\!"9: ?$AP1.65ataP?5.2 4A >0: * :" "%Ҫ89Ô8DML@Classics.-;By t@*28.01.86D@?? @Wordstar@TA1!]͓%'<22\!"9: @B030B3 4B0>0:*:" "%Ҫ89Ô8DM@AjLibraryES)@ hA01.02.866CDAWordstarATA1!]͓%'<22\!"9: AB030 4B0>0:*:" "%Ҫ89Ô8DM4BCCF198AlA \B01.02.86per ( 1 box ) 1 box )BWordstarBTA1!]͓%'<22\!"9: BDB030paper/ribbons 4B0>0:*:" "%Ҫ89Ô8DM(CCCF PC01.02.86100xC MD2 disks'  CTA@4!]͓%'<22\!"9: CAP1.6545D('U.- 4Af>0:*:" "%Ҫ89Ô8DMDCCF DD04.02.8603.02.86lDCardboxDTA1!]͓%'<22\!"9: D$B 20 4B >0:*:" "%Ҫ89Ô8DME:CCFD,DTD: WS-2000 Modemu>:I@| 8E04.02.86D`ECardbox ManualETA1!]͓%'<22\!"9: E4A@4tEDDRepro Costs (Xm 4A@>0:*:" "%Ҫ89Ô8DMFLibraryyLE ,F06.02.86C 200TFCardbox|FTA1!]͓%'<22\!"9: FB 20E 4B >0:*:" "%Ҫ89Ô8DMFLibraryFFDFRepro Costs (Su  Gz06.02.86lFHGCardboxK MD2 Disks@KTAP5!]͓%'<22\!"9: hKAP1.65 4AP>0:*:" "%Ҫ89Ô8DM4LX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DM(MX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DMNX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DMOX 2!]͓%'<22\!"9: 7  >0:*:" "%Ҫ89Ô8DMPX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DMPX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DM QX 2!]͓%'<22\!"9: 7  >0: * :" "%Ҫ89Ô8DM!RX 2!]͓%'<22\!"9: !7 !>0:!*!:" "%Ҫ89Ô8DM"SX 2!]͓%'<22\!"9: "7 ">0:"*":" "%Ҫ89Ô8DM#TX 2!]͓%'<22\! ManuallHpGTA1!]͓%'<22\!"9: GA@4FdGFFVideo h 4A@>0:*:" "%Ҫ89Ô8DMGLibrary0:*:" "%Ҫ89Ô8DMHClassics I(11.02.866 0ICardbox XITA1!]͓%'<22\!"9: IB 20.o  4B >0:*:" "%Ҫ89Ô8DMIClassics  I11.02.86 $JCardbox ManualLJTA1!]͓%'<22\!"9: tJA@40 4A@>0:*:" "%Ҫ89Ô8DMJ Chemistry J12.02.86"9: #7 #>0:#*#:" "%Ҫ89Ô8DM$UX 2!]͓%'<22\!"9: $7 $>0:$*$:" "%Ҫ89Ô8DM%VX 2!]͓%'<22\!"9: %7 %>0:%*%:" "%Ҫ89Ô8DM&WX 2!]͓%'<22\!"9: &7 &>0:&*&:" "%Ҫ89Ô8DM'XX 2!]͓%'<22\!"9: '7 '>0:'*':" "%Ҫ89Ô8DM 2!]͓%'<22\!"9: %7 %>0:%*%:" "%Ҫ89Ô8DM&WX 2!]͓%ِ >0:*:" "%Ҫ89Ô8DMPX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DMPX 2!]͓%'<22\!"9: 7 >0:*:" "%Ҫ89Ô8DM QX 2!]͓%'<22\!"9: 7  >0: * :" "%Ҫ89Ô8DM!RX 2!]͓%'<22\!"9: !7 !>0:!*!:" "%Ҫ89Ô8DM"SX 2!]͓%'<22\!"9: "7 ">0:"*":" "%Ҫ89Ô8DM#TX 2!]͓%'<22\!