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