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