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