$ od -c -N 50000 [eris]<Lisp>KOTO>Library>CENTRONICS.DCOM!1
0000000 ( F I L E C R E A T E D " 4
0000020 - S e p - 8 5 1 8 : 4 0 : 2 5
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 > D I G > C E N T R O N I C S
0000120 . ; 8 ) \r " 1 6 - A u g - 8 5
0000140 0 6 : 2 0 : 2 6 " r e c o m
0000160 p i l e d c h a n g e s : C
0000200 E N T R O N I C S . R E S E T
0000220 \ C r e a t e C e n t r o n i c
0000240 s D e v i c e \ C E N T R O N
0000260 I C S . O P E N F I L E \r \ C
0000300 E N T R O N I C S . C L O S E F
0000320 I L E \ C E N T R O N I C S .
0000340 B O U T \ C E N T R O N I C S
0000360 . B U S Y W A I T \ C E N T R
0000400 O N I C S . E V E N T F N i n
0000420 \r " I N T E R L I S P - D 1
0000440 6 - A u g - 8 5 . . . " d a
0000460 t e d " 1 6 - A u g - 8 5 0
0000500 8 : 0 1 : 0 7 " ) \r ( F I L E C
0000520 R E A T E D " 4 - S e p - 8
0000540 5 1 8 : 4 0 : 1 3 " { E R I
0000560 S } < L I S P C O R E > D I G >
0000600 C E N T R O N I C S . ; 8 5 2
0000620 1 3 c h a n g e s t o : (
0000640 F N S \r C E N T R O N I C S .
0000660 R E S E T \ C E N T R O N I C
0000700 S . O P E N F I L E \ C r e a
0000720 t e C e n t r o n i c s D e v i
0000740 c e \ C E N T R O N I C S . C
0000760 L O S E F I L E \r \ C E N T R
0001000 O N I C S . E V E N T F N \ C
0001020 E N T R O N I C S . B U S Y W A
0001040 I T \ C E N T R O N I C S . B
0001060 O U T ) ( V A R S C E N T R
0001100 O N I C S C O M S ) p r e v i
0001120 o u s d a t e : \r " 1 4 - A
0001140 u g - 8 5 1 6 : 1 4 : 1 5 "
0001160 { E R I S } < L I S P C O R E >
0001200 D I G > C E N T R O N I C S . ;
0001220 5 ) \r C E N T R O N I C S . R E
0001240 S E T D 1 \r ( I 0 C 1 5 0
0001260 S T R E A M ) \0 ' \0 \0 \0 001 @ 262
0001300 023 @ 006 \0 \0 311 006 006 \0 \0 311 \0 g \0 \0 360
0001320 264 023 n 240 \0 u n 200 \0 u k \t \0 \0 n 240
0001340 \0 u h 020 \0 ( 3 7 Q D I S M I S
0001360 S ) \r ( 2 0 Q C E N T R O N I
0001400 C S 1 3 Q F D E V 6 S T
0001420 R E A M ) \r ( ) \r C E N T R O N
0001440 I C S . B U S Y W A I T D 1 \r
0001460 ( P 0 C 1 5 0 S T A T U S L
0001500 I N E ) \0 : 001 \0 \0 \0 021 020 \0 t n
0001520 | \0 345 X n \0 360 221 i 020 t n | \0 345
0001540 n ` \0 360 263 036 o \0 \0 \0 ` \0 \0 \n \0 \0
0001560 277 ` \0 \0 \t \0 \0 o \0 \0 \0 \t \0 \0 277 277
0001600 260 316 h 020 \0 ( 6 2 Q H E L P 5
0001620 3 Q T E R P R I 4 4 Q P R
0001640 I N 1 ) \r ( 5 0 Q P R O M P T
0001660 W I N D O W 4 1 Q P R O M P
0001700 T W I N D O W ) \r ( 5 7 Q "
0001720 P r i n t e r e r r o r -
0001740 t y p e ( R E T U R N ) t o
0001760 c o n t i n u e " 3 6 Q "
0002000 P r i n t e r e r r o r " ) \r
0002020 \ C r e a t e C e n t r o n i c
0002040 s D e v i c e D 1 \r ( P 0
0002060 D E V I C E ) \0 201 001 \0 \0 \0 ` \0
0002100 \0 037 d g \0 \0 024 \0 277 d g \0 \0 024 \b 277
0002120 d g \0 \0 024 277 d g \0 \0 024 022 277 d g
0002140 \0 \0 024 002 277 d g \0 \0 024 : 277 d g \0 \0
0002160 024 8 277 d g \0 \0 024 6 277 d g \0 \0 024 4
0002200 277 d g \0 \0 024 2 277 d g \0 \0 024 0 277 d
0002220 g \0 \0 024 . 277 d g \0 \0 024 * 277 d g \0
0002240 \0 024 $ 277 d g \0 \0 024 020 277 d g \0 \0 024
0002260 006 277 021 001 \0 g \0 \0 H \n \0 \0 H 020 \0 (
0002300 1 7 5 Q \ D E F I N E D E V I
0002320 C E ) \r ( 1 7 1 Q C E N T R O
0002340 N I C S 1 6 0 Q N I L L 1
0002360 5 1 Q N I L L 1 4 2 Q \ G
0002400 E N E R I C . R E A D P 1 3 3
0002420 Q N I L L 1 2 4 Q \ I S .
0002440 N O T . R A N D A C C E S S P
0002460 1 1 5 Q \ I L L E G A L . D E
0002500 V I C E O P 1 0 6 Q \ I S .
0002520 N O T . R A N D A C C E S S P
0002540 7 7 Q \ I L L E G A L . D E V
0002560 I C E O P 7 0 Q \ G E N E R
0002600 I C . B I N S 6 1 Q \ G E N
0002620 E R I C . B O U T S 5 2 Q \
0002640 G E N E R I C . R E N A M E F I
0002660 L E 4 3 Q \ C E N T R O N I
0002700 C S . C L O S E F I L E 3 4 Q
0002720 \ C E N T R O N I C S . O P E
0002740 N F I L E 2 5 Q \ C E N T R
0002760 O N I C S . B O U T 1 6 Q \
0003000 C E N T R O N I C S . E V E N T
0003020 F N 7 C E N T R O N I C S
0003040 2 004 003 F D E V T Y P E # ) \r (
0003060 ) \r \ C E N T R O N I C S . O P
0003100 E N F I L E D 1 \r ( P 0 O
0003120 L D S T R E A M I 4 D E V
0003140 I C E I 3 P A R A M E T E
0003160 R S I 2 R E C O G I 1
0003200 A C C E S S I 0 N A M E
0003220 ) \0 236 002 \0 \0 005 A g \0 \0 360 252 A g
0003240 \0 \0 360 264 003 202 261 \0 216 D 006 \0 \0 311 ( 021
0003260 021 001 H 230 o \0 \0 \0 @ \n \0 \0 020 D 006 \0
0003300 \0 ` \0 \0 037 d D 024 006 277 d g \0 \0 024 004
0003320 277 d g \0 \0 024 . 277 d g \0 \0 024 , 277 d
0003340 ` \0 \0 024 & 277 d g \0 \0 024 " 277 d g \0
0003360 \0 024 277 d j 317 030 001 277 d ` \0 \0 315 037
0003400 277 d j 315 035 277 d ` \0 \0 315 034 277 d h 024
0003420 030 277 d l \b 317 024 \a 277 d j 317 004 R 277 d
0003440 k 317 004 @ 277 d k 317 004 0 277 d h 024 002 277
0003460 Y 024 ( I 020 \0 ( 4 3 Q E R R O R
0003500 ) \r ( 1 6 1 Q \ S T R E A M .
0003520 D E F A U L T . M A X B U F F E
0003540 R S 1 4 5 Q F I L E L I N E
0003560 L E N G T H 1 3 0 Q \ F I L
0003600 E O U T C H A R F N 1 2 1 Q
0003620 \ E O S E R R O R 1 1 2 Q \
0003640 N O I M A G E O P S 1 0 3 Q
0003660 \ S T R E A M . N O T . O P E N
0003700 7 4 Q \ S T R E A M . N O T
0003720 . O P E N 6 5 Q { C E N T R
0003740 O N I C S } 5 3 Q 004 003 S T R
0003760 E A M T Y P E # 5 0 Q F D E
0004000 V 2 4 Q F D E V 1 1 Q A
0004020 P P E N D 3 O U T P U T ) \r
0004040 ( 3 7 Q " O n l y o n e
0004060 o p e n s t r e a m a l l o
0004100 w e d o n t h i s d e v i
0004120 c e " ) \r \ C E N T R O N I C S
0004140 . C L O S E F I L E D 1 \r ( L
0004160 ( 0 S T R E A M ) ) \0 017 \0
0004200 \0 \0 001 @ 006 \0 \0 311 006 006 \0 \0 h 024 ( h
0004220 020 \0 N I L \r ( 1 0 Q F D E V
0004240 3 S T R E A M ) \r ( ) \r \ C E
0004260 N T R O N I C S . B O U T D 1
0004300 \r ( P 0 C 1 5 0 D A T A N O
0004320 S T B I 1 B Y T E I 0
0004340 S T R E A M ) \0 & 001 \0 \0 002 t
0004360 n | \0 345 n ` \0 360 244 \b \0 \0 263 375 A n
0004400 240 \0 344 021 001 \0 H u 277 H n 177 377 345 u 277
0004420 H u h 020 \0 ( 1 4 Q \ C E N T R
0004440 O N I C S . B U S Y W A I T ) \r
0004460 N I L \r ( ) \r \ C E N T R O N I
0004500 C S . B U S Y W A I T D 1 \r (
0004520 P 0 C 1 5 0 S T A T U S L I
0004540 N E ) \0 : 001 \0 \0 \0 021 020 \0 t n |
0004560 \0 345 X n \0 360 221 i 020 t n | \0 345 n
0004600 ` \0 360 263 036 o \0 \0 \0 ` \0 \0 \n \0 \0 277
0004620 ` \0 \0 \t \0 \0 o \0 \0 \0 \t \0 \0 277 277 260
0004640 316 h 020 \0 ( 6 2 Q H E L P 5 3
0004660 Q T E R P R I 4 4 Q P R I
0004700 N 1 ) \r ( 5 0 Q P R O M P T W
0004720 I N D O W 4 1 Q P R O M P T
0004740 W I N D O W ) \r ( 5 7 Q " P
0004760 r i n t e r e r r o r - t
0005000 y p e ( R E T U R N ) t o
0005020 c o n t i n u e " 3 6 Q " P
0005040 r i n t e r e r r o r " ) \r \
0005060 C E N T R O N I C S . E V E N T
0005100 F N D 1 \r ( I 1 E V E N T
0005120 I 0 D E V I C E ) \0 030 \0
0005140 \0 \0 002 A g \0 \0 360 254 A g \0 \0 360 246 A
0005160 g \0 \0 360 264 005 \b \0 \0 020 \0 ( 2 5 Q
0005200 C E N T R O N I C S . R E S E T
0005220 ) \r ( 1 7 Q A F T E R M A K E
0005240 S Y S 1 1 Q A F T E R S Y S
0005260 O U T 3 A F T E R L O G O U
0005300 T ) \r ( ) \r ( P R E T T Y C O M
0005320 P R I N T C E N T R O N I C S
0005340 C O M S ) \r ( R P A Q Q C E N
0005360 T R O N I C S C O M S ( ( F N
0005400 S C E N T R O N I C S . R E S
0005420 E T C E N T R O N I C S . B U
0005440 S Y W A I T ) ( F N S \ C r
0005460 e a t e C e n t r o n i c s D e
0005500 v i c e \r \ C E N T R O N I C
0005520 S . O P E N F I L E \ C E N T
0005540 R O N I C S . C L O S E F I L E
0005560 \ C E N T R O N I C S . B O U
0005600 T \ C E N T R O N I C S . B U
0005620 S Y W A I T \ C E N T R O N I
0005640 C S . E V E N T F N ) \r ( D E
0005660 C L A R E : D O N T E V A L @
0005700 L O A D D O C O P Y ( P (
0005720 \ C r e a t e C e n t r o n i c
0005740 s D e v i c e ) ) ) ) ) \r ( \ C
0005760 r e a t e C e n t r o n i c s D
0006000 e v i c e ) \r ( P U T P R O P S
0006020 C E N T R O N I C S C O P Y
0006040 R I G H T ( " X e r o x C o
0006060 r p o r a t i o n " 1 9 8 5 )
0006100 ) \r N I L \r
0006106