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