$ od -c -N 50000 [eris]<Lisp>INTERMEZZO>LIBRARY>IMAGEOBJ.DCOM!4
0000000 ( F I L E C R E A T E D " 7
0000020 - M a r - 8 5 0 1 : 2 7 : 0 1
0000040 " ( " c o m p i l e d o n
0000060 " { I V Y } < T E D I T > I M
0000100 A G E O B J . ; 1 7 ) " 2 8 -
0000120 F e b - 8 5 2 1 : 4 7 : 3 5 "
0000140 \r t c o m p l ' d i n " I
0000160 N T E R L I S P - D 2 8 - F e
0000200 b - 8 5 . . . " d a t e d
0000220 " 2 8 - F e b - 8 5 2 2 : 0 0
0000240 : 4 1 " ) \r ( F I L E C R E A T
0000260 E D " 6 - M a r - 8 5 2 3
0000300 : 4 1 : 4 2 " { I V Y } < T E
0000320 D I T > I M A G E O B J . ; 1 7
0000340 1 8 9 2 0 c h a n g e s t
0000360 o : ( F N S G E T . O B J .
0000400 F R O M . U S E R ) \r p r e v
0000420 i o u s d a t e : " 2 0 - F
0000440 e b - 8 5 1 4 : 1 9 : 2 5 "
0000460 { I V Y } < T E D I T > I M A G
0000500 E O B J . ; 1 6 ) \r B I T M A P
0000520 T E D I T O B J D 1 \r ( I 2
0000540 R O T A T I O N I 1 S C
0000560 A L E F A C T O R I 0 B I
0000600 T M A P F 0 B I T M A P I
0000620 M A G E F N S ) \0 023 \0 001 \0 003 @
0000640 A 265 003 k B 265 003 j h 032 032 032 P \n \0 \0
0000660 020 \0 ( 2 0 Q I M A G E O B J C
0000700 R E A T E ) \r N I L \r ( ) \r B M
0000720 O B J . G E T F N 2 D 1 \r ( P
0000740 1 R O T P 0 S C A L E
0000760 I 0 S T R E A M ) \0 032 002
0001000 \0 \0 001 @ 341 @ 330 @ 341 @ 330 021
0001020 002 001 @ \t \0 \0 H I \v \0 \0 020 \0 ( 2 7
0001040 Q B I T M A P T E D I T O B J
0001060 2 2 Q \ R E A D B I N A R Y
0001100 B I T M A P ) \r N I L \r ( ) \r C
0001120 O E R C E T O B I T M A P D 1
0001140 \r ( P 1 C R P 0 B M
0001160 I 0 B M S P E C ) \0 224 003 \0
0001200 \0 001 021 0 002 @ d 004 ` \0 \0 360 224 d 222 261
0001220 \0 205 004 l 004 360 262 023 @ g \0 \0 \n \0 \0 Z
0001240 004 ` \0 \0 360 264 o J 020 @ \t \0 \0 262 . @
0001260 002 002 001 @ 002 002 002 001 ` \0 \0 \t \0 \0 \v \0
0001300 \0 X ` \0 \0 @ 001 @ 002 001 H j d h d g
0001320 \0 \0 g \0 \0 \r \n \0 \0 H 020 @ \t \0 \0 264
0001340 5 @ g \0 \0 \n \0 \0 @ g \0 \0 \n \0 \0 \n
0001360 \0 \0 X @ \t \0 \0 h @ \n \0 \0 Y @ I 001
0001400 I 002 001 H j d I 002 002 001 I 002 002 002 001 \r
0001420 \b \0 \0 H 020 \0 ( 2 2 0 Q B K B I
0001440 T B L T 1 7 1 Q D S P C L I
0001460 P P I N G R E G I O N 1 6 4 Q
0001500 T O T O P W 1 5 7 Q B I T
0001520 M A P C R E A T E 1 5 4 Q G
0001540 E T W I N D O W P R O P 1 4 5
0001560 Q G E T W I N D O W P R O P
0001600 1 3 4 Q W I N D O W P 1 2 6
0001620 Q B K B I T B L T 7 6 Q B
0001640 I T M A P C R E A T E 7 3 Q
0001660 B I T S P E R P I X E L 5 2 Q
0001700 R E G I O N P 3 4 Q E V A
0001720 L V ) \r ( 1 5 1 Q H E I G H T
0001740 1 4 2 Q W I D T H 1 2 2 Q
0001760 R E P L A C E 1 1 7 Q I N
0002000 P U T 1 0 2 Q S c r e e n B
0002020 i t M a p 7 0 Q S c r e e n
0002040 B i t M a p 4 1 Q 004 003 B I T
0002060 M A P T Y P E # 3 1 Q C O E
0002100 R C E T O B I T M A P 1 0 Q
0002120 004 003 B I T M A P T Y P E # ) \r (
0002140 ) \r P R O M P T F O R E V A L E
0002160 D A 0 0 0 1 D 1 \r ( N A M E
0002200 E R R O R S E T F 0 W H E
0002220 R E F 1 M S G F 2 F
0002240 O N T F 3 M A C R O Y F
0002260 4 M I N W I D T H F 5
0002300 M I N H E I G H T F 6 W I
0002320 N ) \0 Y \0 \a 002 \0 P \t \0 \0 222 P 260
0002340 = P 265 L ` \0 \0 P 265 C ` \0 \0 Q R \n
0002360 \0 \0 T 265 003 j \n \0 \0 l \b \n \0 \0 g \0
0002400 \0 \t \0 \0 006 \0 \0 310 024 l 003 332 U 265 003 j
0002420 \n \0 \0 i l \b \v \0 \0 \f \0 \0 Q l \b \v
0002440 \0 \0 c \f \t \0 \0 c 006 i 020 002 260 301 001 260
0002460 270 \0 ( 1 1 5 Q C L E A R W 1
0002500 1 0 Q C R E A T E W 1 0 2 Q
0002520 C R E A T E R E G I O N 7 7
0002540 Q H E I G H T I F W I N D O W
0002560 7 1 Q M A X 5 2 Q D E F
0002600 A U L T F O N T 4 4 Q W I D
0002620 T H I F W I N D O W 3 7 Q M
0002640 A X 3 0 Q S T R I N G W I D
0002660 T H 3 R E G I O N P ) \r ( 5
0002700 5 Q F O N T D E S C R I P T O
0002720 R 4 7 Q D I S P L A Y 2 3
0002740 Q L A S T M O U S E Y 1 5 Q
0002760 L A S T M O U S E X ) \r ( ) \r
0003000 P R O M P T F O R E V A L E D A
0003020 0 0 0 2 A 0 0 0 3 D 1 \r ( N A
0003040 M E E R R O R S E T ) \0 017 \0
0003060 \0 002 \0 i d \n \0 \0 g \0 \0 \n \0 \0 h 032
0003100 020 \0 ( 1 2 Q L I S P X 4 L
0003120 I S P X R E A D ) \r ( 7 > ) \r
0003140 ( ) \r P R O M P T F O R E V A L
0003160 E D A 0 0 0 2 D 1 \r ( N A M E
0003200 E R R O R S E T F 0 N E
0003220 W V A L U E F 1 M A C R O
0003240 Y ) \0 020 \0 002 002 \0 o \0 \0 \0 i \n \0
0003260 \0 001 c \0 c 002 i 020 \0 ( 7 P R O M
0003300 P T F O R E V A L E D A 0 0 0 2
0003320 A 0 0 0 3 ) \r N I L \r ( 3 (
0003340 P R O M P T F O R E V A L E D A
0003360 0 0 0 2 A 0 0 0 3 ) ) \r P R O M
0003400 P T F O R E V A L E D D 1 \r (
0003420 P 6 R E S E T S T A T E P
0003440 5 M A C R O Y P 3 O L
0003460 D V A L U E P 2 W I N P
0003500 1 N E W V A L U E P 0
0003520 F O N T I 4 M I N H E I G
0003540 H T I 3 M I N W I D T H
0003560 I 2 F O N T I 1 W H E
0003600 R E I 0 M S G F 7 R
0003620 E S E T V A R S L S T ) \0 220 \a
0003640 001 \0 005 B 265 \r g \0 \0 l \f g \0 \0 \v \0
0003660 \0 021 ! 002 H \t \0 \0 021 1 006 g \0 \0 K h
0003700 032 032 h 032 W 016 032 c 016 274 o \0 \0 \0 g \0
0003720 \0 \n \0 \0 243 g \0 \0 276 L 002 c 016 277 g \0
0003740 \0 L 001 001 002 \n \0 \0 277 N 223 \b \0 \0 277 023
0003760 J \t \0 \0 021 1 006 g \0 \0 K h 032 032 h 032
0004000 W 016 032 c 016 274 o \0 \0 \0 g \0 \0 \n \0 \0
0004020 243 g \0 \0 276 L 002 c 016 277 g \0 \0 L 001 001
0004040 002 \n \0 \0 277 N 223 \b \0 \0 277 023 J \t \0 \0
0004060 I 020 \0 ( 2 1 4 Q C L O S E W
0004100 2 0 6 Q E R R O R ! 2 0 0 Q
0004120 A P P L Y 1 5 4 Q P R O M
0004140 P T F O R E V A L E D A 0 0 0 2
0004160 1 2 0 Q T T Y D I S P L A Y
0004200 S T R E A M 1 1 2 Q E R R O
0004220 R ! 1 0 4 Q A P P L Y 6 0
0004240 Q P R O M P T F O R E V A L E
0004260 D A 0 0 0 1 2 4 Q W I N D O
0004300 W T I T L E F O N T 1 5 Q F
0004320 O N T C R E A T E ) \r ( 1 7 1 Q
0004340 T T Y D I S P L A Y S T R E A
0004360 M 1 6 0 Q E R R O R 1 5 1
0004400 Q I N T E R N A L 1 2 6 Q
0004420 T T Y D I S P L A Y S T R E A M
0004440 7 5 Q W I N D O W T I T L E
0004460 F O N T 6 4 Q E R R O R 5
0004500 5 Q I N T E R N A L 3 2 Q
0004520 W I N D O W T I T L E F O N T
0004540 1 2 Q B O L D 5 H E L V E
0004560 T I C A ) \r ( 1 4 6 Q ( P R
0004600 O M P T F O R E V A L E D A 0 0
0004620 0 2 ) 5 2 Q ( P R O M P T F
0004640 O R E V A L E D A 0 0 0 1 ) ) \r
0004660 W I N D O W T I T L E F O N T
0004700 D 1 \r ( I 0 F O N T F 0
0004720 W i n d o w T i t l e D i s p
0004740 l a y S t r e a m ) \0 \a \0 001 \0
0004760 001 @ P \n \0 \0 020 \0 ( 4 D S P F O
0005000 N T ) \r N I L \r ( ) \r \ P R I N
0005020 T B I N A R Y B I T M A P D 1
0005040 \r ( P 1 B M H P 0 S T
0005060 R E A M I 1 S T R E A M
0005100 I 0 B I T M A P ) \0 215 \v \0
0005120 \0 002 A g \0 \0 \n \0 \0 021 q \a @ d 004 `
0005140 \0 \0 360 221 244 @ \t \0 \0 277 H @ \t \0 \0 273
0005160 Z K 343 \n \0 \0 277 J K l 377 345 \n \0 \0 277
0005200 H @ \t \0 \0 271 \ I 343 \n \0 \0 277 L I l
0005220 377 345 \n \0 \0 277 H @ \t \0 \0 276 ] N 343 \n
0005240 \0 \0 277 M N l 377 345 \n \0 \0 277 H @ 006 \0
0005260 \0 311 \0 @ 006 \0 \0 310 002 I l 002 332 332 021 003
0005300 \n O 020 006 \0 \0 311 006 006 \0 \0 311 8 _ 016 277
0005320 O 020 O 022 j O 024 l 004 O 016 016 @ 020 \0 (
0005340 1 3 0 Q \ B O U T 1 1 7 Q
0005360 \ B O U T 1 1 0 Q B I T S P
0005400 E R P I X E L 1 0 2 Q \ B O
0005420 U T 7 1 Q \ B O U T 6 2 Q
0005440 B I T M A P H E I G H T 5 4
0005460 Q \ B O U T 4 3 Q \ B O U
0005500 T 3 4 Q B I T M A P W I D T
0005520 H 2 6 Q \ I L L E G A L . A
0005540 R G 6 G E T S T R E A M ) \r
0005560 ( 1 7 0 Q F D E V 1 6 3 Q
0005600 S T R E A M 1 4 4 Q B I T M
0005620 A P 1 3 6 Q B I T M A P 1
0005640 7 Q 004 003 B I T M A P T Y P E #
0005660 3 O U T P U T ) \r ( ) \r \ R
0005700 E A D B I N A R Y B I T M A P
0005720 D 1 \r ( P 3 B I T M A P P
0005740 2 B P P P 1 B M H P
0005760 0 B M W I 0 S T R E A
0006000 M ) \0 R \b \0 \0 001 @ g \0 \0 \n \0 \0
0006020 b \0 d 341 @ 330 @ 341 @ 330 @
0006040 341 @ 330 021 # 004 H I J \v \0 \0 [ @ K
0006060 006 \0 \0 311 \0 K 006 \0 \0 310 002 I l 002 332 332
0006100 021 003 \a M 006 \0 \0 311 006 006 \0 \0 311 6 274 M
0006120 N j O 016 l 004 L 016 K 020 \0 ( 4 3 Q
0006140 B I T M A P C R E A T E 6 G
0006160 E T S T R E A M ) \r ( 1 0 2 Q
0006200 F D E V 7 5 Q S T R E A M
0006220 5 7 Q B I T M A P 5 1 Q B
0006240 I T M A P 3 I N P U T ) \r (
0006260 ) \r B M O B J . B U T T O N E V
0006300 E N T I N F N D 1 \r ( P 1 0
0006320 Q Y P 7 X P 6 T E
0006340 M P P 5 N A M E P 4
0006360 P R E V I O U S . B I T M A P
0006400 P 3 C O M M A N D P 2
0006420 C O M M A N D . M E N U P 1
0006440 N E W . B I T M A P P 0
0006460 O B J I 1 W I N D O W I
0006500 0 I M A G E O B J F 1 3
0006520 Q B I T M A P . O B J . M E N
0006540 U ) 001 ! \v 001 \0 002 @ g \0 \0 \n \0 \0
0006560 021 241 \n H 001 \t \0 \0 \ W 026 004 ` \0 \0 360
0006600 223 W 026 260 S ` \0 \0 037 d o \0 \0 \0 024 022
0006620 277 d o \0 \0 \0 024 004 277 d i 024 \f 277 d g
0006640 \0 \0 024 016 277 m 377 j 032 _ 022 277 d O 022 024
0006660 024 277 d g \0 \0 024 277 d g \0 \0 024 034 277
0006700 j d n 177 377 d h 032 032 032 032 _ 024 277 d O
0006720 024 024 \n 277 c 026 \t \0 \0 d g \0 \0 360 227 277
0006740 L \t \0 \0 261 \0 235 d g \0 \0 360 227 277 L \t
0006760 \0 \0 261 \0 217 d g \0 \0 360 227 277 L \t \0 \0
0007000 261 \0 201 d g \0 \0 360 226 277 L \t \0 \0 260 s
0007020 d g \0 \0 360 226 277 L \t \0 \0 260 f d g \0
0007040 \0 360 226 277 L \t \0 \0 260 Y d g \0 \0 360 226
0007060 277 L \t \0 \0 260 L d g \0 \0 360 226 277 L \t
0007100 \0 \0 260 ? d g \0 \0 360 226 277 L \t \0 \0 260
0007120 2 d g \0 \0 360 226 277 L \t \0 \0 260 % d g
0007140 \0 \0 360 226 277 L \t \0 \0 260 030 d g \0 \0 360
0007160 225 277 L \t \0 \0 211 g \0 \0 360 264 \r L \t \0
0007200 \0 Y H I 030 g \0 \0 020 \0 ( 4 2 7 Q
0007220 I N T E R A C T & A D D . B O R
0007240 D E R . T O . B I T M A P 4 1
0007260 4 Q I N V E R T . B I T M A P
0007300 . B / W 3 7 7 Q I N T E R A
0007320 C T & S H I F T . B I T M A P .
0007340 U P 3 6 2 Q I N T E R A C T
0007360 & S H I F T . B I T M A P . D O
0007400 W N 3 4 5 Q I N T E R A C T
0007420 & S H I F T . B I T M A P . R I
0007440 G H T 3 3 0 Q I N T E R A C
0007460 T & S H I F T . B I T M A P . L
0007500 E F T 3 1 3 Q R O T A T E .
0007520 B I T M A P . R I G H T 2 7 6
0007540 Q R O T A T E . B I T M A P .
0007560 L E F T 2 6 1 Q I N V E R T
0007600 . B I T M A P . D I A G O N A L
0007620 L Y 2 4 4 Q I N V E R T . B
0007640 I T M A P . V E R T I C A L L Y
0007660 2 2 6 Q I N V E R T . B I T
0007700 M A P . H O R I Z O N T A L L Y
0007720 2 1 0 Q T R I M . B I T M A
0007740 P 1 7 2 Q E D I T B M 1 5
0007760 7 Q M E N U 1 6 Q B I T M
0010000 A P C O P Y 6 I M A G E O B
0010020 J P R O P ) \r ( 4 3 6 Q C H A
0010040 N G E D 4 2 0 Q A D D . B O
0010060 R D E R 4 0 5 Q I N T E R C
0010100 H A N G E . B L A C K / W H I T
0010120 E 3 7 0 Q S H I F T . U P
0010140 3 5 3 Q S H I F T . D O W N
0010160 3 3 6 Q S H I F T . R I G H T
0010200 3 2 1 Q S H I F T . L E F T
0010220 3 0 4 Q R O T A T E . B I T
0010240 M A P . R I G H T 2 6 7 Q R
0010260 O T A T E . B I T M A P . L E F
0010300 T 2 5 2 Q I N V E R T . D I
0010320 A G O N A L L Y 2 3 5 Q I N
0010340 V E R T . V E R T I C A L L Y
0010360 2 1 7 Q I N V E R T . H O R I
0010400 Z O N T A L L Y 2 0 1 Q T R
0010420 I M 1 6 3 Q H A N D . E D I
0010440 T 1 2 3 Q D E F A U L T M E
0010460 N U H E L D F N 1 1 4 Q C L
0010500 R P R O M P T 7 0 Q Y 3 6
0010520 Q 004 003 M E N U T Y P E # 2 5
0010540 Q 004 003 M E N U T Y P E # 3
0010560 O B J E C T D A T U M ) \r ( 5
0010600 4 Q ( ( H A N D . E D I T (
0010620 Q U O T E H A N D . E D I T )
0010640 " S t a r t s t h e b i t
0010660 m a p e d i t o r o n t h
0010700 i s b i t m a p . " ) ( T R
0010720 I M ( Q U O T E T R I M )
0010740 " r e m o v e s t h e w h i
0010760 t e s p a c e f r o m t h
0011000 e e d g e s o f t h e b
0011020 i t m a p . " ) ( I N V E R T
0011040 . H O R I Z O N T A L L Y ( Q
0011060 U O T E I N V E R T . H O R I
0011100 Z O N T A L L Y ) " i n v e r
0011120 t s t h e b i t m a p a b
0011140 o u t t h e v e r t i c a l
0011160 m i d l i n e . " ) ( I N V
0011200 E R T . V E R T I C A L L Y (
0011220 Q U O T E I N V E R T . V E R
0011240 T I C A L L Y ) " i n v e r t
0011260 s t h e b i t m a p a b o
0011300 u t t h e h o r i z o n t a
0011320 l m i d l i n e . " ) ( I N
0011340 V E R T . D I A G O N A L L Y
0011360 ( Q U O T E I N V E R T . D I
0011400 A G O N A L L Y ) " i n v e r
0011420 t s t h e b i t m a p a b
0011440 o u t t h e l o w e r l e
0011460 f t t o u p p e r r i g h
0011500 t d i a g o n a l . " ) ( R
0011520 O T A T E . B I T M A P . L E F
0011540 T ( Q U O T E R O T A T E .
0011560 B I T M A P . L E F T ) " r o
0011600 t a t e s t h e b i t m a p
0011620 9 0 d e g r e e s c o u n
0011640 t e r - c l o c k w i s e . " )
0011660 ( R O T A T E . B I T M A P .
0011700 R I G H T ( Q U O T E R O T
0011720 A T E . B I T M A P . R I G H T
0011740 ) " r o t a t e s t h e b
0011760 i t m a p 9 0 d e g r e e s
0012000 c l o c k w i s e . " ) ( S
0012020 H I F T . L E F T ( Q U O T E
0012040 S H I F T . L E F T ) " p r
0012060 o m p t s f o r a n u m b
0012100 e r o f b i t s t o a d
0012120 d o n t h e r i g h t . "
0012140 ) ( S H I F T . R I G H T (
0012160 Q U O T E S H I F T . R I G H
0012200 T ) " p r o m p t s f o r
0012220 a n u m b e r o f b i t s
0012240 t o a d d o n t h e l
0012260 e f t . " ) ( S H I F T . D O
0012300 W N ( Q U O T E S H I F T .
0012320 D O W N ) " p r o m p t s f
0012340 o r a n u m b e r o f b
0012360 i t s t o a d d o n t h
0012400 e t o p . " ) ( S H I F T .
0012420 U P ( Q U O T E S H I F T .
0012440 U P ) " p r o m p t s f o r
0012460 a n u m b e r o f b i t
0012500 s t o a d d o n t h e
0012520 b o t t o m . " ) ( I N T E R
0012540 C H A N G E . B L A C K / W H I
0012560 T E ( Q U O T E I N T E R C
0012600 H A N G E . B L A C K / W H I T
0012620 E ) " c h a n g e s a l l
0012640 b l a c k b i t s t o w h
0012660 i t e a n d a l l w h i t
0012700 e b i t s t o b l a c k .
0012720 " ) ( A D D . B O R D E R (
0012740 Q U O T E A D D . B O R D E R
0012760 ) " a d d s a n a r b i t
0013000 r a r y b o r d e r i n a
0013020 n a r b i t r a r y s h a d
0013040 e . " ) ) 4 4 Q " O p e r a
0013060 t i o n s o n b i t m a p s
0013100 " ) \r B M O B J . C O P Y F N
0013120 D 1 \r ( P 0 B M O B J I
0013140 0 I M A G E O B J ) \0 033 001 \0
0013160 \0 001 @ g \0 \0 \n \0 \0 021 001 \0 H 001 \t \0
0013200 \0 H 002 001 H 002 002 001 \v \0 \0 020 \0 ( 3 0
0013220 Q B I T M A P T E D I T O B J
0013240 1 6 Q B I T M A P C O P Y
0013260 6 I M A G E O B J P R O P ) \r
0013300 ( 3 O B J E C T D A T U M ) \r
0013320 ( ) \r B M O B J . D I S P L A Y
0013340 F N D 1 \r ( I 1 S T R E A
0013360 M I 0 B M O B J ) \0 p \0
0013400 \0 \0 002 A \t \0 \0 d g \0 \0 360 262 034 @ g
0013420 \0 \0 \n \0 \0 001 j d A h A \n \0 \0 h A
0013440 \n \0 \0 \r 006 \0 \0 020 d g \0 \0 360 262 % 277
0013460 A @ g \0 \0 \n \0 \0 001 h @ g \0 \0 \n \0
0013500 \0 002 001 @ g \0 \0 \n \0 \0 002 002 001 \r 005 \0
0013520 \0 020 g \0 \0 360 264 033 @ g \0 \0 \n \0 \0 001
0013540 h A \n \0 \0 h A \n \0 \0 h d A \r 006 \0
0013560 \0 020 \0 ( 1 5 5 Q \ W R I T E P
0013600 R E S S B I T M A P 1 4 6 Q
0013620 D S P Y P O S I T I O N 1 4 1
0013640 Q D S P X P O S I T I O N 1
0013660 3 3 Q I M A G E O B J P R O P
0013700 1 1 5 Q S H O W B I T M A P
0013720 . I P 1 0 6 Q I M A G E O B
0013740 J P R O P 7 5 Q I M A G E O
0013760 B J P R O P 6 4 Q I M A G E
0014000 O B J P R O P 4 3 Q B K B I
0014020 T B L T 3 7 Q D S P Y P O S
0014040 I T I O N 3 2 Q D S P X P O
0014060 S I T I O N 2 1 Q I M A G E
0014100 O B J P R O P 3 I M A G E S
0014120 T R E A M T Y P E ) \r ( 1 3 0 Q
0014140 O B J E C T D A T U M 1 2 1
0014160 Q P R E S S 1 0 3 Q O B J
0014200 E C T D A T U M 7 2 Q O B J
0014220 E C T D A T U M 6 1 Q O B J
0014240 E C T D A T U M 5 0 Q I N T
0014260 E R P R E S S 1 6 Q O B J E
0014300 C T D A T U M 7 D I S P L A
0014320 Y ) \r ( ) \r B M O B J . G E T F
0014340 N A 0 0 0 1 D 1 \r ( N A M E
0014360 E R R O R S E T P 1 B I T
0014400 M A P P 0 F I E L D S F
0014420 2 S T R E A M F 3 M A
0014440 C R O Y ) \0 031 002 002 002 \0 R \t \0 \0
0014460 \b \0 \0 021 002 001 I H 001 H 002 001 \v \0 \0 022
0014500 c 006 i 020 \0 ( 2 2 Q B I T M A P
0014520 T E D I T O B J 6 R E A D B
0014540 I T M A P 3 R E A D ) \r N I
0014560 L \r ( ) \r B M O B J . G E T F N
0014600 D 1 \r ( P 3 R E S E T S T
0014620 A T E P 2 M A C R O Y P
0014640 0 O L D V A L U E I 0
0014660 S T R E A M F 4 R E S E T
0014700 V A R S L S T ) \0 ; 004 001 \0 001 @
0014720 \t \0 \0 021 1 003 g \0 \0 H h 032 032 h 032 T
0014740 032 c \b Y o \0 \0 \0 g \0 \0 \n \0 \0 243 g
0014760 \0 \0 273 I 002 c \b g \0 \0 I 001 001 002 \n \0
0015000 \0 K 223 \b \0 \0 020 J 020 \0 ( 6 6 Q E
0015020 R R O R ! 6 1 Q A P P L Y
0015040 3 6 Q B M O B J . G E T F N A
0015060 0 0 0 1 3 I N P U T ) \r ( 5
0015100 2 Q I N P U T 4 2 Q E R R
0015120 O R 3 3 Q I N T E R N A L
0015140 1 1 Q I N P U T ) \r ( 3 0 Q
0015160 ( B M O B J . G E T F N A 0 0
0015200 0 1 ) ) \r B M O B J . I M A G E
0015220 B O X F N D 1 \r ( P 3 S C
0015240 A L E F A C T O R P 2 B M
0015260 H P 1 B M W P 0 B M
0015300 O B J I 1 S T R E A M I
0015320 0 I M A G E O B J ) \0 217 004
0015340 \0 \0 002 @ g \0 \0 \n \0 \0 021 1 003 H 001 Z
0015360 \t \0 \0 Y J \t \0 \0 Z A \t \0 \0 d g \0
0015400 \0 360 232 277 I J j d h 032 032 032 032 020 d g
0015420 \0 \0 360 262 + H d 002 002 001 o \0 \0 \0 \n \0
0015440 \0 225 277 J I 272 271 H 002 001 [ I l # 326 326
0015460 K J l # 326 326 j d h 032 032 032 032 020 g \0
0015500 \0 360 264 . H d 002 002 001 o \0 \0 \0 \n \0 \0
0015520 225 277 J I 272 271 H 002 001 [ I l 326 326 j
0015540 330 K J l 326 326 j 330 j d h 032 032 032 032
0015560 020 \0 ( 1 5 4 Q M E M B 7 5 Q
0015600 M E M B 3 1 Q I M A G E S
0015620 T R E A M T Y P E 2 4 Q B I
0015640 T M A P H E I G H T 1 7 Q B
0015660 I T M A P W I D T H 6 I M A
0015700 G E O B J P R O P ) \r ( 1 3 5 Q
0015720 P R E S S 5 6 Q I N T E R
0015740 P R E S S 3 5 Q D I S P L A
0015760 Y 3 O B J E C T D A T U M )
0016000 \r ( 1 5 1 Q ( 1 3 2 Q 4 1
0016020 6 Q ) 7 2 Q ( 1 3 2 Q 4 1
0016040 6 Q ) ) \r B M O B J . P U T F N
0016060 D 1 \r ( I 1 S T R E A M
0016100 I 0 B M O B J ) \0 I 002 \0 \0
0016120 002 A @ g \0 \0 \n \0 \0 002 001 021 002 001 H I
0016140 343 \n \0 \0 277 H I l 377 345 \n \0 \0 023 A @
0016160 g \0 \0 \n \0 \0 002 002 001 021 002 001 H I 343 \n
0016200 \0 \0 277 H I l 377 345 \n \0 \0 023 @ g \0 \0
0016220 \n \0 \0 001 A \n \0 \0 020 \0 ( 1 0 6 Q
0016240 \ P R I N T B I N A R Y B I T M
0016260 A P 1 0 1 Q I M A G E O B J
0016300 P R O P 7 1 Q \ B O U T 6
0016320 0 Q \ B O U T 4 4 Q I M A
0016340 G E O B J P R O P 3 3 Q \ B
0016360 O U T 2 2 Q \ B O U T 7
0016400 I M A G E O B J P R O P ) \r ( 7
0016420 6 Q O B J E C T D A T U M 4
0016440 1 Q O B J E C T D A T U M 4
0016460 O B J E C T D A T U M ) \r ( )
0016500 \r B M O B J . I N I T D 1 \r (
0016520 I 2 R O T A T I O N I 1
0016540 S C A L E F A C T O R I 0
0016560 B I T M A P F 0 B I T M
0016600 A P I M A G E F N S ) \0 # \0 001
0016620 \0 003 g \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0
0016640 \0 g \0 \0 g \0 \0 d d d d d d \r \r \0
0016660 \0 c \0 020 \0 ( 3 6 Q I M A G E F
0016700 N S C R E A T E ) \r ( 2 4 Q N
0016720 I L L 2 1 Q B M O B J . B U
0016740 T T O N E V E N T I N F N 1 6
0016760 Q B M O B J . C O P Y F N 1
0017000 3 Q B M O B J . G E T F N 2
0017020 1 0 Q B M O B J . P U T F N
0017040 5 B M O B J . I M A G E B O X
0017060 F N 2 B M O B J . D I S P L
0017100 A Y F N ) \r ( ) \r G E T . O B J
0017120 . F R O M . U S E R A 0 0 0 1
0017140 D 1 \r ( N A M E E R R O R S E
0017160 T P 2 B M P 1 S E L
0017200 P 0 V A L F 3 T E X
0017220 T S T R E A M F 4 T E X T
0017240 O B J ) \0 232 003 002 002 \0 o \0 \0 \0 \t
0017260 \0 \0 T 006 \0 \0 311 032 021 022 002 H \t \0 \0 d
0017300 g \0 \0 360 245 d g \0 \0 360 227 277 H 264 H S
0017320 H 260 > g \0 \0 360 262 ) H S I 006 \0 \0 311
0017340 024 d g \0 \0 360 227 277 I 006 \0 \0 311 006 213 g
0017360 \0 \0 360 264 \b I 006 \0 \0 311 \n \v \0 \0 260 025
0017400 H \t \0 \0 Z 265 024 H 264 \r S H \t \0 \0 I
0017420 \v \0 \0 277 h 022 h 032 020 k j \v \0 \0 S I
0017440 006 \0 \0 311 024 d g \0 \0 360 227 277 I 006 \0 \0
0017460 311 006 213 g \0 \0 360 264 \b I 006 \0 \0 311 \n \v
0017500 \0 \0 260 321 \0 ( 2 2 6 Q T E D I T
0017520 . I N S E R T . O B J E C T 1
0017540 6 2 Q B I T M A P T E D I T O
0017560 B J 1 4 7 Q T E D I T . I N
0017600 S E R T 1 4 3 Q M K S T R I
0017620 N G 1 3 0 Q C O E R C E T O
0017640 B I T M A P 1 2 2 Q T E D I
0017660 T . I N S E R T . O B J E C T
0017700 2 3 Q T Y P E N A M E 6 P
0017720 R O M P T F O R E V A L E D ) \r
0017740 ( 2 2 1 Q S E L E C T I O N
0017760 2 1 2 Q R I G H T 2 0 4 Q
0020000 S E L E C T I O N 1 7 5 Q L
0020020 E F T 1 6 7 Q S E L E C T I
0020040 O N 1 1 5 Q S E L E C T I O
0020060 N 1 0 6 Q R I G H T 1 0 0
0020100 Q S E L E C T I O N 7 1 Q
0020120 L E F T 6 3 Q S E L E C T I
0020140 O N 5 2 Q I M A G E O B J
0020160 3 5 Q S T R I N G P 2 7 Q
0020200 L I T A T O M 1 2 Q T E X T
0020220 O B J ) \r ( 3 " F o r m t
0020240 o e v a l : " ) \r G E T . O B
0020260 J . F R O M . U S E R D 1 \r (
0020300 I 1 T E X T O B J I 0
0020320 T E X T S T R E A M ) \0 \n \0 \0
0020340 \0 002 o \0 \0 \0 i \n \0 \0 020 \0 ( 7 G
0020360 E T . O B J . F R O M . U S E R
0020400 A 0 0 0 1 ) \r N I L \r ( 3 (
0020420 G E T . O B J . F R O M . U S E
0020440 R A 0 0 0 1 ) ) \r B I T M A P O
0020460 B J . S N A P W D 1 \r ( P 1
0020500 B M P 0 R E G ) \0 < 002
0020520 \0 \0 \0 \b \0 \0 021 021 001 H 002 002 001 H 002 002
0020540 002 001 ` \0 \0 \t \0 \0 \v \0 \0 Y ` \0 \0 H
0020560 001 H 002 001 I j d h d g \0 \0 g \0 \0 \r
0020600 \n \0 \0 I k j \v \0 \0 \t \0 \0 h 020 \0 (
0020620 7 0 Q C O P Y I N S E R T 6
0020640 5 Q B I T M A P T E D I T O B
0020660 J 5 7 Q B K B I T B L T 2
0020700 7 Q B I T M A P C R E A T E
0020720 2 4 Q B I T S P E R P I X E L
0020740 2 G E T R E G I O N ) \r ( 5
0020760 3 Q R E P L A C E 5 0 Q I
0021000 N P U T 3 3 Q S c r e e n B
0021020 i t M a p 2 1 Q S c r e e n
0021040 B i t M a p ) \r ( ) \r ( P R E T
0021060 T Y C O M P R I N T I M A G E
0021100 O B J C O M S ) \r ( R P A Q Q
0021120 I M A G E O B J C O M S ( ( C
0021140 O M S ( * B i t - m a p i
0021160 m a g e o b j e c t s ) ( F
0021200 N S B I T M A P T E D I T O B
0021220 J B M O B J . G E T F N 2 C
0021240 O E R C E T O B I T M A P \r P
0021260 R O M P T F O R E V A L E D W
0021300 I N D O W T I T L E F O N T \
0021320 P R I N T B I N A R Y B I T M A
0021340 P \ R E A D B I N A R Y B I T
0021360 M A P ) ( * f n s f o r
0021400 t h e b i t m a p t e d i t
0021420 \r o b j e c t . ) ( F N S
0021440 B M O B J . B U T T O N E V E N
0021460 T I N F N B M O B J . C O P Y
0021500 F N B M O B J . D I S P L A Y
0021520 F N B M O B J . G E T F N B
0021540 M O B J . I M A G E B O X F N
0021560 \r B M O B J . P U T F N B M O
0021600 B J . I N I T ) ( R E C O R D
0021620 S B I T M A P O B J ) ( *
0021640 m a k e ^ O b e a c h a
0021660 r a c t e r t h a t i n s e
0021700 r t s a n o b j e c t r e
0021720 a d f r o m \r t h e u s e
0021740 r . ) ( G L O B A L V A R S
0021760 ( B I T M A P . O B J . M E N U
0022000 ) ) ( A D D V A R S ( B a c
0022020 k g r o u n d C o p y M e n u C
0022040 o m m a n d s ( S N A P ( Q
0022060 U O T E ( \r B I T M A P O B J
0022100 . S N A P W ) ) " p r o m p t
0022120 s f o r a n a r e a o f
0022140 t h e s c r e e n t o i
0022160 n s e r t . " ) ) ( I M A G E
0022200 O B J G E T F N S ( B M O B J
0022220 . G E T F N ) ) ) ( \r V A R S
0022240 ( B a c k g r o u n d C o p y
0022260 M e n u ) ) ( F N S G E T .
0022300 O B J . F R O M . U S E R B I
0022320 T M A P O B J . S N A P W ) (
0022340 D E C L A R E : D O N T E V A
0022360 L @ L O A D D O C O P Y ( P
0022400 ( \r B M O B J . I N I T ) (
0022420 T E D I T . S E T F U N C T I O
0022440 N ( C H A R C O D E ^ O )
0022460 ( F U N C T I O N G E T . O B
0022500 J . F R O M . U S E R ) T E D
0022520 I T . R E A D T A B L E ) ) )
0022540 ( F I L E S \r E D I T B I T M
0022560 A P ) ) ) ) \r ( R E C O R D B
0022600 I T M A P O B J ( B I T M A P
0022620 B M O B J S C A L E F A C T O
0022640 R B M O B J R O T A T I O N )
0022660 ) \r ( A D D T O V A R B a c k
0022700 g r o u n d C o p y M e n u C o
0022720 m m a n d s ( S N A P ( Q U
0022740 O T E ( B I T M A P O B J . S
0022760 N A P W ) ) \r " p r o m p t s
0023000 f o r a n a r e a o f
0023020 t h e s c r e e n t o i n
0023040 s e r t . " ) ) \r ( A D D T O V
0023060 A R I M A G E O B J G E T F N
0023100 S ( B M O B J . G E T F N ) )
0023120 \r ( R P A Q Q B a c k g r o u
0023140 n d C o p y M e n u N I L ) \r
0023160 ( B M O B J . I N I T ) \r ( T E
0023200 D I T . S E T F U N C T I O N
0023220 ( C H A R C O D E ^ O ) ( F
0023240 U N C T I O N G E T . O B J .
0023260 F R O M . U S E R ) T E D I T
0023300 . R E A D T A B L E ) \r ( F I L
0023320 E S L O A D E D I T B I T M A
0023340 P ) \r ( P U T P R O P S I M A
0023360 G E O B J C O P Y R I G H T
0023400 ( " X e r o x C o r p o r a t
0023420 i o n " 1 9 8 4 1 9 8 5 ) )
0023440 \r N I L \r
0023445