ipB+xx}wx uX-+- 9X %@/G@D#`H >8e@3P@%z@0#GG@@G@*(4x &(I@$65dcL`}eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeHAD,P o vNvd+;#Kh >P}JdzQ{@mOU){@cJ?~pn4A6A[H LC$iL<K6 <`INXwCn>"]K6 <`C$aP1J&@& \+<e1\+ 3ve +h`F:+3+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + ?+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 6 |6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 x6 |6 |6 |6 |6 |+ 7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x7`x+ + + + + K|L|0G-m<,1>@ cKueeeeee+'C. 4 P9T ` @P9$ `<l @:4  P0 0P0x0 00x @Vxxxxxxxxxxxxxxxx@#4$0,Ag :K'K|mI@""'ox|8Kt@BEB1 ,sQ,}:,sQ,}:-d3JT-d z::@ eKxl @V !ro;xG@%?@0 }pHnumu qqrp@c?p@ c @"q@"q/np@bq@bWp@"q@:t @6qqerwr0Dr,Gx"}Jdz~-ms@cJ~pnr8XY L@rL0G}~rr|jr8u8u(uXuHuHuHuHup"@ c2 2-3-ErkC2^2|-$2&&)* )**("& !)' &"")"#'))*'(+&$'") '*$$)!$#)'"p@$q*@0k@${a@$um@${a@3a@3f@%@p@%U@%3@$s @%;Y@$q5@ @$u@%@ @0s@ h@ !@%3@V@3P@ @4!@4@ c@ ~@ @ c:CC80e7K6 <` Y. #:Ny@@%+\hO@X6@+`hd6@d fl l`mdFO@W 2 R+6$ INXi 9"E*`R,;g@_B-`ffgg@h @G?+  @ zeee@$=@$|L@#h<[0 =~hH''''''''.@$/c@$/m''@#k>'''''''''''''@#uJ'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''ffffffffffffffffffffffffff''''^^@#F{^^^^^fff^^f^^^^^^^^^^^^^]^^^^~f^^^^@$Y^^^^^^^?^^@@@@@@@@@@^@$%@#pR@#ea@#pV^@#i<.@#vi=/Y f f f@#mn@$NPM@#i-HPE@#j @#xG@%@%@$a@#ve@#y@@#l(@0u@#n6@#tF^@#uJ@$ X@#u ^^ffffffffffffffffffffffffff^^^^,^^^^^^^^^'@$0^^@#k3^^^^^^^^^^^^^@$E ^^^^^^^@$7@$ a@$^@$ `@$a@$^^^?@$@#/K@@@@@@@@@@^@$%@#p@#~h@#p;@#/K@$e@$@$T@$?@$o@$'@$D@$4f@$n@$.H@$0@$_@$,@#k3@$ h^@$!c@$4"@$K@$3@$ @$@#{/@#lR@%D@#o^@$2@$@$ @$2=@$^ffffffffffffffffffffffffff^^^@$@$^^^^^^^^@$.@$!tf^^@#k3^^^^^^^^^^^^^'^^^^^^^^^^^^@$ Q@$ B^^^?^^@@@@@@@@@@^@$1a^^^@#4@${@$@$ #]@$ 3@$ `@$ @$85@$.@$!t f@$'@#k3@$ v@#o|@$ @$'1@$U^@$ @$ Q@%,]@#m@%F^^@$@$-@$ `@$2='^ffffffffffffffffffffffffff^^^^@$ggjjKmK$K+K.K2K5@"D@!@"Dr(K9@%@!0rK<@"D@3l@"DqX K@@"D@3v@"Dr KC@"D@4@"DqKG@#UpxKJP*]*]*]*]--@""'ox|KNZ'z'z((((;P'p'p'p'p'w'wZ'W'W'W'W'l'lP'H'H'H'H'T'TZ',',',','C'CZgg%:%:' ' @""'ox|KUKK|Jeeeeee@bmmrunpurifydumpemacs;ts >-..E Bad value in q-reg ..E (output radix)32<1 The second argument was less than the firstAFN Ambiguous FS flag nameAOR Argument out of rangeARG Bad argument)AVN Ambiguous variable or macro name.?BD" Bad condition after " -- should be G,L,N,E,B,C,D,A or UABEL A built-in ^R command called from macro signaled an error5CMD A char that isn't a TECO command was executed9CNM Caller wasn't a macro (it was TECO internal code)'DCD A disabled command was executedDSI Damned screw infinitely3ERP Attempted :< ... ^\ with no closing > firstESR Empty sort recordICB Illegal ^] commandIEC Illegal "E" commandIFC Illegal "F" commandIFN Illegal FS flag nameIQN Invalid q-register name'ILN Invalid local q-register number'ISK Invalid sort key - "^P" command&KCB Kill currently selected buffer/M^R Attempted to macro a meaningless number,NDO No device open for output - try "EW"$NFC No free channels to pop into/NFI No file open for input - try doing "ER"'NHP Nonexistent horizontal position8NIB You have addressed a character not in the bufferNIM Not inside a macro7NOP Specified type of IO channel hasn't been pushedNRA File not random access5N^R Not in ^R - command meaningful only inside ^RPDL Pushdown stack full$PUR Attempted write in pure page,RDO Attempt to modify a read-only buffer3QIT ^G typed on TTY and FS NOQUIT$ was negativeDQNB Q-register not buffer - attempt to select a string or numberQNN Q-register not numeric'QNS Q-register not string or buffer(QRF Q-regs failed, probably TECO bug,QRP Q-register PDL overflow or underflowSFL Search failed"SNI Semicolon not in iteration1SNR There is no valid search string to repeat STL String argument too long!STS Dispatch string too short<TMN Too many macro, ^]q-register, ^]^X, or ^]^Y nestings<UBP Unbalanced parentheses found with an FL-type commandUCT Unseen catch tag2UEB FL-type command encountered end of buffer.!UEC Unexpected end of commandUGT Unseen go-tag)UJC Undefined journal file characters)UMC Unmatched ")" or ">" as a command/URK Buffer space or library space exhausted UTC Unterminated conditional7UTI Unterminated iteration or errset (missing ">"?)(UVN Undefined variable or macro name?WLO FS OFACCP$ when old access pointer wasn't multiple of 5!WNA Wrong number of arguments    A A A' A AA AA A A () )( A A A AA A AA AA AA AA AA AA AA AA AA AA A ; A> A A< A A AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA (] A )[ A A A' AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA (} A ){ A ~j~q/\~P EMACS; DSK: [PURE] 162ment~U~N~G~@ NoMM & Yes or NoMM Make SpacervalG!* number of characters between auto-saves! fs^rmdlywfs^rmcntB!* Don't let cursor be in this percent of screen! FS%BOTTOMh/!* 1 => Searches ignore case! FSBOTHCASEointB!* Center cursor this percentage down the screen! FS%CENTERerse;!* 1 => Display mode line in standout mode! FSINVMODngO!* 1 => Try real overprinting on the screen! F"'NFS^HPRINW"'NFS^MPRINt5!* Number of lines in echo area! FFSECHOLINESn;!* Leave this percent of screen blank at EOB! FS%ENDa=!* 1 => display error messages in echo area! FSECHOERRmn7!* Page width for filling and grinding! FSADLINEP!* Overwrite Mode status (see M-X Overwrite Mode)! 1FSMODECHWFS^RREPLACEode<!* 1 => Display chars 0-37 as SAIL graphics! FFSSAILSystem Output Holding7!* 1 => let system handle C-S and C-Q! FSTTYPAGE?!* Don't let cursor be in this percent of screen! FS%TOPModeJ!* 1 => word commands deal with LISP atoms! :I.W"n:I.W@'1FSMODECHModeu!* nonzero => Auto Fill (break long lines at margin)! 1FSMODECH 32FS^RINITU "E' M.M^R Auto-Fill SpaceU oint ^@ e+* 1 => auto save under visited filename'!* 1 => digits and Minus before control chars set arg! 0FS^RINIT[2 "NM.M^R AutoargU2' Q2-Q0"E'Q2U- Q2U0Q2U1Q2U2Q2U3Q2U4 Q2U5Q2U6Q2U7Q2U8Q2U9entnts /8+1*8tFundamentaln^!* Controls action of ) in showing the matching (! "NM.M& Matching Paren'"#0'FS^RPAREN.?!acesdeb!* -1 => Use tabs for indentation. 0 => only spaces.! "EM.M& Indent without TabsUMM & Indent M.M& Xindent without TabsUMM & Xindent' M.M& Indent with TabsUMM & Indent M.M& Xindent with TabsUMM & XindentISP ies .  '/* Char to exit I-search and do nothing elseFlag,* Nonzero => Auto Fill indents new linese : : : : : : : : : : : :p2MEMOXGPPRESS@XGPUNFASLOUTPUTOLREC 2sVisit File Save OldB* -1 => visiting new file saves old, 0 => don't, 1 => ask userfixQ..H"EMDirectory Lister'meeFundamentales~9RingELisp MULTIPLE-VALUE IndentdentLISP'RF[DFILE FSOSTECO"E ETFOO EVARS FSXUNAMEFSDFN1' "#ETEMACS.VARS' FSHSNAMEFSDSNAM [1[3[4 Q..O[5F[BBINDQ..O[6 [..O 128*5,32:i*[2 *5:f2 / "*5:f2 |!'! 1:"L' <.-Z; @:F"EL!' 1AF  :"L@L!' .,(CS:.-2,.+1F=::"EC' ).-1X3 .u1@f l 1a-34"eq2[..d .+1,(@fll).-1x4 ]..d @:i4"4"!''!' "#.(:\u4)-."eq1-1j' @f  l :@f"n q1j:X4'' Q5U..O FQ3-2:G3F:"'L+( 0:G3-:"'E)"L M4U3' "#F=3*"EM4' "#Q4M.V3'' Q6U..O@L> :@i*|[1fsqpptr[2 :g(m.aAUX& Process Init Vars)u2 q2fsqpunwin :m(q1(]1)) |m.vMM & Process Init Vars MM & Process Init Vars M(M.ALEDEFSDefine LEDEFS)Inhibit Writember~2MainFundamentalde;!* non-0 => do auto saves! "'NM(M.MAuto Save Mode)t5!* non-0 => by default use auto save! 1FSMODECHDSK: _SAV00neEMACS Library FilenameEMACS Version,C Store buffer in specified file. This file becomes the one being visited. Specify filename as string argument. Precomma arguments have hairy meanings; see the code.FileMM ~DOC~ Write Filele:!BQBuffer Index[2[4 0F[VBW0F[VZW :F "LQ.F-Q..F"E Q:.B(Q2+2)F"NFSDFILE''' 5,1F Write FileT1 F[DFILEET[TECO] OUTPUT0FSDVERSW <1:F"E0;'U4 F~(0,7:G4)OPN0130"N F~(0,7:G4)OPN0750"N Q4FSERR'' &77777.FSDVERS> F]DFILE FSOFCDATE[3 HP -1"E:'1+0U4 Q4"LF~(0,7:G4)OPN0750"E 0FSDVERSEF' "#Q4FSERR'' 0FSMODIF 0FSXMODIF +1"EFSRGETTY"EONoPrint'' FSOFILESRGETTY"E:FT' :I*CFSECHODIS @FTWritten: 1FSECHOLINES-1"N@FT ' 0FSECHOACT !NoPrint! Q..F-Q.F"NQ3' FSZU:.B(Q2+11) FS^RMDLYFS^RMCNT :"L Q3U:.B(Q2+8) FSOFVERSF"L FSOFILEF[DFILEFSDFN2:F6( F]DFILE)'U:.B(Q2+9) 1FSMODECH' "N0' FSDFILEU1 M(M.MSet Visited Filename)1 0FileMM Write File ~;S Read in an command name, with completion. Rubout, ^D, ^U and ^L perform editing. Space and Altmode do completion. ? lists choices. Takes a prompt-string as a following string argument. A numeric argument is the initial contents of the string to be accumulated. A pre-comma arg containing the "4" bit means don't wait for a confirming CR; the "2" bit means complete over the symbol table in CRL List using the prefix string in CRL Prefix. The "8" bit is deliberately ignored. The "16" bit permits names that don't match. The "32" bit means CR is allowed with an empty name. The F^K command with the "8" bit set in its precomma arg calls & Read Command Name, passing along its arguments. Two values are returned, the second being the completed string (or 0 if exit was due to over-rubout). The first is bit-decoded; 1 means we displayed the string, 2 means the terminating character was Return. See Source code for more info.me ~DOC~ & Read Command Name MM ~DOC~ & Read Command Name[0[1[2[3[4[5[6[7 1F[^PCASE :I6 0[8 0[9 q..q[.1:i*MM [.2 0[.0 &20."n2fo..QCRL Non-match Methodu.0' &2"nqCRL Listu.1 0fo..qCRL Prefixu.2 q.2"e:i.2'' 0[.3 0[.4 0f[HelpMacro f[BBindfq()"gg()' q..ou5 oRead !Redisp! 1u8 :i*CfsEchoDis fsrgetty"e@ft ' @ft6@ht zu.4 oRead !Barf! fg fsrgetty"n@ft ' oRead !Changed! q8"n fsrgetty"n q.4-q.3<:i*Xfsechodis> q.3,z@t' "#q.4,z@t' zu.4' zu.3 q9"n&4"n q8,q3' q8"n@ft0u9 :fi-13"noRedisp''' !Read! q8"e0:"eoRedisp'' @:fiu0q0-4110."eoHELP'fiu0 q0-32"e."eoRead'' q0f   ?"l q0- "eQ.0&4"n q8"n@FT ' q8+4,(HX*)'' q0-"efiu0' q0i q8"nfs^RMode"n-1@t%.4'' oRead' q0-"e i^R q8"nfs^RMode"n-2@t%.4%.4'' oRead' q0-177."e q8"eq0fsReReadoRedisp' z"eq8,0' zj0au0-d fsrgetty"e@ft0' "#q0-40."loRedisp' :i*Xfsechodis Q.4-1u.4 q.4-q.3"lq.4u.3' oRead'' q0- "eoRedisp' q0f:"lhk0u.3oRedisp' q0-?"e &2"e f=(0,2:g5)^R"e m(m.m& Load Bare)'' f[BBind:ft &2"e fs:ejpage*5120+400000000000.u7 j.u3i  <2r:s 5;0lq3,.kl .-z;.u30:l >q3,zk' :fo.1.25,0fu3 :fo.1.25,0fu4 q4-q3/q:.1(0)< 0fo..qCRL Name Listeru7 q7"nq3m7' "# q:.1(q3)u7 fq.2,fq7g7i ' q3+q:.1(0)u3 > j &2"e<:s~;0lk>' 0fo..qCRL Name Listeru7 q7"n1,m7' "# l j<.-z;x1l<.-z;1f=1"N1;'k>> ' ftHere are the possible completions of what you have typed:  ht0fsflushedwf]BBind 0u..hfoRedisp' !Retry! q0- "e (Q.0&2"'n)( )((z"'e)&(&40."'n))"n q8"n@FT ' Q8+6,(HX*)'' &2"ez-1"e0a:fcfLVKEIW:"l h@fc f~5L"eiist ' f~5V"eiiew ' f~5K"eiill ' f~5E"eidit ' f~5I"einsert ' f~5W"eihat ' oChanged''' :i3:i4 :fo.1.25,0fu1 fq.1/5-q1"gq:.1(q1)u2 f~2.2,0f-fq.2"gfq.2,fq2:g2u4'' :fo.1.25,0fu1 q1-1"gq:.1(q1-q:.1(0))u2 f~2.2,0f-fq.2"gfq.2,fq2:g2u3'' &2"e f=(0,2:g5)^R"e m(m.m& Load Bare)' fs:ejpage*5120+400000000000.u7 f[BBind f]BBind' f~34u1 q1"l (&20."'e)(q0-32"'n)"noBarf' :i7q7u2' "#q3u7q1"n0,q1-1:g3u7' z,fq7:g7u2' q0- "efq4-fq7"eq4u30u1'' q0-32"e fq2"eq1"n 0,0a-32"eoBarf' 32iq8"n@ft %.4'oRead'' 32f2+1u2q2"g 0,z+q2:g7u7'' "#fq2"eq1"n fq4-z"noBarf' q4u3''' f~34"efq3-fq7"e q0- "eq8"n@ft '2+q8,(:i*3)' 1u9'' hkg7oChanged !HELP! fiw:ftYou are typing in  &2"eftthe name of an EMACS extended command :i7 command' "#0fo..qCRL Name Typeu7 fq7"g:I7 7' "#:I7' fta7 name' ft. Use Rubout to delete previous characters; use  to delete the whole thing. Typing Space or Altmode causes as much of the name as possible to be filled in for you (this is called completion). Type ? to list all the7 names which match what you have typed. &6-4"eft If completion fills in the entire7 name an Altmode () appears. You can then start typing the arguments to the command. Terminate them with a Return. If there are no arguments, you can use just Return after a sufficient abbreviation.' "#ft If completion fills in the entire7 name,  &4"e ftan Altmode () appears.' "# ftit will be chosen.' Q.0&2"eft Typing Return will complete the7 name and terminate. &40."nft You may also type Return if there are no other characters, to enter a null7 name'' "#ft Typing Return will terminate the7 name, without completion.' Q.0&4"nft Typing Linefeed will terminate the7 name, without completion.' 0fo..qCRL HelpU7 q7"nFT 7'' FT  0u..hfoRedispeMM & Read Command NameEJ-OPN004 EMACS;AI:PATCH > FILE NOT FOUNDment FS:EJPAG-256"E' QEcho Area HeightFSECHOLINES 0F[VARMAC FSSAILUSAIL Character Mode FS^MPRINTUDisplay Overprinting  ren :,.F.X~$!PREFIX!F@:M(Q.XM.P)Control-X Q.X   EMACSd !* ITS! etDSK:EMACS !* set device name and FN2! fs hsname fs dsnamew !* fill in directory! fs xuname fs dfn1w !* and FN1! 1:"l 1:"l erEMACS;*'' fs d file[2 et@ > !** end of system-dependent code! fs msname fs dsname qEMACS Version:\u1 !* sigh, still need this! @y 1a-127"n ]2 :i*[..9 !* if init doesnt begin with rubout then! m(hfx*( 0fsmodifiedw))' !* execute it as TECO commands! hk 0fsmodified 1,m(m.mLoad Library)2 !* else load it as a library,! !* saving the filename!  *Initialization*~!EMACS (Fundamental) Main: n purifydumper~filename~e~& Setup PURIFY Library:EJ]*-(fs:ejpage)"n]*'MACSKill VariableACSB:ejEMACS; DSK: [PURE] 162wq.1u..l0u.1q.2u..p0u.2:m(q.3(0u.3))7jU,+Hhl @@l1B1B1B1B1B+!J @V!* -*@%U@% K@3D@1@%U@%U+@|@%U4@%UA@%U[@$@%Ud@b@%Ut@%Vz@%V@%V-@%V:@%VW@%Va@!@%Vk@;@%Vw@%Wz@ #@%W@%W@%W'@@%W0@h@%W=@~@%WE@%WN@ G@%W[@%We@%Wm@r@%Wt@%W|@%X@ j@%X@%X!@%X4@%X=@%XN@U@%XU@%Xe@Z@%Xo@%Y@%Y@%Y(@%Y.@%Y4@%Y>@%YF@%YM@@%YZ@`@%Ye@%Yz@$~@%Z@%Z@j@%Z#@(@%Z2@G@%Z>@q@%ZH@1 @%ZO@g@D@ m@QQ@%ZW@ @%Zg@+@%Zv#@L@%Z~@@%[ @%[@ @%[$@%[=@$@f@%[G@%[R@%[]@%[h@%[r@%[}@%\ @%\@%\@%\*@%\7@%\D@@%\P@%\[@%\i@$$K@%\v@%]@%] @%]@%]@%]+@@%]9@%]K@$&0@%]U@%]_@%]j@%]t@%]@%^ @%^@%^+@%[@%^>@%8@%^H@%8o@%^Q@#$K@%^7@$@%^_@%@%^h@$=@%_@$}r@%^t@$}2@%_@$L@I@ @/z@!0@%_@% b@%_(@%z@_@${a@%_3@$~@[@% =@_@${a@%_3@$~@ @% =@%_;@#O}@ @#fa@%@B@! @2@3@[@%_D@k@%_H@%_X@%_b@i@%_k@@%_t@%` @@%`@%`2@%`?@%`[@1@%`e@r@%`o@%`x@%aD@%a@%a5@@%aA@x@%aL @#@%aV@:@%aa@@@%b@u@%b@0@=@%b@V@%b@%b/@ @%b:@%bK@Y@&@11@@ @ @ @ @ @ @ @ @~@@@r@v@ c@%VW@%5*@#tF@$js@$P$@$.@$@#jS@#m"@#r@$ev@$Gn@$[@$ /@$b@$Gn@B@#u@$En@$-@$8@$8w@%'Y@%#8@%#*@%.0@$ @#ea@#~@%/@$k-@$8@#|t@#p[@$i@%9@#~~@#WJ@#rz@% R@#s,@#UN@$ B@#s}@#}J@#px@#qM@%*/@$8@$) +[`INXi 9"E*`R,;g|++[