$ od -c -N 50000 [eris]<LispUsers>PRINTER.DCOM!1
0000000 ( F I L E C R E A T E D " 3
0000020 - O C T - 8 3 2 2 : 4 3 : 2 3
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < L I S P C
0000100 O R E > S O U R C E S > P R I N
0000120 T E R . ; 2 ) \r " 2 0 - S E P
0000140 - 8 3 1 9 : 2 7 : 0 0 " r e
0000160 c o m p i l e d c h a n g e s
0000200 : L O C A L . P R I N T L O
0000220 C A L . P R I N T F I L E L O
0000240 C A L . B I T M A P \ L O C A
0000260 L . G R A P H I C S I N I T \r
0000300 \ L O C A L . T E X T I N I T
0000320 \ L O C A L . S E L E C T \ L
0000340 O C A L . S E N D C O M M A N D
0000360 \ L O C A L . S E N D B Y T E
0000400 \ L O C A L . S E N D S T R I
0000420 N G i n W O R K d a t e d
0000440 \r " 2 0 - S E P - 8 3 1 9 :
0000460 3 8 : 1 3 " ) \r ( F I L E C R E
0000500 A T E D " 3 - O C T - 8 3
0000520 2 1 : 1 2 : 2 2 " { P H Y L U
0000540 M } < L I S P C O R E > S O U R
0000560 C E S > P R I N T E R . ; 2 7
0000600 9 2 0 c h a n g e s t o :
0000620 ( V A R S \r P R I N T E R C O
0000640 M S ) ( F N S P R I N T E R
0000660 . P R I N T P R I N T E R . P
0000700 R I N T F I L E L O C A L . P
0000720 R I N T L O C A L . P R I N T
0000740 F I L E L O C A L . B I T M A
0000760 P \r \ L O C A L . G R A P H I
0001000 C S I N I T \ L O C A L . T E
0001020 X T I N I T \ L O C A L . S E
0001040 L E C T \ L O C A L . S E N D
0001060 C O M M A N D \ L O C A L . S
0001100 E N D B Y T E \ L O C A L . S
0001120 E N D S T R I N G \r ) ( M A C
0001140 R O S P R I N T E R . M O D E
0001160 \ L O C A L . M O D E \ L O
0001200 C A L . C R L F ) p r e v i o
0001220 u s d a t e : " 2 2 - S E P
0001240 - 8 3 1 8 : 4 7 : 0 8 " \r {
0001260 P H Y L U M } < L I S P C O R E
0001300 > S O U R C E S > P R I N T E R
0001320 . ; 1 ) \r L O C A L . P R I N T
0001340 D 1 \r ( I 1 F I L E I
0001360 0 D U M M Y ) \0 021 \0 \0 \0 002 A
0001400 d 004 ` \0 \0 360 223 \t \0 \0 020 \t \0 \0 020 \0
0001420 ( 1 6 Q L O C A L . P R I N T
0001440 F I L E 1 2 Q L O C A L . B
0001460 I T M A P ) \r ( 5 004 003 B I T M
0001500 A P T Y P E # ) \r N I L \r L O C
0001520 A L . P R I N T F I L E A 0 0 3
0001540 6 D 1 \r ( N A M E E R R O R
0001560 S E T L ( 2 E R R O R S E
0001600 T . W 1 E R R O R S E T . V
0001620 0 E R R O R S E T . U ) P
0001640 0 C H A R F 1 F I L E
0001660 F 2 R E S E T V A R S L S
0001700 T F 3 R E S E T Y ) 001 -
0001720 001 003 \0 003 g \0 \0 Q g \0 \0 g \0 \0 \v \0
0001740 \0 c 002 h 032 032 h h 032 032 R 032 c 004 277 \b
0001760 \0 \0 277 \b \0 \0 277 l ! \t \0 \0 277 Q \t
0002000 \0 \0 277 Q \t \0 \0 \t \0 \0 277 l \t \0 \0
0002020 277 Q \t \0 \0 \t \0 \0 277 l " \t \0 \0 277 l
0002040 \r \t \0 \0 277 l \n \t \0 \0 277 \b \0 \0 277 021
0002060 020 \0 Q \t \0 \0 262 035 l \r \t \0 \0 277 l \n
0002100 \t \0 \0 277 \b \0 \0 277 l 023 \t \0 \0 023 h c
0002120 006 i 020 Q X d l 006 360 242 261 \0 205 277 Q
0002140 X d k 360 262 027 277 l N \t \0 \0 277 l "
0002160 \t \0 \0 277 l 017 \t \0 \0 277 260 270 l 002 360 262
0002200 026 l N \t \0 \0 277 l ! \t \0 \0 277 l 017 \t
0002220 \0 \0 277 260 237 H d l 003 360 262 027 277 l Q \t
0002240 \0 \0 277 l " \t \0 \0 277 l 017 \t \0 \0 277 260
0002260 203 l 004 360 262 027 l E \t \0 \0 277 l 016 \t \0
0002300 \0 277 l " \t \0 \0 277 261 377 j l N \t \0 \0
0002320 277 l 017 \t \0 \0 277 l " \t \0 \0 277 261 377 U
0002340 l \r 360 262 025 l \r \t \0 \0 277 l \n \t \0 \0
0002360 277 \b \0 \0 277 261 377 = H \t \0 \0 277 261 377 5
0002400 \0 ( 4 4 7 Q \ L O C A L . S E
0002420 N D B Y T E 4 3 7 Q B L O C
0002440 K 4 3 3 Q \ L O C A L . S E
0002460 N D B Y T E 4 2 5 Q \ L O C
0002500 A L . S E N D B Y T E 4 0 7 Q
0002520 \ L O C A L . S E N D C O M M
0002540 A N D 4 0 1 Q \ L O C A L .
0002560 S E N D B Y T E 3 7 3 Q \ L
0002600 O C A L . S E N D C O M M A N D
0002620 3 6 2 Q \ L O C A L . S E N
0002640 D C O M M A N D 3 5 4 Q \ L
0002660 O C A L . S E N D B Y T E 3 4
0002700 6 Q \ L O C A L . S E N D C O
0002720 M M A N D 3 3 1 Q \ L O C A
0002740 L . S E N D B Y T E 3 2 3 Q
0002760 \ L O C A L . S E N D C O M M A
0003000 N D 3 1 5 Q \ L O C A L . S
0003020 E N D C O M M A N D 2 7 5 Q
0003040 \ L O C A L . S E N D B Y T E
0003060 2 6 7 Q \ L O C A L . S E N D
0003100 C O M M A N D 2 6 1 Q \ L O
0003120 C A L . S E N D C O M M A N D
0003140 2 4 4 Q \ L O C A L . S E N D
0003160 B Y T E 2 3 6 Q \ L O C A L
0003200 . S E N D C O M M A N D 2 3 0
0003220 Q \ L O C A L . S E N D C O M
0003240 M A N D 1 7 0 Q \ L O C A L
0003260 . S E N D B Y T E 1 6 2 Q B
0003300 L O C K 1 5 6 Q \ L O C A L
0003320 . S E N D B Y T E 1 5 0 Q \
0003340 L O C A L . S E N D B Y T E 1
0003360 4 1 Q E O F P 1 3 1 Q B L
0003400 O C K 1 2 5 Q \ L O C A L .
0003420 S E N D B Y T E 1 1 7 Q \ L
0003440 O C A L . S E N D B Y T E 1 1
0003460 1 Q \ L O C A L . S E N D C O
0003500 M M A N D 1 0 3 Q \ L O C A
0003520 L . S E N D S T R I N G 1 0 0
0003540 Q R E A D 7 3 Q \ L O C A
0003560 L . S E N D B Y T E 6 5 Q \
0003600 L O C A L . S E N D S T R I N G
0003620 6 2 Q R E A D 5 5 Q \ L
0003640 O C A L . S E N D B Y T E 4 7
0003660 Q \ L O C A L . S E N D C O M
0003700 M A N D 4 1 Q \ L O C A L .
0003720 T E X T I N I T 3 5 Q \ L O
0003740 C A L . S E L E C T 1 4 Q O
0003760 P E N S T R E A M ) \r ( 1 1 Q
0004000 O L D 6 I N P U T 2 C L
0004020 O S E F ? ) \r N I L \r L O C A L
0004040 . P R I N T F I L E D 1 \r ( P
0004060 2 R E S E T Z P 1 R E
0004100 S E T Y P 0 L I S P X H I
0004120 S T I 0 F I L E F 3
0004140 L I S P X H I S T F 4 R E
0004160 S E T V A R S L S T ) \0 " 003 002
0004200 \0 001 S 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0
0004220 \0 221 h 202 g \0 \0 Z \n \0 \0 J 223 \b \0 \0
0004240 020 I 020 \0 ( 3 5 Q E R R O R !
0004260 3 0 Q R E S E T R E S T O R E
0004300 1 6 Q L O C A L . P R I N T
0004320 F I L E A 0 0 3 6 ) \r ( 2 4 Q
0004340 E R R O R 1 3 Q I N T E R N
0004360 A L ) \r ( 1 0 Q ( D U M M Y .
0004400 F O R . E R R O R S E T ) ) \r L
0004420 O C A L . B I T M A P D 1 \r (
0004440 P 1 0 Q C N T P 7 J
0004460 P 5 C O L U M N P 3 S
0004500 T R P 2 B A S E P 1
0004520 H T P 0 B Y T E S P E R R
0004540 O W I 0 B I T M A P ) \0
0004560 177 \t \0 \0 001 @ 310 002 l 002 326 @ 310 003 @ 311
0004600 \0 o \0 \0 \0 \t \0 \0 021 004 003 K l 004 I \v
0004620 \0 \0 \b \0 \0 \b \0 \0 j H k 331 d n 003 \0
0004640 361 223 277 n 003 \0 021 002 005 L M 361 263 E l S
0004660 \t \0 \0 277 K \t \0 \0 277 I M 021 022 \b k _
0004700 020 N 361 263 027 J O 016 302 \t \0 \0 277 O 016 H
0004720 330 _ 016 277 O 020 k 330 260 347 023 l \r \t \0 \0
0004740 277 l \n \t \0 \0 277 \b \0 \0 277 M k 331 275 260
0004760 272 h 020 \0 ( 1 6 4 Q B L O C K
0005000 1 6 0 Q \ L O C A L . S E N D
0005020 B Y T E 1 5 2 Q \ L O C A L
0005040 . S E N D B Y T E 1 2 6 Q \
0005060 L O C A L . S E N D B Y T E 1
0005100 0 2 Q \ L O C A L . S E N D S
0005120 T R I N G 7 5 Q \ L O C A L
0005140 . S E N D C O M M A N D 4 2 Q
0005160 \ L O C A L . G R A P H I C S
0005200 I N I T 3 7 Q \ L O C A L .
0005220 S E L E C T 3 4 Q \ R P L R
0005240 I G H T 2 2 Q C O N C A T )
0005260 \r N I L \r ( 1 7 Q " 0 0 0 0 "
0005300 ) \r S A V E . B I T M A P . F O
0005320 R . L O C A L . P R I N T E R
0005340 D 1 \r ( P 2 B M I 1 R
0005360 E G I O N I 0 B I T M A P
0005400 ) \0 > 003 \0 \0 002 A 265 004 @ 020 002 002 001
0005420 @ \t \0 \0 021 002 001 H d I 361 221 277 I 022 A
0005440 002 002 002 001 @ \t \0 \0 021 002 001 H d I 361 221
0005460 277 I 022 \n \0 \0 021 001 002 @ A 001 A 002 001 J
0005500 \f \0 \0 J 020 \0 ( 7 2 Q B K B I T
0005520 B L T 5 5 Q B I T M A P C R
0005540 E A T E 3 7 Q B I T M A P H
0005560 E I G H T 1 3 Q B I T M A P
0005600 W I D T H ) \r N I L \r N I L \r \
0005620 L O C A L . G R A P H I C S I N
0005640 I T D 1 \r N I L \0 035 \0 \0 \0 \0
0005660 l " \t \0 \0 l N \t \0 \0 l > \t \0 \0 l
0005700 T \t \0 \0 o \0 \0 \0 \t \0 \0 020 \0 ( 3 2
0005720 Q \ L O C A L . S E N D S T R
0005740 I N G 2 3 Q \ L O C A L . S
0005760 E N D C O M M A N D 1 6 Q \
0006000 L O C A L . S E N D C O M M A N
0006020 D 1 1 Q \ L O C A L . S E N
0006040 D C O M M A N D 4 \ L O C A
0006060 L . S E N D C O M M A N D ) \r N
0006100 I L \r ( 2 7 Q " 1 6 " ) \r \ L
0006120 O C A L . T E X T I N I T D 1
0006140 \r N I L \0 033 \0 \0 \0 \0 l < \t \0 \0
0006160 l " \t \0 \0 l N \t \0 \0 l 017 \t \0 \0 l
0006200 A \t \0 \0 020 \0 ( 3 0 Q \ L O C A
0006220 L . S E N D C O M M A N D 2 3
0006240 Q \ L O C A L . S E N D B Y T
0006260 E 1 6 Q \ L O C A L . S E N
0006300 D C O M M A N D 1 1 Q \ L O
0006320 C A L . S E N D C O M M A N D
0006340 4 \ L O C A L . S E N D C O M
0006360 M A N D ) \r N I L \r N I L \r \ L
0006400 O C A L . S E L E C T D 1 \r N
0006420 I L \0 \t \0 \0 \0 \0 j u l 021 \t \0 \0
0006440 020 \0 ( 6 \ L O C A L . S E N D
0006460 B Y T E ) \r N I L \r N I L \r \ L
0006500 O C A L . S E N D C O M M A N D
0006520 D 1 \r ( I 0 C o m C h a r
0006540 ) \0 \v \0 \0 \0 001 l 033 \t \0 \0 @ \t \0
0006560 \0 020 \0 ( 1 0 Q \ L O C A L . S
0006600 E N D B Y T E 4 \ L O C A L
0006620 . S E N D B Y T E ) \r N I L \r N
0006640 I L \r \ L O C A L . S E N D B Y
0006660 T E D 1 \r ( I 0 B y t e )
0006700 \0 030 \0 \0 \0 001 t n 200 \0 345 j 360 245 \b
0006720 \0 \0 277 260 364 @ u n 200 \0 u @ u 020 \0 (
0006740 1 2 Q B L O C K ) \r N I L \r N
0006760 I L \r \ L O C A L . S E N D S T
0007000 R I N G D 1 \r ( P 2 I P
0007020 0 S L E N I 0 S ) \0
0007040 037 003 \0 \0 001 @ \t \0 \0 021 ! 002 H k 272 271
0007060 J I 361 254 @ J ) \t \0 \0 277 J k 330 Z 260
0007100 362 h 020 \0 ( 2 4 Q \ L O C A L .
0007120 S E N D B Y T E 3 N C H A R
0007140 S ) \r N I L \r N I L \r ( P R E T
0007160 T Y C O M P R I N T P R I N T
0007200 E R C O M S ) \r ( R P A Q Q P
0007220 R I N T E R C O M S ( ( A D D
0007240 V A R S ( P R I N T E R T Y P
0007260 E S ( ( C . I T O H L O C A
0007300 L P R I N T E R ) C A N P R I
0007320 N T ( T E X T B I T M A P )
0007340 S T A T U S T R U E \r P R
0007360 O P E R T I E S N I L L S E
0007400 N D L O C A L . P R I N T ) )
0007420 ) ( F N S L O C A L . P R I
0007440 N T L O C A L . P R I N T F I
0007460 L E L O C A L . B I T M A P
0007500 \r S A V E . B I T M A P . F O R
0007520 . L O C A L . P R I N T E R )
0007540 ( F N S \ L O C A L . G R A P
0007560 H I C S I N I T \ L O C A L .
0007600 T E X T I N I T \ L O C A L .
0007620 S E L E C T \r \ L O C A L . S
0007640 E N D C O M M A N D \ L O C A
0007660 L . S E N D B Y T E \ L O C A
0007700 L . S E N D S T R I N G ) ( D
0007720 E C L A R E : D O N T C O P Y
0007740 ( M A C R O S \ L O C A L .
0007760 M O D E \r \ L O C A L . C R L
0010000 F ) ) ) ) \r ( A D D T O V A R
0010020 P R I N T E R T Y P E S ( ( C
0010040 . I T O H L O C A L P R I N T
0010060 E R ) C A N P R I N T ( T E
0010100 X T B I T M A P ) S T A T U
0010120 S T R U E P R O P E R T I E
0010140 S N I L L S E N D \r L O C
0010160 A L . P R I N T ) ) \r ( P U T P
0010200 R O P S P R I N T E R C O P
0010220 Y R I G H T ( " X e r o x C
0010240 o r p o r a t i o n " 1 9 8 3
0010260 ) ) \r N I L \r
0010267