$ od -c -N 50000 [eris]<Lisp>INTERMEZZO>LIBRARY>TCPCHAT.DCOM!3 0000000 ( F I L E C R E A T E D " 2 7 0000020 - A p r - 8 5 1 9 : 2 1 : 1 5 0000040 " ( " c o m p i l e d o n 0000060 " { S A F E } < / C / S C H O 0000100 E N / T C P > T C P C H A T . ; 0000120 1 ) \n " 1 9 - M a r - 8 5 1 0000140 4 : 3 4 : 1 7 " t c o m p l ' 0000160 d i n " I N T E R L I S P - 0000200 D 1 9 - M a r - 8 5 . . . " 0000220 d a t e d " 1 9 - M a r - 8 0000240 5 1 4 : 3 9 : 3 7 " ) \n ( F I 0000260 L E C R E A T E D " 2 7 - A p 0000300 r - 8 5 1 9 : 2 1 : 0 7 " { 0000320 S A F E } < / C / S C H O E N / 0000340 T C P > T C P C H A T . ; 1 9 0000360 1 9 2 c h a n g e s t o : 0000400 ( V A R S \n T E L N E T . O P 0000420 T I O N S ) ( F N S T C P C 0000440 H A T . O P T I O N . O U T P U 0000460 T T C P C H A T . T E R M I N 0000500 A L . T Y P E ) ) \n T C P C H A 0000520 T . B I N D 1 \n ( P 0 C H 0000540 A R I 0 S T R E A M ) \0 0000560 027 001 \0 \0 001 021 020 \0 @ \t \0 \0 X d l 377 0000600 360 227 277 @ \t \0 \0 277 260 360 020 \0 ( 2 1 Q 0000620 T C P C H A T . N E G O T I A 0000640 T E 6 \ B U F F E R E D . B 0000660 I N ) \n N I L \n ( ) \n T C P C H 0000700 A T . H O S T . F I L T E R D 0000720 1 \n ( I 0 H O S T ) \0 022 \0 0000740 \0 \0 001 @ \t \0 \0 264 \f @ \t \0 \0 g \0 \0 0000760 h 032 032 020 \0 ( 1 1 Q \ C A N O N 0001000 I C A L . H O S T N A M E 3 0001020 D O D I P . H O S T P ) \n ( 1 4 0001040 Q T C P C H A T . O P E N ) \n 0001060 ( ) \n T C P C H A T . N E G O T 0001100 I A T E D 1 \n ( I 0 S T R 0001120 E A M ) \0 021 \0 \0 \0 001 @ \t \0 \0 @ 0001140 \t \0 \0 @ \t \0 \0 \v \0 \0 020 \0 ( 1 6 Q 0001160 T C P C H A T . O P T I O N . 0001200 I N P U T 1 3 Q \ B U F F E 0001220 R E D . B I N 7 \ B U F F E 0001240 R E D . B I N 3 T C P . O T 0001260 H E R . S T R E A M ) \n N I L \n 0001300 ( ) \n T C P C H A T . O P E N 0001320 D 1 \n ( P 1 O U T P U T S T 0001340 R E A M P 0 S T R E A M 0001360 I 0 H O S T ) \0 h 002 \0 \0 001 0001400 @ \t \0 \0 l 027 h g \0 \0 g \0 \0 \r 005 \0 0001420 \0 021 021 001 H d 262 P 006 \0 \0 j 317 002 \0 277 0001440 H 006 \0 \0 g \0 \0 024 , 277 H g \0 \0 g \0 0001460 \0 \v \0 \0 277 H \t \0 \0 Y l 375 k \v \0 \0 0001500 277 I l 375 l 003 \v \0 \0 277 I l 373 l 003 \v 0001520 \0 \0 277 I l 375 j \v \0 \0 277 I l 373 j \v 0001540 \0 \0 277 H I 032 020 \0 ( 1 4 1 Q T C 0001560 P C H A T . O P T I O N . C O M 0001600 M A N D 1 3 1 Q T C P C H A 0001620 T . O P T I O N . C O M M A N D 0001640 1 2 1 Q T C P C H A T . O P 0001660 T I O N . C O M M A N D 1 1 0 0001700 Q T C P C H A T . O P T I O N 0001720 . C O M M A N D 7 7 Q T C P 0001740 C H A T . O P T I O N . C O M M 0001760 A N D 7 0 Q T C P . O T H E 0002000 R . S T R E A M 6 3 Q S T R 0002020 E A M P R O P 2 0 Q T C P . 0002040 O P E N 3 D O D I P . H O S 0002060 T P ) \n ( 6 0 Q T C P C H A T 0002100 . T E R M I N A L . T Y P E 5 0002120 5 Q S E T D I S P L A Y T Y P 0002140 E 4 6 Q T C P C H A T . B I 0002160 N 4 3 Q S T R E A M 3 2 Q 0002200 S T R E A M 1 4 Q I N P U 0002220 T 1 1 Q A C T I V E ) \n ( ) 0002240 \n T C P C H A T . O P T I O N . 0002260 C O M M A N D D 1 \n ( I 2 0002300 O P T I O N I 1 C O M M A 0002320 N D I 0 O U T P U T S T R 0002340 E A M ) \0 036 \0 \0 \0 003 @ l 377 \n \0 0002360 \0 @ A \n \0 \0 @ B \n \0 \0 @ \t \0 \0 A 0002400 B g \0 \0 \v \0 \0 020 \0 ( 3 3 Q T C 0002420 P C H A T . O P T I O N . T R A 0002440 C E 2 3 Q F O R C E O U T P 0002460 U T 1 7 Q B O U T 1 2 Q 0002500 B O U T 5 B O U T ) \n ( 3 0 0002520 Q S E N D ) \n ( ) \n T C P C H 0002540 A T . O P T I O N . I N P U T 0002560 D 1 \n ( P 0 O P T I O N R E 0002600 C O R D I 2 O P T I O N 0002620 I 1 C O M M A N D I 0 0002640 O U T P U T S T R E A M ) \0 212 0002660 001 \0 \0 003 B ` \0 \0 \n \0 \0 021 001 \0 H 262 0002700 p A d l 375 360 262 026 277 g \0 \0 B g \0 \0 0002720 \v \0 \0 @ H 002 001 B \v \0 \0 020 l 376 360 262 0002740 026 g \0 \0 B g \0 \0 \v \0 \0 @ H 002 002 001 0002760 B \v \0 \0 020 A d l 373 360 262 030 277 g \0 \0 0003000 B g \0 \0 \v \0 \0 @ H 002 002 002 001 B \v \0 0003020 \0 020 l 374 360 262 030 g \0 \0 B g \0 \0 \v \0 0003040 \0 @ H 002 002 002 002 001 B \v \0 \0 020 A 020 A 0003060 B \n \0 \0 @ g \0 \0 B \v \0 \0 020 \0 ( 2 0003100 0 7 Q T C P C H A T . O P T I 0003120 O N . O U T P U T 1 7 7 Q T 0003140 C P C H A T . O P T I O N . T R 0003160 A C E 1 6 7 Q T C P C H A T 0003200 . O P T I O N . O U T P U T 1 0003220 5 4 Q T C P C H A T . O P T I 0003240 O N . T R A C E 1 3 4 Q T C 0003260 P C H A T . O P T I O N . O U T 0003300 P U T 1 2 2 Q T C P C H A T 0003320 . O P T I O N . T R A C E 7 7 0003340 Q T C P C H A T . O P T I O N 0003360 . O U T P U T 6 6 Q T C P C 0003400 H A T . O P T I O N . T R A C E 0003420 4 6 Q T C P C H A T . O P T 0003440 I O N . O U T P U T 3 6 Q T 0003460 C P C H A T . O P T I O N . T R 0003500 A C E 6 F A S S O C ) \n ( 2 0003520 0 3 Q W O N T 1 5 1 Q R E 0003540 C V 1 4 5 Q W O N T 1 1 7 0003560 Q R E C V 1 1 3 Q W I L L 0003600 6 3 Q R E C V 5 7 Q D O 0003620 N T 3 3 Q R E C V 2 7 Q 0003640 D O 3 T E L N E T . O P T I 0003660 O N S ) \n ( ) \n T C P C H A T . 0003700 O P T I O N . O U T P U T D 1 0003720 \n ( I 2 O P T I O N I 1 0003740 C O M M A N D I 0 O U T 0003760 P U T S T R E A M ) \0 225 \0 \0 \0 0004000 003 A h 360 265 003 202 261 \0 215 A g \0 \0 360 263 0004020 025 A g \0 \0 360 254 A g \0 \0 360 246 A g \0 0004040 \0 360 262 j @ l 377 \n \0 \0 A d g \0 \0 360 0004060 236 277 @ l 375 \n \0 \0 277 @ B \n \0 \0 260 @ 0004100 g \0 \0 360 235 @ l 376 \n \0 \0 277 @ B \n \0 0004120 \0 260 - A d g \0 \0 360 236 277 @ l 373 \n \0 0004140 \0 277 @ B \n \0 \0 260 027 g \0 \0 360 234 @ l 0004160 374 \n \0 \0 277 @ B \n \0 \0 202 \b \0 \0 277 @ 0004200 \t \0 \0 A B g \0 \0 \v \0 \0 020 @ \t \0 \0 0004220 k A 017 016 020 \0 ( 2 1 6 Q T C P . 0004240 O T H E R . S T R E A M 2 1 1 0004260 Q T C P C H A T . O P T I O N 0004300 . T R A C E 2 0 1 Q F O R C 0004320 E O U T P U T 1 7 4 Q S H O 0004340 U L D N T 1 7 0 Q B O U T 0004360 1 6 2 Q B O U T 1 4 5 Q B 0004400 O U T 1 3 7 Q B O U T 1 1 0004420 7 Q B O U T 1 1 1 Q B O U 0004440 T 7 4 Q B O U T 6 6 Q B 0004460 O U T 5 0 Q B O U T ) \n ( 2 0004500 0 6 Q S E N D B A C K 1 5 2 0004520 Q W O N T 1 2 6 Q W I L L 0004540 1 0 1 Q D O N T 5 5 Q D 0004560 O 3 7 Q D O N T 3 1 Q D 0004600 O 2 3 Q W O N T 1 4 Q W 0004620 I L L ) \n ( ) \n T C P C H A T . 0004640 O P T I O N . T R A C E D 1 \n 0004660 ( I 2 P R E F I X I 1 0004700 O P T I O N I 0 C O M M A 0004720 N D ) \0 n \0 \0 \0 003 ` \0 \0 264 < @ 0004740 005 001 265 8 B ` \0 \0 \n \0 \0 277 o \0 \0 \0 0004760 ` \0 \0 \n \0 \0 277 @ ` \0 \0 \n \0 \0 277 o 0005000 \0 \0 \0 ` \0 \0 \n \0 \0 A ` \0 \0 ` \0 \0 0005020 \v \0 \0 ` \0 \0 \t \0 \0 020 d l 375 360 225 277 0005040 g \0 \0 260 037 l 376 360 224 g \0 \0 260 026 @ d 0005060 l 373 360 224 277 g \0 \0 210 l 374 360 223 g \0 \0 0005100 200 @ b \0 277 260 237 \0 ( 7 6 Q T E R 0005120 P R I 7 0 Q P R I N T C O N 0005140 S T A N T 5 6 Q P R I N 1 0005160 4 3 Q P R I N 1 3 3 Q P R 0005200 I N 1 2 0 Q P R I N 1 ) \n ( 0005220 1 4 5 Q W O N T 1 3 5 Q W 0005240 I L L 1 2 1 Q D O N T 1 1 0005260 0 Q D O 7 3 Q T C P C H A 0005300 T . T R A C E F I L E 6 5 Q 0005320 T C P C H A T . T R A C E F I L 0005340 E 6 2 Q T E L N E T . M A R 0005360 K S 5 3 Q T C P C H A T . T 0005400 R A C E F I L E 4 0 Q T C P 0005420 C H A T . T R A C E F I L E 3 0005440 0 Q T C P C H A T . T R A C E 0005460 F I L E 1 5 Q T C P C H A T 0005500 . T R A C E F I L E 2 T C P 0005520 C H A T . T R A C E F L G ) \n ( 0005540 5 0 Q " " 2 5 Q " : 0005560 " ) \n T C P C H A T . T E R M I 0005600 N A L . T Y P E D 1 \n ( P 1 0005620 D I S P L A Y T Y P E P 0 0005640 O U T P U T S T R E A M I 0005660 0 I N P U T S T R E A M ) \0 0005700 202 002 \0 \0 001 @ \t \0 \0 021 001 \0 @ g \0 \0 0005720 \n \0 \0 002 002 001 ` \0 \0 \n \0 \0 002 265 023 H 0005740 g \0 \0 \n \0 \0 002 002 001 ` \0 \0 \n \0 \0 002 0005760 021 001 001 H l 377 \n \0 \0 H l 372 \n \0 \0 H 0006000 l 030 \n \0 \0 H j \n \0 \0 I H \n \0 \0 H 0006020 l 377 \n \0 \0 H l 360 \n \0 \0 H \t \0 \0 ` 0006040 \0 \0 264 # o \0 \0 \0 ` \0 \0 \n \0 \0 I ` 0006060 \0 \0 \n \0 \0 o \0 \0 \0 ` \0 \0 \n \0 \0 ` 0006100 \0 \0 \t \0 \0 020 \0 ( 1 7 7 Q T E R 0006120 P R I 1 7 1 Q P R I N 1 1 0006140 5 7 Q P R I N 1 1 5 0 Q P 0006160 R I N 1 1 3 1 Q F O R C E O 0006200 U T P U T 1 2 5 Q B O U T 0006220 1 1 7 Q B O U T 1 1 1 Q P 0006240 R I N 1 1 0 4 Q B O U T 7 0006260 7 Q B O U T 7 1 Q B O U T 0006300 6 3 Q B O U T 5 1 Q F A 0006320 S S O C 4 0 Q S T R E A M P 0006340 R O P 2 6 Q F A S S O C 1 0006360 5 Q S T R E A M P R O P 3 0006400 T C P . O T H E R . S T R E A M 0006420 ) \n ( 1 7 4 Q T C P C H A T . 0006440 T R A C E F I L E 1 6 6 Q T 0006460 C P C H A T . T R A C E F I L E 0006500 1 5 4 Q T C P C H A T . T R 0006520 A C E F I L E 1 4 5 Q T C P 0006540 C H A T . T R A C E F I L E 1 0006560 3 4 Q T C P C H A T . T R A C 0006600 E F L G 4 6 Q T C P C H A T 0006620 . T E L N E T . T T Y . T Y P E 0006640 S 3 5 Q D I S P L A Y T Y P 0006660 E 2 3 Q T C P C H A T . T E 0006700 L N E T . T T Y . T Y P E S 1 0006720 2 Q D I S P L A Y T Y P E ) \n 0006740 ( 1 6 3 Q " I A C S E " 0006760 1 4 2 Q " S E N D ( B A C K 0007000 ) I A C S B T E R M I N A 0007020 L - T Y P E I S " ) \n ( P R 0007040 E T T Y C O M P R I N T T C P 0007060 C H A T C O M S ) \r ( R P A Q Q 0007100 T C P C H A T C O M S ( ( F 0007120 N S T C P C H A T . B I N T 0007140 C P C H A T . H O S T . F I L T 0007160 E R T C P C H A T . N E G O T 0007200 I A T E T C P C H A T . O P E 0007220 N \r T C P C H A T . O P T I O 0007240 N . C O M M A N D T C P C H A 0007260 T . O P T I O N . I N P U T T 0007300 C P C H A T . O P T I O N . O U 0007320 T P U T T C P C H A T . O P T 0007340 I O N . T R A C E \r T C P C H 0007360 A T . T E R M I N A L . T Y P E 0007400 ) ( C O M S ( C O N S T A N 0007420 T S * T E L N E T . C O M M 0007440 A N D S ) ( C O N S T A N T S 0007460 * T E L N E T . M A R K S ) 0007500 ) ( V A R S \r T C P C H A T 0007520 . T E L N E T . T T Y . T Y P E 0007540 S T E L N E T . O P T I O N S 0007560 ) ( G L O B A L V A R S T C 0007600 P C H A T . T E L N E T . T T Y 0007620 . T Y P E S T E L N E T . O P 0007640 T I O N S \r T E L N E T . M A 0007660 R K S ) ( A D D V A R S ( C 0007700 H A T . P R O T O C O L T Y P E 0007720 S ( T C P . T C P C H A T 0007740 . H O S T . F I L T E R ) ) ) 0007760 ( P ( C O N D ( ( B O U N D 0010000 P ( Q U O T E \r C H A T . P 0010020 R O T C O L S ) ) ( A D D T O 0010040 V A R C H A T . P R O T O C O 0010060 L S T C P C H A T . H O S T . 0010100 F I L T E R ) ) ) ) ( I N I T 0010120 V A R S ( T C P C H A T . T R 0010140 A C E F L G ) ( \r T C P C H A 0010160 T . T R A C E F I L E ) ) ( R 0010200 E C O R D S T E L N E T . O P 0010220 T I O N ) ( F I L E S ( S Y 0010240 S L O A D F R O M V A L U E 0010260 O F L I S P U S E R S D I R E 0010300 C T O R I E S ) T C P \r C H 0010320 A T ) ) ) \r ( R P A Q Q T E L 0010340 N E T . C O M M A N D S ( ( T 0010360 E L N E T . S E 2 4 0 ) ( T 0010400 E L N E T . S B 2 5 0 ) ( T 0010420 E L N E T . W I L L 2 5 1 ) 0010440 ( T E L N E T . W O N T 2 5 2 0010460 ) ( T E L N E T . D O \r 2 5 0010500 3 ) ( T E L N E T . D O N T 0010520 2 5 4 ) ( T E L N E T . I A C 0010540 2 5 5 ) ) ) \r ( R P A Q Q T 0010560 E L N E T . S E 2 4 0 ) \r ( R 0010600 P A Q Q T E L N E T . S B 2 0010620 5 0 ) \r ( R P A Q Q T E L N E 0010640 T . W I L L 2 5 1 ) \r ( R P A 0010660 Q Q T E L N E T . W O N T 2 0010700 5 2 ) \r ( R P A Q Q T E L N E 0010720 T . D O 2 5 3 ) \r ( R P A Q Q 0010740 T E L N E T . D O N T 2 5 4 0010760 ) \r ( R P A Q Q T E L N E T . 0011000 I A C 2 5 5 ) \r ( C O N S T A 0011020 N T S ( T E L N E T . S E 2 0011040 4 0 ) ( T E L N E T . S B 2 0011060 5 0 ) ( T E L N E T . W I L L 0011100 2 5 1 ) ( T E L N E T . W O 0011120 N T 2 5 2 ) ( T E L N E T . 0011140 D O 2 5 3 ) ( \r T E L N E T 0011160 . D O N T 2 5 4 ) ( T E L N 0011200 E T . I A C 2 5 5 ) ) \r ( R P 0011220 A Q Q T E L N E T . M A R K S 0011240 ( ( T E L N E T . B I N A R Y 0011260 0 ) ( T E L N E T . E C H O 0011300 1 ) ( T E L N E T . S U P P 0011320 R E S S . G O A H E A D 3 ) 0011340 ( T E L N E T . S T A T U S 5 0011360 ) ( \r T E L N E T . T I M I N 0011400 G . M A R K 6 ) ( T E L N E 0011420 T . T E R M I N A L . T Y P E 0011440 2 4 ) ) ) \r ( R P A Q Q T E L 0011460 N E T . B I N A R Y 0 ) \r ( R 0011500 P A Q Q T E L N E T . E C H O 0011520 1 ) \r ( R P A Q Q T E L N E 0011540 T . S U P P R E S S . G O A H E 0011560 A D 3 ) \r ( R P A Q Q T E L 0011600 N E T . S T A T U S 5 ) \r ( R 0011620 P A Q Q T E L N E T . T I M I 0011640 N G . M A R K 6 ) \r ( R P A Q 0011660 Q T E L N E T . T E R M I N A 0011700 L . T Y P E 2 4 ) \r ( C O N S 0011720 T A N T S ( T E L N E T . B I 0011740 N A R Y 0 ) ( T E L N E T . 0011760 E C H O 1 ) ( T E L N E T . 0012000 S U P P R E S S . G O A H E A D 0012020 3 ) ( T E L N E T . S T A T 0012040 U S 5 ) ( \r T E L N E T . T 0012060 I M I N G . M A R K 6 ) ( T 0012100 E L N E T . T E R M I N A L . T 0012120 Y P E 2 4 ) ) \r ( R P A Q Q 0012140 T C P C H A T . T E L N E T . T 0012160 T Y . T Y P E S ( ( D M 2 5 0 0012200 0 . D A T A M E D I A - 2 5 0012220 0 0 ) ( V T 1 0 0 . D E C 0012240 - V T 1 0 0 ) ) ) \r ( R P A Q Q 0012260 T E L N E T . O P T I O N S 0012300 ( ( 0 W I L L W O N T N I 0012320 L D O N T ) ( 1 W O N T 0012340 W O N T D O D O ) ( 3 W 0012360 I L L W I L L N I L N I L 0012400 ) ( 5 W O N T W O N T \r 0012420 D O N T D O N T ) ( 6 W I 0012440 L L N I L N I L N I L ) 0012460 ( 2 4 T C P C H A T . T E R M 0012500 I N A L . T Y P E N I L D O 0012520 N T N I L ) ) ) \r ( A D D T O 0012540 V A R C H A T . P R O T O C O 0012560 L T Y P E S ( T C P . T C 0012600 P C H A T . H O S T . F I L T E 0012620 R ) ) \r ( C O N D ( ( B O U N 0012640 D P ( Q U O T E C H A T . P 0012660 R O T C O L S ) ) ( A D D T O 0012700 V A R C H A T . P R O T O C O 0012720 L S T C P C H A T . H O S T . 0012740 F I L T E R ) ) ) \r ( R P A Q ? 0012760 T C P C H A T . T R A C E F L 0013000 G ) \r ( R P A Q ? T C P C H A 0013020 T . T R A C E F I L E ) \r ( R E 0013040 C O R D T E L N E T . O P T I 0013060 O N ( O P T I O N O N . D O 0013100 O N . D O N T O N . W I L L 0013120 O N . W O N T ) ) \r ( F I L E 0013140 S L O A D ( S Y S L O A D F 0013160 R O M V A L U E O F L I S P 0013200 U S E R S D I R E C T O R I E S 0013220 ) T C P C H A T ) \r ( P U T 0013240 P R O P S T C P C H A T C O 0013260 P Y R I G H T ( " X e r o x 0013300 C o r p o r a t i o n " 1 9 8 0013320 5 ) ) \r N I L \r 0013330