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