$ od -c -N 50000 [eris]<Lisp>Harmony>Library>BITMAPFNS.DCOM!2 0000000 ( F I L E C R E A T E D " 1 1 0000020 - J a n - 8 5 1 1 : 0 9 : 3 2 0000040 " ( " c o m p i l e d o n 0000060 " { D A N T E } < W O G U L I 0000100 S > L I S P > B I T M A P F N S 0000120 . ; 2 ) \r " 2 0 - D e c - 8 4 0000140 1 2 : 0 7 : 2 2 " r e c o m 0000160 p i l e d c h a n g e s : n 0000200 o t h i n g i n " I N T E R 0000220 L I S P - D 2 0 - D e c - 8 4 0000240 . . . " d a t e d \r " 2 0 0000260 - D e c - 8 4 1 2 : 2 4 : 5 2 0000300 " ) \r ( F I L E C R E A T E D 0000320 " 1 1 - J a n - 8 5 1 1 : 0 8 0000340 : 5 8 " { D A N T E } < W O G 0000360 U L I S > L I S P > B I T M A P 0000400 F N S . ; 2 5 4 0 0 c h a n 0000420 g e s t o : ( V A R S \r B 0000440 I T M A P F N S C O M S ) p r 0000460 e v i o u s d a t e : " 2 6 0000500 - D e c - 8 4 1 5 : 4 3 : 5 5 0000520 " { D A N T E } < W O G U L I 0000540 S > L I S P > B I T M A P F N S 0000560 . ; 1 ) \r R E A D B I N A R Y B 0000600 I T M A P D 1 \r ( P 0 B M 0000620 I 2 F I L E I 1 H E 0000640 I G H T I 0 W I D T H ) 0000660 \0 ? 005 \0 \0 003 @ A \n \0 \0 021 021 001 B g 0000700 \0 \0 \n \0 \0 H 006 \0 \0 311 \0 H 006 \0 \0 310 0000720 002 H 006 \0 \0 310 003 l 002 332 332 021 003 004 J 006 0000740 \0 \0 311 006 006 \0 \0 311 6 271 J K j L l 004 0000760 I 016 H 020 \0 ( 1 6 Q G E T S T R 0001000 E A M 4 B I T M A P C R E A 0001020 T E ) \r ( 6 0 Q F D E V 5 3 0001040 Q S T R E A M 3 6 Q B I T 0001060 M A P 3 0 Q B I T M A P 2 0001100 2 Q B I T M A P 1 3 Q I N 0001120 P U T ) \r ( ) \r W R I T E B I N 0001140 A R Y B I T M A P D 1 \r ( I 0001160 1 F I L E I 0 B I T M A 0001200 P ) \0 , 004 \0 \0 002 A @ 006 \0 \0 b \0 0001220 311 \0 @ 310 003 @ 310 002 l 002 332 332 021 023 003 H 0001240 006 \0 \0 311 006 006 \0 \0 311 8 273 H I j J l 0001260 004 K 016 020 \0 N I L \r ( 3 6 Q F D 0001300 E V 3 1 Q S T R E A M 4 0001320 B I T M A P ) \r ( ) \r W R I T E 0001340 B M D 1 \r ( I 1 B I T M A 0001360 P I 0 F I L E ) \0 7 \0 \0 0001400 \0 002 @ A 006 \0 \0 b 002 310 004 343 \n \0 \0 277 0001420 @ A 006 \0 \0 b 002 310 004 l 377 345 \n \0 \0 @ 0001440 A 310 003 343 \n \0 \0 277 @ A 310 003 l 377 345 \n 0001460 \0 \0 A @ \n \0 \0 020 \0 ( 6 4 Q W R 0001500 I T E B I N A R Y B I T M A P 0001520 5 7 Q B O U T 4 4 Q B O U 0001540 T 3 4 Q B O U T 1 4 Q B 0001560 O U T ) \r ( 2 2 Q B I T M A P 0001600 4 B I T M A P ) \r ( ) \r W R 0001620 I T E B M L S T D 1 \r ( P 1 0001640 I P 0 F I 1 L S T 0001660 I 0 F I L E ) \0 % 002 \0 \0 0001700 002 @ g \0 \0 g \0 \0 \v \0 \0 021 001 \0 A 213 0001720 d 001 021 001 001 H I \n \0 \0 023 002 003 265 363 H 0001740 \t \0 \0 h 020 \0 ( 4 1 Q C L O S E 0001760 F 3 0 Q W R I T E B M 1 1 0002000 Q O P E N S T R E A M ) \r ( 6 0002020 N E W 3 O U T P U T ) \r ( 0002040 ) \r R E A D B M L S T D 1 \r ( 0002060 P 0 F I 0 F I L E ) 0002100 \0 . 004 \0 \0 001 @ g \0 \0 g \0 \0 \v \0 \0 0002120 021 1 003 H \t \0 \0 263 026 H \t \0 \0 273 J 265 0002140 \t K h 032 Z 271 260 355 K & 272 260 350 H \t \0 0002160 \0 I 020 \0 ( 5 2 Q C L O S E F 0002200 2 6 Q R E A D B M 2 0 Q E 0002220 O F P 1 1 Q O P E N S T R E 0002240 A M ) \r ( 6 O L D 3 I N P 0002260 U T ) \r ( ) \r R E A D B M D 1 0002300 \r ( I 0 F I L E ) \0 022 \0 \0 0002320 \0 001 @ 341 @ 330 @ 341 @ 330 @ \v 0002340 \0 \0 020 \0 ( 1 7 Q R E A D B I N 0002360 A R Y B I T M A P ) \r N I L \r ( 0002400 ) \r R E A D P R E S S A 0 0 0 1 0002420 D 1 \r ( N A M E E R R O R S 0002440 E T P 1 0 Q W I D T H P 0002460 7 X P 6 T O T C O U N 0002500 T P 5 B I T M A P P 4 0002520 M I C A H E I G H T P 3 0002540 M I C A W I D T H P 2 H T 0002560 P 1 W W P 0 O F D 0002600 F 1 5 Q R E S E T V A R S L 0002620 S T F 1 6 Q F I L E N A M 0002640 E F 1 7 Q R E S E T Y ) 0002660 001 \0 \r 003 002 \0 W 034 g \0 \0 g \0 \0 \v \0 0002700 \0 g \0 \0 \n \0 \0 021 221 \t g \0 \0 H h 032 0002720 032 h h 032 032 W 032 032 c 032 277 H 341 H 0002740 330 n 001 \0 360 243 \b \0 \0 277 H 341 H 330 0002760 l 020 333 271 H 341 H 330 272 H 341 H 0003000 330 _ 016 d n 002 003 360 262 " 277 H 341 H 0003020 330 l 002 360 243 \b \0 \0 277 H 341 H 330 273 0003040 H 341 H 330 274 h 260 C k 360 262 4 H 0003060 341 H 330 j 360 243 \b \0 \0 277 H 341 H 0003100 330 _ 020 277 H 341 H 330 j 360 243 \b \0 \0 0003120 277 H 341 H 330 J 360 243 \b \0 \0 277 h 212 0003140 O 016 l 003 360 221 i 202 \b \0 \0 262 220 H I l 0003160 020 332 J \n \0 \0 ] 006 \0 \0 311 \0 J I 332 ^ 0003200 l 002 332 021 003 \f O 024 006 \0 \0 311 006 006 \0 \0 0003220 311 6 _ 022 277 O 024 O 026 j O 030 l 004 O 022 0003240 016 023 H 341 H 330 j 360 243 \b \0 \0 277 M 0003260 022 c 036 i 020 \0 ( 3 6 7 Q H E L P 0003300 2 7 7 Q B I T M A P C R E A 0003320 T E 2 6 4 Q H E L P 2 4 6 0003340 Q H E L P 2 3 1 Q H E L P 0003360 2 0 3 Q H E L P 1 4 1 Q 0003400 H E L P 6 2 Q H E L P 2 0 0003420 Q G E T S T R E A M 1 2 Q 0003440 O P E N F I L E ) \r ( 3 3 1 Q 0003460 F D E V 3 2 4 Q S T R E A M 0003500 3 0 3 Q B I T M A P 2 6 Q 0003520 C L O S E F 1 5 Q I N P U 0003540 T 7 O L D 4 I N P U T ) 0003560 \r ( ) \r R E A D P R E S S D 1 0003600 \r ( P 2 R E S E T Z P 1 0003620 R E S E T Y P 0 L I S P 0003640 X H I S T I 0 F I L E N A 0003660 M E F 3 L I S P X H I S T 0003700 F 4 R E S E T V A R S L S 0003720 T ) \0 " 003 002 \0 001 S 021 ! 002 T o \0 0003740 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z \n 0003760 \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5 Q 0004000 E R R O R ! 3 0 Q R E S E T 0004020 R E S T O R E 1 6 Q R E A D 0004040 P R E S S A 0 0 0 1 ) \r ( 2 4 Q 0004060 E R R O R 1 3 Q I N T E R 0004100 N A L ) \r ( 1 0 Q ( R E A D 0004120 P R E S S A 0 0 0 1 ) ) \r W I N 0004140 D O W B M D 1 \r ( P 0 W I 0004160 N D I 1 P O S I T I O N 0004200 I 0 B I T M A P ) \0 P 001 \0 0004220 \0 002 A 262 023 A \t \0 \0 250 o \0 \0 \0 A \n 0004240 \0 \0 277 A 265 025 @ \t \0 \0 l \b 330 @ \t \0 0004260 \0 l \b 330 \n \0 \0 b 002 001 A 002 @ \t \0 \0 0004300 l \b 330 @ \t \0 \0 l \b 330 h 032 032 032 032 h 0004320 l 004 \v \0 \0 021 001 \0 @ j d H \f \0 \0 H 0004340 020 \0 ( 1 1 4 Q B K B I T B L T 0004360 1 0 2 Q C R E A T E W 6 4 0004400 Q B I T M A P H E I G H T 5 0004420 5 Q B I T M A P W I D T H 4 0004440 4 Q G E T B O X P O S I T I O 0004460 N 3 6 Q B I T M A P H E I G 0004500 H T 2 7 Q B I T M A P W I D 0004520 T H 1 7 Q E R R O R 6 P 0004540 O S I T I O N P ) \r N I L \r ( 0004560 1 3 Q " N O T A P O S I T 0004600 I O N " ) \r ( P R E T T Y C O M 0004620 P R I N T B I T M A P F N S C 0004640 O M S ) \r ( R P A Q Q B I T M 0004660 A P F N S C O M S ( ( F N S 0004700 R E A D B I N A R Y B I T M A P 0004720 W R I T E B I N A R Y B I T M 0004740 A P W R I T E B M W R I T E 0004760 B M L S T R E A D B M L S T 0005000 R E A D B M \r R E A D P R E S 0005020 S W I N D O W B M ) ( M A C 0005040 R O S R P C H K W O R D I N 0005060 W O R D O U T ) ) ) \r ( P U T 0005100 P R O P S R P C H K M A C R 0005120 O ( ( N ) ( O R ( E Q ( 0005140 W O R D I N O F D ) N ) ( 0005160 H E L P ) ) ) ) \r ( P U T P R O 0005200 P S W O R D I N M A C R O 0005220 ( ( S T R E A M ) ( I P L U S 0005240 ( L L S H ( B I N S T R E 0005260 A M ) 8 ) ( B I N S T R E 0005300 A M ) ) ) ) \r ( P U T P R O P S 0005320 W O R D O U T M A C R O ( 0005340 ( F W ) ( B O U T F ( L 0005360 R S H W 8 ) ) ( B O U T 0005400 F ( L O G A N D W 2 5 5 ) 0005420 ) ) ) \r ( P U T P R O P S B I 0005440 T M A P F N S C O P Y R I G H 0005460 T ( " X e r o x C o r p o r 0005500 a t i o n " 1 9 8 3 1 9 8 4 0005520 1 9 8 5 ) ) \r N I L \r 0005534