0DX0205*-ADAMV01-002 J,04-00%  S  *ADAM Version III.11 L  oCcDd!$*  M   !  beyond_eol" !buffer# B current_row$ h file_name% first& last'  left_margin( mode) name* / offset_column+ W output_file, } record_count-  right_margin. type/ visible_length0  visible_top1 9 width4EY7Ey8E;E-X2A*AE&fH0+H)LH#?HL))O/Q' Q2W%'W0W#WX4]2r[*h[%]\$.\)Q\9]#]0]]& ]]4_2*3_%)_$ procedure_0_4a2X/a&%a)a) ;!(a4d2Yc%Oc$F e ndprocedured&+d) d);!dd4f2/f*%f0&f' ff4g2g*g0g4h2h0 h&h4p '*q Hr fw  |  ~    @abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890$_;߇F& Q6abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ!; | 0 123456789l 6!@#$%^&*()[]{}-_+=~`|\:;"'<,>.?/  Command:   Eve command:  " I o     $ ITPU$KEY_MAP_LIST o eve$user_keys eve$vt100_keys eve$standard_keysEE E2 EW E| E EE1E_EEE E RE4E_EEEE E*EIElEEEE E2EZE|E string   - L s     ! Jinteger kJ J    ,J O s  J J  FJ qJ J J   1 X      !F  M  !  `^  !^ " # !#F$ %9 & !&F'^ ( !((* 111223 44 `445 66 `667 8 9 : ; < = > @HKKKLLM O PEUU Ut_VV `VVt2W XKXFY^^ `^^```ta bb `bb+c du e fKfFg_h jjlsyxxy{{{||}   >F EF  'F !F '/ Y  U   w EEt '/t `2KF  Eu 9y  )  D    (, D   '(L           E EF \ Ft` \  `tKFdK  \ F 7 LF  cF c    E  \   `\|  I! E!Q! \ !F" $ A& 35 _95F6 B779DF } IG IH IH (I  J   KKFL *L shift keyLM=MFN O   PPRdf h 'hhiiij Yk >l v l1m ymFn o qYq-r rFs tt&u vvw x v l1y yyFzz0z}zQ{ Don't understand !AS{ ||} ~~      l F&        'B '>} !F $ !F  -  F  ' lQFE +4 4   ' scroll_topF ' scroll_bottomF ' scroll_amountF ) &0 (    ! &0 E2,  (  (       ( >   ( '  F !F   (   (3.020112 35 '}55p63&6%6$6&747 > "7 (8 :::< I I (K !K KKt1L M NPXa a (b '}bF8c8c de h !h hhtpii Eii(jj EjFk l m\n '9nFpKpF qTqmqFsgsstTtFu wwxEy z8z]{ 8|T|m8|F}g}}~T~F  RTgPF  tKF  EE(  ('  ! tiF0   0}       0M   ' E e E0S \   KF  c'   F !F  (E_  ( (  '9F !F3&4 > (  '/Ft=U '  G (F 'F  '/SFty E   ; \    Q    Fw  '/ty  c Y   u c $'3'&'4' >'F( (***t_+ ,, `,,t-K-F./ ( 0y0 2=E+B2BCED EG !GFHHFI I (K >KFLLtKM M (N EN O~P (Q (S_e '!eFii '  status_lineiiYi jk m*n Fredo p Adamq s 'sst  Insert u v  Overstrikew y ' directiony-yz Reverse{ | Forward}  'F  E 1 \  F  P E S \ J F  L Buffer I I LI II II I -2F ' map_count 'Ftm '!   ' nextF !    F   E E \ yesYy  E \ no c Don't understand !AS;I please answer yes or no   ~ `. - .   '(.  . (  !Fa E ' /K     '/ '  1 '        c 3           a   F! !! !! "# (( `(([***+V, --- `--///tx0 11 `11+2 3u4 5q7 7 `7768 >8 9 : ; ? CCCDDD'E c EFF IG HHFI J K M N !N NNO `OOkP 'PFQ R   S T U VE2 W X Y YzYZ9 [ \ !\F]^ ^ _ !_F a  !aF0b (c E0c cFdE2e g   &K *)Will not exit; could not write buffer !AS   F 'modified 'no_writez}` Trimming buffer... w Trimming completed    $  'F t 'modified 'no_writez}) ' \ F Write buffer !AS?  ` Trimming buffer... w Trimming completed     $  ' nextFI  %K   +2E0  *F  z`. Forward Find: F . Reverse Find: F   *Fgfindfind} A No previous target to find  'K  Finding previous target: !AS    2  Finding previous target:    6 Nothing to find      '%  E("" !"F #`##$$ $ $_%|% & ' ( >((F0) *E0+ , -- - -J. / >(-/F00 1E02 3 5056`66$7E8-8 @reverse9 $:E8; @forward< = ( >8>?? ? ?J@ A >( AF0B CE0D E FF F FJG H >(-HF0I JE0K L N0NO 'OOBP Could not find: !ASP Q )R Could not find: S T ( UUV Y $@#Found in !AS direction. Go there? Y YFH^H^y__ *_F P`PreturnaPdoaYab Hyesc d Hnoe f %g Hh j EHj \ yesjHj7m 0m n0no &p ( qqr s t 7u 0u v0vw y  )    (2   F   }  return    keypad*ue  next_screenprevious_screenYP _ i    merlib  adam merlib ?commandsYY0   adam commands & dF   adam commands  `(B E \ F P `(Q \ F Ladam F    adam commands Za OI Help buffer Press Next Screen or Prev Screen to see other commands-2|(   E( ` $  Hel p buffer-2  E(  (V 76Type command you want help on (press Return if done): F Y :9Type command name, or ? for list (press Return if done): F   *Ftpudo}I C&vaxtputpuhelpun AreturndoexitYYt-    return 5    ( E_      C%tpuhelp  (  >F E   0 EQ    ! !       $  Help buffer-2  #5*   fredkey  !  adamkey" #E&X( 9P8Press key that you want help on (Return to leave help): (F) i+ JPIPress key that you want help on (Help for keypad, Return to leave help): +F, ../ 0 1 *1F2return2t44W5  5 56 typing7 8 unknown9 : ;help;|;};+B  adamkeyCED 3FLadam F  GEH I JK  5MVZ YZ\\ '\F^`^-^`|`>a aa b c d e3e%e4e >-e (ii#iYjj \  jkl  m n p q~r3r%r4r >-r (ss  t u >vvv w x y z3z&z4z >z ({ } 'B 'visible_bottom. $       'B '. $    > >>>Fa G_ <      (    'F '  status_lineTF TF E  'BF  $ 'F   'current_columnF 3 % 4 >- ( '     ' scroll_top F( ' scroll_bottom F0 ' scroll_amount F8 '  S 'visible_bottom R )&0 g       (  !(08&0    a    ! ! '/" " '! " # $ & ' ( ) * * '* F+ + , - . 0 @ @ 8A EB Selection cancelled.C `D 0/Selection started. Press Remove when finished.E XE FF H  Q T !T FU U V '!V V V JW 21Remove must be used in the same buffer as Select.X Y rY F[ [ \ \ \ \ 8] Nothing to remove^ E_ ` ca !a !a !a Fb c d e (f ' g h i (j Ek El Remove completed.m n 8o Use Select before using Remove.p r y | !| F} } ~ 'buffer~ ~ ~ J 21Append must be used in the same buffer as Select. _ r F     8  Nothing to append E  c ! ! ! F (  ( E E Append completed. 8 Use Select before using Append.      '  F     D     R :9Nothing to insert. Use Remove to select a range of text. R :9Nothing to insert. Use Select to select a range of text.      F ' F ' F U _  (  U_ F( '/ F  ( # Y /     ! F K F ! F8 '/ F   t! ! F8 E@ 9 t    ` 0 K@ F@   t9 +  u X K0 F0  '/ F     (8  @ ' *   FP  `oP  $ LP       $        '/ FH ( '/ F    k 0   :" ' $ $ % & ' ( :)  H) ) *   + , . P  Z Z 'Z F [ [ \ *] >] F@^ >^ ^ _ E` Ea >a Qa la Ha Fb jb Hb Fc e f K@f F@g @g th i j Zk k ' tab_stopsk Fl 'l l m E(n  p T(p dp Hp >p q >q g(q p }q r  ys t K(t F(u v v w }x g(x Hx F0y  >y S0y F8z E@| } K@} F@~ @8~ t  C +*Tabs At not available for inserting spaces 1 c      !   * Already at bottom 2   (  !   ' Already at top 2   (   E    F    F f   F *tempsort F (  E    : (    Sort completed. ; LBuffer I not found      I !"#$%&'()*+,-./ I0123456789:;<=>? I @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ I`abcdefghijklmnopqrstuvwxyz{|}~ F  E  E  ] E E      E    \   F 7 \   F 7 ` F ` F( (   (    K  F       (   ! F ( E E/ EX  E( Ey El EE E%  ENq& Ew E E% E& & t( K( eveplus$x_shellstep_!UL)( J/if (get_info (current_buffer, 'record_count') < ) I" then eveplus$x_gshell := 1;endif;) i+ + u + , K, F- . . ' record_count. F(5 ,+eveplus$x_gshell := eveplus$x_shellstep_!UL5 i6 K6 F 8 8 8 (9 T 9 : : F; U ; F= = = (> T> ? ? F@ @ A B B  B (C LC QC D E ' F G  H u_I QJ J J (K LK QK L M ' N O  P UP FQ R S S S (T LT QT U V ' W X  Y uZ [ \ ] K ] F ^  (^ t _ ` T` Fa a tb mc (d k m m 'modem Fn n o  p p q w Stripping buffer...x x wy  Stripping complete.z  *' D SWITCH TABS  Z< Z TAB will now insert TABS > Zy TAB will now insert SPACES      ! F   ( E  ' tab_stops F '     \ DCWarning - the default for UNTAB with SET TABS AT is every 8 columns c > F  t  (   F p e S F U \    (  UNTAB complete.   ! F  H F   F  ' record_count H F (     0  E0 U(0  t U(0 l J0 F8 ( T8  !   (8 K 08 !   (8  f0 m H l F @ 40 @3You are in column !SL of line !SL out of !SL (!SL%)  (     >       ` > F  (   'mode F               !    C ('At end of buffer, no current character.   E  t=  c  t K F    E   4 K@ c J, ^ F!  ! " & 6Current Character is '!AS', Octal=!OB, Decimal=!-!UB, Hex=!-!XB!AS& & & ' , 3 x/ 2/ _0 E 20 JError (0 I ) at line 0 E K0 G0 1 2 3 8 8 8 (: c : c : G: >: F; ; ta< = = (> > > ? ' @ A 3E E E (G c G >G FH H taI J J (K K K L ' M N OR R R (T c T >T FU U taV V (W W W  X ' Y Z [ O\ a g 2eveplus_saved_bufferh  +eve_h I h Fi (j k Building command listn Hn to ` o F p  p ,q Can't find spacer s t T  t \ t  u K u Eu \ u Fv ' w x z z z (| 3| %| $ EVE_| 4|  | F }  } t)~ (   z   (    EVE_ t    (   F  t2 (  '    (   _ t   :A /) Eve commands -- DO will remove this list-2 (      (  %/ ceveplus_saved_buffer  &/ }      (k   'ktype I * translation Fk k$ 2- )# 4 (k  k   k ( > F (  F  CffDb4Qn!?]{,Iff   D   D   D   D   D   D   Dj   DL   D/    D   D   D   D   D   D}   D_   DA   D#   D   D   D   D   D   Dq   DT   D7    D       T 2h ; Subprocess could not be created     %  %K ! F  F   D o r F  # E D # D  E   'name F BAEnter a file name to write buffer !AS or press RETURN to cancel:   F  V  &  &K ! # `;# $ P$ `;$ Q$ \ $ F% )  '*  k'+  k, Print command: , F(- (- . (PRINT/ 0 L( 0 F(1  (Printing !AS with command !AS1 2 n $set noon2 F03 L(3 05 06  & 7  &K8   : (; E H I 7J ' firstJ FL L tZM 'nameM M t1N ' nextN FO P P Q i i j  k l E3p Fp Hp q L if(get_info(r I,"type")=integer)then r I eveplus$x:=r Is I;t Ielse t Iu I :=eveplus$x;u Iendif;u iv 1w L:= eveplus$x;w ix } _} F3 '3type  L)_doc := lookup_key ( eveplus$x, comment); I I)_pgm := lookup_key ( eveplus$x, program); i 4 L_doc := "~no ne~"; i n     L_pgm F H ^ L define_key( I_pgm, I I, I I_doc); i ; Lundefine_key ( I); i    y    LIST BUFFER  3  $   Collecting buffer list ' last F ' first F  t 'system \  '  'name  ' record_count !6UL F   !   8  ! t    'modified #  Modified #  'no_write #  No-write #  'system ! System !  ' permanent "  Permanent "   F  w  !   !  C    t1 ' next F    (   F  tz (   - ' #" J  ( 54 Buffer name Lines Attributes'   (   |     %  ;6)bufed_select_key select buffernAbufed_select_buffer ;6)bufed_remove_key remove buffervAbufed_remove_buffer  &   y  !%% 'name% LIST BUFFER%2& Not in the LIST BUFFER'  %( Xbufed_select_key) Xbu fed_remove_key*  &+ , 'type,F- .//Y/Y/0 i1 2 3 334 :455w5 6 7 88-8-99w9 :; $<<w< = >? @ A C MQ:R S 'modifiedT ' record_countTS}TU  modified V W 'systemW XLsystem XFY ZZ([ \   \I is a ]I^Ibuffer. Are you sure? ^ ^F_ ` E`a Ea \ yesaaYa.b No buffer deleted.cd e gggh i rj ' firstjFlltom 'systemmnnm}nt1o ' nextoFpqqr Mains 3t 'namet u v 'namevMAINwx y z { | ~:yLDeleted buffer   ' firstF 'name LIST BUFFER2 Not in the LIST BUFFER  %  Xbufed_select_key Xbufed_remove_key  &  'typeF YY i      % Xbufed_select_key Xbufed_remove_key  &     E 'name LIST BUFFER/ Not in the LIST BUFFER w 3*$  4 >5 This is not a buffer listing   !F    -   (V    ! F E \ F  %C F3LNo such buffer:   V     'MODE F   EPF  W U \     F  C  EB  `   Forward   Reverse   <Lwild-card search:  F (    JDLeveplus_search_target := I; i   !! " $ !% 9 ; < =E>E(?E0@E8A @E EEEt F \ FF I(J}K 'LNL''NFN PL PFP QL QFRKRFTE(T JW0XY  7Z !` @ABCDEFGHIJKLMNOPQRSTUVWXYZ[8901ZQZ cZF [L [F\L \F]K]F_E0_ u bC ! W  8 (L  ! W gE(hKhFiD/ mE0nKnFoD t8&uL@')uF@wE8w x Exy6zL@& 'zIzI'zF@| | }L@ & LINE_BEGIN}F@~K~FDN 8&L@')F@E8  E6L@& 'II'F@  L@ & LINE_ENDF@KFD 8&L@')F@E8   Etf \  `*#%tKF{ E \ A  E' cF  <K \ F  D' E' cF  K \ F    7 !` @ABCDEFGHIJKLMNOPQRSTUVWXYZ[8901Q cF  D* \ F  '  ''  E6L@& 'II'F@  L@ & SCANL('I I')F@ D8&L@')F@E8  Etc \  `*%tKF~ Ev E6L@& 'II'F@  L@& REMAINF@ C \ #  E6L@& 'II'F@   \  \ Y!L@& REMAINF@ -L@ & MATCH('F@E8   DE E t] \ %t+KFKF E 6 L@& ' I I' F@    L@& ARB(  E  G I) F@DvL''FL'FKFD6L FL FKF    E   E@  }!_#8"$L@%I')%F@% +&L@& '&I'I ''F@' ( + E@+,W- E@-Q- \ @-F/// 0 222 3 8 9 message('Key not defined');9F: message('Key not defined');:F; <E= 2> ? !@ AgiiFj c j `jjllYl mEnEppptq \ q c qq'rKrlrcsFs uKuFu wKwFwJyYy z !   c  `    EE Et+ \  c pKlcF ES \   JF S \ JFKF KFw     w  ! E ( EF E U    w  |2C ('DRAW BOX only works in RECTANGULAR mode - Select not active  FZ !' !F  C   !F (   YF ( !FYF(    w  ! '   (    w  UH J+I+F( v ( - (  K #T    ( w  ! t`K         | (K  ^T   |SH    |w  yK # T  ! #  (' ((E))w) ** + , - . 00 1 7 ;;-< Select not active>> @ FZG !GG'H !IFI CJ K !KFL (M RYRFS (T !TFUYUFYY(Z [ ] ] `U`H` ` F(eewe g !ggtjKj ll 'modelF m n (n`qqKrUrHr \ rF@u  (v 1wUwHw wF@x { !{F0| (}  @~  (0w  5 ( Ew   Rectangular remove completed.F !FYF  ( ! B Paste buffer is empty (  ! tF  (K      (# (w  qZ -F 0/Selection started. Press R emove when finished. 7E Selection cancelled x_DUA3 ! 3     Q3      *' D RECTANGULAR 2E n removevA eve_remove  n removeB eve_remove $n insert_heresAeve_insert_here $n insert_hereBeve_insert_here n selectnA eve_select n selectB eve_select 2 L  } !F (EZ -F ( E  2n%rectangu lar_removevAeve_rectangular_remove 2n%rectangular_removeBeve_rectangular_remove <n*rectangular_insert_heresAeve_rectangular_insert_here <n*rectangular_insert_hereBeve_rectangular_insert_here 2n%rectangular_selectnAeve_rectangular_select 2n%rectangular_selectBeve_rectangular_select 2y LRectang     EtC EFLFLF ""1$ \ %F% '''HP*"Q DCENTERRS U !UFVV VV WX ZZwZ \\ \t_]] `]]t2^K^F_ `aya e3e&e4e >e (gggtfh ii `iit j kmm 'mFnn 'nFoo '9oF vv '/vF(wUwR(wlwIwFx  0y ({ 'K3%4 >- (  ! / Already at end of line p K3&4 > (    !F     !       n '(        E2F 9 E F Fa < '/K     '/ ' ! M 6 ' c F I F   `k 'F      E2     9  !F^   !F   !F( ( E(  FE2  !        F# \  R F 1y FE2  ~ ' SHF1y FE2 " $,2* 3 DFILL45 99 99 99+: Nothing to fill;< > !>FAAqJJwJ L !LL L Lt[M NN+O PuQ RhT !TFU (VVwV Y !YY YYt0ZZt [ \^ !^^9_ Nothing to fill` (a b c !cFg !gFh i  (jk m 'q 'bufferqqqHr 0/Can only fill selected text in the same buffer.s trtFuu=v No text selected to fill.wEx By z ({E|} ~    >   - [2B Mark !AS not set   No mark name givenGo to: z   L eve$ mark_F 7 FFF8 !F@   XF0 z  (80`L0eve$x_buffer_of_mark:=get_info(I,eve$kt_buffer) i#U :9Cursor has been moved to a text window; try command again N (  (   @ }   L0eve$position_in_middle (I) i E0 \ 0 FH H HGoing to mark !AS  G Ambiguous mark name: !AS     ( Z Cannot move to line !SL  ( !F  #rNo line number given Line number: z  !" $$I% Cannot move to line !SL% &' )) '})H)F,,--J. Buffer has only !SL line!%S. / (0 Buffer is empty1 2 x33 3 (4T4 5 !5 6 8?BBC CFD ErEFF HHII JJKEL M OVXXYYFZ [r[F\ ]]I^ 7__`Ea b dotOr Cannot use !AS as a mark namer stx (!Current positi on not marked Mark name: xzx yz | } E} }1~ \  ~F L eve$mark_I := mark (none) i Current position marked as !AS `-~9 F| ! }    ~^ F | ! }       %KD  &K } I I I (  Press the key to be added:    \F      F 'F E@ "No string to replace Old string: z   ,  New string: F  F  t      F(     (     @i ,+Replace? Type yes, no, all, last, or quit: F0 0  0yes  E0F8 \ 8yes0 \ 8all0 \ 808YYYoE( E  FH  -`---,. E.w. / 0KP0FP 11  2 \ 8all20382}3f4E@5 Replacing all occurrences...6  %/7 8u 9 : \ 8no:0; \ 8quit;0;Y;<E(=`==B>  > (? @ AA  BuC D EKG8H \ 8 quitH0I \ 8I0IYG}ItKM  &/N PReplaced !SL occurrence!%SN O Q X\\F] ']F^ !^F_ `  a2Vb bbc' d e f g h jx|*+} DSET LEFT MARGIN~  +rLeft margin unchangedSet left margin to: z  7 Left margin must be at least 1 / 'Fz (currently set to !SL)J.Left margin must be smaller than right margin   v  Left margin set to !SL   *, DSET RIGHT MARGIN  -rRight marg in unchangedSet right margin to: z   'F{ (currently set to !SL) J.Right margin must be greater than left margin       Right margin set to !SL   'K 3%4 >- (  'PQF4 Already at start of line    #Y \      E2 Fa  F !     `    ! F   `t  !F   !F0 ( E0 FE2 H ' c F I   F! " # % & !& &&' `''p( 'mode(F) *   + , - .E2/ H0 1 !1F2^ 3 4 !4F 6   !6F07 (8 E08 8F9E2: <F|*F+G Already in ADAMHI J *K NE1OP '9PR1P QE_R *ADAM Version IV.0U  1RAU n center_lineeve_center_lineV  1sAV 'n! rectangular_modeeve_rectangular_modeW  1pAW #n fill_paragrapheve_fill_paragraphX  1IX "n if_theneve_not_adam ('IF_THEN')Y  1CY n commoneve_not_adam ('COMMON')Z   1OZ n openeve_not_adam ('OPEN')[  1D[ n loopeve_not_adam ('LOOP')\  1S] (n subroutineeve_not_adam ('SUBROUTINE')^  1F^ $n functioneve_not_adam ('FUNCTION')_  1P_ "n programeve_not_adam ('PROGRAM')abb" cdef gos*+t Already in FREDuv y2z{ | *y PG *FRED Version I.5E1E_ '9R1   1RA %n center_lineeve_not_adam ( 'CENTER')  1sA *n rectangulareve_not_adam ('RECTANGULAR')  1pA &n fill_paragrapheve_not_adam ('FILL')  1I n if_then eve_if_then  1C n common eve_common  1O n openeve_open  1D  n loop eve_loop('')  1S n subroutineeve_subroutine('')  1F n functioneve_function('')  1P n programeve_program('')" | p  y sys$login:author.datF * author_bufF#  '# record_countF #$F (#EKF   C* t) 8  (  *W )(Command !AS works in ADAM, but not FRED!  V ('Command !AS works in FRED, but not ADAM  >E B>QF'E'  |*# DIF THEN  '.   F d \  Ft8t    *'     O|)'  -      IF ()  !F    THEN' LELSE  ' LENDIF  |d  ( |*" DCOMMON  '.   F8     COMMON //! ! !!F"|":# $d% ( & '.4|*4 5 DOPEN67 :: '::.;; < > >F@ dA \ AFCCCtD8FFFtG   HI *JK' L  M N OO|O)P' Q  -R S  T V   OPEN (UNIT=,W W !WFW X   FILE=, STATUS='OLD', ERR=)Y|YZd[ \ (]em|*m n DLOOPop ss 'ss.t t u w No label entered Do label: wzw xy z EzF{{-| Do label too long}~  F( d  \  Ft(8 t    *'     O|()'  -     LDO I I =     !F EL FKFt '   T  \     CONTINUE|(d  (  8   y    \  % B  EF \ % C PROGRAML I II    d     !F '    STOP L I II ()    !F  '    RETURN '    END'   C' LC---END    '   Cd  (|*& D SUBROUTINE  "No name enteredSubroutine name: z    SUBROUTINE| *$ DFUNCTION  No name enteredFunction name: z   FUNCTION |*# DPROGRAM  No name enteredProgram name: z   PROGRAM %**, !,, ,,-y-. 00F1 2 E2F44tK5 \ 5 5t6K6F7889y9: ;;< >DKE LE(2M  !%DMFN \   NFP EPFQQDR \  RFSET UoUV$UFV' V  C*V' W 4 3C* *******************************W' X 4 3C* *******************************X' Y 4 3C* ** **Y' Z  C* **\ \t,]   ^K ^F _`  aL aF c (ct,d   eK eF fg   **h' i 4 3C* ** **i' j 4 3C* *******************************j' k 4 3C* *******************************k' l  C*l' l  C* SUBPROGRAM :l' mL C* m  m' m  C*m' n  C* AUTHOR :n' ppq  #r s  C*s' t  C* PURPOSE :t' t  C*t' u  C* INPUT ARGUMENTS :u' u  C*u' v  C* OUTPUT ARGUMENTS :v' v  C*v' w  C* COMMON BLOCKS :w' w  C*w' x  C* SUBPROGRAM REFERENCES :x' x  C*y' z & %C* ASSUMPTIONS AND RESTRICTIONS :z' z  C*{' |  C* LANGUAGE AND COMPILER :|' }  C* ANSI FORTRAN 77}' }  C*}' ~  C* VERSION AND DATE :~' LC* VERSION I.0 -   '   C*'   C* CHANGE HISTORY :' L C* I - INITIAL VERSION  '   C*'  I HC*********************************************************************** '   C* a  YYU      (2     U :9Cursor has been moved to a text window; try command again  "Buffer not switched Buffer name: z   F 'F 7 t 'F(E E8u  E \ @  6 0 (K8F8   ' nextF  D Already in buffer !AS  & }   '}80D (Already in buffer !AS  & }0  g  Ambiguous buffer name: !AS    *F@ }@ @ [End of file] '9R1 @     2H} Don't understand file name: !AS |!   U :9Cursor has been moved to a text window; try command again " No file specified File to get: "z" #$ ( (F) * -*J. `.../L.FOR/F0 1 3E (5 5F66t57K(7F(8 69 :<(<vA|!BB C D Ambiguous file name: !ASD EF JJaL =M ?MGMFN aP =Q ?QGQFR S SFW(WY 3Yt Z No files matching: !ASZ [|!\\ ] ^_ a c 'cF e etrf ' ffgE@hu8i j ' nextjF k|q@issOt ' WttuEHv wEHx y oz ' Wz{ ' h{{Y{|EH} ~EH  H Buffer name !AS is in use  32Type a new buffer name or press Return to cancel: F. No new buffer created ) VF8   G Already editing file !AS  & }    ) VF8 8 8 [End of file]  '9R1 8    `*y  `%y  `...y 2xy \  Buffer !AS already exists   '  create|V Input file does not exist: !AS   *F %$Editing new file; could not find !AS   ' G *F  '  } ' read_only|% $  j2HQ Don't understand file name: !AS  U :9Cursor has been moved to a text window; try command again  #No file includedFile to include: z   !      E   E ' ! F Y  !F  *J `.L.FORF  ! !F" "F# & &F ' 't#( 6 )  *, '},AR. Could not include file: !AS. /D0 y1222 2 (3 14 (5 6 7D@9 Ambiguous file name: !AS9 <CFG !GFHHFII2J  Only one window on screenK wL  M  N }O P (QER 2 S U\]]2^ Only one window on screen_ ^```a (b c (d eeF2 f hpst  !tFuuFvv6w Already two windows on screenx y  z }{ |  } }~   E 2  i Trimming buffer... w  Trimming completed (  F -  F   '  ^ #1No file specifiedFile to write: z   r  FE  C  ('Could not change tab stops as specified*' D SET TABS AT ZE *)TAB cannot insert spaces with SET TABS AT  'Tab settings not changed Set tabs at: R  4  Tab stops set C ('Could not change tab stops as specified** D SET TABS EVERY  *rTab settings not changedSet tabs every: @ ('Tabs must be set at least 1 space apart R  4  Tab stops set    !rWidth not changedSet width to: z  I Cannot set width to !SL   +    'HF  'H F"  G##t1$ ' nextH$F%& Width set to !SL& (58*&9 D SHIFT LEFT:; ? 5rNo columns shifted!Number of columns to shift left: ?@ @?A '&Cannot shift left by a negative amountB ~DDyD D *)Window is now shifted right !SL column!%SD E F HSV*'W D SHIFT RIGHTXY ] 6rNo columns shifted"Number of columns to shift right: ]^^@_ ('Cannot shift right by a negative amount` wbb b *)Window is now shifted right !SL column!%Sb c d fnw !wFxxFyyFzzF{{F | '|F(} } L* Show buffer (I)  -2(t( '(system}    E      :P9Press Do for more information, Return to resume editing:  *F00do ( ,    (   'previousF(h       "P!Press any key to resume editing: F8    (   (  '  Information about buffer !AS   ' '    Input file:  'hF  none 1    '    Output file:  'WF 'no_writeY  none 1    ' '  'modified9 !  Modified  9 !  Not modified   ' Left margin set to !SL  '  '9 !  Insert mode  9 !  Overstrike mode   ' Right margin set to !SL  '  ' direction9 !  Forward direction  9 !  Reverse direction  \ '9 Window width set to !SL   '  '}F 5  !SL line!%SF   No lines    E     S EV  \     ' shift_amountF  R $ #Window shifted right by !SL columns    ' ' *S  ; : Tab stops at columns 7 and every three columns thereafter p ' tab_stopsF0 '0O !0 Tab stops set every !SL columns   e 0 Tab stops set at columns !AS    ' Z,   Tab inserts spaces *   Tab inserts tabs   ' key_map_listF((I ' !(!A" ( Key map list: ! AS"  # )$   No key map list% &' ' +  F eve$mark_+  - !- --t..Jeve$x_buffer_of_mark:=get_info(/I,eve$kt_buffer)/ i0091  2 3 45 68 '}88D9 9 (:   No marks; o<= =  (>   Marks: ?' @' A  B DDDE' F H V\R2(RCS ('You are not running EVE in a subprocessTU VX Y|[jsco2hoJp $#DCL subprocess could not be createdqqr sv # No DCL command given DCL command: vzv wx z 'W z{W {Y{[| Creating DCL subprocess...}  $ set noon}FW ~ F !FM& }  |   }    }E 2     # DCL buffer-2  ('      W   (    C2P* No key defined  No key definedz   dF   (P'Press the key that you want to define: F `(FB E \ F  <T \  F   C' No key defined  *doF .-You cannot bind another command to the DO key   D n o  Key defined H 0/You cannot bind another command to a typing key     2`o %$Error in compiling; TPU not extended (  2 E   "TPU not extendedProcedure name: z    !F ' informational3E& E% * Extending TPU...  &     TPU extended  " # Searching for procedure !AS...# $$ $ ('2M&%C&$: procedure&0"&(0'$'4* >-*F + +t{,  , (0 !0F(1 01 (2 3 > 3F87 >7F 8 89EP: w;  ; (= != (!=FH>EP? CPD E8D \ 8DF@E@E4F G 6@HuI J 6@K L N ((O !OO OOt P QNS ' }SATU Could not find procedure: !ASU VDW Extending TPU...X  &Y HZ [  TPU extended\DE^ Ambiguous procedure name: !AS^ a (c m LKPress keystrokes to be learned. Press CTRL/R to remember these keystrokes.n   pxs}2X}/~ Nothing to remember +2E  (F AP@Press the key that you want to use to do what was just learned: F C7 Key sequence not remembered  *doG /.You cannot use the DO key for a learn sequence 8   nosequenceS  0/That key was already used in the learn sequenceE ; Key sequence rememberedue  I 10You cannot use a typing key for a learn sequence   9r"Will not repeat next commandNumber of times to repeat: z   5 Will not repeat next command G #"Will repeat next command !SL times    F * shift key=F    FCt*  TF  *F  do    _FCt* i TF / Cannot repeat that key       #Status not savedFile to save in:    &)) 1)F**,:X62h6 ?7 $#DCL subprocess could not be created89 :< = ?JN #No TPU command given TPU command: N6O ' informational3OPE&Q RE%S T  &U iV WW WlYY 'YJ YI bufferY  - 2Z [ ]fh||h(ii *iFj kk k)l   m (2 n o !oFppF q (a r #r (s  u~a . Not in command window 5||( *F$  !F #Fw   !F #\ # (        \  EK  E \ F  (   y     E  o doF o  '< !  <  t* iTF  0E_ do$do}o2 No previous command given  oDoing previous command: !AS t* iTF  ) No command given  _ '< ! }<   '}|  Y`< NH Choices Press Next Screen or Prev Screen to see other choi ces-2 @  <  Choices-2   <  (a  # (   '< !  <   !FF (a  # ()    a  ( (   c    c   h  No more commands to recall  !!#!"# %%H%w% '24 5 E556 7 >88a 89: ;< = ?SVVtgW \ IWFX `X XtYKYFZ\hn o pEq  rElsEtEuEIwx yy zEI{|}  \ IF `&El `|IFI `&lFlKFtU \ IF `t 1U \ I EI'"YE KFt \ IFKFEun  \ IFEu  U \ IF   L   E KF \ I E \    EH E \  `_F P  EIQ \     `"F$LFu  \ JI"F EtLK E \ F     U  H \ I J F `"   " k `'   ' + "  F ! L! I! I! I)! F# # % 6 K K M IN EO EIO FP E_Q "R S (T 0U V W _  _ F` ` 7a No command givenb b c d |ld Ve Unrecognized command: !ASe f f g h i 7j \  j EVE_j k LEVE_k Fl m m Fpr +r Fs s t t u Ehv uw { T{ \ I{ Don't un derstand command: !AS{ | | } ~  E@ EX P 8   !  t  F K@ F@     FH H  E` @  PH + PH  EX   z (p v _   Eh u( @   X T \ I Ambiguous command name: !AS    : `( P Eh u@  F    Eh u T \ I Ambiguous command name: !AS    ? L P_ I F 7  \   F(  E Q \  J( F( 0( v 0_ Ex E x Jeve$arg I_ I( F  t Kx Fx  Tx Fx x A L(eve$x_argument_type:=eve$arg1_ i |h   F E x  L( F x Z \ | Y   F  A!x!!L)!F! !!! !x!N! 0!AS does not take any arguments! ! R !  0x!AS takes only !SL argument!%S !  ! ! ! ! ! !!!x!t!K!F! E !Jev e$x_argument_type:=eve$arg!I_!I(! i! "!"string!!L""!F! !"integer!'!Leve$k_no_arg+0!F! h"! ,"+Argument type !AS must be integer or string"! #!#!$! %! &!x&!'!L,'!F(! )!U+!L)+!F,!,!-! 1!K1!F2! E 2!Jeve$x_argument_type:=eve$arg3!I_3!I(3! i5!  "6!"string6!.7!8!L8!F9! :!x:!2! @!@!teD! \ ID! `D!D!tE!E!JE!FF!G! G!FH!L"H!IH!I"H!FI! J! K! 9L!"integerL!M!I8N! v l1O!LO!FP! gR! & 0%!AS expects a number for argument !SLR! S!S!T! U! hW! ,"+Argument type !AS must be integer or stringW! X!X!Y! Z! ^!^!F_!,_!*`!`!Fa!L,a!Fb! 3c!xc!d!L,d!Fe! f! h!%j! n"p" *p"Fq"  r" $s" 3t"t"v"""" '."F#T#F4#o4#F^#U4^#F# '##9# 4&#F# # ' # #9 # & #F # # '##<#K# ^&#F# # (9' &0# ' ##9# 4&#F # # '<  # #C"#K4"#R| ## | &##F< $# )# 'a )#)#D*#T*#  %*#Fa +# -# ' -#-#D.#T .#  %.#F /# 1#T1#  -,5# ' 5#5#96#  %6#F 7# 9# =#C# *MainC#FF#F#bG# }I# '9I#R1I# J# L#  [End of file]P# CommandsP#F#Q# #*S# ' line_editing.S#FT#T#U# #V# %W# #(X# Z# #-\#a \#]# } a #^# b# Promptsb#FId# d#2e#  -Jf# l# ' displayl#\m# Messagesm#Fnn# n#o# } np# q# u# Helpu#Fv# Showv#Fw# DCLw#F{# Choices{#F|# *# (!nd of Insert Here buffer] Insert Here#F# ###2H##(#U# '&Don't understand output file name: !AS# # #E0# # ##   #  &ML# 'h#FW#*J# `W.###LW.FOR#FW# # # EW#F#T # \ W#F#.for#.FOR#Y## # # # 2 ### (#W#!## # ##L Wget file #  ######}## # # # # (# # ' output##.## $# w# 'W#F## 9# W=# W?#G#F #  #F### 3#E# Can't create file: !AS# # E##  '#' #D# # # # #E(# ' journal## ' read_only##}## ' journal_file#Fu## ' h# =#F # ##  tpu.tjl# #L .tjl#F # # u #Fu#u#$#  #Fu# #0V# (u'Don't understand journal file name: !AS# # # u# # # )$*$+$ .$ .$FRED.$/$ 0$ 2$5?$E|A$TPU$KEY_MAP_LISTEVE$STANDARD_KEYSL recall end_of_line8  start_of_line= tab line_feed2 form_feedd return remember erase_start_of_line quote* refresh exit spaceY delete move_upq move_down move_right move_left  find insert_here remove select previous_screen next_screen exit change_directionM move_by_l inew erase_word6 change_mode keypad help j doEVE$VT100_KEYS>  set_margin_hered return show keypad help keypad help  find center_line j do print5 erase_character list_buffers  erase_start_wordwh erase_ word select append restore fill_paragraphN move_by_word  uppercase_wordM move_by_line lowercase_word insert_here rectangular_modev top two_windowsX bottom other_window remove one_window previous_screen6 change_mode next_screen change_dire ction]  erase_line\ erase_end_lineEVE$USER_KEYSTPU$KEY_MAPK 245 ]#Wunt:EVE$INIT_VARIABLESEVE$KT_VERSION*EVE$RECT_STRINGLEVE$KT_COMMENT_CHARACTERSo EVE$KT_NULL EVE$KT_SPACES EVE$KT_BLANKEVE$KT_BEYOND_EOL EVE$KT_BUFFER!EVE$KT_CURRENT_ROW BEVE$KT_FILE_NAMEh EVE$KT_FIRST EVE$KT_LASTEVE$KT_LEFT_MARGIN EVE$KT_MODE EVE$KT_NAMEEVE$KT_OFFSET_COLUMN/EVE$KT_OUTPUT_FILEWEVE$KT_RECORD_COUNT}EVE$KT_RIGHT_MARGIN EVE$KT_TYPEEVE$KT_VISIBLE_LENGTHEVE$KT_VISIBLE_TOP EVE$KT_WIDTH9 EVE$K_N O_ARGTRUEFALSEYEVE$X_HIGHLIGHTINGEVE$PATTERN_END_OF_WORDEVE$PATTERN_PARAGRAPH_BREAKEVE$PATTERN_STARTPROCEDURE*EVE$PATTERN_AFTERPROCNAMEXEVE$PATTERN_ENDPROCEDUREEVE$PATTERN_PROCNAMEEVE$PATTERN_WHITESPACEEVE$PATTERN_TRIM EVE$X_VERSION' EVE$X_NULLH  EVE$X_SPACESfEVE$X_WORD_SEPARATORSEVE$X_FILL_SEPARATORSEVE$X_WHITESPACEEVE$X_TOKEN_SEPARATORSEVE$X_SYMBOL_CHARACTERS&EVE$X_RUNOFF_CHARACTERSQEVE$X_DIGIT_CHARACTERS|EVE$X_NOT_ALPHABETICEVE$X_COMMAND_PROMPTEVE$X_EVE_COMMAND_PROMPTEVE$X_ARGUMENT_TYPE"EVE$X_COMMAND_LINE I EVE$X_DO_LINEoEVE$X_PARSED_DO_LINEEVE$X_RESTORE_TEXT EVE$X_TARGETEVE$X_START_DO_KEYEVE$X_STOP_DO_KEY$EVE$X_KEY_MAP_LISTIEVE$X_USER_KEYSoEVE$X_VT100_KEYSEVE$X_STANDARD_KEYSEVE$X_SELECT_POSITIONEVE$X_PRE_COMMAND_WINDOW EVE$X_THIS_WINDOW2 EVE$X_DCL _PROCESSW EVE$X_CHOICE_WINDOW_LENGTH| EVE$X_COMMAND_PROMPT_LENGTHORDaX aEND_ERASE_WOR~ EVE$X_DEFAULT_LEFT_MARGINEVE$X_DEFAULT_RIGHT_MARGIN1EVE$X_HOT_ZONE_SIZE_EVE$X_LARGEST_RIGHT_MARGINEVE$X_LARGEST_WIDTHEVE$X_MAX_BUFFER_NAME_LENGTHEVE$X_MAX_MARK_LENGTH EVE$X_MAX_SCROLL_OFFSET 4EVE$X_AMBIGUOUS_PARSE_EVE$X_BUFFER_OF_MARKEVE$X_COMMAND_INDEXEVE$X_COMMAND_LENGTHEVE$X_COMMAND_LINE_FLAG EVE$IN_FRED*EVE$X_IS_NUMBERIEVE$X_IS_SYMBOLlEVE$X_IS_QUOTED_STRINGEVE$X_IS_PUNCTUATIONEVE$X_NUMBER_OF_WINDOWSEVE$X_REPEAT_COUNT EVE$X_RESTORING_LINE2 EVE$SPACE_TABSZEVE$X_STARTING_UP|EVE$X_TRIMMINGEVE$ARG1_BUFFER EVE$ARG1_DCLEVE$ARG1_DEFINE_KEY EVE$ARG1_DO-EVE$ARG1_EXTEND_TPUL EVE$ARG1_FINDsEVE$ARG1_FUNCTIONEVE$ARG1_GET_FILEEVE$ARG1_GO_TO EVE$ARG1_HELPEVE$ARG1_INCLUDE_FILE! EVE$ARG1_ LINEJEVE$ARG1_IS_BLANK_LINEkEVE$ARG1_GET_NUMBER_TO_INDENT EVE$ARG1_LOOP EVE$ARG1_MARKEVE$ARG1_PROGRAMEVE$ARG1_REPEAT,EVE$ARG1_REPLACEOEVE$ARG2_REPLACEsEVE$ARG1_SAVE_EXTENDED_TPUEVE$ARG1_SET_LEFT_MARGINEVE$ARG1_SET_RIGHT_MARGINEVE$ARG1_SET_TABS_ATEVE$ARG1_SET_ TABS_EVERYFEVE$ARG1_SET_WIDTHqEVE$ARG1_SHIFT_LEFTEVE$ARG1_SHIFT_RIGHTEVE$ARG1_SORT_BUFFEREVE$ARG1_SEARCHEVE$ARG1_SUBPROGRAM1EVE$ARG2_SUBPROGRAMXEVE$ARG1_SUBROUTINE EVE$ARG1_TPUEVE$ARG1_WRITE_FILEBEVE$CURRENT_WORDB[EVE$AT_START_OF_WORD EVE$START_OF_WORD 9 EVE$END_OF_WORD}^ EVE$APPEND_LINEf3 EVE$CAPITALIZE_STRING EVE$ALPHABETICt*<*P*$ EVE$CLEANSE_STRING` EVE$LOOKUP_COMMENTEp *EVE$PROMPT_KEYf!PEVE$PROMPT_NUMBER$rEVE$PROMPT_STRINGa$EVE$SHOW_FIRST_LINEG&EVE$POSITION_IN_MIDDLE,(EVE$EXPAND_TO_CHOICES) EVE$ADD_CHOICE \*6EVE$GET_CHOICE ,XEVE$STRIP_CHOICES,zEVE$FORMAT_CHOICES2EVE$DISPLAY_CHOICESPw3EVE$LETTER_WRAPK4 EVE$TO_COLUMN6EVE$INDENT_LINE_TO3,70 EVE$TRIM_LINEg_8VEVE$TRIM_BUFFERN9wEVE$SET_STATUS_LINEJ=EVE$UPDATE_STATUS_LINES^>EVE$INSIST_Y_N:@EVE_CHANGE_DIRECTION@EVE_CHANGE_MODE A6 EVE_DELETEkDYEVE_ERASE_WORDF=JwEVE_EXIT+NEVE_FIND NEVE$FIND+YEVE_HELPa EVE$HELP_TEXTc EVE$HELP_KEYPADYg*EVE_MOVE_BY_LINEjM EVE_MOVE_DOWN)kq EVE_MOVE_LEFT&kEVE_MOVE_RIGHTl EVE_MOVE_UP&lEVE_NEXT_SCREEN) mEVE_PREVIOUS_SCREEN4mEVE$MOVE _BY_SCREEN^q> EVE_RETURN9sd EVE_SELECTt EVE_REMOVEv EVE_APPENDyEVE_INSERT_HERE&{ EVE_SPACE { EVE$FILL_LINEցEVE_TABɅ= EVE_BOTTOMXEVE_TOPXvEVE_SORT_BUFFERFUEVEPLUS$$STRING_COMPAREzEVEPLUS$$SHELL_SORTEVEPLUS$X_SHELLSTEP_0EVEPLUS$X_SHELLSTEP_1 /EVEPLUS$X_SHELLSTEP_2XEVEPLUS$X_SHELLSTEP_3EVEPLUS$X_SHELLSTEP_4EVEPLUS$X_SHELLSTEP_5EVEPLUS$X_SHELLSTEP_6EVEPLUS$X_SHELLSTEP_7%EVEPLUS$X_SHELLSTEP_8NEVEPLUS$X_SHELLSTEP_9wEVEPLUS$X_GSHELLEVEPLUS$X_SHELL_INDEXEVEPLUS_INSERT_TEXTw EVE_STRIP' EVE_SWITCH_TABS 1  EVE_UNTAB T  EVE_WHEREU q EVEPLUS_SEARCH_QUIETLYZ_ EVEPLUS_REPLACE@  EVE_DISPLAY EVE_FIX8EVE_LIST_COMMANDSEVE$SEARCH_CONTROLSyTRANSLATE_BUFFERgD EVE_PRINTEVEPLUS_FIND_BUFFER EVEPLUS_KEY EVEPLUS$XEVEPLUS$X_STRINGEVEPLU S$X_OLD_PGM13EVEPLUS_RESTORE_KEYXEVE_LIST_BUFFERSEVE_LIST_ALL_BUFFERS "BUFED_LIST_BUFFERSBUFED_X_ACTIVEQ:BUFED_REMOVE_BUFFERBUFED_DESTROY_BUFFERf:BUFED_SELECT_BUFFER GbBUFED_GET_THE_BUFFER]QEVEPLUS_SET_MODE.EVEPLUS_ADVANCE_HORIZONTAL' EVE_SEARCHEVEPLUS_SEARCH_TARGET  BUILD_PATTERN"kTPU$LOCAL_INITJBUFED_SELECT_KEY_PGMBUFED_REMOVE_KEY_PGM!EVE$ARG1_DESTROY_BUFFEREVEPLUS_V_BEGIN_SELECTEVEPLUS_RECTANGULAR2EDD_CURRENT_COLUMN/~Y$EDD_REPLACE_TABS_WITH_BLANKS_AND_PAD EVE_DRAW_BOXaEVE_RECTANGULAR_REMOVEs%EVE_RECTANGULAR_INSERT_HEREEVE_RECTA NGULAR_SELECTt0EVEPLUS_PAD_BLANKxZEVE_RECTANGULAR_MODEk THIS_POSITION8EVEPLUS_BLANK_CHARSrPEVE_CENTER_LINE EVE_END_OF_LINE EVE_ERASE_CHARACTERz5EVE_ERASE_END_LINE \EVE_ERASE_PREVIOUS_WORDEVE_ERASE_START_OF_LINEHEVE_FILL_PARAGRAPH+EVE$PARAGRAPH_BREAKA EVE_FORWARDA % EVE_REVERSEH.D EVE_GO_TOAv cEVE_INSERT_MODEA EVE_OVERSTRIKE_MODE EVE_LINE#EVE_LOWERCASE_WORD$EVE_UPPERCASE_WORDz% EVE_MARKY'2EVE_MOVE_BY_WORDy(NEVE_QUITV)r EVE_QUOTEj* EVE_REPLACE& 2 EVE_RESTOREj/3EVE_SET_LEFT_MARGIN=5EVE_SET_RIGHT_MARGIN7 E VE_START_OF_LINE$98 EVE_ERASE_LINE':] EVE_ERASE_START_WORD[7? EVE_ADAM D EVE_FREDHAVE_AUTHOR_INFOΜ AUTHOR_FILE AUTHOR_BUFFERK  EVE_NOT_ADAMLDEVE$GET_NUMBER_TO_INDENTq Md EVE_IF_THENP EVE_COMMON0oREVE_OPENUEVE_LOOPkZEVE$SUBPROGRAM_EVE_S UBROUTINE_' EVE_FUNCTION`I EVE_PROGRAMxaiEVE$IS_BLANK_LINE c EVE$PROLOGUEmEVE$CHECK_BAD_WINDOW"n EVE_BUFFER# t EVE_GET_FILE>~EVE$IS_WILDCARD=3EVE$CREATE_BUFFERWNVEVE_INCLUDE_FILEO{EVE_ONE_WINDOWEVE_OTHER_WINDOWEVE_TWO_WINDOWS;EVE_WRITE_FILE)ˍ EV E_REFRESH*EVE_SET_TABS_ATIEVE_SET_TABS_EVERYWl EVE_SET_WIDTHkEVE_SHIFT_LEFT EVE_SHIFT_RIGHTEVE_SHOWOEVE$SHOW_BUFFER_INFOԨ EVE_ATTACH}<EVE_DCLbZEVE_DEFINE_KEYz uEVE_EXTEND_TPU EVE_LEARNi EVE_REMEMBER EVE_REPEAT|&EVE_SAVE_EXTENDED_TPUK EVE$GET_SHIFT_KEY= EVE_SPAWNbEVE_TPUMEVE$ENTER_COMMAND_WINDOW1EVE$EXIT_COMMAND_WINDOWxEVE$PROCESS_COMMAND9xEVE_LF9EVE_FF2 EVE_RECALLLEVE_DOjEVE$INDEX_OVER_WHITESPACE? EVE$GET_TOKENEVE$X_PUNCTUATION EVE$COMPLETEXEVE$DOUBLE_QUOTESu EVE$ADD_FINAL_STRINGb< EVE$PARSE"dEVE$STANDARD_KEYS8EVE$INIT_BUFFERTPU$INIT_PROCEDURELEVE$INIT_WINDOWS SCREEN_LENGTHEVE$MAIN_WINDOW_LENGTH4EVE$BOTTOM_WINDOW_LENGTH^EVE$TOP_WINDOW_LENGTHEVE$MAIN_WINDOWEVE$TOP_WINDOWEVE$BOTTOM_WINDOW INFO_WINDOW EVE$CHOICE_WINDOW< EVE$COMMAND_WINDOWa EVE$PROMPT_WINDOWMESSAGE_WINDOW;2 EVE$INIT_BUFFERSND_RANGEN  MAIN_BUFFER EVE$COMMAND_BUFFER#EVE$PROMPT_BUFFERMESSAGE_BUFFER  HELP_BUFFER SHOW_BUFFERIEVE$DCL_BUFFEREVE$CHOICE_BUFFER PASTE_BUFF ERZmEVE$INIT_FILES  INPUT_FILE JOURNAL_FILE5EVE$INIT_PROCEDURECHARTIONT THIS_POSITIONTJTJJU:UJVW FIND_REPLYX READ_LINEXFAOX9#Found in !AS direction. Go there? YOTHER_DIRECTION_STRINGYxKY8KHKxKY KKYKK^ FIND_REPLY^K ^ EVE$KT_NULL^L^KL^$L_CHANGE_DIRECTION_KEY_EVE$LOOKUP_COMMENT_LAST_KEY_L_`LL_@LL`CHANGE_DIRECTION_KEY`L`9return`LLaCHANGE_DIRECTION_KEYaMa9doaM