$ od -c -N 50000 [eris]<Lisp>JCAI>library>TEXEC.TEDIT!1
0000000    T   E   X   E   C  \r   (   T   e   d   i   t       E   x   e
0000020    c   u   t   i   v   e   )  \r   W   r   i   t   t   e   n    
0000040    b   y       J   i   m       B   l   u   m  \r   7   /   2   6
0000060    /   8   5  \r  \r   F   i   l   e   s   :       T   E   X   E
0000100    C   ,       T   E   X   E   C   .   D   C   O   M   ,       &
0000120        T   E   X   E   C   .   T   E   D   I   T       l   o   c
0000140    a   t   e   d       i   n       {   E   R   I   S   }   <   L
0000160    I   S   P   C   O   R   E   >   L   I   B   R   A   R   Y   >
0000200   \r  \r   T   E   X   E   C       i   s       a       r   e   p
0000220    l   a   c   e   m   e   n   t       f   o   r       t   h   e
0000240        I   n   t   e   r   s   c   r   i   p   t       E   x   e
0000260    c   u   t   i   v   e       f   o   r       t   h   o   s   e
0000300        u   s   e   r   s       w   h   o       r   u   n       w
0000320    i   t   h       T   e   d   i   t       l   o   a   d   e   d
0000340    .           I   t       h   a   s       a   l   l       o   f
0000360        t   h   e       f   u   n   c   t   i   o   n   a   l   i
0000400    t   y       o   f       t   h   e       o   l   d       E   x
0000420    e   c       (   i   n   c   l   u   d   i   n   g       h   i
0000440    s   t   o   r   y       s   t   u   f   f   ,       ?   =   ,
0000460        D   W   I   M   ,       P   r   o   g   r   a   m   m   e
0000500    r   s       A   s   s   i   s   t   a   n   t   ,       e   d
0000520    i   t   i   n   g       o   f       t   h   e       c   u   r
0000540    r   e   n   t       i   n   p   u   t       f   o   r   m   ,
0000560        p   a   r   e   n       m   a   t   c   h   i   n   g   /
0000600    b   l   i   n   k   i   n   g   ,       e   t   c   )       p
0000620    l   u   s       t   h   e       a   b   i   l   i   t   y    
0000640    t   o       s   c   r   o   l   l       a   n   y   w   h   e
0000660    r   e       i   n       t   h   e       o   u   t   p   u   t
0000700        f   o   r       v   i   e   w   i   n   g       a   n   d
0000720    /   o   r       s   h   i   f   t       s   e   l   e   c   t
0000740    i   n   g       (   c   o   p   y   i   n   g   )       a   n
0000760    y       s   e   l   e   c   t   e   d       t   e   x   t    
0001000    t   o       t   h   e       c   u   r   r   e   n   t       c
0001020    a   r   e   t       p   o   s   i   t   i   o   n       (   c
0001040    u   r   r   e   n   t       k   e   y   b   o   a   r   d    
0001060    i   n   p   u   t       p   r   o   c   e   s   s   )   .    
0001100    I   f       i   t   s       o   w   n       w   i   n   d   o
0001120    w       i   s       t   h   e       c   u   r   r   e   n   t
0001140        k   e   y   b   o   a   r   d       i   n   p   u   t    
0001160    p   r   o   c   e   s   s   ,       t   h   e   n       t   h
0001200    e       c   o   p   y   i   e   d       t   e   x   t       w
0001220    i   l   l       b   e       p   l   a   c   e   d       a   t
0001240        t   h   e       e   n   d       o   f       t   h   e    
0001260    o   u   t   p   u   t   .       A   n   y       o   u   t   p
0001300    u   t       t   o       t   h   e       T   E   X   E   C    
0001320    w   i   n   d   o   w       s   u   c   h       a   s       f
0001340    r   o   m       ^   T       o   r       ?   =       i   s    
0001360    s   h   o   v   e   d       i   n       f   r   o   n   t    
0001400    o   f       t   h   e       c   u   r   r   e   n   t       i
0001420    n   p   u   t       b   e   i   n   g       t   y   p   e   d
0001440        i   n       s   o       t   h   a   t       i   t       d
0001460    o   e   s   n   '   t       g   e   t       j   a   m   m   e
0001500    d       i   n       t   h   e       m   i   d   d   l   e    
0001520    o   f       t   h   e       c   u   r   r   e   n   t       f
0001540    o   r   m       b   e   i   n   g       t   y   p   e   d    
0001560    i   n       o   r       e   d   i   t   e   d   .  \r  \r   T
0001600    E   X   E   C       i   s       i   n   v   o   k   e   d    
0001620    f   r   o   m       t   h   e       r   i   g   h   t       b
0001640    u   t   t   o   n       b   a   c   k   g   r   o   u   n   d
0001660        m   e   n   u   ,       a   n   d       m   u   l   t   i
0001700    p   l   e       i   n   s   t   a   n   c   e   s       (   p
0001720    r   o   c   e   s   s   e   s       a   n   d       w   i   n
0001740    d   o   w   s   )       o   f       i   t       m   a   y    
0001760    b   e       r   u   n       c   o   n   c   u   r   r   e   n
0002000    t   l   y   .       T   E   X   E   C       m   a   y       a
0002020    l   s   o       b   e       i   n   v   o   k   e   d       b
0002040    y       e   n   t   e   r   i   n   g       (   T   E   X   E
0002060    C       p   r   o   m   p   t   )   .       I   f       p   r
0002100    o   m   p   t       i   s       n   o   t       e   n   t   e
0002120    r   e   d   ,       t   h   e   n       a       #       i   s
0002140        u   s   e   d       a   s       t   h   e       p   r   o
0002160    m   p   t   .       I   n       o   r   d   e   r       t   o
0002200        b   e       a   b   l   e       t   o       t   a   k   e
0002220        a   d   v   a   n   t   a   g   e       o   f       T   E
0002240    d   i   t   '   s       s   h   i   f   t       s   e   l   e
0002260    c   t   i   n   g       a   n       e   n   t   i   r   e    
0002300    l   i   n   e       b   y       p   u   t   t   i   n   g    
0002320    t   h   e       c   u   r   s   o   r       i   n       t   h
0002340    e       l   e   f   t       m   a   r   g   i   n   ,       y
0002360    o   u       c   a   n       u   s   e       a       r   e   t
0002400    u   r   n   /   l   i   n   e   f   e   e   d       a   s    
0002420    t   h   e       p   r   o   m   p   t   ,       a   n   d    
0002440    t   h   e       p   r   o   m   p   t       w   i   l   l    
0002460    b   e       o   n       a       d   i   f   f   e   r   e   n
0002500    t       l   i   n   e       f   r   o   m       t   h   e    
0002520    t   y   p   e   i   n   .       I   E   ,       (   T   E   X
0002540    E   C       "   <   C   R   >   <   L   F   >   "   )   .  \r
0002560   \r   O   n   c   e       t   h   e       t   e   x   t       i
0002600    s       r   e   t   u   r   n   e   d       t   o       i   t
0002620    s       c   a   l   l   e   r       (   R   E   A   D   ,    
0002640    R   E   A   D   C   ,       R   A   T   O   M   /   R   S   T
0002660    R   I   N   G   ,       e   t   c   )       i   t       i   s
0002700        c   o   n   s   i   d   e   r   e   d       o   u   t   p
0002720    u   t   .       I   n       o   r   d   e   r       t   o    
0002740    r   e   h   a   v   e       i   t       b   e   c   o   m   e
0002760        i   n   p   u   t   ,       i   t       m   u   s   t    
0003000    b   e       c   o   p   i   e   d       (   s   h   f   i   t
0003020        s   e   l   e   c   t   e   d   )   .       I   t   ,    
0003040    h   o   w   e   v   e   r       m   a   y       b   e       e
0003060    d   i   t   e   d       f   i   r   s   t       a   n   d    
0003100    t   h   e   n       c   o   p   i   e   d       i   f       s
0003120    o       d   e   s   i   r   e   d   .       I   n       a   d
0003140    d   i   t   i   o   n   ,       t   h   e       c   u   r   r
0003160    e   n   t       f   o   r   m       (   w   h   e   r   e    
0003200    f   o   r   m       i   s       t   h   e       c   u   r   r
0003220    e   n   t       t   y   p   e   i   n       b   e   i   n   g
0003240        e   n   t   e   r   e   d       a   t       t   h   e    
0003260    e   n   d       o   f       t   h   e       o   u   t   p   u
0003300    t   ,       a   n   d       m   a   y       h   a   v   e    
0003320    m   u   l   t   i   p   l   e       l   i   n   e   s   )    
0003340    m   a   y       b   e       e   d   i   t   e   d       u   s
0003360    i   n   g       t   h   e       T   e   d   i   t       e   d
0003400    i   t   i   n   g       c   o   m   m   a   n   d   s   ,    
0003420    a   n   d       m   a   y       b   e       e   d   i   t   e
0003440    d       u   n   t   i   l       a       f   i   n   a   l    
0003460    m   a   t   c   h   i   n   g       r   i   g   h   t       p
0003500    a   r   e   n   /   b   r   a   c   k   e   t       o   r    
0003520    c   a   r   r   i   a   g   e       r   e   t   u   r   n    
0003540    i   s       e   n   t   e   r   e   d       i   n       t   h
0003560    e       c   a   s   e       o   f       R   E   A   D       b
0003600    e   i   n   g       t   h   e       c   a   l   l   e   r   ,
0003620        o   r       a       s   i   n   g   l   e       c   h   a
0003640    r   a   c   t   e   r       i   n       t   h   e       c   a
0003660    s   e       o   f       R   E   A   D   C   ,       e   t   c
0003700    .       T   h   e       f   o   r   m       i   s       t   h
0003720    e   n       r   e   t   u   r   n   e   d       t   o       i
0003740    t   s       c   a   l   l   e   r       a   n   d       i   s
0003760        c   o   n   s   i   d   e   r   e   d       o   u   t   p
0004000    u   t       a   t       t   h   a   t       p   o   i   n   t
0004020    .       A   f   t   e   r       u   s   i   n   g       i   t
0004040        f   o   r       a       f   e   w       m   i   n   u   t
0004060    e   s       i   t       w   i   l   l       b   e   c   o   m
0004100    e       i   n   t   u   i   t   i   v   e   l   y       o   b
0004120    v   i   o   u   s       h   o   w       i   t       w   o   r
0004140    k   s   .  \r  \r   E   c   h   o       o   f   f       i   s
0004160        a   c   c   o   m   p   l   i   s   h   e   d       t   h
0004200    r   o   u   g   h       t   h   e       u   s   e       o   f
0004220        i   n   v   i   s   i   b   l   e       c   h   a   r   a
0004240    c   t   e   r   s       i   n       T   e   d   i   t   .    
0004260    H   o   w   e   v   e   r   ,       t   h   e   y       r   e
0004300    m   a   i   n           i   n       t   h   e       o   u   t
0004320    p   u   t   ,       a   n   d       i   f       y   o   u    
0004340    s   h   i   f   t       s   e   l   e   c   t       t   h   e
0004360    m   ,       y   o   u       w   i   l   l       g   e   t    
0004400    t   h   e   m       i   n       t   h   e       i   n   p   u
0004420    t       e   v   e   n       t   h   o   u   g   h       t   h
0004440    e   y       a   r   e       i   n   v   i   s   i   b   l   e
0004460    .  \r  \r   K   n   o   w   n       d   e   f   i   c   i   e
0004500    n   c   i   e   s       a   n   d       b   u   g   s   :  \r
0004520   \r   C   u   r   r   e   n   t   l   y       t   h   e   r   e
0004540        i   s       n   o       l   i   m   i   t       t   o    
0004560    t   h   e       a   m   o   u   n   t       o   f       o   u
0004600    t   p   u   t   ,       s   o       p   e   r   i   o   d   i
0004620    c   a   l   l   y       y   o   u       s   h   o   u   l   d
0004640        c   l   o   s   e       t   h   e       c   u   r   r   e
0004660    n   t       w   i   n   d   o   w       a   n   d       s   t
0004700    a   r   t       a       n   e   w       o   n   e       t   o
0004720        g   a   r   b   a   g   e       c   o   l   l   e   c   t
0004740        o   l   d       o   u   t   p   u   t   .       E   S   C
0004760        k   e   y       r   e   c   o   g   n   i   t   i   o   n
0005000        i   s       n   o   t       i   m   p   l   e   m   e   n
0005020    t   e   d       y   e   t   .       ^   X       i   s       n
0005040    o   t       i   m   p   l   e   m   e   n   t   e   d       y
0005060    e   t   .       T   h   e   r   e       i   s       n   o    
0005100    ^   R       (   r   e   t   y   p   e       i   n   p   u   t
0005120    )       s   i   n   c   e       y   o   u       c   a   n    
0005140    a   l   w   a   y   s       s   c   r   o   l   l       t   o
0005160        s   e   e       i   t   .       T   h   e   r   e       a
0005200    r   e       s   o   m   e       p   r   o   b   l   e   m   s
0005220        w   i   t   h       t   h   e       C   A   R   E   T    
0005240    f   l   a   s   h   i   n   g       a   t       t   h   e    
0005260    w   r   o   n   g       p   l   a   c   e   ,       b   u   t
0005300        k   e   y   s   t   r   o   k   e   s       a   r   e    
0005320    e   n   t   e   r   e   d       a   t       t   h   e       r
0005340    i   g   h   t       p   l   a   c   e   .       U   p   p   e
0005360    r   /   l   o   w   e   r       R   A   I   S   E       i   s
0005400        n   o   t       i   m   p   l   e   m   e   n   t   e   d
0005420    .       D   S   P       d   r   a   w   i   n   g       c   o
0005440    m   m   a   n   d   s       d   o       n   o   t       w   o
0005460    r   k   .       T   h   e   r   e       m   a   y       b   e
0005500        u   l   t   i   m   a   t   e   l   y       r   e   p   l
0005520    a   c   e   d       w   i   t   h       d   r   a   w   i   n
0005540    g       c   o   m   m   a   n   d   s       w   h   i   c   h
0005560        m   a   y       b   e       e   d   i   t   a   b   l   e
0005600        a   n   d       b   e   c   o   m   e       p   a   r   t
0005620        o   f       t   h   e       s   a   v   e   d       o   u
0005640    t   p   u   t   .       O   c   c   a   s   i   o   n   l   y
0005660        t   h   e       w   i   n   d   o   w       w   i   l   l
0005700        s   c   r   o   l   l       t   h   e       l   a   s   t
0005720        l   i   n   e       t   o       t   h   e       v   e   r
0005740    y       t   o   p       o   f       t   h   e       w   i   n
0005760    d   o   w   .       A   l   t   h   o   u   g   h       e   c
0006000    h   o   i   n   g       w   o   r   k   s       c   o   r   r
0006020    e   c   t   l   y       w   i   t   h       A   S   K   U   S
0006040    E   R       (   e   c   h   o   i   n   g       o   f   f   )
0006060    ,       t   h   e       c   u   r   r   e   n   t       f   o
0006100    n   t       g   e   t   s       c   h   a   n   g   e   d    
0006120    s   o   m   e   t   i   m   e   s       a   f   t   e   r    
0006140    i   n   p   u   t       i   s       e   n   t   e   r   e   d
0006160    .       E   x   c   e   p   t       f   o   r       R   A   I
0006200    S   E   ,       ^   R   ,       a   n   d       D   S   P    
0006220    d   r   a   w   i   n   g       c   o   m   m   a   n   d   s
0006240    ,       t   h   e       a   b   o   v   e       i   t   e   m
0006260    s       w   i   l   l       b   e       f   i   x   e   d    
0006300    f   o   r       t   h   e       n   e   x   t       r   e   l
0006320    e   a   s   e   .  \r  \r   I   M   P   O   R   T   A   N   T
0006340    :       Y   o   u       m   u   s   t       b   e       u   s
0006360    i   n   g       a       L   I   S   P   C   O   R   E       S
0006400    Y   S   O   U   T       d   a   t   e   d       2   3   -   J
0006420    u   l   y   -   8   5       o   r       l   a   t   e   r   !
0006440   \r  \r  \r  \r  \0  \0  \0  \0  \0 005  \0 002  \0   &  \0  \0
0006460   \0  \0  \0  \0  \0  \0  \0  \0  \0  \0 002 003  \0  \0  \0  \0
0006500   \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0
0006520   \0  \0  \0   &  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0
0006540  002 001  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0
0006560   \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0 004  \0 002
0006600   \0 027  \0  \t   H   E   L   V   E   T   I   C   A  \0 016  \0
0006620   \0  \0  \0  \0  \0  \0 200  \0   C  \0   5   (   T   E   X   T
0006640    F   O   N   T       5       (   H   E   L   V   E   T   I   C
0006660    A       1   4   )       (   C   L   A   S   S   I   C       1
0006700    0   )       (   C   L   A   S   S   I   C       1   0   )   )
0006720   \0 016  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0  \0 002
0006740   \0 001  \0  \0  \0 006  \0  \0  \0  \0 002  \0  \0  \0  \0  \0
0006760  002  \0 001  \0  \0  \0 022  \0  \0  \0  \0 002  \0  \0  \0  \0
0007000   \0 002  \0 001  \0  \0  \0 024  \0  \0  \0  \0 002  \0  \0  \0
0007020   \0  \0 002  \0 001  \0  \0  \0  \b  \0  \0  \0  \0 002  \0  \0
0007040   \0  \0  \0 002  \0 001  \0  \0  \0 001  \0  \0  \0  \0 002  \0
0007060   \0  \0  \0  \0 002  \0 002  \0  \0  \0   L  \0  \0  \0  \0 001
0007100   \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0 001  \0  \0  \0  \0
0007120  002  \0  \0  \0  \0  \0 002  \0 002  \0  \0 002 374  \0  \0  \0
0007140   \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0 001  \0  \0
0007160   \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0 001 361  \0
0007200   \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0 001
0007220   \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0 002
0007240  363  \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0
0007260   \0 001  \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0
0007300   \0  \0 315  \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002
0007320   \0  \0  \0 001  \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0
0007340  002  \0  \0  \0 034  \0  \0  \0  \0 001  \0  \0  \0 001  \0  \0
0007360   \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0 001  \0
0007400   \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0 003 205
0007420   \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0
0007440  001  \0  \0  \0  \0 002  \0  \0  \0  \0  \0 002  \0 002  \0  \0
0007460   \0  \t  \0  \0  \0  \0 001  \0  \0  \0   A  \0  \0  \0  \0 002
0007500   \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0 001  \0  \0  \0  \0
0007520  002  \0  \0  \0  \0  \0 002  \0 002  \0  \0  \0 001  \0  \0  \0
0007540   \0 002  \0  \0  \0  \0  \0 002  \0 001  \0  \0  \0 001  \0  \0
0007560   \0  \0 002  \0  \0  \r   $  \0   0   z 272                    
0007573