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