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