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