$ od -c -N 50000 [eris]<Lisp>KOTO>LISPUSERS>GLISPGEVAUX.DCOM!1 0000000 ( F I L E C R E A T E D " 1 7 0000020 - J a n - 8 5 0 8 : 4 9 : 2 4 0000040 " ( " c o m p i l e d o n 0000060 " { D A N T E } < L I S P U S 0000100 E R S > G L I S P > G E V A U X 0000120 . D O L ; 1 ) \r " 2 0 - D e c 0000140 - 8 4 1 2 : 0 7 : 2 2 " t c 0000160 o m p l ' d i n " I N T E R 0000200 L I S P - D 2 0 - D e c - 8 4 0000220 . . . " d a t e d " 2 0 - 0000240 D e c - 8 4 1 2 : 1 6 : 5 7 " 0000260 ) \r ( F I L E C R E A T E D " 0000300 1 1 - A U G - 8 3 1 6 : 5 9 : 0000320 4 0 " { D S K } G E V A U X . 0000340 L S P ; 1 3 6 7 2 5 c h a n 0000360 g e s t o : ( V A R S G E 0000400 V A U X C O M S ) ( F N S \r 0000420 G E V S Y S T E M I N I T ) p 0000440 r e v i o u s d a t e : " 0000460 7 - A U G - 8 3 1 6 : 1 5 : 5 0000500 5 " { D S K } G E V A U X . L 0000520 S P ; 1 2 ) \r G E V A P P L Y 0000540 D 1 \r ( I 1 A R G S I 0 0000560 F N ) \0 \a \0 \0 \0 002 @ A \n \0 \0 0000600 020 \0 ( 4 A P P L Y ) \r N I L \r 0000620 ( ) \r G E V B U T T O N E V E N 0000640 T F N D 1 \r ( P 6 A R E A 0000660 P 4 N P 3 T O P P 0000700 2 T M P P 1 S E L E C 0000720 T I O N P 0 P O S ) 001 0000740 \a \0 \0 \0 021 ` 005 \b \0 \0 \b \0 \0 277 ` \0 0000760 \0 \t \0 \0 ` \0 \0 \t \0 \0 h 032 032 X \b \0 0001000 \0 277 ` \0 \0 l 004 345 j 360 264 003 202 261 \0 277 0001020 ` \0 \0 265 @ H ` \0 \0 001 \n \0 \0 027 \0 \0 0001040 d 242 261 \0 252 001 021 001 006 ` \0 \0 N 001 001 N 0001060 001 002 001 ` \0 \0 N 001 001 N 001 002 001 N 002 001 0001100 001 N 002 001 002 001 g \0 \0 g \0 \0 \r \n \0 \0 0001120 023 260 z 001 275 H 001 M 001 001 375 361 263 q H 001 0001140 M 001 001 M 002 001 001 330 361 263 d H 002 001 M 001 0001160 002 001 375 361 263 Y H 002 001 M 001 002 001 M 002 001 0001200 002 001 330 361 263 I ` \0 \0 271 h 027 \0 \0 277 I 0001220 001 021 001 006 ` \0 \0 N 001 001 N 001 002 001 ` \0 0001240 \0 N 001 001 N 001 002 001 N 002 001 001 N 002 001 002 0001260 001 g \0 \0 g \0 \0 \r \n \0 \0 023 I 002 001 I 0001300 002 002 002 001 I 002 002 001 \v \0 \0 h 020 ` \0 \0 0001320 001 021 001 006 ` \0 \0 N 001 001 N 001 002 001 ` \0 0001340 \0 N 001 001 N 001 002 001 N 002 001 001 N 002 001 002 0001360 001 g \0 \0 g \0 \0 \r \n \0 \0 023 h 027 \0 \0 0001400 277 260 312 \0 ( 4 2 6 Q B I T B L T 0001420 3 4 6 Q G E V I T E M E V E 0001440 N T F N 3 2 6 Q B I T B L T 0001460 1 5 3 Q B I T B L T 7 0 Q 0001500 G E V F I N D P O S 3 4 Q 0001520 G E T M O U S E S T A T E 2 5 0001540 Q L A S T M O U S E Y 1 7 Q 0001560 L A S T M O U S E X 1 0 Q 0001600 G E T M O U S E S T A T E 5 0001620 G E T M O U S E S T A T E ) \r ( 0001640 4 3 3 Q G E V M O U S E A R E 0001660 A 4 2 2 Q R E P L A C E 4 0001700 1 7 Q I N V E R T 3 7 4 Q 0001720 G E V W I N D O W 3 6 2 Q G 0001740 E V W I N D O W 3 5 3 Q G E 0001760 V M O U S E A R E A 3 2 2 Q 0002000 R E P L A C E 3 1 7 Q I N V 0002020 E R T 2 7 4 Q G E V W I N D 0002040 O W 2 6 2 Q G E V W I N D O 0002060 W 2 5 1 Q G E V M O U S E A 0002100 R E A 2 4 4 Q G E V M O U S 0002120 E A R E A 1 4 7 Q R E P L A 0002140 C E 1 4 4 Q I N V E R T 1 0002160 2 1 Q G E V W I N D O W 1 0 0002200 7 Q G E V W I N D O W 7 3 Q 0002220 G E V M O U S E A R E A 6 4 0002240 Q G E V E D I T C H A I N 5 0002260 6 Q G E V M O U S E A R E A 0002300 4 0 Q L A S T M O U S E B U T 0002320 T O N S 2 2 Q G E V W I N D 0002340 O W 1 4 Q G E V W I N D O W 0002360 ) \r ( ) \r G E V C O N C A T D 0002400 1 \r ( I 0 L ) \0 \t \0 \0 \0 001 0002420 g \0 \0 @ \n \0 \0 020 \0 ( 6 A P P L 0002440 Y ) \r ( 2 C O N C A T ) \r ( ) 0002460 \r G E V E N T E R D 1 \r N I L 0002500 \0 003 \0 \0 \0 \0 h 020 \0 N I L \r N I 0002520 L \r ( ) \r G E V E N T E R P R I 0002540 N T D 1 \r N I L \0 003 \0 \0 \0 \0 0002560 h 020 \0 N I L \r N I L \r ( ) \r G E 0002600 V E X I T D 1 \r N I L \0 003 \0 0002620 \0 \0 \0 h 020 \0 N I L \r N I L \r ( ) 0002640 \r G E V E X I T P R I N T D 1 0002660 \r N I L \0 003 \0 \0 \0 \0 h 020 \0 N I 0002700 L \r N I L \r ( ) \r G E V I N I T 0002720 E D I T W I N D O W D 1 \r ( P 0002740 4 G E V M E N U P 3 H 0002760 E I G H T P 2 W I D T H 0003000 P 1 B O T T O M P 0 L 0003020 E F T ) \0 331 \b \0 \0 \0 n 002 X l 310 0003040 n 001 , n 001 220 021 D \a H I J K h 032 032 0003060 032 032 o \0 \0 \0 \n \0 \0 027 \0 \0 h 027 \0 \0 0003100 ` \0 \0 g \0 \0 g \0 \0 \v \0 \0 ` \0 \0 g 0003120 \0 \0 g \0 \0 \v \0 \0 l ( 027 \0 \0 H I ` 0003140 \0 \0 331 J ` \0 \0 h 032 032 032 032 h j \v \0 0003160 \0 027 \0 \0 h _ 016 277 ` \0 \0 037 d o \0 \0 0003200 \0 024 004 277 d i 024 \f 277 d l 002 024 006 277 g 0003220 \0 \0 l \n g \0 \0 \v \0 \0 275 d M 024 020 277 0003240 d g \0 \0 024 026 277 d g \0 \0 024 277 d g 0003260 \0 \0 024 034 277 j d n 177 377 d h 032 032 032 032 0003300 276 d N 024 \n 277 _ 016 d 006 \0 \0 311 \n 002 002 0003320 002 l 017 030 277 O 016 006 \0 \0 311 \n 002 002 J l 0003340 004 333 l 002 331 030 277 \ d ` \0 \0 \n \0 \0 ` 0003360 \0 \0 020 \0 ( 3 2 3 Q A D D M E N 0003400 U 1 7 6 Q F O N T C R E A T 0003420 E 1 2 5 Q C R E A T E W 7 0003440 4 Q P U T W I N D O W P R O P 0003460 6 0 Q P U T W I N D O W P R 0003500 O P 3 5 Q C R E A T E W ) \r 0003520 ( 3 2 6 Q G E V W I N D O W 0003540 3 2 0 Q G E V M E N U W I N D 0003560 O W 2 7 6 Q M E N U 2 6 0 0003600 Q M E N U 2 2 6 Q D E F A 0003620 U L T M E N U H E L D F N 2 1 0003640 7 Q C L R P R O M P T 2 1 0 0003660 Q G E V C O M M A N D F N 1 0003700 7 3 Q B O L D 1 6 6 Q H E 0003720 L V E T I C A 1 3 7 Q 004 003 M 0003740 E N U T Y P E # 1 3 0 Q G E 0003760 V M E N U W I N D O W 1 1 3 Q 0004000 G E V M E N U W I N D O W H E 0004020 I G H T 1 0 6 Q G E V M E N 0004040 U W I N D O W H E I G H T 1 0 0004060 1 Q G E V M E N U W I N D O W 0004100 H E I G H T 7 1 Q G E V M O 0004120 V E W I N D O W F N 6 6 Q M 0004140 O V E F N 6 3 Q G E V W I N 0004160 D O W 5 5 Q G E V B U T T O 0004200 N E V E N T F N 5 2 Q B U T 0004220 T O N E V E N T F N 4 7 Q G 0004240 E V W I N D O W 4 4 Q G E V 0004260 M O U S E A R E A 4 0 Q G E 0004300 V W I N D O W ) \r ( 1 4 5 Q 0004320 ( Q U I T P O P E D I T P 0004340 R O G R A M P R O P A D J 0004360 I S A M S G ) 3 2 Q " G E 0004400 V S t r u c t u r e E d i t 0004420 o r W i n d o w " ) \r G E V M 0004440 O U S E L O O P D 1 \r N I L 0004460 \0 003 \0 \0 \0 \0 h 020 \0 N I L \r N I L 0004500 \r ( ) \r G E V M O V E W I N D O 0004520 W F N D 1 \r ( I 1 N E W P 0004540 O S I 0 W ) \0 022 \0 \0 \0 002 0004560 ` \0 \0 A 001 A 002 ` \0 \0 331 032 \n \0 \0 h 0004600 020 \0 ( 1 6 Q M O V E W ) \r ( 1 0004620 1 Q G E V M E N U W I N D O W 0004640 H E I G H T 2 G E V M E N U 0004660 W I N D O W ) \r ( ) \r G E V P U 0004700 T D D 1 \r ( I 1 D E F I 0004720 0 F N ) \0 \a \0 \0 \0 002 @ A \n 0004740 \0 \0 020 \0 ( 4 P U T D ) \r N I L 0004760 \r ( ) \r G E V S T R I N G I F Y 0005000 D 1 \r ( L ( 0 X ) ) \0 003 0005020 \0 \0 \0 001 @ 020 \0 N I L \r N I L \r ( 0005040 ) \r G E V S Y S T E M I N I T 0005060 D 1 \r ( F 0 W I N D O W C H 0005100 A R W I D T H ) \0 006 \0 001 \0 \0 l 0005120 \a c \0 020 \0 N I L \r N I L \r ( ) \r 0005140 P I C T U R E - G E V D I S P L 0005160 A Y D 1 \r ( P 3 N E W Y 0005200 P 2 N E W X P 1 P H T 0005220 P 0 P W D I 2 Y M A 0005240 X I 1 W I N D O W I 0 0005260 P I C T U R E F 4 Y ) 0005300 \0 u 004 001 \0 003 021 @ 003 B l 024 325 h @ \n 0005320 \0 \0 002 002 002 001 \n \0 \0 Y h A \n \0 \0 002 0005340 002 001 l 024 331 h @ \n \0 \0 002 002 001 \n \0 \0 0005360 X h A \n \0 \0 002 002 001 H 325 l 002 327 Z B 0005400 I 325 l \n 325 [ @ j d 032 \n \0 \0 @ k d 0005420 A J K H I g \0 \0 g \0 \0 \r \n \0 \0 @ 0005440 h A \n \0 \0 J 324 h A \n \0 \0 K 324 032 \n 0005460 \0 \0 K l \f 325 c \b h 020 \0 ( 1 5 3 Q 0005500 M O V E W 1 4 5 Q D S P Y 0005520 O F F S E T 1 3 6 Q D S P X 0005540 O F F S E T 1 3 0 Q B I T B 0005560 L T 1 0 6 Q M O V E W 5 7 0005600 Q D S P C L I P P I N G R E G 0005620 I O N 5 1 Q M I N 4 3 Q 0005640 D S P C L I P P I N G R E G I O 0005660 N 3 0 Q D S P C L I P P I N 0005700 G R E G I O N 2 2 Q M I N 0005720 1 3 Q D S P C L I P P I N G R 0005740 E G I O N ) \r ( 1 2 4 Q R E P 0005760 L A C E 1 2 1 Q I N P U T ) 0006000 \r ( ) \r P R I N C D 1 \r ( I 0006020 0 X ) \0 006 \0 \0 \0 001 @ \t \0 \0 020 0006040 \0 ( 3 P R I N 1 ) \r N I L \r ( 0006060 ) \r ( P R E T T Y C O M P R I N 0006100 T G E V A U X C O M S ) \r ( R 0006120 P A Q Q G E V A U X C O M S 0006140 ( ( G L I S P C O N S T A N T S 0006160 G E V N U M B E R C H A R S 0006200 G E V N U M B E R P O S G E V 0006220 W I N D O W T O P M A R G I N ) 0006240 ( F N S G E V A P P L Y \r 0006260 G E V B U T T O N E V E N T F N 0006300 G E V C O N C A T G E V E N 0006320 T E R G E V E N T E R P R I N 0006340 T G E V E X I T G E V E X I 0006360 T P R I N T G E V I N I T E D 0006400 I T W I N D O W G E V M O U S 0006420 E L O O P \r G E V M O V E W I 0006440 N D O W F N G E V P U T D G 0006460 E V S T R I N G I F Y G E V S 0006500 Y S T E M I N I T P I C T U R 0006520 E - G E V D I S P L A Y P R I 0006540 N C ) ( P ( G E V S Y S T E 0006560 M I N I T ) ) ( \r D E C L A R 0006600 E : D O N T E V A L @ L O A D 0006620 D O E V A L @ C O M P I L E 0006640 D O N T C O P Y C O M P I L E 0006660 R V A R S ( A D D V A R S ( 0006700 N L A M A ) ( N L A M L ) ( 0006720 L A M A ) ) ) ) ) \r ( G L I S P 0006740 C O N S T A N T S ( G E V N U 0006760 M B E R C H A R S 0 I N T E 0007000 G E R ) ( G E V N U M B E R P 0007020 O S 3 I N T E G E R ) ( G 0007040 E V W I N D O W T O P M A R G I 0007060 N 1 0 I N T E G E R ) ) \r ( 0007100 G E V S Y S T E M I N I T ) \r N 0007120 I L \r 0007123