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