$ od -c -N 50000 [phylum]<LISPUSERS>koto>chatemacs.elc!1
0000000 \n ( d e f c o n s t s h i f t
0000020 1 ) \n \n ( d e f c o n s t c
0000040 o n t r o l 2 ) \n \n ( d e f c
0000060 o n s t s h i f t - c o n t r
0000100 o l 3 ) \n \n ( d e f c o n s t
0000120 m e t a 4 ) \n \n ( d e f c o
0000140 n s t l e f t 4 ) \n \n ( d e
0000160 f c o n s t m i d d l e 1 )
0000200 \n \n ( d e f c o n s t r i g h
0000220 t 2 ) \n \n ( d e f v a r i l
0000240 - m o u s e - k i l l - e m a c
0000260 s ( s y m b o l - f u n c t i
0000300 o n ( q u o t e k i l l - e
0000320 m a c s ) ) ) \n \n ( d e f v a r
0000340 i l - m o u s e - s u s p e n
0000360 d - e m a c s ( s y m b o l -
0000400 f u n c t i o n ( q u o t e
0000420 s u s p e n d - e m a c s ) ) )
0000440 \n \n ( d e f v a r i l - m o u
0000460 s e - f a s t - s e l e c t - w
0000500 i n d o w t " * N o n - n i
0000520 l f o r m o u s e h i t s
0000540 t o s e l e c t n e w w
0000560 i n d o w , t h e n e x e c
0000600 u t e ; e l s e j u s t s
0000620 e l e c t . " ) \n \n ( d e f v a
0000640 r s c r o l l b a r - e n a b
0000660 l e d t " N o n - n i l t
0000700 o u s e l a s t c o l u m
0000720 n a s s c r o l l b a r " )
0000740 \n \n ( d e f v a r a u t o - s
0000760 w i t c h - e n a b l e d n i
0001000 l " N o n - n i l t o s e
0001020 n d i n i t s t r i n g t
0001040 o t e r m i n a l " ) \n \n ( d
0001060 e f u n i l - m o u s e - r e
0001100 p o r t n i l " \ \n R e a d
0001120 a n d p a r s e I n t e r
0001140 l i s p C h a t E m a c s m
0001160 o u s e r e p o r t , a n d
0001200 d o w h a t i t a s k s
0001220 . \n \n L - - m o v e p o i n
0001240 t * | -
0001260 - - - T h e s e a p p l y
0001300 f o r m o u s e c l i c k
0001320 i n a w i n d o w . \n - - R
0001340 s e t m a r k
0001360 * | I f i l -
0001400 m o u s e - f a s t - s e l e c
0001420 t - w i n d o w i s n i l ,
0001440 \n - C - d e p e n d s o n
0001460 s h i f t * | j u
0001500 s t s e l e c t s t h a t
0001520 w i n d o w . \n \n m i d d l e -
0001540 b u t t o n a c t i o n s : \n
0001560 s h i f t : y a n k r
0001600 e g i o n t o p o i n t \n
0001620 c o n t r o l : k i l l
0001640 r e g i o n \n s h i f t -
0001660 c o n t r o l : c o p y r e
0001700 g i o n t o k i l l b u f f
0001720 e r \n \n o n m o d e l i n e \t
0001740 \t o n \ " s c r o l l
0001760 b a r \ " \t i n m i n i b u
0002000 f f e r \n L - - s c r o l l -
0002020 u p \t \t l i n e t o
0002040 t o p \t \t e x e c u t e - e x t
0002060 e n d e d - c o m m a n d \n - -
0002100 R s c r o l l - d o w n \t \t
0002120 l i n e t o b o t t o
0002140 m \t e v a l - e x p r e s s i o
0002160 n \n - C - p r o p o r t i o n
0002200 a l g o t o - c h a r p r
0002220 o p o r t i o n a l \t s u s p e
0002240 n d - e m a c s \n \n M e t a - m
0002260 o u s e - b u t t o n a c t i
0002300 o n s a r e s a m e a s
0002320 s c r o l l b a r . " ( i n t
0002340 e r a c t i v e ) ( b y t e -
0002360 c o d e " 322 210 323 S 324 325 ! ^ 030
0002400 326 S 324 325 ! ^ 031 324 325 ! 032 324 325 ! 033
0002420 327 \b \t \ " 034 330 \f ! 035 331 036 006 \t 326
0002440 S = 036 \a 016 \a ? 205 8 \0 \f 016 006 = 036
0002460 \b \t 332 \r 8 S = 036 \t \b 333 \r 8 S Y 036
0002500 \n \b 334 \r 8 Z 211 020 210 \t 335 \r 8 Z 211 021
0002520 210 016 \t 203 234 \0 336 \f ! 210 \n 016 \v U 203 o
0002540 \0 337 202 224 \0 \n 016 \f U 203 { \0 340 202
0002560 224 \0 \n 016 \r U 205 224 \0 341 \b 342 d e Z 343
0002600 S \ " \ " b 210 344 210 345 210 336 016
0002620 006 ! 202 C 001 016 016 205 243 \0 016 \n 206 252 \0 \v
0002640 016 017 = 203 354 \0 336 \f ! 210 \n 016 \v U 203 276
0002660 \0 337 \t ! 202 344 \0 \n 016 \f U 203 313 \0 340 \t
0002700 ! 202 344 \0 \n 016 \r U 205 344 \0 341 \t 342 d e
0002720 Z 346 S \ " \ " b 210 344 210 345 210
0002740 336 016 006 ! 202 C 001 016 \b 203 372 \0 347 \b \t \n
0002760 \v $ 202 C 001 016 \a 203 % 001 \n 016 \r U 203 \f
0003000 001 350 351 ! 202 \ " 001 \n 016 \v U 203 031 001 350
0003020 352 ! 202 \ " 001 \n 016 \f U 205 \ " 001 353
0003040 202 C 001 016 020 205 C 001 336 \f ! 210 016 021 ? 203
0003060 8 001 322 202 C 001 016 020 205 C 001 347 \b \t \n \v
0003100 $ . \v 207 " [ x y b u t t o
0003120 n s b u c k y - b i t s w i
0003140 n d o w e d g e s o l d - w
0003160 i n d o w i n - m i n i b u f
0003200 - p s a m e - w i n d o w - p
0003220 i n - m o d e l i n e - p i
0003240 n - s c r o l l b a r - p l e
0003260 f t r i g h t m i d d l e
0003300 s c r o l l b a r - e n a b l e
0003320 d m e t a t i l - m o u s
0003340 e - f a s t - s e l e c t - w i
0003360 n d o w n i l s c r e e n -
0003400 w i d t h i l - g e t - t t y
0003420 - n u m 5 9 s c r e e n - h
0003440 e i g h t i l - p o s - t o -
0003460 w i n d o w w i n d o w - e d
0003500 g e s s e l e c t e d - w i n
0003520 d o w 3 2 0 1 s e l e
0003540 c t - w i n d o w s c r o l l
0003560 - u p s c r o l l - d o w n
0003600 * / w i n d o w - w i d t h
0003620 b e g i n n i n g - o f - l i
0003640 n e w h a t - c u r s o r - p
0003660 o s i t i o n w i n d o w - h
0003700 e i g h t i l - b u t t o n -
0003720 c o m m a n d c a l l - i n t
0003740 e r a c t i v e l y e v a l -
0003760 e x p r e s s i o n e x e c u
0004000 t e - e x t e n d e d - c o m m
0004020 a n d s u s p e n d - e m a c
0004040 s ] 3 8 ) ) \n \n ( d e f u n
0004060 i l - b u t t o n - c o m m a n
0004100 d ( x y b u t t o n s b
0004120 u c k y - b i t s ) ( b y t e
0004140 - c o d e " \b \t U 203 ^ \0 \n 312 =
0004160 203 023 \0 313 \v \f \ " 202 [ \0 \n \r = 203 (
0004200 \0 314 210 313 \v \f \ " 210 315 a ` \ " 202
0004220 [ \0 \n 016 006 = 203 C \0 316 a ` \ " 210 313
0004240 \v \f \ " 210 317 211 026 \a 210 317 202 [ \0 \n
0004260 016 \b = 205 [ \0 315 a ` \ " 210 313 \v \f \
0004300 " 210 317 211 026 \a 210 317 202 200 \0 \b 016 \t U
0004320 205 200 \0 314 210 313 \v \f \ " 210 \n \r = 203
0004340 z \0 315 a ` \ " 202 200 \0 320 321 ! 210 322
0004360 207 " [ b u t t o n s l e f t
0004400 b u c k y - b i t s x y
0004420 c o n t r o l s h i f t t h
0004440 i s - c o m m a n d s h i f t
0004460 - c o n t r o l r i g h t 0
0004500 i l - m o v e - p o i n t - t
0004520 o - x - y p u s h - m a r k
0004540 k i l l - r e g i o n c o p y
0004560 - r e g i o n - a s - k i l l
0004600 y a n k s i t - f o r 1 e
0004620 x c h a n g e - p o i n t - a n
0004640 d - m a r k ] 1 6 ) ) \n \n ( d
0004660 e f u n i l - g e t - t t y -
0004700 n u m ( t e r m - c h a r )
0004720 " \ \n R e a d f r o m t e r
0004740 m i n a l u n t i l T E R M
0004760 - C H A R i s r e a d , a
0005000 n d r e t u r n i n t e r v
0005020 e n i n g n u m b e r . \n U p
0005040 o n n o n - n u m e r i c n
0005060 o t m a t c h i n g T E R M
0005100 - C H A R , s i g n a l a n
0005120 e r r o r . " ( b y t e - c
0005140 o d e " 303 r 304 Z 031 030 \t 303 Y 205 017
0005160 \0 \t 305 X 205 $ \0 306 \b 307 \ " \t \ \ 211
0005200 020 210 r 304 Z 211 021 210 202 006 \0 210 \n \t 304 \
0005220 \ = 206 0 \0 310 311 ! 210 \b * 207 " [ n
0005240 u m c h a r t e r m - c h a
0005260 r 0 4 8 9 * 1 0 e r
0005300 r o r " I n v a l i d d a t
0005320 a f o r m a t i n m o u s
0005340 e c o m m a n d " ] 4 ) ) \n
0005360 \n ( d e f u n i l - m o v e -
0005400 p o i n t - t o - x - y ( x
0005420 y ) " \ \n P o s i t i o n c
0005440 u r s o r i n w i n d o w
0005460 c o o r d i n a t e s . \n X a
0005500 n d Y a r e 0 - b a s e d
0005520 c h a r a c t e r p o s i t
0005540 i o n s i n t h e w i n d
0005560 o w . " ( b y t e - c o d e
0005600 " 302 \b ! 210 303 \t ! 207 " [ y x
0005620 m o v e - t o - w i n d o w - l
0005640 i n e m o v e - t o - c o l u
0005660 m n ] 3 ) ) \n \n ( d e f u n
0005700 i l - p o s - t o - w i n d o w
0005720 ( x y ) " \ \n F i n d w
0005740 i n d o w c o r r e s p o n d
0005760 i n g t o s c r e e n c o
0006000 o r d i n a t e s . \n X a n d
0006020 Y a r e 0 - b a s e d c
0006040 h a r a c t e r p o s i t i o
0006060 n s o n t h e s c r e e n
0006100 . " ( b y t e - c o d e " 305
0006120 \n 031 030 \t 306 = ? 205 * \0 \v 307 \b 8
0006140 W 206 * \0 \v 310 \b 8 Y 206 * \0 \f 311 \b 8
0006160 W 206 * \0 \f 312 \b 8 Y 205 < \0 313 \t ! 211
0006200 021 210 305 \t ! 211 020 210 202 005 \0 210 \t 206 C \0
0006220 306 * 207 " [ e d g e s w i n
0006240 d o w n i l y x w i n d
0006260 o w - e d g e s s e l e c t e
0006300 d - w i n d o w 1 3 0 2
0006320 n e x t - w i n d o w ] 7 )
0006340 ) \n \n ( g l o b a l - s e t - k
0006360 e y " 034 " ( q u o t e i l
0006400 - m o u s e - r e p o r t ) ) \n
0006420 \n ( i f a u t o - s w i t c h
0006440 - e n a b l e d ( p r o g n
0006460 ( s e n d - s t r i n g - t o -
0006500 t e r m i n a l " 033 033 " ) (
0006520 d e f u n k i l l - e m a c s
0006540 n i l ( i n t e r a c t i v
0006560 e ) ( s e n d - s t r i n g -
0006600 t o - t e r m i n a l " 033 033 "
0006620 ) ( f u n c a l l i l - m o
0006640 u s e - k i l l - e m a c s ) )
0006660 ( d e f u n s u s p e n d -
0006700 e m a c s n i l ( i n t e r
0006720 a c t i v e ) ( s e n d - s t
0006740 r i n g - t o - t e r m i n a l
0006760 " 033 033 " ) ( f u n c a l l
0007000 i l - m o u s e - s u s p e n d
0007020 - e m a c s ) ) ) ) \n
0007033