$ od -c -N 50000 [eris]<Lisp>KOTO>Library>RS232CHAT.DCOM!2 0000000 ( F I L E C R E A T E D " 8 0000020 - S e p - 8 5 1 8 : 1 7 : 2 0 0000040 " ( " c o m p i l e d o n 0000060 " { E R I S } < L I S P C O R 0000100 E > L I B R A R Y > R S 2 3 2 C 0000120 H A T . ; 1 7 ) \r " 6 - S e 0000140 p - 8 5 1 9 : 0 9 : 4 6 " r 0000160 e c o m p i l e d c h a n g e 0000200 s : n o t h i n g i n " I 0000220 N T E R L I S P - D 6 - S e 0000240 p - 8 5 . . . " d a t e d 0000260 \r " 6 - S e p - 8 5 1 9 : 2 0000300 2 : 3 8 " ) \r ( F I L E C R E A 0000320 T E D " 8 - S e p - 8 5 1 0000340 8 : 1 7 : 1 0 " { E R I S } < 0000360 L I S P C O R E > L I B R A R Y 0000400 > R S 2 3 2 C H A T . ; 1 7 3 0000420 3 6 9 c h a n g e s t o : 0000440 ( V A R S \r R S 2 3 2 C H A T 0000460 C O M S ) p r e v i o u s d 0000500 a t e : " 3 1 - A u g - 8 5 0000520 1 8 : 2 1 : 4 6 " { E R I S } 0000540 < L I S P C O R E > L I B R A R 0000560 Y > R S 2 3 2 C H A T . ; 1 6 ) 0000600 \r R S 2 3 2 C H A T . H O S T . 0000620 F I L T E R D 1 \r ( I 0 N 0000640 A M E ) \0 3 \0 \0 \0 001 @ \t \0 \0 d 0000660 g \0 \0 360 253 d g \0 \0 360 245 d g \0 \0 360 0000700 222 277 i 201 277 h 264 026 ` \0 \0 246 ` \0 \0 \t 0000720 \0 \0 277 g \0 \0 g \0 \0 h 032 032 020 \0 ( 4 0000740 6 Q R S 2 3 2 C . I N I T 3 0000760 U - C A S E ) \r ( 5 5 Q R S 0001000 2 3 2 C H A T . O P E N 5 2 Q 0001020 R S 2 3 2 4 3 Q R S 2 3 2 0001040 C . D E F A U L T . I N I T . I 0001060 N F O 3 7 Q \ R S 2 3 2 F L 0001100 G 2 3 Q M O D E M 1 5 Q 0001120 R S 2 3 2 C 7 R S 2 3 2 ) \r 0001140 ( ) \r R S 2 3 2 C H A T . O P E 0001160 N D 1 \r ( P 1 S T R E A M 0001200 P 0 O U T S T R E A M I 0001220 0 H O S T ) \0 S 002 \0 \0 001 021 0001240 001 g \0 \0 g \0 \0 \n \0 \0 Y \b \0 \0 X 0001260 I g \0 \0 g \0 \0 \v \0 \0 I g \0 \0 I \t 0001300 \0 \0 \v \0 \0 I g \0 \0 g \0 \0 \v \0 \0 I 0001320 g \0 \0 g \0 \0 \v \0 \0 I g \0 \0 g \0 \0 0001340 \v \0 \0 I g \0 \0 ` \0 \0 \v \0 \0 I H 032 0001360 020 \0 ( 1 1 5 Q S T R E A M P R 0001400 O P 1 0 3 Q S T R E A M P R 0001420 O P 7 1 Q S T R E A M P R O 0001440 P 5 7 Q S T R E A M P R O P 0001460 4 5 Q S T R E A M P R O P 0001500 4 2 Q R S 2 3 2 C . R E A D P 0001520 . E V E N T 3 2 Q S T R E A 0001540 M P R O P 1 7 Q R S 2 3 2 C 0001560 . O U T P U T S T R E A M 1 3 0001600 Q O P E N S T R E A M ) \r ( 1 0001620 1 2 Q R S 2 3 2 C H A T . O P 0001640 T I O N . M E N U 1 0 7 Q O 0001660 P T I O N M E N U 1 0 0 Q N 0001700 I L L 7 5 Q S E N D S C R E 0001720 E N P A R A M S 6 6 Q N I L 0001740 L 6 3 Q F L U S H & W A I T 0001760 5 4 Q N I L L 5 1 Q L O 0002000 G I N F O 3 6 Q R E A D P E 0002020 V E N T 2 7 Q N I L L 2 4 0002040 Q S E T D I S P L A Y T Y P E 0002060 1 0 Q I N P U T 5 { R S 0002100 2 3 2 } ) \r ( ) \r R S 2 3 2 C H 0002120 A T . S E T . P A R A M E T E R 0002140 S D 1 \r ( P 1 P W I N D O 0002160 W P 0 W I N D O W F 2 0002200 W I N D O W ) \0 2 002 001 \0 \0 R 0002220 021 001 \0 H \t \0 \0 021 001 001 g \0 \0 \t \0 \0 0002240 262 023 H \t \0 \0 I \t \0 \0 o \0 \0 \0 I \n 0002260 \0 \0 020 I \t \0 \0 o \0 \0 \0 I \n \0 \0 020 0002300 \0 ( 5 7 Q P R I N 1 4 7 Q 0002320 T E R P R I 4 2 Q P R I N 1 0002340 3 2 Q T E R P R I 2 6 Q 0002360 R S 2 3 2 C M E N U . S E T . P 0002400 A R A M E T E R S 2 0 Q F N 0002420 T Y P 7 G E T P R O M P T W 0002440 I N D O W ) \r ( 1 5 Q R S 2 3 0002460 2 C M E N U . S E T . P A R A M 0002500 E T E R S ) \r ( 5 3 Q " Y o 0002520 u m u s t l o a d R S 2 3 0002540 2 C M E N U t o u s e t h 0002560 i s f u n c t i o n " 3 6 Q 0002600 " S e l e c t d e s i r e d 0002620 p a r a m e t e r s . C h 0002640 o o s e A p p l y ! w h e n 0002660 d o n e . " ) \r ( P R E T T Y 0002700 C O M P R I N T R S 2 3 2 C H 0002720 A T C O M S ) \r ( R P A Q Q R 0002740 S 2 3 2 C H A T C O M S ( ( F 0002760 N S R S 2 3 2 C H A T . H O S 0003000 T . F I L T E R R S 2 3 2 C H 0003020 A T . O P E N R S 2 3 2 C H A 0003040 T . S E T . P A R A M E T E R S 0003060 ) ( A D D V A R S ( \r C H A 0003100 T . P R O T O C O L T Y P E S 0003120 ( R S 2 3 2 . R S 2 3 2 C H 0003140 A T . H O S T . F I L T E R ) ) 0003160 ) ( I N I T V A R S ( R S 2 0003200 3 2 C H A T . O P T I O N . M E 0003220 N U ( c r e a t e M E N U 0003240 \r I T E M S _ ( Q U O T E 0003260 ( ( " S e t L i n e P a r a 0003300 m e t e r s " ( R S 2 3 2 C H 0003320 A T . S E T . P A R A M E T E R 0003340 S ) " M o d i f y R S 2 3 2 0003360 p a r a m e t e r s " ) ) ) 0003400 T I T L E _ \r " R S 2 3 2 0003420 O p t i o n s " ) ) ) ( G L O 0003440 B A L V A R S R S 2 3 2 C H A 0003460 T . O P T I O N . M E N U ) ( 0003500 D E C L A R E : D O N T C O P 0003520 Y ( F I L E S ( L O A D C O 0003540 M P F R O M \r V A L U E O F 0003560 L I S P U S E R S D I R E C T 0003600 O R I E S ) C H A T D E C L ) 0003620 ) ( F I L E S ( S Y S L O A 0003640 D F R O M V A L U E O F L 0003660 I S P U S E R S D I R E C T O R 0003700 I E S ) D L R S 2 3 2 C \r C 0003720 H A T ) ) ) \r ( A D D T O V A R 0003740 C H A T . P R O T O C O L T Y 0003760 P E S ( R S 2 3 2 . R S 2 0004000 3 2 C H A T . H O S T . F I L T 0004020 E R ) ) \r ( R P A Q ? R S 2 3 0004040 2 C H A T . O P T I O N . M E N 0004060 U ( c r e a t e M E N U I 0004100 T E M S _ ( Q U O T E ( ( 0004120 " S e t L i n e P a r a m e 0004140 t e r s " ( \r R S 2 3 2 C H A 0004160 T . S E T . P A R A M E T E R S 0004200 ) " M o d i f y R S 2 3 2 0004220 p a r a m e t e r s " ) ) ) T 0004240 I T L E _ " R S 2 3 2 O p 0004260 t i o n s " ) ) \r ( F I L E S L 0004300 O A D ( S Y S L O A D F R O 0004320 M V A L U E O F L I S P U S 0004340 E R S D I R E C T O R I E S ) 0004360 D L R S 2 3 2 C C H A T ) \r ( 0004400 P U T P R O P S R S 2 3 2 C H 0004420 A T C O P Y R I G H T ( " X 0004440 e r o x C o r p o r a t i o n 0004460 " 1 9 8 5 ) ) \r N I L \r 0004475