$ od -c -N 50000 [phylum]<LISP>Lyric>LIBRARY>DMCHAT.LCOM!1
0000000 ( F I L E C R E A T E D " 2 7
0000020 - N o v - 8 6 1 3 : 2 7 : 5 2
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 > D M C H A T
0000120 . ; 6 ) \r " 2 5 - N o v - 8 6
0000140 0 0 : 4 6 : 5 7 " b c o m p
0000160 l ' d i n " X e r o x L i
0000200 s p 2 5 - N o v - 8 6 . . .
0000220 " d a t e d " 2 5 - N o v -
0000240 8 6 0 1 : 1 8 : 0 1 " ) \r ( F
0000260 I L E C R E A T E D " 2 0 - S
0000300 e p - 8 5 1 2 : 5 3 : 2 2 "
0000320 { E R I S } < L I S P C O R E >
0000340 L I B R A R Y > D M C H A T . ;
0000360 6 1 1 5 6 7 c h a n g e s
0000400 t o : ( F N S \r D M C H A T
0000420 . H A N D L E C H A R A C T E R
0000440 ) p r e v i o u s d a t e :
0000460 " 5 - S e p - 8 5 1 5 : 1
0000500 2 : 2 7 " { E R I S } < L I S
0000520 P C O R E > L I B R A R Y > D M
0000540 C H A T . ; 5 ) \r D M C H A T .
0000560 A D D R E S S 247 D 4 \r ( I 2
0000600 C H A R I 1 D M 2 5 0 0
0000620 . S T A T E I 0 C H A T .
0000640 S T A T E ) \0 273 002 \0 \0 003 B l 030
0000660 360 253 B l 036 360 246 B d l 037 360 231 277 A 006
0000700 \0 \0 h 024 \0 h 020 l \f 360 232 A 006 \0 \0 m
0000720 377 024 \0 m 377 020 j A 006 \0 \0 311 \0 361 262 023
0000740 A 006 \0 \0 B l ` 346 021 002 001 H I 024 \0 I
0000760 020 @ 006 \0 \0 A 006 \0 \0 311 \0 @ 006 \0 \0 310
0001000 020 332 @ 006 \0 \0 310 \f @ 006 \0 \0 310 020 331 021
0001020 002 001 H d I 361 221 277 I 022 021 002 001 H I 315
0001040 016 277 I 022 @ 006 \0 \0 @ 006 \0 \0 310 022 @ 006
0001060 \0 \0 311 * B l ` 346 @ 006 \0 \0 310 021 332 331
0001100 021 002 001 H d I 361 241 277 I 022 021 002 001 H I
0001120 315 017 277 I 022 @ 006 \0 \0 311 004 \v \0 \0 A 006
0001140 \0 \0 h 024 \0 i 020 \0 ( 1 7 6 M O V
0001160 E T O ) \r ( 1 8 0 D M 2 5 0 0
0001200 . S T A T E 1 7 1 C H A T .
0001220 S T A T E 1 4 2 C H A T . S
0001240 T A T E 1 3 2 C H A T . S T
0001260 A T E 1 2 6 C H A T . S T A
0001300 T E 1 2 2 C H A T . S T A T
0001320 E 9 4 C H A T . S T A T E
0001340 8 8 C H A T . S T A T E 8 1
0001360 C H A T . S T A T E 7 5 D
0001400 M 2 5 0 0 . S T A T E 7 1 C
0001420 H A T . S T A T E 5 4 D M 2
0001440 5 0 0 . S T A T E 4 5 D M 2
0001460 5 0 0 . S T A T E 3 3 D M 2
0001500 5 0 0 . S T A T E 2 0 D M 2
0001520 5 0 0 . S T A T E ) \r ( ) \r D M
0001540 C H A T . C L E A R 247 D 4 \r (
0001560 I 2 S E T R O L L I 1
0001600 D M 2 5 0 0 . S T A T E I 0
0001620 C H A T . S T A T E ) \0 037 \0
0001640 \0 \0 003 @ 006 \0 \0 311 002 \t \0 \0 @ A \n \0
0001660 \0 B 230 @ 006 \0 \0 k 317 \0 0 277 @ \t \0 \0
0001700 020 \0 ( 2 8 T E R M . H O M E
0001720 1 3 D M C H A T . C L E A R M
0001740 O D E S 8 C L E A R W ) \r (
0001760 1 9 C H A T . S T A T E 3
0002000 C H A T . S T A T E ) \r ( ) \r D
0002020 M C H A T . C L E A R M O D E S
0002040 247 D 4 \r ( I 1 D M 2 5 0 0
0002060 . S T A T E I 0 C H A T .
0002100 S T A T E ) \0 j 002 \0 \0 002 A 006 \0
0002120 \0 312 \0 ` j 360 232 A 006 \0 \0 312 \0 p j 360
0002140 263 ? @ 006 \0 \0 311 & @ 006 \0 \0 311 004 \n \0
0002160 \0 277 @ 006 \0 \0 @ 006 \0 \0 311 & 024 $ 277 A
0002200 006 \0 \0 A 006 \0 \0 j 317 \0 ` 277 j d 360 241
0002220 k 200 j 021 002 001 H I 317 \0 p 277 I 022 277 A
0002240 006 \0 \0 A 006 \0 \0 h 024 \0 277 j 317 \0 P 277
0002260 j d 360 h 360 020 \0 ( 3 5 D S P F O
0002300 N T ) \r ( 8 9 D M 2 5 0 0 . S
0002320 T A T E 8 5 D M 2 5 0 0 . S
0002340 T A T E 5 7 D M 2 5 0 0 . S
0002360 T A T E 5 3 D M 2 5 0 0 . S
0002400 T A T E 4 4 C H A T . S T A
0002420 T E 4 0 C H A T . S T A T E
0002440 3 0 C H A T . S T A T E 2
0002460 4 C H A T . S T A T E 1 3
0002500 D M 2 5 0 0 . S T A T E 3 D
0002520 M 2 5 0 0 . S T A T E ) \r ( ) \r
0002540 D M C H A T . H A N D L E C H A
0002560 R A C T E R 247 D 4 \r ( I 2
0002600 D M 2 5 0 0 . S T A T E I 1
0002620 C H A T . S T A T E I 0
0002640 C H A R F 2 I N V E R T W
0002660 I N D O W F N ) 002 273 002 001 \0 003 @
0002700 l \a 360 262 J ` \0 \0 l 006 360 247 ` \0 \0 l
0002720 \b 360 262 023 A 006 \0 \0 311 002 \t \0 \0 311 \0 l
0002740 \a \n \0 \0 020 B 006 \0 \0 312 \0 \0 j 360 264 003
0002760 202 261 002 207 A 006 \0 \0 311 002 k R 017 016 B 006
0003000 \0 \0 k 317 \0 \0 277 k j 360 h 360 020 B 006 \0
0003020 \0 312 \0 \0 j 360 263 026 A 006 \0 \0 311 002 k R
0003040 017 016 277 B 006 \0 \0 j 317 \0 \0 277 B 006 \0 \0
0003060 312 \0 @ j 360 263 037 @ l \r 360 231 B 006 \0 \0
0003100 312 \0 0 j 360 235 A \t \0 \0 277 B 006 \0 \0 j
0003120 317 \0 @ 277 B 006 \0 \0 311 \0 231 A B @ \v \0
0003140 \0 222 261 002 025 l @ 361 263 M l 177 @ 361 262
0003160 G B 006 \0 \0 B 006 \0 \0 j 317 \0 277 j d
0003200 360 241 k 200 j 021 002 001 H I 317 \0 020 277 I 022
0003220 277 B 006 \0 \0 312 \0 0 j 360 264 003 202 261 001 333
0003240 B 006 \0 \0 312 \0 P j 360 244 A \t \0 \0 277 A
0003260 B @ \v \0 \0 020 B 006 \0 \0 312 \0 020 j 360 263
0003300 023 B 006 \0 \0 j 317 \0 020 277 @ l \n 360 222 261
0003320 001 250 B 006 \0 \0 312 \0 j 360 263 A @ d l
0003340 \r 360 262 033 277 B 006 \0 \0 k 317 \0 020 277 B 006
0003360 \0 \0 j 317 \0 277 j d 360 h 360 020 l 002 360
0003400 263 023 @ l 034 360 253 @ l 036 360 246 @ d l 037
0003420 360 232 277 B 006 \0 \0 j 317 \0 277 @ l \n 360
0003440 262 034 B 006 \0 \0 312 \0 P j 360 247 A \t \0 \0
0003460 277 261 001 F A \t \0 \0 277 261 001 > @ d l \r
0003500 360 262 026 277 B 006 \0 \0 j 317 \0 0 277 A B i
0003520 \v \0 \0 277 261 001 # l \b 360 262 034 B 006 \0 \0
0003540 312 \0 P j 360 247 A \t \0 \0 277 261 001 \f A \t
0003560 \0 \0 277 261 001 004 @ d l 027 360 230 277 A \t \0
0003600 \0 277 261 \0 365 l \f 360 233 B 006 \0 \0 m 377 024
0003620 \0 277 261 \0 345 @ d l 002 360 236 277 A \t \0 \0
0003640 277 A B \n \0 \0 277 261 \0 320 l 030 360 262 024 A
0003660 B \n \0 \0 277 A 006 \0 \0 j 317 \0 0 277 261 \0
0003700 271 @ l 036 360 246 @ d l 037 360 231 277 A B \n
0003720 \0 \0 277 261 \0 244 l 034 360 262 * B 006 \0 \0 312
0003740 \0 0 j 360 264 003 202 261 \0 221 B 006 \0 \0 312 \0
0003760 P j 360 246 A \t \0 \0 277 260 ~ A B \n \0 \0
0004000 277 260 v @ d l 032 360 262 033 277 B 006 \0 \0 312
0004020 \0 P j 360 246 A \t \0 \0 277 260 ] A \t \0 \0
0004040 277 260 V l 016 360 247 @ d l 017 360 262 / 277 A
0004060 g \0 \0 B 006 \0 \0 B 006 \0 \0 312 \0 p j 360
0004100 221 k 200 j 021 002 001 H I 317 \0 p 277 I 022 j
0004120 360 h 360 h 360 \v \0 \0 277 260 036 l 020 360 231 B
0004140 006 \0 \0 k 317 \0 P 277 215 @ l 035 360 264 \v A
0004160 006 \0 \0 k 317 \0 0 h 020 \0 ( 6 6 4 T
0004200 E R M . M O D I F Y . A T T R I
0004220 B U T E S 6 0 8 T E R M . U
0004240 P 6 0 1 T E R M . D E L E T
0004260 E L I N E 5 7 6 D M C H A T
0004300 . R I G H T 5 6 8 T E R M .
0004320 A D D C H A R 5 3 0 D M C H
0004340 A T . C L E A R 5 0 0 D M C
0004360 H A T . C L E A R M O D E S 4
0004400 8 6 D M C H A T . C L E A R M
0004420 O D E S 4 8 0 T E R M . H O
0004440 M E 4 4 9 T E R M . E R A S
0004460 E . T O . E O L 4 3 4 T E R
0004500 M . L E F T 4 2 6 T E R M .
0004520 D E L C H A R 4 0 3 D M C H
0004540 A T . N E W L I N E 3 7 6 T
0004560 E R M . D O W N 3 6 8 T E R
0004600 M . A D D L I N E 2 4 5 D M
0004620 C H A T . P R I N T C H A R 2
0004640 3 8 T E R M . A D D C H A R
0004660 1 6 1 D M C H A T . A D D R E
0004700 S S 1 3 8 T E R M . D O W N
0004720 3 6 B O U T 2 9 \ I N S
0004740 U R E W I N D O W ) \r ( 6 9 1
0004760 C H A T . S T A T E 6 7 5 D
0005000 M 2 5 0 0 . S T A T E 6 3 5
0005020 D M 2 5 0 0 . S T A T E 6 3 1
0005040 D M 2 5 0 0 . S T A T E 6 2
0005060 7 B R I G H T 5 9 1 D M 2
0005100 5 0 0 . S T A T E 5 5 8 D M
0005120 2 5 0 0 . S T A T E 5 4 3 D
0005140 M 2 5 0 0 . S T A T E 5 0 5
0005160 C H A T . S T A T E 4 6 1 D
0005200 M 2 5 0 0 . S T A T E 4 1 6
0005220 D M 2 5 0 0 . S T A T E 3 9 2
0005240 D M 2 5 0 0 . S T A T E 3 5
0005260 8 D M 2 5 0 0 . S T A T E 3
0005300 4 3 D M 2 5 0 0 . S T A T E
0005320 3 0 6 D M 2 5 0 0 . S T A T E
0005340 2 9 7 D M 2 5 0 0 . S T A T
0005360 E 2 7 8 D M 2 5 0 0 . S T A
0005400 T E 2 6 1 D M 2 5 0 0 . S T
0005420 A T E 2 5 0 D M 2 5 0 0 . S
0005440 T A T E 2 2 8 D M 2 5 0 0 .
0005460 S T A T E 2 1 3 D M 2 5 0 0
0005500 . S T A T E 1 8 5 D M 2 5 0
0005520 0 . S T A T E 1 8 1 D M 2 5
0005540 0 0 . S T A T E 1 5 2 D M 2
0005560 5 0 0 . S T A T E 1 4 3 D M
0005600 2 5 0 0 . S T A T E 1 2 8 D
0005620 M 2 5 0 0 . S T A T E 1 1 2
0005640 D M 2 5 0 0 . S T A T E 1 0 3
0005660 D M 2 5 0 0 . S T A T E 9 2
0005700 C H A T . S T A T E 8 1 D
0005720 M 2 5 0 0 . S T A T E 6 6 D
0005740 M 2 5 0 0 . S T A T E 5 6 C
0005760 H A T . S T A T E 4 1 D M 2
0006000 5 0 0 . S T A T E 2 4 C H A
0006020 T . S T A T E 1 5 \ M A C H
0006040 I N E T Y P E 8 \ M A C H I
0006060 N E T Y P E ) \r ( ) \r D M C H A
0006100 T . N E W L I N E 247 D 4 \r ( I
0006120 2 E X P L I C I T I 1
0006140 D M 2 5 0 0 . S T A T E I 0
0006160 C H A T . S T A T E ) \0 G \0
0006200 \0 \0 003 @ 006 \0 \0 j 315 016 277 j @ 006 \0 \0
0006220 310 017 @ 006 \0 \0 311 004 \v \0 \0 A 006 \0 \0 k
0006240 317 \0 @ 277 k j 360 h 360 B 236 A 006 \0 \0 k
0006260 317 \0 020 277 k j 360 h 360 020 A 006 \0 \0 k 317
0006300 \0 277 k j 360 h 360 020 \0 ( 2 3 M O
0006320 V E T O ) \r ( 5 8 D M 2 5 0 0
0006340 . S T A T E 4 3 D M 2 5 0 0
0006360 . S T A T E 2 7 D M 2 5 0 0
0006400 . S T A T E 1 8 C H A T . S
0006420 T A T E 1 2 C H A T . S T A
0006440 T E 3 C H A T . S T A T E )
0006460 \r ( ) \r D M C H A T . P R I N T
0006500 C H A R 247 D 4 \r ( I 2 C H
0006520 A R I 1 D M 2 5 0 0 . S T
0006540 A T E I 0 C H A T . S T A
0006560 T E F 2 C H A T . A U T O
0006600 C R L F ) \0 V 002 001 \0 003 @ 006 \0 \0
0006620 311 004 021 021 001 H 006 \0 \0 311 ( 271 H B l 002
0006640 I 016 023 @ 006 \0 \0 @ 006 \0 \0 310 016 @ 006 \0
0006660 \0 310 020 324 021 002 001 H I 315 016 277 I 022 @ 006
0006700 \0 \0 310 \f 375 361 263 031 R 225 @ A \n \0 \0 020
0006720 A 006 \0 \0 k 317 \0 0 277 k j 360 h 360 020 h
0006740 020 \0 ( 6 6 D M C H A T . N E W
0006760 L I N E ) \r ( 7 1 D M 2 5 0 0
0007000 . S T A T E 5 3 C H A T . S
0007020 T A T E 3 6 C H A T . S T A
0007040 T E 3 0 C H A T . S T A T E
0007060 2 6 C H A T . S T A T E 1
0007100 2 S T R E A M 3 C H A T .
0007120 S T A T E ) \r ( ) \r D M C H A T
0007140 . R I G H T 247 D 4 \r ( I 1
0007160 D M 2 5 0 0 . S T A T E I 0
0007200 C H A T . S T A T E ) \0 G \0
0007220 \0 \0 002 @ 006 \0 \0 310 016 @ 006 \0 \0 310 020 330
0007240 @ 006 \0 \0 310 \f 375 361 262 + @ 006 \0 \0 @ 006
0007260 \0 \0 310 016 @ 006 \0 \0 310 020 324 315 016 @ 006 \0
0007300 \0 310 016 @ 006 \0 \0 310 017 @ 006 \0 \0 311 004 \v
0007320 \0 \0 020 @ A \n \0 \0 020 \0 ( 6 8 D M
0007340 C H A T . N E W L I N E 6 2
0007360 M O V E T O ) \r ( 5 7 C H A T
0007400 . S T A T E 5 1 C H A T . S
0007420 T A T E 4 5 C H A T . S T A
0007440 T E 3 6 C H A T . S T A T E
0007460 3 0 C H A T . S T A T E 2
0007500 6 C H A T . S T A T E 1 6
0007520 C H A T . S T A T E 9 C H A
0007540 T . S T A T E 3 C H A T . S
0007560 T A T E ) \r ( ) \r D M C H A T .
0007600 S T A T E 247 D 4 \r ( I 0 C
0007620 H A T . S T A T E ) \0 016 \0 \0 \0
0007640 001 @ \t \0 \0 @ \t \0 \0 ` \0 \0 037 020 \0 (
0007660 7 T E R M . H O M E 3 T E
0007700 R M . R E S E T . D I S P L A Y
0007720 . P A R M S ) \r ( 1 0 004 003 D M
0007740 2 5 0 0 . S T A T E T Y P E # )
0007760 \r ( ) \r ( P R E T T Y C O M P R
0010000 I N T D M C H A T C O M S ) \r
0010020 ( R P A Q Q D M C H A T C O M
0010040 S ( ( * D M p e c u l i a
0010060 r f u n c t i o n s ) ( F N
0010100 S D M C H A T . A D D R E S S
0010120 D M C H A T . C L E A R D M
0010140 C H A T . C L E A R M O D E S
0010160 \r D M C H A T . H A N D L E C H
0010200 A R A C T E R D M C H A T . N
0010220 E W L I N E D M C H A T . P R
0010240 I N T C H A R D M C H A T . R
0010260 I G H T D M C H A T . S T A T
0010300 E ) ( * T e r m i n a l e
0010320 m u l a t o r \r s u p p o r t
0010340 ) ( F I L E S C H A T T E R
0010360 M I N A L ) ( A D D V A R S
0010400 ( C H A T . D R I V E R T Y P E
0010420 S ( D M 2 5 0 0 D M C H A T
0010440 . H A N D L E C H A R A C T E R
0010460 D M C H A T . S T A T E ) \r )
0010500 ) ( D E C L A R E : E V A L
0010520 @ C O M P I L E D O N T C O P
0010540 Y ( F I L E S ( S O U R C E
0010560 ) C H A T D E C L S ) ( R E
0010600 C O R D S D M 2 5 0 0 . S T A
0010620 T E ) ) ( I N I T R E C O R D
0010640 S \r D M 2 5 0 0 . S T A T E )
0010660 ) ) \r ( F I L E S L O A D C H
0010700 A T T E R M I N A L ) \r ( A D D
0010720 T O V A R C H A T . D R I V E
0010740 R T Y P E S ( D M 2 5 0 0 D
0010760 M C H A T . H A N D L E C H A R
0011000 A C T E R D M C H A T . S T A
0011020 T E ) ) \r ( / D E C L A R E D A
0011040 T A T Y P E ( Q U O T E D M
0011060 2 5 0 0 . S T A T E ) ( Q U O
0011100 T E ( F L A G F L A G F L
0011120 A G F L A G F L A G P O I
0011140 N T E R F L A G F L A G F
0011160 L A G ) ) ( \r Q U O T E ( (
0011200 D M 2 5 0 0 . S T A T E 0 (
0011220 F L A G B I T S . 0 ) ) (
0011240 D M 2 5 0 0 . S T A T E 0 (
0011260 F L A G B I T S . 1 6 ) )
0011300 ( D M 2 5 0 0 . S T A T E 0
0011320 ( F L A G B I T S . 3 2 \r )
0011340 ) ( D M 2 5 0 0 . S T A T E
0011360 0 ( F L A G B I T S . 4 8
0011400 ) ) ( D M 2 5 0 0 . S T A T E
0011420 0 ( F L A G B I T S . 6
0011440 4 ) ) ( D M 2 5 0 0 . S T A T
0011460 E 0 P O I N T E R ) ( \r D
0011500 M 2 5 0 0 . S T A T E 0 ( F
0011520 L A G B I T S . 8 0 ) ) (
0011540 D M 2 5 0 0 . S T A T E 0 (
0011560 F L A G B I T S . 9 6 ) )
0011600 ( D M 2 5 0 0 . S T A T E 0
0011620 ( F L A G B I T S . 1 1 2 )
0011640 ) ) ) ( \r Q U O T E 2 ) ) \r
0011660 ( P U T P R O P S D M C H A T
0011700 C O P Y R I G H T ( " X e r
0011720 o x C o r p o r a t i o n "
0011740 1 9 8 4 1 9 8 5 ) ) \r N I L \r
0011760