$ od -c -N 50000 [eris]<Lisp>KOTO>Library>COLORDEMO!1 0000000 006 001 ( F I L E C R E A T E D " 0000020 2 0 - J u n - 8 5 1 8 : 1 1 : 0000040 1 3 " 006 004 { E R I S } < L I S 0000060 P C O R E > L I B R A R Y > C O 0000100 L O R D E M O . ; 2 006 001 4 4 6 0000120 3 8 \r \r c h a n 0000140 g e s t o : ( V A R S C 0000160 O L O R D E M O C O M S ) \r \r 0000200 p r e v i o u s d a 0000220 t e : " 4 - M a r - 8 5 1 0000240 5 : 2 6 : 5 0 " { E R I S } < 0000260 L I S P C O R E > L I B R A R Y 0000300 > C O L O R D E M O . ; 1 ) \r \r 0000320 \r ( * C o p y r i g h t ( c 0000340 ) 1 9 8 2 , 1 9 8 3 , 1 9 0000360 8 5 b y X e r o x C o r p 0000400 o r a t i o n . A l l r i g 0000420 h t s r e s e r v e d . ) \r \r 0000440 ( P R E T T Y C O M P R I N T 0000460 C O L O R D E M O C O M S ) \r \r 0000500 ( R P A Q Q 006 002 C O L O R D E 0000520 M O C O M S 006 001 ( ( F N S C 0000540 O L O R D E M O C H O O S E D 0000560 E M O D O C O L O R D R O P 0000600 E X M I N E S H A F T M I N E 0000620 S H A F T M O D A R T M O D 0000640 A R T D E M O \r \t \t \t P 0000660 O I N T T E S T P U T D R O P 0000700 S Q U I T P R A I N I N G 0000720 R A I N I N G C O L O R M A P 0000740 R O T A T E I T S H O W C O L 0000760 O R W \r \t \t \t T U N N E 0001000 L T U N N E L D E M O C I R 0001020 C L E D E M O W E L L ) \r \t ( 0001040 V A R S C O L O R D E M O S 0001060 \ F I R S T A U T O D E M O ( 0001100 \ N E W C O L O R D E M O N I 0001120 L ) \r \t ( S T O P D 0001140 A T E N I L ) \r \t 0001160 ( D E M O R A I N B O W M A P ) 0001200 \r \t ( D E M O D E F 0001220 A U L T C O L O R M A P ) ) \r \t 0001240 ( G L O B A L V A R S C O L O 0001260 R D E M O S \ F I R S T A U T 0001300 O D E M O \ N E W C O L O R D 0001320 E M O S T O P D A T E D E M 0001340 O R A I N B O W M A P \r \t \t 0001360 D E M O D E F A U L T C O 0001400 L O R M A P ) \r \t ( C O M S ( 0001420 * L o g o d e m o s ) \r \t 0001440 ( F N S L O G O D E 0001460 M O C O L O R L O G O D R A 0001500 W A C O L O R W I N D O W I N 0001520 I T / L O G O / C O L O R B I T 0001540 M A P C O L O R P R I N T C H 0001560 A R ) \r \t ( V A R S 0001600 A N G L E D E L T A C I R C 0001620 L E S I Z E L O G O C Y C L E 0001640 W A I T T I M E ( J L O G O ) 0001660 \r \t \t ( W I N D O W I M 0001700 A G E ) \r \t \t ( I N T E 0001720 R L I S P - D / C O L O R B I T 0001740 M A P ) ) \r \t ( G L 0001760 O B A L V A R S I N T E R L I 0002000 S P - D / C O L O R B I T M A P 0002020 ) ) \r \t ( C O M S ( * K i n 0002040 e t i c d e m o s ) \r \t 0002060 ( F N S C O L O R K I N 0002100 E T I C D E M O C O L O R K I 0002120 N E T I C C I R K I N ) \r \t 0002140 ( V A R S ( K I N E 0002160 T I C W A I T T I M E 1 5 0 ) 0002200 ) \r \t ( G L O B A L 0002220 V A R S K I N E T I C W A I T 0002240 T I M E ) ) \r \t ( C O M S ( F 0002260 N S C O L O R D E M O 1 C O 0002300 L O R D E M O 2 I N I T / C O 0002320 L O R D E M O / M E N U S ) \r \t 0002340 ( V A R S K I N C 0002360 Y C L E W A I T T I M E ( C O 0002400 L O R K I N E T I C C O M M A N 0002420 D M E N U ) \r \t \t ( C O 0002440 L O R P R I N T C H A R D S ) \r 0002460 \t \t ( C O L O R D E M O 0002500 2 M E N U ) ) \r \t ( 0002520 V A R S R A I N B O W I N T E 0002540 N S I T I E S ) ) \r \t ( C O M S 0002560 ( * S i m p l e d e m o s 0002600 ) \r \t ( F N S R E 0002620 D G R E E N ) ) \r \t ( C O M S 0002640 ( * O v e r p a i n t d e m 0002660 o s ) \r \t ( F N S 0002700 O V E R P A I N T D E M O O V 0002720 E R P A I N T B M O V E R P A 0002740 I N T S E L F N C A C H E B I 0002760 T M A P N E W X N E W Y ) \r 0003000 \t ( V A R S ( O V 0003020 E R P A I N T B I T M A P S ) ) 0003040 ) \r \t ( C O M S ( * W a l k 0003060 d e m o s ) \r \t ( 0003100 F N S W A L K D E M O W A L 0003120 K B M R A N D C O L O R M A P 0003140 ) \r \t [ I N I T V A 0003160 R S M A X W A L K M I N W A 0003200 L K R A N D C O L O R P R O B 0003220 ( W A L K R A N D O M C O L O 0003240 R M A P ) \r \t \t \t ( 8 B I T B M 0003260 E X P ( L I S T ( H A R R A 0003300 Y 6 0 ) ) ) \r \t \t \t ( 4 B I T 0003320 B M E X P ( L I S T ( H A R 0003340 R A Y 6 0 ] \r \t ( 0003360 G L O B A L V A R S 8 B I T B 0003400 M E X P 4 B I T B M E X P W 0003420 A L K R A N D O M C O L O R M A 0003440 P ) ) \r \t ( C O M S ( * V i 0003460 n e s d e m o ) \r \t 0003500 ( F N S V I N E D E M O I 0003520 N R A N G E ) ) \r \t ( F I L E S 0003540 C O L O R ) ) ) \r ( D E F I N 0003560 E Q \r \r ( 006 004 C O L O R D E M O 0003600 006 001 \r ( L A M B D A ( F A 0003620 S T F L G ) 0003640 * 0003700 006 003 ( * r r b " 2 1 - O C T 0003720 - 8 2 1 8 : 1 5 " ) 006 001 \r 0003740 ( 006 002 D E C L A R E 006 001 ( 0003760 006 001 G L O B A L V A R S 006 001 C 0004000 O L O R D E M O S \ F I R S T 0004020 A U T O D E M O \ N E W C O L 0004040 O R D E M O S T O P D A T E ) 0004060 ) \r ( 006 001 R E S E T L S 0004100 T 006 001 ( 006 001 C O N D 006 001 \r \t \t 0004120 ( ( 006 001 N U L L 006 001 ( 006 001 C O 0004140 L O R D I S P L A Y P 006 001 ) ) \r 0004160 \t \t ( 006 001 C O L O R D I S P 0004200 L A Y 006 001 T ( 006 001 C O N D 006 0004220 001 \r \t \t \t \t ( ( 006 001 E Q 006 001 0004240 ( 006 001 M A C H I N E T Y P E 006 0004260 001 ) \r \t \t \t \t ( 006 0004300 001 Q U O T E 006 001 D O R A D O ) 0004320 ) \r \t \t \t \t 8 ) \r \t \t \t 0004340 \t ( T 4 ) ) ) ) ) \r \t 0004360 ( 006 001 C O N D 006 001 \r \t \t 0004400 ( ( 006 001 E Q 006 001 ( 006 001 T Y P E 0004420 N A M E 006 001 ( 006 001 S C R E E N 0004440 C O L O R M A P 006 001 ) ) \r \t \t 0004460 ( 006 001 T Y P E N A M E 006 0004500 001 D E M O D E F A U L T C O L 0004520 O R M A P ) ) ) \r \t \t ( T ( 006 0004540 001 S E T Q 006 001 D E M O D E F A 0004560 U L T C O L O R M A P ( 006 001 C 0004600 O L O R M A P C R E A T E 006 001 ) 0004620 ) ) ) \r \t ( 006 001 C O 0004640 N D 006 001 \r \t \t ( ( 006 001 E Q 006 001 0004660 ( 006 001 T Y P E N A M E 006 001 ( 006 0004700 001 S C R E E N C O L O R M A P 006 0004720 001 ) ) \r \t \t ( 006 001 T Y 0004740 P E N A M E 006 001 D E M O R A I 0004760 N B O W M A P ) ) ) \r \t \t ( T 0005000 ( 006 001 S E T Q 006 001 D E M O R A 0005020 I N B O W M A P ( 006 001 R A I N 0005040 B O W M A P 006 001 ) ) ) ) \r \t 0005060 ( 006 001 C O N D 006 001 \r \t \t 0005100 ( ( 006 001 E Q 006 001 ( 006 001 T Y P E 0005120 N A M E 006 001 ( 006 001 S C R E E N 0005140 C O L O R M A P 006 001 ) ) \r \t \t 0005160 ( 006 001 T Y P E N A M E 006 0005200 001 D E M O R A I N I N G C O L 0005220 O R M A P ) ) ) \r \t \t ( T ( 006 0005240 001 S E T Q 006 001 D E M O R A I N 0005260 I N G C O L O R M A P ( 006 002 R 0005300 A I N I N G C O L O R M A P 006 001 0005320 ) ) ) ) \r \t ( 006 001 R 0005340 E S E T S A V E 006 001 ( 006 001 S C 0005360 R E E N C O L O R M A P 006 001 D 0005400 E M O D E F A U L T C O L O R M 0005420 A P ) ) \r \t ( 006 001 P 0005440 R O G 006 001 ( ( C O L O R M E N 0005460 U ( 006 002 c r e a t e 006 001 M E 0005500 N U \r \t \t \t \t \t T I T L E _ 0005520 " C o l o r d e m o s " \r \t \t 0005540 \t \t \t I T E M S _ ( 006 001 A P 0005560 P E N D 006 001 C O L O R D E M O 0005600 S ( 006 001 Q U O T E 006 001 ( S T 0005620 O P ) ) ) \r \t \t \t \t \t W H E N S 0005640 E L E C T E D F N _ ( 006 001 Q 0005660 U O T E 006 001 C H O O S E D E M 0005700 O ) ) ) ) \r \t \t ( 006 001 R 0005720 E S E T S A V E 006 001 N I L ( 0005740 006 001 L I S T 006 001 ( 006 001 Q U O T 0005760 E 006 001 C L O S E W ) \r \t \t \t \t 0006000 \t ( 006 001 A D D M E N U 006 001 C 0006020 O L O R M E N U N I L \r \t \t \t 0006040 \t \t \t ( 006 001 C O N D 006 001 \r \t 0006060 \t \t \t \t \t ( F A S T F L 0006100 G \r 0006120 * 0006200 006 003 ( * p u t t h e m e n 0006220 u a t t h e t o p o f 0006240 t h e b l a c k a n d w h 0006260 i t e 006 001 \r \t \t \t \t \t \t \t 0006300 006 003 s c r e e n . ) 006 001 \r 0006320 \t \t \t \t \t \t \t ( 006 002 c 0006340 r e a t e 006 001 P O S I T I O N 0006360 \r \t \t \t \t \t \t \t \t X C 0006400 O O R D _ 4 0 0 \r \t \t \t \t \t 0006420 \t \t \t Y C O O R D _ 0006440 \r \t \t \t \t \t \t \t \t ( 006 0006460 001 I D I F F E R E N C E 006 001 S 0006500 C R E E N H E I G H T \r \t \t \t \t 0006520 \t \t \t \t \t \t ( 006 002 f e t c h 0006540 006 001 I M A G E H E I G H T \r \t 0006560 \t \t \t \t \t \t \t \t \t 006 002 0006600 o f 006 001 C O L O R M E N T ) ) 0006620 ) ) \r \t \t \t \t \t \t ( T 0006640 ( 006 001 G E T B O X P O S I T I O 0006660 N 006 001 ( 006 002 f e t c h 006 001 I 0006700 M A G E W I D T H \r \t \t \t \t \t \t 0006720 \t \t \t 006 002 o f 006 001 C O L O 0006740 R M E N U ) \r \t \t \t \t \t \t \t \t 0006760 ( 006 002 f e t c h 006 001 0007000 I M A G E H E I G H T \r \t \t \t 0007020 \t \t \t \t \t \t 006 002 o f 006 001 C 0007040 O L O R M E N U ) ) ) ) ) ) ) \r 0007060 \t \t ( 006 001 A N D 006 001 F 0007100 A S T F L G ( 006 001 R E S E T S 0007120 A V E 006 001 ( 006 001 S E T D I S P 0007140 L A Y H E I G H T 006 001 ( 006 002 f 0007160 e t c h 006 001 I M A G E H E I G 0007200 H T 006 002 o f 006 001 C O L O R M 0007220 E N U ) ) ) ) ) \r \t 0007240 ( 006 001 S E T Q 006 001 \ N E W C O 0007260 L O R D E M O N I L ) \r \t 0007300 ( 006 002 b i n d 006 001 ( \ 0007320 N E X T C O L O R D E M O _ 0007340 \ F I R S T A U T O D E M O ) 0007360 006 002 u n t i l 006 001 ( 006 001 E Q 006 0007400 001 \ N E X T C O L O R D E M O 0007420 ( 006 001 Q U O T E 006 001 S T O P 0007440 ) ) \r \t \t 006 002 d o 006 001 ( 006 001 0007460 S E T Q 006 001 S T O P D A T E 0007500 ( 006 001 I P L U S 006 001 ( 006 001 C O 0007520 N D 006 001 \r \t \t \t \t \t ( ( 0007540 006 001 E Q 006 001 ( 006 001 M A C H I N 0007560 E T Y P E 006 001 ) \r \t \t \t \t \t \t 0007600 ( 006 001 Q U O T E 006 001 D O R A D 0007620 O ) ) \r \t \t \t \t \t 4 0007640 0 ) \r \t \t \t \t \t ( T 6 0007660 0 ) ) \r \t \t \t \t \t ( 006 001 I D 0007700 A T E 006 001 ) ) ) \r \t \t ( 0007720 006 001 S E T Q 006 001 \ N E W C O L 0007740 O R D E M O N I L ) \r \t \t 0007760 ( 006 001 A P P L Y 006 001 \ N E 0010000 X T C O L O R D E M O ) \r \t \t 0010020 ( 006 001 S E T Q 006 001 \ N E 0010040 X T C O L O R D E M O ( 006 001 O 0010060 R 006 001 \ N E W C O L O R D E M 0010100 O ( 006 001 C A D R 006 001 ( 006 001 F 0010120 M E M B 006 001 \ N E X T C O L O 0010140 R D E M O C O L O R D E M O S 0010160 ) ) \r \t \t \t \t \t \ F I 0010200 R S T A U T O D E M O ) ) \r \t \t 0010220 006 002 f i n a l l y 006 001 ( 006 001 0010240 S E T Q 006 001 \ N E W C O L O R 0010260 D E M O N I L ) ) ) ) ) \r \r ( 0010300 006 004 C H O O S E D E M O 006 001 \r 0010320 [ L A M B D A ( N E W ) \r 0010340 ( 006 002 D E C L A R E 006 001 0010360 ( G L O B A L V A R S \ N E W 0010400 C O L O R D E M O ) ) 0010420 0010440 006 003 ( * b a s : " 5 - J U 0010460 N - 8 2 1 3 : 0 7 " ) 006 001 \r 0010500 ( S E T Q \ N E W C O L 0010520 O R D E M O N E W ] ) \r \r ( 006 0010540 004 D O C O L O R D R O P 006 001 \r 0010560 [ L A M B D A ( X Y W I 0010600 D T H R A D I U S I N C R N 0010620 C I R C L E S D S C O L O R 0010640 # M A X C O L O R ) \r 0010660 * 0010740 006 003 ( * r r 0010760 b " 3 0 - S E P - 8 2 0 9 : 0011000 5 7 " ) 006 001 \r 0011020 * 0011100 006 003 ( * d r a w s a 0011120 s e r i e s o f c o n c e 0011140 n t r i c c i r c l e s . 006 001 0011160 \r \t \t \t \t \t \t \t 006 003 U 0011200 s e s C O L O R # f r e e l 0011220 y . ) 006 001 \r ( 006 002 f o r 0011240 006 001 I 006 002 f r o m 006 001 1 0011260 006 002 t o 006 001 N C I R C L E S 0011300 006 002 d o 006 001 ( D R A W C I R C 0011320 L E X Y ( I T I M E S I 0011340 R A D I U S I N C R ) \r \t \t \t 0011360 \t \t [ L I S T ( Q U 0011400 O T E R O U N D ) \r \t \t \t \t \t 0011420 \t W I D T H \r \t \t \t \t \t \t 0011440 ( C O N D \r \t \t \t \t \t \t 0011460 ( ( I L E S S P ( S E 0011500 T Q C O L O R # ( A D D 1 0011520 C O L O R # ) ) \r \t \t \t \t \t \t \t 0011540 M A X C O L O R ) \r 0011560 \t \t \t \t \t \t C O L 0011600 O R # ) \r \t \t \t \t \t \t 0011620 ( T ( S E T Q C O L O R # 0011640 1 ] \r \t \t \t \t \t N I L 0011660 D S ) ) \r C O L O R # 0011700 ] ) \r \r ( 006 004 E X M I N E S H A 0011720 F T 006 001 \r [ L A M B D A ( 0011740 O U T F L G F A C T O R ) 0011760 * 0012020 006 003 ( * e d i t e d : " 0012040 1 2 - S E P - 8 2 1 3 : 0 5 " 0012060 ) 006 001 \r 0012100 * 0012160 006 003 ( * d r a w s a m i 0012200 n e s h a f t o n t h e c 0012220 o l o r s c r e e n . ) 006 001 \r 0012240 ( P R O G [ ( C O L O R 0012260 0 ) \r \t ( L E F T 0 . 0012300 0 ) \r \t ( B O T T O M 0 0012320 . 0 ) \r \t ( M A X B O T T 0012340 O M ( F Q U O T I E N T C O 0012360 L O R S C R E E N H E I G H T 0012400 2 . 0 ) ) \r \t ( F A C T O 0012420 R ( F Q U O T I E N T F A C 0012440 T O R 1 0 0 . 0 ) ) \r \t 0012460 L E F T F A C T O R B O T T O 0012500 M F A C T O R I N C R ( M A 0012520 X C O L O R ( S U B 1 ( E X 0012540 P T 2 ( C O L O R M A P B I 0012560 T S ( S C R E E N C O L O R M 0012600 A P ] \r ( S 0012620 E T Q L E F T F A C T O R ( 0012640 F T I M E S 4 . 0 F A C T O 0012660 R ) ) \r ( S 0012700 E T Q B O T T O M F A C T O R 0012720 ( F T I M E S 3 . 0 F A C 0012740 T O R ) ) \r L P 0012760 ( C O L O R F I L L A R E A ( 0013000 F I X L E F T ) \r \t \t \t ( F 0013020 I X B O T T O M ) \r \t \t \t ( 0013040 I D I F F E R E N C E C O L O 0013060 R S C R E E N W I D T H ( F T 0013100 I M E S L E F T 2 ) ) \r \t \t 0013120 \t ( I D I F F E R E N C E C 0013140 O L O R S C R E E N H E I G H T 0013160 ( F T I M E S B O T T O M 0013200 2 ) ) \r \t \t \t C O L O R \r \t \t 0013220 \t ( C O L O R S C R E E N B I 0013240 T M A P ) ) \r 0013260 [ S E T Q I N C R ( F P L 0013300 U S 1 . 0 ( F T I M E S . 0013320 1 ( F D I F F E R E N C E M 0013340 A X B O T T O M B O T T O M ] 0013360 \r ( S E T Q 0013400 L E F T ( F P L U S L E F 0013420 T ( F T I M E S I N C R L 0013440 E F T F A C T O R ) ) ) \r 0013460 ( S E T Q B O T 0013500 T O M ( F P L U S B O T T O 0013520 M ( F T I M E S I N C R B 0013540 O T T O M F A C T O R ) ) ) \r 0013560 ( C O N D \r \t 0013600 ( ( F G R E A T E R P 0013620 B O T T O M M A X B O T T O M 0013640 ) \r \t ( R E T U R N 0013660 ) ) ) \r [ C 0013700 O N D \r \t [ O U T F L G 0013720 ( C O N D \r \t \t ( 0013740 ( I L E S S P ( S E T Q C O 0013760 L O R ( S U B 1 C O L O R ) 0014000 ) \r \t \t \t 0 ) \r \t 0014020 \t \t ( S E T Q C O L O R M A 0014040 X C O L O R ] \r \t ( T 0014060 ( C O N D \r \t \t ( ( I G R E A 0014100 T E R P ( S E T Q C O L O R 0014120 ( A D D 1 C O L O R ) ) \r \t 0014140 \t \t M A X C O L O R ) 0014160 \r \t \t ( S E T Q C O L O 0014200 R 0 ] \r ( 0014220 G O L P ] ) \r \r ( 006 004 M I N E 0014240 S H A F T 006 001 \r [ L A M B D 0014260 A ( N O U T F L G ) 0014300 * 0014340 006 003 ( * e d i t e d 0014360 : " 1 0 - S E P - 8 2 1 7 : 0014400 5 5 " ) 006 001 \r 0014420 * 0014500 006 003 ( * d r a w s a 0014520 m i n e s h a f t o n t h 0014540 e c o l o r s c r e e n . ) 006 0014560 001 \r ( P R O G ( ( C O 0014600 L O R 0 ) \r \t ( N ( O 0014620 R ( N U M B E R P N ) \r \t \t 0014640 1 ) ) ) \r 0014660 ( 006 002 f o r 006 001 L E F T 006 0014700 002 f r o m 006 001 0 006 002 b y 006 001 0014720 ( I T I M E S N 4 ) 006 002 0014740 a s 006 001 B O T T O M 006 002 f r 0014760 o m 006 001 0 006 002 b y 006 001 ( I 0015000 T I M E S N 3 ) 006 002 t o 006 0015020 001 ( I Q U O T I E N T \r \t \t 0015040 \t \t \t \t \t \t \t \t C O L O R S C R 0015060 E E N H E I G H T 2 ) \r \t 0015100 006 002 d o 006 001 ( C O L O R 0015120 F I L L A R E A L E F T B O 0015140 T T O M ( I D I F F E R E N C 0015160 E C O L O R S C R E E N W I D 0015200 T H ( I T I M E S L E F T 0015220 2 ) ) \r \t \t \t ( I 0015240 D I F F E R E N C E C O L O R 0015260 S C R E E N H E I G H T ( I T 0015300 I M E S B O T T O M 2 ) ) \r 0015320 \t \t \t C O L O R \r 0015340 \t \t \t ( C O L O R 0015360 S C R E E N B I T M A P ) ) \r \t 0015400 \t ( C O N D \r \t \t [ O U T F 0015420 L G ( C O N D \r \t \t \t 0015440 ( ( I L E S S P ( S E T Q C 0015460 O L O R ( S U B 1 C O L O R 0015500 ) ) \r \t \t \t \t 0 ) \r \t 0015520 \t \t ( S E T Q C O 0015540 L O R 2 5 5 ] \r \t \t ( T 0015560 ( C O N D \r \t \t ( 0015600 ( I G R E A T E R P ( S E T Q 0015620 C O L O R ( A D D 1 C O L 0015640 O R ) ) \r \t \t \t \t 2 5 6 ) 0015660 \r \t \t \t ( S E T Q C O L O R 0015700 0 ] ) \r \r ( 006 004 M O D A R T 006 0015720 001 \r [ L A M B D A N I L 0015740 * 0016000 006 0016020 003 ( * r r b " 2 1 - O C T - 0016040 8 2 1 8 : 1 6 " ) 006 001 \r 0016060 [ C O N D \r ( ( C 0016100 O L O R D I S P L A Y P ) ) \r 0016120 ( T ( C O L O R D I 0016140 S P L A Y T ( C O N D \r \t \t 0016160 \t ( ( E Q ( M A C H I N E T 0016200 Y P E ) \r \t \t \t ( Q 0016220 U O T E D O R A D O ) ) \r \t \t 0016240 \t 8 ) \r \t \t \t ( T 4 ] 0016260 \r ( P R O G ( ( W D 0016300 C O L O R S C R E E N W I D T H 0016320 ) \r \t ( H T C O L O R S 0016340 C R E E N H E I G H T ) \r \t 0016360 ( C B M ( C O L O R S C R E 0016400 E N B I T M A P ) ) \r \t ( 0016420 M A X C O L O R ( M A X I M U 0016440 M C O L O R ) ) \r \t X Y 0016460 ) \r L P ( 006 002 f 0016500 o r 006 001 I 006 002 f r o m 006 001 0016520 1 006 002 t o 006 001 5 0 006 002 d o 0016540 006 001 ( S E T Q X ( R A N D 0016560 0 W D ) ) \r \t \t \t \t ( S E 0016600 T Q Y ( R A N D 0 H T ) 0016620 ) \r \t \t \t \t ( \ N U B I T B L 0016640 T C B M 0 0 C B M ( R 0016660 A N D 0 ( I D I F F E R E N 0016700 C E W D X ) ) \r \t \t \t \t \t 0016720 ( R A N D 0 ( I D I F 0016740 F E R E N C E H T Y ) ) \r \t 0016760 \t \t \t \t X Y ( S E L 0017000 E C T Q ( R A N D 0 1 ) \r 0017020 \t \t \t \t \t \t \t ( 0 ( Q U O T 0017040 E T E X T U R E ) ) \r \t \t \t \t 0017060 \t \t \t ( Q U O T E I N P U T 0017100 ) ) \r \t \t \t \t \t ( S E L 0017120 E C T Q ( R A N D 0 5 ) \r 0017140 \t \t \t \t \t \t ( 0 ( Q 0017160 U O T E I N V E R T ) ) \r \t \t 0017200 \t \t \t \t ( Q U O T E 0017220 P A I N T ) ) \r \t \t \t \t \t 0017240 ( C O L O R T E X T U R E F R 0017260 O M C O L O R # ( R A N D 0 0017300 M A X C O L O R ) ) ) \r \t \t \t 0017320 \t ( D I S M I S S 2 0 ) \r \t 0017340 006 002 f i n a l l y 006 001 0017360 ( R O T A T E C O L O R M A P 0017400 ( S C R E E N C O L O R M A P 0017420 ) ) ) \r ( G 0017440 O L P ] ) \r \r ( 006 004 M O D A R 0017460 T D E M O 006 001 \r ( L A M B D 0017500 A ( W A I T ) 0017520 * 0017560 006 003 ( * r r b " 0017600 5 - D E C - 8 2 2 1 : 1 9 " ) 0017620 006 001 \r ( 006 001 C O N D 006 001 0017640 \r ( ( 006 001 C O L O R 0017660 D I S P L A Y P 006 001 ) ) \r 0017700 ( T ( 006 001 C O L O R D I 0017720 S P L A Y 006 001 T ( 006 001 C O N 0017740 D 006 001 \r \t \t \t ( ( 006 001 E Q 006 001 0017760 ( 006 001 M A C H I N E T Y P E 006 0020000 001 ) \r \t \t \t ( 006 001 Q 0020020 U O T E 006 001 D O R A D O ) ) \r 0020040 \t \t \t 8 ) \r \t \t \t ( T 0020060 4 ) ) ) ) ) \r ( 006 001 P R 0020100 O G 006 001 ( ( W D C O L O R S 0020120 C R E E N W I D T H ) \r \t 0020140 ( H T C O L O R S C R E E N H 0020160 E I G H T ) \r \t ( C B M 0020200 ( 006 001 C O L O R S C R E E N B I 0020220 T M A P 006 001 ) ) \r \t ( M A 0020240 X C O L O R ( 006 001 M A X I M U 0020260 M C O L O R 006 001 ) ) \r \t X 0020300 Y ) \r ( 006 0020320 002 Q U I T P 006 001 ( 006 001 O R 006 001 0020340 W A I T 4 0 ) ) \r 0020360 ( 006 002 u n t i l 006 001 0020400 ( 006 002 Q U I T P 006 001 N I L ) \r 0020420 \t 006 002 d o 006 001 ( 006 002 0020440 f o r 006 001 I 006 002 f r o m 006 001 0020460 1 006 002 t o 006 001 8 \r \t \t 0020500 006 002 d o 006 001 ( 006 001 C O N D 006 0020520 001 \r \t \t \t ( ( 006 002 Q U I T P 006 001 0020540 N I L ) \r \t \t \t ( 006 001 R E 0020560 T U R N 006 001 ) ) ) \r \t \t 0020600 ( 006 001 S E T Q 006 001 X ( 006 0020620 001 R A N D 006 001 0 W D ) ) \r \t 0020640 \t ( 006 001 S E T Q 006 001 0020660 Y ( 006 001 R A N D 006 001 0 H 0020700 T ) ) \r \t \t ( 006 001 B 0020720 I T B L T 006 001 C B M 0 0 0020740 C B M ( 006 001 R A N D 006 001 0 0020760 ( 006 001 I D I F F E R E N C E 006 001 0021000 W D X ) ) \r \t \t \t 0021020 ( 006 001 R A N D 006 001 0 ( 006 001 0021040 I D I F F E R E N C E 006 001 H T 0021060 Y ) ) \r \t \t \t X 0021100 Y ( 006 001 Q U O T E 006 001 T E X 0021120 T U R E ) \r \t \t \t ( 0021140 006 001 Q U O T E 006 001 R E P L A C 0021160 E ) \r \t \t \t ( 006 001 R 0021200 A N D 006 001 0 ( 006 001 L R S H 006 0021220 001 M A X C O L O R 1 ) ) ) \r 0021240 \t \t ( 006 002 f o r 006 001 0021260 J 006 002 f r o m 006 001 1 006 002 0021300 t o 006 001 8 \r \t \t \t 006 002 d o 006 0021320 001 ( 006 001 S E T Q 006 001 X ( 006 0021340 001 R A N D 006 001 0 W D ) ) \r \t 0021360 \t \t ( 006 001 S E T Q 006 001 0021400 Y ( 006 001 R A N D 006 001 0 H T 0021420 ) ) \r \t \t \t ( 006 001 B I T 0021440 B L T 006 001 C B M ( 006 001 R A N 0021460 D 006 001 0 ( 006 001 I D I F F E R 0021500 E N C E 006 001 W D X ) ) \r \t \t 0021520 \t \t ( 006 001 R A N D 006 001 0021540 0 ( 006 001 I D I F F E R E N C E 0021560 006 001 H T Y ) ) \r \t \t \t \t 0021600 C B M \r \t \t \t \t ( 006 0021620 001 R A N D 006 001 0 ( 006 001 I D I 0021640 F F E R E N C E 006 001 W D X ) 0021660 ) \r \t \t \t \t ( 006 001 R A N 0021700 D 006 001 0 ( 006 001 I D I F F E R 0021720 E N C E 006 001 H T Y ) ) \r \t \t 0021740 \t \t X Y ( 006 001 Q U O 0021760 T E 006 001 I N P U T ) \r \t \t \t \t 0022000 ( 006 001 S E L E C T Q 006 001 0022020 ( 006 001 R A N D 006 001 0 2 ) \r 0022040 \t \t \t \t \t ( 0 ( 006 001 0022060 Q U O T E 006 001 I N V E R T ) ) 0022100 \r \t \t \t \t \t ( 1 ( 006 0022120 001 Q U O T E 006 001 R E P L A C E 0022140 ) ) \r \t \t \t \t \t ( 006 001 0022160 Q U O T E 006 001 P A I N T ) ) ) 0022200 \r \t \t \t ( 006 001 D I S M I 0022220 S S 006 001 3 0 0 ) \r \t \t \t 0022240 ( 006 002 u n t i l 006 001 ( M O U 0022260 S E S T A T E U P ) ) ) \r \t \t 0022300 ( 006 001 R O T A T E C 0022320 O L O R M A P 006 001 ( 006 001 S C R 0022340 E E N C O L O R M A P 006 001 ) ) ) 0022360 006 003 ( * c l e a r 0022400 t h e s c r e e n e v e r y 0022420 s o o f t e n ) 006 001 \r \t \t ( 0022440 006 001 B I T B L T 006 001 C B M 0 0022460 0 C B M 0 ( 006 001 R A N D 0022500 006 001 ( 006 001 I D I F F E R E N C 0022520 E 006 001 H T Y ) ) \r \t \t \t C O 0022540 L O R S C R E E N W I D T H C 0022560 O L O R S C R E E N H E I G H T 0022600 ( 006 001 Q U O T E 006 001 T E X T 0022620 U R E ) \r \t \t \t ( 006 001 Q U O T E 0022640 006 001 R E P L A C E ) \r \t \t \t ( 0022660 006 001 R A N D 006 001 0 ( 006 001 L R 0022700 S H 006 001 M A X C O L O R 1 ) 0022720 ) ) ) ) ) ) \r \r ( 006 004 P O I N T 0022740 T E S T 006 001 \r [ L A M B D A 0022760 ( R E G I O N ) 0023000 * 0023040 006 003 ( * e d i t e d : 0023060 " 9 - S E P - 8 2 1 0 : 1 0023100 3 " ) 006 001 \r 0023120 * 0023200 006 003 ( * r a n d o m l y 0023220 p u t s p o i n t s i n 0023240 a r e g i o n ) 006 001 \r 0023260 ( P R O G ( [ L E F T ( 006 002 0023300 f e t c h 006 001 ( R E G I O N 0023320 L E F T ) 006 002 o f 006 001 ( C O 0023340 N D \r \t \t \t \t \t ( R E G I 0023360 O N ) \r \t \t \t \t \t ( T W 0023400 H O L E C O L O R D I S P L A Y 0023420 ] \r \t [ B O T T O M ( 006 0023440 002 f e t c h 006 001 ( R E G I O N 0023460 B O T T O M ) 006 002 o f 006 001 0023500 ( C O N D \r \t \t \t \t \t 0023520 ( R E G I O N ) \r \t \t \t \t \t 0023540 ( T W H O L E C 0023560 O L O R D I S P L A Y ] \r \t 0023600 [ R I G H T ( 006 002 f e t c h 0023620 006 001 ( R E G I O N R I G H T 0023640 ) 006 002 o f 006 001 ( C O N D \r \t 0023660 \t \t \t \t ( R E G I O N 0023700 ) \r \t \t \t \t \t ( T W 0023720 H O L E C O L O R D I S P L A Y 0023740 ] \r \t [ T O P ( 006 002 f e 0023760 t c h 006 001 ( R E G I O N T O 0024000 P ) 006 002 o f 006 001 ( C O N D \r 0024020 \t \t \t \t \t ( R E G I O N ) \r \t 0024040 \t \t \t \t ( T W H O L E C O L 0024060 O R D I S P L A Y ] \r \t ( 0024100 M A X C O L O R ( S U B 1 ( 0024120 E X P T 2 \ C O L O R D I S 0024140 P L A Y B I T S P E R P I X E L 0024160 ) ) ) \r \t ( C S N ( C O 0024200 L O R S C R E E N B I T M A P ) 0024220 ) ) \r ( 006 002 0024240 u n t i l 006 001 ( M O U S E S T 0024260 A T E ( N O T U P ) ) 006 002 0024300 d o 006 001 ( 006 002 f o r 006 001 I 0024320 006 002 f r o m 006 001 1 006 002 t o 006 0024340 001 1 0 0 006 002 d o 006 001 ( B I 0024360 T M A P B I T C S N ( R A N 0024400 D L E F T R I G H T ) \r \t \t 0024420 \t \t \t \t \t \t \t ( R A N 0024440 D B O T T O M T O P ) \r \t \t 0024460 \t \t \t \t \t \t \t ( R A N 0024500 D 0 M A X C O L O R ] ) \r \r 0024520 ( 006 004 P U T D R O P S 006 001 \r 0024540 [ L A M B D A ( N ) 0024560 * 0024620 006 003 ( * 0024640 r r b " 2 1 - S E P - 8 2 1 0024660 5 : 5 4 " ) 006 001 \r ( P R 0024700 O G ( ( D S ( D S P C R E A 0024720 T E ) ) \r \t P O S ) \r 0024740 L P ( S E T Q P O 0024760 S ( G E T P O S I T I O N ) ) 0025000 \r ( C O N D 0025020 \r \t ( ( L A S T M O U S 0025040 E S T A T E R I G H T ) \r \t 0025060 ( R E T U R N ) ) ) \r 0025100 ( 006 002 D O C 0025120 O L O R D R O P 006 001 ( 006 002 f e 0025140 t c h 006 001 X C O O R D 006 002 o 0025160 f 006 001 P O S ) \r \t \t 0025200 ( 006 002 f e t c h 006 001 Y C O 0025220 O R D 006 002 o f 006 001 P O S ) \r 0025240 \t \t ( O R N 3 0025260 ) \r \t \t ( C O N D 0025300 \r \t \t \t ( ( L A S T M O U S E 0025320 S T A T E L E F T ) \r \t \t \t 0025340 ( R A N D 8 1 5 ) ) \r \t 0025360 \t \t ( T ( R A N D 1 0 2 0025400 0 ) ) ) \r \t \t D S 0025420 1 2 8 ) \r 0025440 ( G O L P ] ) \r \r ( 006 004 Q U I 0025460 T P 006 001 \r ( L A M B D A ( 0025500 N ) 0025520 * 0025560 006 003 ( * e d i t e d : " 0025600 8 - S E P - 8 2 1 2 : 3 8 " 0025620 ) 006 001 \r ( 006 002 D E C L A 0025640 R E 006 001 ( 006 001 G L O B A L V A 0025660 R S 006 001 \ N E W C O L O R D E 0025700 M O S T O P D A T E ) ) \r 0025720 ( 006 001 W I N D O W . M O U S 0025740 E . H A N D L E R 006 001 ) \r 0025760 ( 006 001 O R 006 001 \ N E W C O L 0026000 O R D E M O ( 006 001 C O N D 006 001 0026020 \r \t ( ( 006 001 F I X P 006 001 N 0026040 ) \r \t ( 006 001 S E T Q 006 001 0026060 S T O P D A T E ( 006 001 I P L 0026100 U S 006 001 N ( 006 001 I D A T E 006 0026120 001 ) ) ) \r \t N I L ) \r \t 0026140 ( T ( 006 001 A N D 006 001 S T 0026160 O P D A T E ( 006 001 I L E S S P 0026200 006 001 S T O P D A T E ( 006 001 I 0026220 D A T E 006 001 ) ) ) ) ) ) ) ) \r \r 0026240 ( 006 004 R A I N I N G 006 001 \r [ 0026260 L A M B D A ( N ) 0026300 * 0026340 006 003 ( * r 0026360 r b " 1 5 - O C T - 8 2 1 0 0026400 : 1 1 " ) 006 001 \r ( P R O 0026420 G ( ( C O L O R # 0 ) \r \t 0026440 ( N ( C O N D \r \t \t ( ( F 0026460 I X P N ) ) \r \t \t ( T 3 ) ) 0026500 ) \r \t ( D S ( D S P C R 0026520 E A T E ) ) \r \t ( M A X C 0026540 O L O R ( M A X I M U M C O L 0026560 O R ) ) ) \r 0026600 ( D S P D E S T I N A T I O N 0026620 ( C O L O R S C R E E N B I T M 0026640 A P ) \r \t \t \t D S ) \r 0026660 ( C O L O R B A C 0026700 K G R O U N D 0 ) \r 0026720 ( 006 002 f o r 006 001 C O 0026740 U N T E R 006 002 f r o m 006 001 1 0026760 006 002 t o 006 001 ( C O N D \r \t \t 0027000 \t \t ( ( E Q M A X C O L 0027020 O R 1 5 ) \r \t \t \t \t 0027040 3 ) \r \t \t \t \t ( T 1 2 ) 0027060 ) \r \t 006 002 d o 006 001 ( 0027100 006 002 f o r 006 001 X Q U A D 006 002 0027120 f r o m 006 001 0 006 002 t o 006 001 0027140 1 006 002 d o 006 001 ( 006 002 f o r 006 0027160 001 Y Q U A D 006 002 f r o m 006 001 0027200 0 006 002 t o 006 001 1 \r \t \t \t \t 0027220 \t 006 002 d o 006 001 ( C O 0027240 N D \r \t \t \t \t \t \t ( ( I G R 0027260 E A T E R P C O L O R # 2 5 0027300 0 ) \r \t \t \t \t \t \t ( R E 0027320 T U R N ) ) ) \r \t \t \t \t \t \t ( S 0027340 E T Q C O L O R # \r \t \t \t \t \t 0027360 \t ( 006 002 D O C O L O R D R O 0027400 P 006 001 ( I P L U S ( I T I M 0027420 E S X Q U A D ( I Q U O T I 0027440 E N T \r \t \t \t \t \t \t \t \t \t \t 0027460 C O L O R S C R E E N W I D T H 0027500 2 ) ) \r \t \t \t \t \t \t \t \t 0027520 ( R A N D 1 0 \r \t \t \t \t 0027540 \t \t \t \t \t ( I D I F F E 0027560 R E N C E \r \t \t \t \t \t \t \t \t \t 0027600 ( I Q U O T I E N T 0027620 \r \t \t \t \t \t \t \t \t \t \t C O L O 0027640 R S C R E E N W I D T H 2 ) \r 0027660 \t \t \t \t \t \t \t \t \t 1 0027700 0 ) ) ) \r \t \t \t \t \t \t \t 0027720 ( I P L U S ( I T I M E 0027740 S Y Q U A D ( I Q U O T I E 0027760 N T \r \t \t \t \t \t \t \t \t \t \t C O 0030000 L O R S C R E E N H E I G H T 0030020 2 ) ) \r \t \t \t \t \t \t \t \t 0030040 ( R A N D 1 0 \r \t \t \t \t \t 0030060 \t \t \t \t ( I D I F F E R 0030100 E N C E \r \t \t \t \t \t \t \t \t \t 0030120 ( I Q U O T I E N T \r 0030140 \t \t \t \t \t \t \t \t \t \t C O L O R S 0030160 C R E E N H E I G H T 2 ) \r \t 0030200 \t \t \t \t \t \t \t \t 1 0 0030220 ) ) ) \r \t \t \t \t \t \t \t 0030240 N \r \t \t \t \t \t \t \t 0030260 ( I T I M E S N 3 ) \r \t 0030300 \t \t \t \t \t \t ( C O 0030320 N D \r \t \t \t \t \t \t \t \t ( ( E Q 0030340 M A X C O L O R 1 5 ) \r \t \t 0030360 \t \t \t \t \t \t ( R A N D 4 0030400 8 ) ) \r \t \t \t \t \t \t \t \t ( T 0030420 ( R A N D 4 1 0 ) ) ) \r \t 0030440 \t \t \t \t \t \t D S 0030460 C O L O R # M A X C O L O R ] 0030500 ) \r \r ( 006 004 R A I N I N G C O L 0030520 O R M A P 006 001 \r [ L A M B D 0030540 A N I L 0030560 * 0030620 006 003 ( * r r b " 0030640 4 - O C T - 8 2 1 4 : 4 1 " ) 0030660 006 001 \r ( C O L O R M A P 0030700 O F ( C O N D \r \t \t [ ( E 0030720 Q ( M A X I M U M C O L O R ) 0030740 \r \t \t 2 5 5 ) \r \t 0030760 \t ( N C O N C ( 006 002 f 0031000 o r 006 001 I 006 002 f r o m 006 001 0031020 3 006 002 t o 006 001 2 5 5 006 002 b 0031040 y 006 001 6 006 002 c o l l e c t 006 0031060 001 ( L I S T 0 0 I ) ) \r 0031100 \t \t \t ( 006 002 f o r 006 001 I 0031120 006 002 f r o m 006 001 0 006 002 t o 0031140 006 001 2 1 2 006 002 c o l l e c t 0031160 006 001 ( Q U O T E ( 0 0 0 0031200 ] \r \t \t ( T ( N C O N C 0031220 ( L I S T ( Q U O T E ( 0 0031240 0 0 ) ) ) \r \t \t \t ( 006 0031260 002 f o r 006 001 I 006 002 f r o m 006 0031300 001 1 0 0 006 002 t o 006 001 2 5 5 0031320 006 002 b y 006 001 5 0 006 002 c o l 0031340 l e c t 006 001 ( L I S T 0 0 0031360 I ) ) \r \t \t \t ( 006 002 f 0031400 o r 006 001 I 006 002 f r o m 006 001 0031420 0 006 002 t o 006 001 1 1 006 002 c o 0031440 l l e c t 006 001 ( Q U O T E ( 0031460 0 0 0 ] ) \r \r ( 006 004 R O T A 0031500 T E I T 006 001 \r [ L A M B D A 0031520 ( B E G I N C O L O R E N D 0031540 C O L O R W A I T ) 0031560 0031600 006 003 ( * r r b " 3 0 0031620 - S E P - 8 2 1 1 : 3 5 " ) 006 0031640 001 \r ( P R O G [ ( C M 0031660 ( S C R E E N C O L O R M A P 0031700 ) ) \r \t ( B E G ( O R 0031720 B E G I N C O L O R 0 ) ) \r \t 0031740 ( E N D ( O R E N D C 0031760 O L O R ( S U B 1 ( E X P T 0032000 2 ( C O L O R M A P B I T S 0032020 ( S C R E E N C O L O R M A P 0032040 ] \r ( 006 002 d 0032060 o 006 001 ( R O T A T E C O L O R 0032100 M A P C M B E G I N C O L O 0032120 R E N D ) \r \t ( C 0032140 O N D \r \t \t ( ( N U L L W A I 0032160 T ) ) \r \t \t ( ( S M A L L P W 0032200 A I T ) \r \t \t ( D I S M I S 0032220 S W A I T ) ) \r \t \t ( T ( G 0032240 E T M O U S E S T A T E ) \r \t \t 0032260 ( D I S M I S S ( L R S 0032300 H L A S T M O U S E X 3 ] ) 0032320 \r \r ( 006 004 S H O W C O L O R W 006 0032340 001 \r [ L A M B D A ( W 1 0032360 C O L O R 0 C O L O R P O S 0032400 ) 0032420 006 0032440 003 ( * r r b " 2 2 - S E P - 0032460 8 2 1 0 : 1 9 " ) 006 001 \r 0032500 ( P R O G ( ( W ( O R W 0032520 ( W H I C H W ) ) ) \r \t 0032540 D S ) \r ( S 0032560 E T Q D S ( D S P C R E A T 0032600 E ) ) \r ( D 0032620 S P D E S T I N A T I O N ( C 0032640 O L O R S C R E E N B I T M A P 0032660 ) \r \t \t \t D S ) \r 0032700 ( D S P B A C K G R O 0032720 U N D C O L O R 0 C O L O R 0032740 D S ) \r ( D 0032760 S P F O R E G R O U N D C O L O 0033000 R 1 C O L O R D S ) \r 0033020 ( C L O S E W W 0033040 ) \r ( O R 0033060 P O S ( S E T Q P O S ( G 0033100 E T P O S I T I O N ) ) ) \r 0033120 ( B I T B L T 0033140 ( W I N D O W P R O P W ( Q 0033160 U O T E I M A G E C O V E R E 0033200 D ) ) \r \t \t 0 0 D S ( 0033220 006 002 f e t c h 006 001 X C O O R D 0033240 006 002 o f 006 001 P O S ) \r \t \t 0033260 ( 006 002 f e t c h 006 001 Y C O O 0033300 R D 006 002 o f 006 001 P O S ) \r \t 0033320 \t N I L N I L ( Q U O T 0033340 E I N P U T ) \r \t \t ( Q U 0033360 O T E R E P L A C E ) ) \r 0033400 ( O P E N W W 0033420 ] ) \r \r ( 006 004 T U N N E L 006 001 \r 0033440 [ L A M B D A ( S P E E D 0033460 ) 0033500 0033520 006 003 ( 0033540 * e d i t e d : " 1 0 - S E 0033560 P - 8 2 1 9 : 1 0 " ) 006 001 \r 0033600 ( 006 002 E X M I N E S H A F 0033620 T 006 001 T S P E E D ) \r 0033640 ( 006 002 R O T A T E I T 006 001 ] ) 0033660 \r \r ( 006 004 T U N N E L D E M O 006 0033700 001 \r [ L A M B D A ( S P E 0033720 E D W A I T ) 0033740 0033760 006 0034000 003 ( * r r b " 1 5 - O C T - 0034020 8 2 0 9 : 5 5 " ) 006 001 \r 0034040 ( P R O G [ ( C M ( S C R 0034060 E E N C O L O R M A P D E M O 0034100 D E F A U L T C O L O R M A P ) 0034120 ) \r \t ( M A X C O L O R 0034140 ( S U B 1 ( E X P T 2 ( C 0034160 O L O R M A P B I T S ( S C R 0034200 E E N C O L O R M A P ] \r 0034220 ( 006 002 E X M I N E 0034240 S H A F T 006 001 T ( O R S P 0034260 E E D 6 ) ) \r 0034300 ( 006 002 Q U I T P 006 001 ( O R 0034320 W A I T 1 5 ) ) \r 0034340 ( 006 002 u n t i l 006 001 0034360 ( 006 002 Q U I T P 006 001 N I L ) 0034400 006 002 d o 006 001 ( R O T A T E C O 0034420 L O R M A P C M 0 M A X C 0034440 O L O R ) ) \r 0034460 ( S C R E E N C O L O R M A P 0034500 D E M O R A I N B O W M A P ) 0034520 \r ( 006 002 Q U 0034540 I T P 006 001 ( O R W A I T 1 0034560 5 ) ) \r ( 006 0034600 002 u n t i l 006 001 ( 006 002 Q U I T 0034620 P 006 001 N I L ) 006 002 d o 006 001 0034640 ( R O T A T E C O L O R M A P 0034660 C M 0 M A X C O L O R ) ) \r 0034700 ( 006 002 Q U I 0034720 T P 006 001 ( O R W A I T 5 ) 0034740 ) 0034760 0035000 006 003 ( * p a u s e f o r 0035020 o p t i c a l i l l u s i o n 0035040 o f m o v e m e n t b a c 0035060 k i n t o t h e 006 001 \r \t \t 0035100 \t \t \t \t \t 006 003 s c r e 0035120 e n . ) 006 001 \r 0035140 ( 006 002 u n t i l 006 001 ( 006 002 Q 0035160 U I T P 006 001 N I L ) 006 002 d o 0035200 006 001 ) \r ( 006 0035220 002 E X M I N E S H A F T 006 001 N 0035240 I L ( O R S P E E D 6 ) ) 0035260 \r ( 006 002 Q U 0035300 I T P 006 001 ( O R W A I T 1 0035320 5 ) ) \r ( 006 0035340 002 u n t i l 006 001 ( 006 002 Q U I T 0035360 P 006 001 N I L ) 006 002 d o 006 001 0035400 ( R O T A T E C O L O R M A P 0035420 C M 0 M A X C O L O R ] ) \r 0035440 \r ( 006 004 C I R C L E D E M O 006 001 0035460 \r [ L A M B D A ( W A I T 0035500 ) 0035520 0035540 006 003 0035560 ( * r r b " 1 5 - O C T - 8 0035600 2 1 0 : 4 3 " ) 006 001 \r 0035620 * 0035700 006 003 ( * d r 0035720 a w s c i r l e s a n d r 0035740 o t a t e s t h r o u g h t 0035760 h e c o l o r m a p . ) 006 001 \r 0036000 ( P R O G [ ( P A U S 0036020 E T I M E ( C O N D \r \t \t \t ( 0036040 ( E Q ( M A X I M U M C O L O 0036060 R ) \r \t \t \t 2 5 5 ) \r 0036100 \t \t \t 2 5 ) \r \t \t \t ( T 5 0036120 0 ] \r ( S C 0036140 R E E N C O L O R M A P D E M 0036160 O R A I N B O W M A P ) \r 0036200 ( 006 002 R A I N I N 0036220 G 006 001 1 ) \r 0036240 ( 006 002 Q U I T P 006 001 ( O R 0036260 W A I T 1 5 ) ) \r 0036300 ( 006 002 u n t i l 006 001 ( 0036320 006 002 Q U I T P 006 001 N I L ) 006 0036340 002 d o 006 001 ( R O T A T E C O L 0036360 O R M A P D E M O R A I N B O 0036400 W M A P 1 N I L ) \r \t \t \t \t 0036420 ( D I S M I S S P A U S E T I 0036440 M E ) ) \r ( 0036460 S C R E E N C O L O R M A P D 0036500 E M O R A I N I N G C O L O R M 0036520 A P ) \r ( 006 0036540 002 Q U I T P 006 001 ( O R W A I 0036560 T 2 0 ) ) \r 0036600 ( 006 002 u n t i l 006 001 ( 006 002 Q 0036620 U I T P 006 001 N I L ) 006 002 d o 0036640 006 001 ( R O T A T E C O L O R M 0036660 A P D E M O R A I N I N G C O 0036700 L O R M A P 1 N I L ) \r \t \t 0036720 \t \t ( D I S M I S S P A U S E 0036740 T I M E ] ) \r \r ( 006 004 W E L L 006 0036760 001 \r [ L A M B D A ( N ) 0037000 * 0037040 006 0037060 003 ( * r r b " 2 0 - S E P - 0037100 8 2 1 8 : 4 4 " ) 006 001 \r 0037120 ( P R O G ( ( D S ( D S P 0037140 C R E A T E ) ) ) \r 0037160 ( D S P D E S T I N A T 0037200 I O N ( C O L O R S C R E E N 0037220 B I T M A P ) \r \t \t \t D S ) 0037240 \r ( 006 002 f o 0037260 r 006 001 I 006 002 f r o m 006 001 1 0037300 006 002 t o 006 001 ( C O N S T A N 0037320 T ( I Q U O T I E N T ( S Q 0037340 R T ( I P L U S ( I T I M E 0037360 S C O L O R S C R E E N W I D 0037400 T H \r \t \t \t \t \t \t \t \t 0037420 C O L O R S C R E E N W I D T 0037440 H ) \r \t \t \t \t \t \t \t ( 0037460 I T I M E S C O L O R S C R E 0037500 E N H E I G H T \r \t \t \t \t \t \t 0037520 \t \t C O L O R S C R E 0037540 E N H E I G H T ) ) ) \r \t \t \t \t 0037560 \t \t 2 ) ) \r \t 006 002 b y 0037600 006 001 N 006 002 a s 006 001 C O L O 0037620 R 006 002 f r o m 006 001 1 006 002 d 0037640 o 006 001 ( D R A W C I R C L E 0037660 ( C O N S T A N T ( I Q U O T 0037700 I E N T C O L O R S C R E E N 0037720 W I D T H 2 ) ) \r \t \t \t \t \t \t 0037740 ( C O N S T A N T ( I Q U O 0037760 T I E N T C O L O R S C R E E 0040000 N H E I G H T 2 ) ) \r \t \t \t \t 0040020 \t \t I \r \t \t \t \t \t \t ( L I S 0040040 T ( Q U O T E R O U N D ) \r 0040060 \t \t \t \t \t \t ( A D 0040100 D 1 N ) \r \t \t \t \t \t \t 0040120 C O L O R ) \r \t \t \t \t \t \t 0040140 N I L D S ] ) \r ) \r \r ( R P 0040160 A Q Q 006 002 C O L O R D E M O S 0040200 006 001 ( L O G O D E M O C O L 0040220 O R K I N E T I C O V E R P A 0040240 I N T D E M O M O D A R T D E 0040260 M O W A L K D E M O T U N N 0040300 E L D E M O C I R C L E D E M 0040320 O \r \t \t \t V I N E D E 0040340 M O ) ) \r \r ( R P A Q Q 006 002 \ 0040360 F I R S T A U T O D E M O 006 001 0040400 L O G O D E M O ) \r \r ( R P A Q 0040420 Q 006 002 \ N E W C O L O R D E M 0040440 O 006 001 N I L ) \r \r ( R P A Q Q 0040460 006 002 S T O P D A T E 006 001 N I 0040500 L ) \r \r ( R P A Q Q 006 002 D E M 0040520 O R A I N B O W M A P 006 001 N I 0040540 L ) \r \r ( R P A Q Q 006 002 D E M 0040560 O D E F A U L T C O L O R M A P 0040600 006 001 N I L ) \r ( D E C L A R E 0040620 : D O E V A L @ C O M P I L E 0040640 D O N T C O P Y \r \r ( G L O B 0040660 A L V A R S C O L O R D E M O 0040700 S \ F I R S T A U T O D E M O 0040720 \ N E W C O L O R D E M O S 0040740 T O P D A T E D E M O R A I N 0040760 B O W M A P D E M O D E F A U 0041000 L T C O L O R M A P ) \r ) \r \r \r 0041020 \r 006 004 ( * L o g o d e m o s 0041040 ) 006 001 \r \r ( D E F I N E Q \r \r ( 0041060 006 004 L O G O D E M O 006 001 \r [ 0041100 L A M B D A N I L 0041120 * 0041160 006 003 ( * e 0041200 d i t e d : " 1 0 - S E P - 8 0041220 2 1 7 : 0 9 " ) 006 001 \r 0041240 ( R E S E T F O R M ( S C R E 0041260 E N C O L O R M A P ( C O L O 0041300 R M A P C R E A T E ) ) \r \t 0041320 ( P R O G ( ( N B I 0041340 T S ( C O L O R M A P B I T S 0041360 ( S C R E E N C O L O R M A P 0041400 ) ) ) \r \t \t M A X C 0041420 O L O R ) \r \t \t ( S E 0041440 T Q M A X C O L O R 7 ) \r \t 0041460 \t ( C O L O R B A C K 0041500 G R O U N D 0 ) \r \t \t 0041520 ( 006 002 C O L O R L O G O 006 001 0041540 ( 006 002 c r e a t e 006 001 P O S I 0041560 T I O N \r \t \t \t \t \t X C O O R D 0041600 _ 2 4 0 \r \t \t \t \t \t Y C O O 0041620 R D _ 2 6 0 ) ) \r \t \t 0041640 [ C O N D \r \t \t 0041660 ( ( N O T ( 006 002 Q U I T P 006 0041700 001 3 0 ) ) \r \t \t \t ( 006 002 d o 0041720 006 001 ( R O T A T E C O L O R M 0041740 A P ( S C R E E N C O L O R M 0041760 A P ) \r \t \t \t \t \t 1 0042000 M A X C O L O R ) \r \t \t \t 0042020 ( D I S M I S S 1 0 0 ) 0042040 006 002 u n t i l 006 001 ( 006 002 Q U I 0042060 T P 006 001 ] \r \t \t ( C O 0042100 N D \r \t \t ( ( A N 0042120 D J L O G O ( N O T ( 006 002 0042140 Q U I T P 006 001 2 0 ) ) ) \r \t \t 0042160 \t ( R E S E T V A R S ( ( I 0042200 N T E R L I S P - D / C O L O R 0042220 B I T M A P J L O G O ) ) \r \t 0042240 \t \t \t [ C O N D \r \t \t \t 0042260 \t ( ( N O T J L O 0042300 G O ) \r \t \t \t \t \t ( P R O G N 0042320 ( C O N D \r \t \t \t \t \t \t ( ( N 0042340 O T B I G J F O N T S ) \r \t \t 0042360 \t \t \t \t ( R E A D B I G J 0042400 F O N T S ) ) ) \r \t \t \t \t \t 0042420 ( S E T Q J L O G O 0042440 \r \t \t \t \t \t \t ( 006 002 I N I T / 0042460 L O G O / C O L O R B I T M A P 0042500 006 001 ( Q U O T E ( 245 244 245 363 0042520 245 277 - 245 352 245 271 245 327 - 0042540 \r \t \t \t \t \t \t \t \t \t \t D ] 0042560 \r \t \t \t \t ( 006 002 C O L O 0042600 R L O G O 006 001 ( 006 002 c r e a t 0042620 e 006 001 P O S I T I O N \r \t \t \t 0042640 \t \t \t X C O O R D 0042660 _ 2 4 0 \r \t \t \t \t \t \t 0042700 Y C O O R D _ 2 6 0 0042720 ) ) \r \t \t \t \t ( C O N D 0042740 \r \t \t \t \t ( ( N O T 0042760 ( 006 002 Q U I T P 006 001 1 5 ) ) 0043000 \r \t \t \t \t \t ( 006 002 d o 006 001 ( R 0043020 O T A T E C O L O R M A P ( S 0043040 C R E E N C O L O R M A P ) \r \t 0043060 \t \t \t \t \t \t 1 M A X C 0043100 O L O R ) \r \t \t \t \t \t ( 0043120 D I S M I S S 1 0 0 ) 006 002 u 0043140 n t i l 006 001 ( 006 002 Q U I T P 006 0043160 001 ] ) \r \r ( 006 004 C O L O R L O G 0043200 O 006 001 \r [ L A M B D A ( P 0043220 O S I T I O N ) 0043240 * 0043300 006 003 ( * r r b " 2 1 - D E 0043320 C - 8 2 2 1 : 4 4 " ) 006 001 \r 0043340 * 0043420 006 003 ( * 0043440 d r a w s a l o g o o n 0043460 t h e c o l o r s c r e e 0043500 n . ) 006 001 \r ( O R ( P 0043520 O S I T I O N P P O S I T I O 0043540 N ) \r \t ( S E T Q P O S I T I 0043560 O N ( 006 002 c r e a t e 006 001 P 0043600 O S I T I O N \r \t \t \t 0043620 X C O O R D _ 2 5 0 \r \t 0043640 \t \t Y C O O R D 0043660 _ 3 9 0 ) ) ) \r ( P R 0043700 O G ( ( X P O S ( 006 002 f e t 0043720 c h 006 001 X C O O R D 006 002 o f 0043740 006 001 P O S I T I O N ) ) \r \t 0043760 ( Y P O S ( 006 002 f e t c h 0044000 006 001 Y C O O R D 006 002 o f 006 001 0044020 P O S I T I O N ) ) \r \t 0044040 ( C O L O R 0 ) \r \t ( B 0044060 O R D E R C O L O R 7 ) \r \t 0044100 ( F O N T ( F O N T C R E 0044120 A T E ( Q U O T E T I M E S 0044140 R O M A N D ) \r \t \t \t 0044160 3 6 ) ) \r \t ( W I M A G E 0044200 W I D T H ( F I X ( F T I M 0044220 E S C I R C L E S I Z E . 6 0044240 2 ) ) ) \r \t ( W I M A G E 0044260 H E I G H T ( F I X ( F T I 0044300 M E S C I R C L E S I Z E . 0044320 5 ) ) ) \r \t ( N B I T S 0044340 ( C O L O R M A P B I T S ( S 0044360 C R E E N C O L O R M A P ) ) ) 0044400 \r \t ( M A X C O L O R 7 0044420 ) \r \t ( C O L O R S K I P 0044440 1 ) ) \r ( 0044460 006 002 f o r 006 001 A N G L E 006 002 0044500 f r o m 006 001 0 006 002 t o 006 001 0044520 2 7 0 006 002 b y 006 001 A N G L E 0044540 D E L T A 006 002 d o 006 001 ( 006 002 0044560 D R A W A C O L O R W I N D O W 0044600 006 001 ( I P L U S X P O S \r \t 0044620 \t \t \t \t \t \t \t \t ( F T 0044640 I M E S C I R C L E S I Z E \r 0044660 \t \t \t \t \t \t \t \t \t \t ( 0044700 C O S A N G L E ) ) ) \r \t \t \t 0044720 \t \t \t \t \t ( I P L U 0044740 S Y P O S \r \t \t \t \t \t \t \t \t \t 0044760 ( F T I M E S C I R 0045000 C L E S I Z E \r \t \t \t \t \t \t \t \t 0045020 \t \t ( S I N A N G L 0045040 E ) ) ) \r \t \t \t \t \t \t \t \t 0045060 W I M A G E W I D T H W 0045100 I M A G E H E I G H T 2 \r \t \t 0045120 \t \t \t \t \t \t [ C O N 0045140 D \r \t \t \t \t \t \t \t \t \t ( ( E Q 0045160 C O L O R M A X C O L O R ) \r 0045200 \t \t \t \t \t \t \t \t \t ( S E T Q 0045220 C O L O R 1 ) ) \r \t \t \t \t \t 0045240 \t \t \t \t ( T ( S E T Q C O L 0045260 O R \r \t \t \t \t \t \t \t \t \t 0045300 ( I P L U S C O L O R S K I 0045320 P C O L O R ] \r \t \t \t \t \t \t \t 0045340 \t 0 ) ) \r 0045360 ( B I T B L T [ C O 0045400 N D \r \t \t ( ( A N D I 0045420 N T E R L I S P - D / C O L O R 0045440 B I T M A P ( E Q N B I T S 0045460 ( 006 002 f e t c h 006 001 ( B I T 0045500 M A P B I T M A P B I T S P E 0045520 R P I X E L ) \r \t \t \t \t \t \t \t 0045540 006 002 o f 006 001 I N T 0045560 E R L I S P - D / C O L O R B I 0045600 T M A P ) ) ) \r \t \t 0045620 I N T E R L I S P - D / C O L O 0045640 R B I T M A P ) \r \t \t ( 0045660 T ( S E T Q I N T E R L I S 0045700 P - D / C O L O R B I T M A P \r 0045720 \t \t \t ( 006 002 I N I T / L O G O 0045740 / C O L O R B I T M A P 006 001 ( 0045760 Q U O T E ( I n t e r 0046000 l i s p - D ) ) \r \t 0046020 \t \t \t \t \t C O L O R M A X C O 0046040 L O R C O L O R S K I P ] \r \t 0046060 \t 0 0 ( C O L O R S C R 0046100 E E N B I T M A P ) \r \t \t ( 0046120 I P L U S X P O S W I M A G 0046140 E W I D T H ) \r \t \t ( I D I 0046160 F F E R E N C E Y P O S ( I 0046200 P L U S C I R C L E S I Z E 0046220 5 ) ) ) \r ( 0046240 R E T U R N ] ) \r \r ( 006 004 D R A 0046260 W A C O L O R W I N D O W 006 001 \r 0046300 [ L A M B D A ( X P O S 0046320 Y P O S W W I D T H W H E I 0046340 G H T W B O R D E R 0 C O L 0046360 O R 1 C O L O R ) 006 003 ( 0046400 * r r b " 2 1 - F E B - 8 2 0046420 1 0 : 3 0 " ) 006 001 \r ( 0046440 P R O G ( ( B M ( C O L O R 0046460 S C R E E N B I T M A P ) ) ) \r 0046500 ( C O L O R 0046520 F I L L A R E A X P O S Y P 0046540 O S W W I D T H W H E I G H 0046560 T 1 C O L O R B M ( Q U O 0046600 T E R E P L A C E ) ) \r 0046620 ( C O L O R F I L 0046640 L A R E A ( I P L U S X P O 0046660 S W B O R D E R ) \r \t \t \t ( 0046700 I P L U S Y P O S W B O R D 0046720 E R ) \r \t \t \t ( I D I F F E R 0046740 E N C E W W I D T H ( I T I 0046760 M E S W B O R D E R 2 ) ) \r 0047000 \t \t \t ( I D I F F E R E N C E 0047020 W H E I G H T ( I T I M E S 0047040 W B O R D E R 3 ) ) \r \t \t \t 0047060 0 C O L O R B M ( Q U O T 0047100 E R E P L A C E ) ) \r 0047120 ( R E T U R N B M 0047140 ] ) \r \r ( 006 004 I N I T / L O G O 0047160 / C O L O R B I T M A P 006 001 \r 0047200 [ L A M B D A ( C H A R S 0047220 S T A R T C O L O R # M A X C 0047240 O L O R C O L O R S K I P ) 0047260 006 003 ( * 0047300 r r b " 2 1 - D E C - 8 2 0047320 2 1 : 4 6 " ) 006 001 \r ( P 0047340 R O G ( [ C H A R L S T ( O 0047360 R C H A R S ( Q U O T E ( 0047400 I n t e r l i s 0047420 p - D ] \r \t ( F O N T 0047440 ( F O N T C R E A T E ( Q U 0047460 O T E T I M E S R O M A N D ) 0047500 \r \t \t \t 3 6 ) ) \r \t 0047520 ( C O L O R ( C O N D \r \t 0047540 \t ( S T A R T C O L O R 0047560 # ( C O L O R N U M B E R P 0047600 S T A R T C O L O R # ) ) \r \t \t 0047620 ( T 1 ) ) ) \r \t 0047640 ( X P O S 0 ) \r \t C O L 0047660 O R B M ) \r 0047700 ( S E T Q C O L O R B M ( B 0047720 I T M A P C R E A T E ( 006 002 f 0047740 o r 006 001 X 006 002 i n 006 001 C H 0047760 A R L S T 006 002 s u m 006 001 ( S 0050000 T R I N G W I D T H X F O N 0050020 T ) ) \r \t \t \t \t ( F 0050040 O N T P R O P F O N T ( Q U 0050060 O T E H E I G H T ) ) \r \t \t \t 0050100 \t ( C O L O R N U M 0050120 B E R B I T S P E R P I X E L ) 0050140 ) ) \r ( 006 002 0050160 f o r 006 001 C 006 002 i n 006 001 C 0050200 H A R L S T 006 002 d o 006 001 ( S 0050220 E T Q X P O S ( C O L O R P 0050240 R I N T C H A R C X P O S 0050260 0 0 [ S E T Q C O L O R \r 0050300 \t \t \t \t \t \t \t ( C O N D 0050320 \r \t \t \t \t \t \t \t ( ( 0050340 E Q C O L O R M A X C O L O 0050360 R ) \r \t \t \t \t \t \t \t \t 1 ) \r \t \t 0050400 \t \t \t \t \t ( T ( I 0050420 P L U S C O L O R C O L O R 0050440 S K I P ] \r \t \t \t \t \t \t \t F 0050460 O N T C O L O R B M ) ) ) \r 0050500 ( R E T U R N 0050520 C O L O R B M ] ) \r \r ( 006 004 C 0050540 O L O R P R I N T C H A R 006 001 \r 0050560 [ L A M B D A ( L E T X 0050600 P O S Y P O S 0 C O L O R 0050620 1 C O L O R F O N T T A R G 0050640 E T B M ) 006 003 ( 0050660 * r r b " 1 2 - O C T - 8 3 0050700 1 4 : 0 9 " ) 006 001 \r 0050720 * 0051000 006 003 ( * p r i 0051020 n t s a c h a r a c t e r 0051040 o n a c o l o r b i t m a 0051060 p ) 006 001 \r ( C O N D \r 0051100 ( ( E Q ( N C H A R 0051120 S L E T ) \r \t 1 ) \r \t ( 0051140 B I T B L T ( C O L O R I Z E 0051160 B I T M A P ( G E T C H A R B 0051200 I T M A P ( C H C O N 1 L E 0051220 T ) \r \t \t \t \t \t F 0051240 O N T ) \r \t \t \t \t 0 C O L O R 0051260 1 C O L O R ( B I T S P E R P 0051300 I X E L T A R G E T B M ) ) \r 0051320 \t \t 0 0 T A R G E T B M X 0051340 P O S Y P O S N I L N I L 0051360 N I L ( Q U O T E R E P L 0051400 A C E ) ) \r \t ( I P L U S X P 0051420 O S ( S T R I N G W I D T H 0051440 L E T F O N T ) ) ) \r 0051460 ( T ( P R O G ( [ D S P 0051500 ( C O N D \r \t \t 0051520 ( ( T Y P E N A M E P C O L O 0051540 R P R I N T C H A R D S ( Q U 0051560 O T E D I S P L A Y S T R E A 0051600 M ) ) \r \t \t \t C O L O R P R I 0051620 N T C H A R D S ) \r \t \t 0051640 ( T ( S E T Q C O L O 0051660 R P R I N T C H A R D S ( D S 0051700 P C R E A T E ] \r \t \t ( W ( S 0051720 T R I N G W I D T H L E T F 0051740 O N T ) ) \r \t \t ( H ( F O N T 0051760 P R O P F O N T ( Q U O T E 0052000 H E I G H T ) ) ) \r \t \t T E M 0052020 P B M ) \r \t ( S E 0052040 T Q T E M P B M ( B I T M A 0052060 P C R E A T E ( I P L U S 1 0052100 6 W ) \r \t \t \t \t \t H ) ) \r 0052120 \t ( D S P F O N T 0052140 F O N T D S P ) \r \t 0052160 ( D S P D E S T I N A T I 0052200 O N T E M P B M D S P ) \r \t 0052220 ( D S P C L I P P 0052240 I N G R E G I O N ( 006 002 c r e 0052260 a t e 006 001 R E G I O N \r \t \t \t 0052300 \t \t L E F T _ 0 \r \t \t \t 0052320 \t \t B O T T O M _ 0 \r \t 0052340 \t \t \t \t W I D T H _ W \r 0052360 \t \t \t \t \t H E I G H T _ 0052400 H ) ) \r \t ( M O V 0052420 E T O 0 ( F O N T P R O P 0052440 F O N T ( Q U O T E D E S C 0052460 E N T ) ) \r \t \t D 0052500 S P ) \r \t ( P R I 0052520 N 3 L E T D S P ) \r \t 0052540 ( C O L O R B L T ( C 0052560 O L O R I Z E B I T M A P T E 0052600 M P B M 0 C O L O R 1 C O L 0052620 O R ( B I T S P E R P I X E L 0052640 T A R G E T B M ) ) \r \t \t \t 0052660 0 0 T A R G E T B M X P O 0052700 S Y P O S N I L N I L N 0052720 I L ( Q U O T E R E P L A C 0052740 E ) ) \r \t ( R E T 0052760 U R N ( I P L U S X P O S 0053000 ( D S P X P O S I T I O N N I 0053020 L D S P ] ) \r ) \r \r ( R P A Q 0053040 Q 006 002 A N G L E D E L T A 006 001 0053060 2 3 ) \r \r ( R P A Q Q 006 002 C 0053100 I R C L E S I Z E 006 001 6 0 ) \r 0053120 \r ( R P A Q Q 006 002 L O G O C Y 0053140 C L E W A I T T I M E 006 001 6 0 0053160 ) \r \r ( R P A Q Q 006 002 J L O G 0053200 O 006 001 N I L ) \r \r ( R P A Q Q 0053220 006 002 W I N D O W I M A G E 006 001 0053240 N I L ) \r \r ( R P A Q Q 006 002 0053260 I N T E R L I S P - D / C O L O 0053300 R B I T M A P 006 001 N I L ) \r ( 0053320 D E C L A R E : D O E V A L @ 0053340 C O M P I L E D O N T C O P Y 0053360 \r \r ( G L O B A L V A R S I N 0053400 T E R L I S P - D / C O L O R B 0053420 I T M A P ) \r ) \r \r \r \r 006 004 ( * 0053440 K i n e t i c d e m o s ) 006 0053460 001 \r \r ( D E F I N E Q \r \r ( 006 004 0053500 C O L O R K I N E T I C 006 001 \r 0053520 [ L A M B D A ( R E G I O N 0053540 F I R S T C O L O R L A S T 0053560 C O L O R ) 0053600 006 003 ( * 0053620 r r b " 1 3 - S E P - 8 2 0053640 1 0 : 0 6 " ) 006 001 \r 0053660 * 0053740 006 003 ( * t e s t 0053760 e x a m p l e ( C O L O R K 0054000 I N E T I C ) ) 006 001 \r ( 0054020 R E S E T L S T ( R E S E T S 0054040 A V E ( C O L O R D I S P L A 0054060 Y T ) ) \r \t ( O R 0054100 ( R E G I O N P R E G I O N 0054120 ) \r \t \t ( S E T Q R E G I 0054140 O N W H O L E C O L O R D I S 0054160 P L A Y ) ) \r \t ( S 0054200 E T Q F I R S T C O L O R ( 0054220 C O L O R N U M B E R P ( O R 0054240 F I R S T C O L O R 0 ) ) ) 0054260 \r \t [ S E T Q L A 0054300 S T C O L O R ( C O L O R N U 0054320 M B E R P ( O R L A S T C O 0054340 L O R ( M A X I M U M C O L O 0054360 R ] \r \t [ C O N D \r 0054400 \t \t ( ( I G R E A T E R P F I 0054420 R S T C O L O R L A S T C O L 0054440 O R ) \r \t \t ( S E T Q L A 0054460 S T C O L O R ( P R O G 1 F 0054500 I R S T C O L O R ( S E T Q 0054520 F I R S T C O L O R L A S T C 0054540 O L O R ] \r \t ( P R 0054560 O G ( ( L E F T ( 006 002 f e t 0054600 c h 006 001 L E F T 006 002 o f 006 001 0054620 R E G I O N ) ) \r \t \t 0054640 ( R I G H T ( 006 002 f e t c h 0054660 006 001 R I G H T 006 002 o f 006 001 0054700 R E G I O N ) ) \r \t \t 0054720 ( B O T T O M ( 006 002 f e t c h 0054740 006 001 B O T T O M 006 002 o f 006 001 0054760 R E G I O N ) ) \r \t \t 0055000 ( T O P ( 006 002 f e t c h 006 001 0055020 T O P 006 002 o f 006 001 R E G I 0055040 O N ) ) \r \t \t X Y 0055060 ( C O L O R # F I R S T C O L 0055100 O R ) ) \r \t \t B L T L P \r \t \t 0055120 ( S E T Q X ( R A N D 0055140 L E F T R I G H T ) ) \r \t \t 0055160 ( S E T Q Y ( R A N 0055200 D B O T T O M T O P ) ) \r \t 0055220 \t ( C O L O R F I L L A 0055240 R E A X Y ( R A N D 2 0055260 ( I D I F F E R E N C E R I G 0055300 H T X ) ) \r \t \t \t \t ( R 0055320 A N D 2 ( I D I F F E R E N 0055340 C E T O P Y ) ) \r \t \t \t \t 0055360 [ C O N D \r \t \t \t \t 0055400 ( ( E Q C O L O R # L A S 0055420 T C O L O R ) \r \t \t \t \t 0055440 ( S E T Q C O L O R # 0055460 F I R S T C O L O R ) ) \r \t \t \t 0055500 \t ( T ( S E T Q C 0055520 O L O R # ( A D D 1 C O L O 0055540 R # ] \r \t \t \t \t ( C O L O 0055560 R S C R E E N B I T M A P ) \r \t 0055600 \t \t \t ( S E L E C T Q ( 0055620 R A N D 0 5 ) \r \t \t \t \t \t 0055640 ( 0 ( Q U O T E P A I 0055660 N T ) ) \r \t \t \t \t \t ( 1 0055700 ( Q U O T E E R A S E ) ) \r 0055720 \t \t \t \t \t ( 2 ( Q U O 0055740 T E I N V E R T ) ) \r \t \t \t \t 0055760 \t ( Q U O T E R E P L 0056000 A C E ) ) ) \r \t \t ( \ B 0056020 A C K G R O U N D ) \r \t \t 0056040 ( A N D ( 006 002 Q U I T P 006 001 0056060 ) \r \t \t \t ( R E T U R N ) ) \r 0056100 \t \t ( G O B L T L P ] 0056120 ) \r \r ( 006 004 D E M O C O L O R K 0056140 I N E T I C 006 001 \r [ L A M B 0056160 D A ( R E G I O N F I R S T 0056200 C O L O R L A S T C O L O R ) 0056220 0056240 006 003 ( * r r b " 0056260 2 1 - O C T - 8 2 1 8 : 1 7 " 0056300 ) 006 001 \r 0056320 * 0056400 006 003 ( * t e s t e x a m p 0056420 l e ( D E M O C O L O R K I N 0056440 E T I C ) ) 006 001 \r ( O R 0056460 ( C O L O R D I S P L A Y P ) 0056500 \r \t ( C O L O R D I S P L A Y 0056520 T ) ) \r ( O R ( R E G 0056540 I O N P R E G I O N ) \r \t ( S 0056560 E T Q R E G I O N W H O L E 0056600 C O L O R D I S P L A Y ) ) \r 0056620 ( O R ( C O L O R N U M 0056640 B E R P F I R S T C O L O R ) 0056660 \r \t ( S E T Q F I R S T C O L 0056700 O R 0 ) ) \r ( O R ( 0056720 C O L O R N U M B E R P L A S 0056740 T C O L O R ) \r \t ( S E T Q L 0056760 A S T C O L O R 1 5 ) ) \r 0057000 [ C O N D \r ( ( 0057020 I G R E A T E R P F I R S T C 0057040 O L O R L A S T C O L O R ) \r 0057060 \t ( S E T Q L A S T C O L O R 0057100 ( P R O G 1 F I R S T C O L 0057120 O R ( S E T Q F I R S T C O 0057140 L O R L A S T C O L O R ] \r 0057160 ( P R O G ( ( L E F T 0057200 ( 006 002 f e t c h 006 001 L E F T 0057220 006 002 o f 006 001 R E G I O N ) ) \r 0057240 \t ( R I G H T ( 006 002 f e 0057260 t c h 006 001 R I G H T 006 002 o f 0057300 006 001 R E G I O N ) ) \r \t 0057320 ( B O T T O M ( 006 002 f e t c h 0057340 006 001 B O T T O M 006 002 o f 006 001 0057360 R E G I O N ) ) \r \t ( T 0057400 O P ( 006 002 f e t c h 006 001 T O 0057420 P 006 002 o f 006 001 R E G I O N ) 0057440 ) \r \t X Y ( C O L O R 0057460 # F I R S T C O L O R ) \r \t 0057500 ( R O T A T E T I M E ( C 0057520 L O C K 0 ) ) \r \t ( K I 0057540 N R O T A T E T I M E ( C L O 0057560 C K 0 ) ) \r \t H A L F W 0057600 I D T H H A L F H E I G H T ) 0057620 \r ( S E T Q 0057640 H A L F W I D T H ( I Q U O 0057660 T I E N T ( 006 002 f e t c h 006 001 0057700 ( R E G I O N W I D T H ) 0057720 006 002 o f 006 001 R E G I O N ) \r \t 0057740 \t \t \t 2 ) ) \r 0057760 ( S E T Q H A L F 0060000 H E I G H T ( I Q U O T I E N 0060020 T ( 006 002 f e t c h 006 001 ( R E 0060040 G I O N H E I G H T ) 006 002 o 0060060 f 006 001 R E G I O N ) \r \t \t \t \t 0060100 2 ) ) \r 0060120 ( C O L O R F I L L R 0060140 E G I O N F I R S T C O L O R 0060160 ( C O L O R S C R E E N B I T 0060200 M A P ) ) \r B L T L 0060220 P \r [ C O N 0060240 D \r \t ( ( I G R E A T E 0060260 R P ( C L O C K D I F F E R E 0060300 N C E R O T A T E T I M E ) \r 0060320 \t \t \t L O G O C Y C L E W A I T 0060340 T I M E ) 0060360 006 003 ( * c y c 0060400 l e t h e c o l o r s i n 0060420 t h e l o g o ) 006 001 \r \t 0060440 ( R O T A T E C O L O R 0060460 M A P ( S C R E E N C O L O R 0060500 M A P ) \r \t \t \t 1 0060520 7 ) \r \t ( S E T Q 0060540 R O T A T E T I M E ( C L O C 0060560 K 0 R O T A T E T I M E ] \r 0060600 [ C O N D \r \t 0060620 ( ( I G R E A T E R P 0060640 ( C L O C K D I F F E R E N C E 0060660 K I N R O T A T E T I M E ) \r 0060700 \t \t \t K I N C Y C L E W A I T T 0060720 I M E ) 0060740 006 003 ( * c y c 0060760 l e t h e c o l o r s i n 0061000 t h e l o g o ) 006 001 \r \t 0061020 ( R O T A T E C O L O R 0061040 M A P ( S C R E E N C O L O R 0061060 M A P ) \r \t \t \t F I 0061100 R S T C O L O R L A S T C O L 0061120 O R ) \r \t ( S E T Q 0061140 K I N R O T A T E T I M E ( 0061160 C L O C K 0 K I N R O T A T E 0061200 T I M E ] \r 0061220 ( S E T Q X ( R A N D L E 0061240 F T R I G H T ) ) \r 0061260 ( S E T Q Y ( R A 0061300 N D B O T T O M T O P ) ) \r 0061320 ( C O L O R 0061340 F I L L A R E A X Y ( R A 0061360 N D 2 ( I M I N ( I D I F 0061400 F E R E N C E R I G H T X ) 0061420 \r \t \t \t \t \t H A L F W I D 0061440 T H ) ) \r \t \t \t ( R A N D 2 0061460 ( I M I N ( I D I F F E R E 0061500 N C E T O P Y ) \r \t \t \t \t 0061520 H A L F H E I G H T 0061540 ) ) \r \t \t \t [ C O N D \r \t \t \t 0061560 ( ( E Q C O L O R # L 0061600 A S T C O L O R ) \r \t \t \t 0061620 ( S E T Q C O L O R # F 0061640 I R S T C O L O R ) ) \r \t \t \t 0061660 ( T ( S E T Q C O L O R 0061700 # ( A D D 1 C O L O R # ] \r 0061720 \t \t \t ( C O L O R S C R E E N 0061740 B I T M A P ) \r \t \t \t ( Q U O 0061760 T E R E P L A C E ) ) \r 0062000 M O U S E L P \r 0062020 ( C O N D \r \t 0062040 ( ( M O U S E S T A T E M I D 0062060 D L E ) \r \t ( S E L 0062100 E C T Q [ C A R ( E R S E T 0062120 Q ( M E N U ( P R O G N ( 0062140 C O N D \r \t \t \t \t \t \t ( ( 0062160 N O T ( T Y P E N A M E P C 0062200 O L O R K I N E T I C C O M M A 0062220 N D M E N U \r \t \t \t \t \t \t \t \t 0062240 ( Q U O T E M E N U ) ) 0062260 ) \r \t \t \t \t \t \t ( 006 002 0062300 I N I T / C O L O R D E M O / M 0062320 E N U S 006 001 ) ) ) \r \t \t \t \t \t \t 0062340 C O L O R K I N E T I C C O M 0062360 M A N D M E N U ] \r \t \t 0062400 ( E d i t C o l o r M a p 0062420 ( E D I T C O L O R M A P ( 0062440 S C R E E N C O L O R M A P ) \r 0062460 \t \t \t \t \t \t T ) ) \r \t \t 0062500 [ I n c r e a s e L 0062520 o g o S p e e d ( S E T Q L 0062540 O G O C Y C L E W A I T T I M E 0062560 ( F I X ( F T I M E S L O 0062600 G O C Y C L E W A I T T I M E 0062620 . 8 ] \r \t \t [ D e 0062640 c r e a s e L o g o S p e e d 0062660 ( S E T Q L O G O C Y C L E W 0062700 A I T T I M E ( F I X ( F T 0062720 I M E S L O G O C Y C L E W A 0062740 I T T I M E 1 . 3 ] \r \t \t 0062760 [ I n c r e a s e C o 0063000 l o r F l i p ( S E T Q K I 0063020 N C Y C L E W A I T T I M E ( 0063040 F I X ( F T I M E S K I N C 0063060 Y C L E W A I T T I M E . 8 ] 0063100 \r \t \t [ D e c r e 0063120 a s e C o l o r F l i p ( S E 0063140 T Q K I N C Y C L E W A I T T 0063160 I M E ( F I X ( F T I M E S 0063200 K I N C Y C L E W A I T T I M 0063220 E 1 . 3 ] \r \t \t 0063240 ( S T O P ( R E T U R N ) ) \r 0063260 \t \t N I L ) ) \r \t 0063300 ( ( M O U S E S T A T E 0063320 L E F T ) 0063340 0063360 006 003 ( * o n l e f 0063400 t r o t a t e c o l o r m a 0063420 p ) 006 001 \r \t ( R O T 0063440 A T E C O L O R M A P ( S C R 0063460 E E N C O L O R M A P ) \r \t \t \t 0063500 F I R S T C O L O R 0063520 L A S T C O L O R ) \r \t 0063540 [ C O N D \r \t \t ( ( I G R 0063560 E A T E R P ( C L O C K D I F 0063600 F E R E N C E R O T A T E T I 0063620 M E ) \r \t \t \t L O G O C 0063640 Y C L E W A I T T I M E ) 0063660 006 003 ( * 0063700 c y c l e t h e c o l o r 0063720 s i n t h e l o g o ) 006 001 0063740 \r \t \t ( R O T A T E C O L O 0063760 R M A P ( S C R E E N C O L O 0064000 R M A P ) \r \t \t \t \t 1 7 ) 0064020 \r \t \t ( S E T Q R O T A T 0064040 E T I M E ( C L O C K 0 R O 0064060 T A T E T I M E ] \r \t 0064100 [ C O N D \r \t \t ( ( I G R E A 0064120 T E R P ( C L O C K D I F F E 0064140 R E N C E K I N R O T A T E T 0064160 I M E ) \r \t \t \t K I N C 0064200 Y C L E W A I T T I M E ) 0064220 006 003 ( 0064240 * c y c l e t h e c o l o 0064260 r s i n t h e l o g o ) 006 0064300 001 \r \t \t ( R O T A T E C O L 0064320 O R M A P ( S C R E E N C O L 0064340 O R M A P ) \r \t \t \t \t F I R 0064360 S T C O L O R L A S T C O L O 0064400 R ) \r \t \t ( S E T Q K I N 0064420 R O T A T E T I M E ( C L O C 0064440 K 0 K I N R O T A T E T I M E 0064460 ] \r \t ( D I S M I S 0064500 S ( I M I N K I N E T I C W 0064520 A I T T I M E L O G O C Y C L 0064540 E W A I T T I M E ) ) \r \t 0064560 ( G O M O U S E L P ) ) 0064600 ) \r ( G O 0064620 B L T L P ] ) \r \r ( 006 004 C I R K 0064640 I N 006 001 \r [ L A M B D A ( 0064660 D S ) 0064700 * 0064740 006 003 ( * r r b " 1 0 - D 0064760 E C - 8 2 1 2 : 4 1 " ) 006 001 \r 0065000 ( P R O G ( L E F T 0065020 R I G H T T O P B O T T O M 0065040 M A X R A D ( M A X C O L O 0065060 R ( M A X I M U M C O L O R ) 0065100 ) ) \r ( C O 0065120 N D \r \t ( ( N O T ( 006 0065140 002 t y p e ? 006 001 D I S P L A Y 0065160 S T R E A M D S ) ) \r \t 0065200 ( S E T Q D S ( D S P 0065220 C R E A T E ( C O L O R S C R 0065240 E E N B I T M A P ) ) ) \r \t 0065260 ( D S P C L I P P I N G 0065300 R E G I O N W H O L E C O L O 0065320 R D I S P L A Y D S ) ) ) \r 0065340 [ S E T Q L 0065360 E F T ( 006 002 f e t c h 006 001 ( 0065400 R E G I O N L E F T ) 006 002 o 0065420 f 006 001 ( S E T Q M A X R A D 0065440 ( D S P C L I P P I N G R E G 0065460 I O N N I L D S ] \r 0065500 ( S E T Q R I G H 0065520 T ( 006 002 f e t c h 006 001 ( R E 0065540 G I O N R I G H T ) 006 002 o f 0065560 006 001 M A X R A D ) ) \r 0065600 ( S E T Q B O T T 0065620 O M ( 006 002 f e t c h 006 001 ( R 0065640 E G I O N B O T T O M ) 006 002 0065660 o f 006 001 M A X R A D ) ) \r 0065700 ( S E T Q T O 0065720 P ( 006 002 f e t c h 006 001 ( R E 0065740 G I O N T O P ) 006 002 o f 006 001 0065760 M A X R A D ) ) \r 0066000 ( S E T Q M A X R A D 0066020 ( I Q U O T I E N T ( I M I 0066040 N ( 006 002 f e t c h 006 001 ( R E 0066060 G I O N W I D T H ) 006 002 o f 0066100 006 001 M A X R A D ) \r \t \t \t \t \t 0066120 ( 006 002 f e t c h 006 001 ( R E G I 0066140 O N H E I G H T ) 006 002 o f 006 0066160 001 M A X R A D ) ) \r \t \t \t \t 0066200 3 ) ) \r L P ( 0066220 006 002 f o r 006 001 I 006 002 f r o m 0066240 006 001 1 006 002 t o 006 001 4 006 002 0066260 d o 006 001 ( F I L L C I R C L E 0066300 ( R A N D L E F T R I G H 0066320 T ) \r \t \t \t \t \t ( R A N 0066340 D B O T T O M T O P ) \r \t \t 0066360 \t \t \t ( R A N D 0 M 0066400 A X R A D ) \r \t \t \t \t \t 0066420 ( R A N D 0 M A X C O L O R 0066440 ) \r \t \t \t \t \t D S ) ) \r 0066460 ( D S P O P 0066500 E R A T I O N ( S E L E C T Q 0066520 ( R A N D 0 3 ) \r \t \t \t \t 0066540 ( 0 ( Q U O T E R E P L A 0066560 C E ) ) \r \t \t \t \t ( 1 ( Q U 0066600 O T E P A I N T ) ) \r \t \t \t \t 0066620 ( 2 ( Q U O T E I N V E R 0066640 T ) ) \r \t \t \t \t ( Q U O T E 0066660 E R A S E ) ) \r \t \t \t D S ) \r 0066700 ( G O L P ] 0066720 ) \r ) \r \r ( R P A Q Q 006 002 K I 0066740 N E T I C W A I T T I M E 006 001 0066760 1 5 0 ) \r ( D E C L A R E : D 0067000 O E V A L @ C O M P I L E D O 0067020 N T C O P Y \r \r ( G L O B A L V 0067040 A R S K I N E T I C W A I T T 0067060 I M E ) \r ) \r ( D E F I N E Q \r 0067100 \r ( 006 004 C O L O R D E M O 1 006 001 0067120 \r [ L A M B D A N I L 0067140 * 0067200 006 003 0067220 ( * b a s : " 2 5 - A P R - 0067240 8 2 2 3 : 4 8 " ) 006 001 \r 0067260 ( P R O G ( ( R A I N B O W 0067300 C O L O R M A P ( C O L O R M 0067320 A P C R E A T E R A I N B O W 0067340 I N T E N S I T I E S ) ) \r \t 0067360 ( K I N R E G I O N ( 006 002 0067400 c r e a t e 006 001 R E G I O N \r 0067420 \t \t \t L E F T _ 0067440 2 0 \r \t \t \t B O T T 0067460 O M _ 2 0 \r \t \t \t 0067500 W I D T H _ 6 0 0 \r \t \t \t 0067520 H E I G H T _ 3 0067540 0 0 ) ) ) 0067560 006 003 ( * t u r n o 0067600 n d i s p l a y t o a l l 0067620 o c a t e s c r e e n b i t 0067640 m a p . ) 006 001 \r 0067660 ( R E S E T F O R M ( C O 0067700 L O R D I S P L A Y T ) \r \t \t 0067720 ( R E S E T F O R M 0067740 ( S C R E E N C O L O R M A P 0067760 R A I N B O W C O L O R M A P ) 0070000 \r \t \t \t \t ( C O L O R B A C K G 0070020 R O U N D ( Q U O T E B L A 0070040 C K ) ) \r \t \t \t \t ( 006 002 C O L O 0070060 R L O G O 006 001 ( 006 002 c r e a t 0070100 e 006 001 P O S I T I O N \r \t \t \t 0070120 \t \t \t X C O O R D _ 2 0070140 5 0 \r \t \t \t \t \t \t Y C O O 0070160 R D _ 3 9 0 ) ) \r \t \t \t \t ( 0070200 006 002 u n t i l 006 001 ( M O U S E 0070220 S T A T E ( N O T U P ) ) 0070240 006 002 d o 006 001 ( R O T A T E C O 0070260 L O R M A P R A I N B O W C O 0070300 L O R M A P 1 7 ) \r \t \t \t \t 0070320 \t \t \t \t ( D I S M I S S L O G 0070340 O C Y C L E W A I T T I M E ) ) 0070360 \r \t \t \t \t ( 006 002 D E M O C O L O 0070400 R K I N E T I C 006 001 K I N R E 0070420 G I O N 8 1 4 ) ) \r \t \t 0070440 ( C O L O R B A C K G R O 0070460 U N D ( Q U O T E W H I T E 0070500 ] ) \r \r ( 006 004 C O L O R D E M O 0070520 2 006 001 \r [ L A M B D A ( S 0070540 I Z E ) 0070560 * 0070620 006 003 ( * b a s : " 2 5 - A 0070640 P R - 8 2 2 3 : 4 6 " ) 006 001 \r 0070660 ( 006 002 D E C L A R E 006 001 0070700 ( G L O B A L V A R S \ M O 0070720 U S E H O T S P O T Y C O L O 0070740 R D E M O 2 M E N U K I N E T 0070760 I C W A I T T I M E ) ) \r 0071000 * 0071060 006 003 ( * f 0071100 l a s h y c o l o r d e m o 0071120 ) 006 001 \r ( R E S E T F O 0071140 R M ( C O L O R D I S P L A Y 0071160 T ) \r \t [ R E S 0071200 E T F O R M ( S C R E E N C O 0071220 L O R M A P ) \r \t \t \t ( S H 0071240 O W C O L O R T E S T P A T T E 0071260 R N S I Z E ) \r \t \t \t ( \ 0071300 S E T C U R S O R P O S I T I O 0071320 N L A S T M O U S E X ( L L 0071340 S H K I N E T I C W A I T T I 0071360 M E 2 ) ) \r 0071400 * 0071460 006 003 ( * m o v e c u 0071500 r s o r t o s t a r t c y 0071520 c l e a t k i n e t i c c 0071540 y c l e t i m e . ) 006 001 \r \t \t 0071560 \t ( 006 002 b i n d 006 001 C O L 0071600 O R \r \t \t \t 006 002 d o 006 0071620 001 ( R O T A T E C O L O R M A 0071640 P ( S C R E E N C O L O R M A 0071660 P ) ) \r \t \t \t \t ( C O N D \r \t \t 0071700 \t \t [ ( M O U S E S T A T E 0071720 M I D D L E ) \r \t \t \t \t 0071740 ( S E L E C T Q ( S E T Q 0071760 C O L O R ( M E N U ( P R O 0072000 G N ( C O N D \r \t \t \t \t \t \t \t 0072020 \t \t ( ( N O T ( T Y P E N A M 0072040 E P \r \t \t \t \t \t \t \t \t \t \t C O L 0072060 O R D E M O 2 M E N U \r \t \t \t \t 0072100 \t \t \t \t \t \t ( Q U O T E M E N 0072120 U ) ) ) \r \t \t \t \t \t \t \t \t \t 0072140 ( 006 002 I N I T / C O L O R D E M 0072160 O / M E N U S 006 001 ) ) ) \r \t \t \t 0072200 \t \t \t \t \t C O L O R 0072220 D E M O 2 M E N U ) ) ) \r \t \t \t 0072240 \t \t ( S T O P ( R E 0072260 T U R N ) ) \r \t \t \t \t \t 0072300 ( E D I T C O L O R M A P ( 0072320 S C R E E N C O L O R M A P ( 0072340 E D I T C O L O R M A P \r \t \t \t 0072360 \t \t \t \t \t \t ( C O L O 0072400 R M A P C O P Y ( \r S C R E E 0072420 N C O L O R M A P ) ) \r \t \t \t \t 0072440 \t \t \t \t \t T ) ) ) \r \t 0072460 \t \t \t \t ( N I L N I 0072500 L ) \r \t \t \t \t \t ( D E 0072520 F A U L T ( S C R E E N C O L 0072540 O R M A P T ) ) \r \t \t \t \t \t 0072560 ( S C R E E N C O L O R 0072600 M A P \r \t \t \t \t \t 0072620 ( M A P O F A C O L O R ( S E 0072640 L E C T Q C O L O R \r \t \t \t \t 0072660 \t \t \t \t ( R E D ( Q 0072700 U O T E ( R E D ) ) ) \r \t \t \t 0072720 \t \t \t \t \t ( B L U E 0072740 ( Q U O T E ( B L U E ) ) ) \r 0072760 \t \t \t \t \t \t \t \t ( G R 0073000 E E N ( Q U O T E ( G R E E 0073020 N ) ) ) \r \t \t \t \t \t \t \t \t 0073040 ( P U R P L E ( Q U O T E 0073060 ( R E D B L U E ) ) ) \r \t \t 0073100 \t \t \t \t \t \t ( B L U E 0073120 G R E E N ( Q U O T E ( B L 0073140 U E G R E E N ) ) ) \r \t \t \t \t 0073160 \t \t \t \t ( G R E Y ( 0073200 Q U O T E ( R E D B L U E 0073220 G R E E N ) ) ) \r \t \t \t \t \t \t \t 0073240 \t ( Y E L L O W ( Q 0073260 U O T E ( R E D G R E E N ) 0073300 ) ) \r \t \t \t \t \t \t \t \t 0073320 ( S H O U L D N T ] \r \t \t \t \t 0073340 ( T ( D I S M I S S ( L R 0073360 S H ( I D I F F E R E N C E 0073400 L A S T M O U S E Y \ M O U S 0073420 E H O T S P O T Y ) \r \t \t \t \t \t 0073440 \t 2 ] \r \t 0073460 ( C O L O R B A C K G R O U N D 0073500 ( Q U O T E W H I T E ] ) \r 0073520 \r ( 006 004 I N I T / C O L O R D E 0073540 M O / M E N U S 006 001 \r [ L A 0073560 M B D A N I L 0073600 * 0073640 006 003 ( * r r b 0073660 " 1 0 - M A R - 8 2 1 6 : 3 0073700 2 " ) 006 001 \r 0073720 * 0074000 006 003 ( * c r e a t e a 0074020 l l o f t h e m e n u s 0074040 u s e d b y c o l o r d e m 0074060 o s . ) 006 001 \r 0074100 * 0074160 006 003 ( * f e t c h i n 0074200 g i m a g e w i d t h f o 0074220 r c e s t h e i m a g e t 0074240 o b e c r e a t e d . ) 006 001 0074260 \r ( 006 002 f e t c h 006 001 0074300 ( M E N U I M A G E W I D T H 0074320 ) 006 002 o f 006 001 ( S E T Q C 0074340 O L O R D E M O 2 M E N U ( 006 0074360 002 c r e a t e 006 001 M E N U \r \t 0074400 \t \t \t \t \t \t I T E M S 0074420 _ ( Q U O T E ( ( S T O P 0074440 ( Q U O T E S T O P ) \r \t \t \t 0074460 \t \t \t \t \t \t \t \r \t \t \t \t \t \t 0074500 \t \t \t " S t o p s t h i s d 0074520 e m o n s t r a t i o n . " ) \r 0074540 \t \t \t \t \t \t \t \t \t ( E 0074560 d i t C o l o r s \r \t \t \t \t \t \t 0074600 \t \t \t ( Q U O T E 0074620 E D I T C O L O R M A P ) \r \t 0074640 \t \t \t \t \t \t \t \t \r 0074660 \t \t \t \t \t \t \t \t " C 0074700 a l l s t h e c o l o r m 0074720 a p e d i t o r . " ) \r \t \t \t 0074740 \t \t \t \t \t \t ( D e f a 0074760 u l t ( Q U O T E D E F A U 0075000 L T ) \r \t \t \t \t \t \t \t \t \t \t 0075020 \r \t \t \t \t \t \t \t " S e 0075040 t s t h e c o l o r m a p 0075060 t o t h e s y s t e m d 0075100 e f a u l t " ) \r \t \t \t \t \t \t \t 0075120 \t \t ( R e d ( Q U O 0075140 T E R E D ) \r \t \t \t \t \t \t \t \t 0075160 \t \t \r \t \t \t \t \t \t \t \t \t " S 0075200 w i t c h t o a R E D c 0075220 o l o r m a p " ) \r \t \t \t \t \t 0075240 \t \t \t \t ( G r e e n 0075260 ( Q U O T E G R E E N ) \r \t \t 0075300 \t \t \t \t \t \t \t \t \r \t \t \t 0075320 \t \t \t \t \t " S w i t 0075340 c h t o a G R E E N c o 0075360 l o r m a p " ) \r \t \t \t \t \t \t 0075400 \t \t \t ( B l u e ( Q 0075420 U O T E B L U E ) \r \t \t \t \t \t 0075440 \t \t \t \t \t \r \t \t \t \t \t \t \t 0075460 \t " S w i t c h 0075500 t o a B L U E c o l o r 0075520 m a p " ) \r \t \t \t \t \t \t \t \t \t 0075540 ( Y e l l o w ( Q U O 0075560 T E Y E L L O W ) \r \t \t \t \t \t 0075600 \t \t \t \t \t \r \t \t \t \t \t 0075620 \t \t \t " S w i t c h 0075640 t o a Y E L L O W c o l o 0075660 r m a p " ) \r \t \t \t \t \t \t \t \t 0075700 \t ( P u r p l e ( Q 0075720 U O T E P U R P L E ) \r \t \t \t 0075740 \t \t \t \t \t \t \t \r \t \t \t 0075760 \t \t \t \t \t " S w i t c 0076000 h t o a V I O L E T c o 0076020 l o r m a p " ) \r \t \t \t \t \t \t 0076040 \t \t \t ( G r e y ( Q 0076060 U O T E G R E Y ) \r \t \t \t \t \t 0076100 \t \t \t \t \t \r \t \t \t \t \t \t \t 0076120 \t " S w i t c h 0076140 t o a G R E Y c o l o r 0076160 m a p " ) \r \t \t \t \t \t \t \t \t \t 0076200 ( B l u e G r e e n ( 0076220 Q U O T E \r \t \t \t \t \t \t \t \t \t 0076240 \t \t B L U E G R E E N ) \r \t \t \t 0076260 \t \t \t \t \t \t \t \t \r \t \t \t \t 0076300 " S w i t c h t o a 0076320 c o l o r m a p t h a t 0076340 i s a m i x t u r e o f 0076360 B L U E a n d G R E E N . " 0076400 ) ) ) \r \t \t \t \t \t \t \t 0076420 C E N T E R F L G _ T \r \t \t 0076440 \t \t \t \t \t C H A N G E 0076460 O F F S E T F L G _ T ) ) ) 0076500 \r ( 006 002 f e t c h 006 001 0076520 ( M E N U I M A G E W I D T H 0076540 ) 006 002 o f 006 001 ( S E T Q C 0076560 O L O R K I N E T I C C O M M A 0076600 N D M E N U ( 006 002 c r e a t e 0076620 006 001 M E N U \r \t \t \t \t \t \t \t \t 0076640 I T E M S _ ( Q U 0076660 O T E \r \t \t \t \t \t \t \t \t \t ( ( S 0076700 T O P ( Q U O T E S T O P ) 0076720 \r \t \t \t \t \t \t \t \t \t 0076740 \r \t \t \t \t \t \t \t \t \t " S t 0076760 o p s t h e d e m o n s t r 0077000 a t i o n " ) \r \t \t \t \t \t \t \t \t 0077020 \t ( E d i t C o l o r M a p 0077040 ( Q U O T E \r \t \t \t \t \t \t \t 0077060 \t \t \t E d i t C o l o 0077100 r M a p ) \r \t \t \t \t \t \t \t \t \t \t 0077120 \t \r \t \t \t \t \t \t \t \t 0077140 " E d i t s t h e s c r e 0077160 e n c o l o r m a p " ) \r \t 0077200 \t \t \t \t \t \t \t \t ( I n c r e 0077220 a s e L o g o S p e e d \r \t \t \t 0077240 \t \t \t \t \t \t ( Q U O T E 0077260 I n c r e a s e L o g o S p e 0077300 e d ) \r \t \t \t \t \t \t \t \t \t 0077320 \r \t \t \t \t \t \t " S p e 0077340 e d s u p t h e c y c l i 0077360 n g o f c o l o r s t h r 0077400 u t h e l o g o " ) \r \t \t \t 0077420 \t \t \t \t \t \t ( D e c r e a s 0077440 e L o g o S p e e d \r \t \t \t \t \t 0077460 \t \t \t \t ( Q U O T E D 0077500 e c r e a s e L o g o S p e e d 0077520 ) \r \t \t \t \t \t \t \t \t \t \r 0077540 \t \t \t \t \t \t " S l o w s 0077560 d o w n t h e c y c l i n g 0077600 o f c o l o r s t h r u 0077620 t h e l o g o " ) \r \t \t \t \t \t 0077640 \t \t \t \t ( I n c r e a s e C 0077660 o l o r F l i p \r \t \t \t \t \t \t \t 0077700 \t \t ( Q U O T E I n c 0077720 r e a s e C o l o r F l i p ) \r 0077740 \t \t \t \t \t \t \t \t \t \r \t \t 0077760 \t " I n c r e a s 0100000 e s t h e f r e q u e n c y 0100020 o f c o l o r m a p c h 0100040 a n g e s i n t h e K i n 0100060 e t i c r e g i o n " \r \t \t \t 0100100 \t \t \t \t \t \t N X P ) \r \t 0100120 \t \t \t \t \t \t \t \t ( D e c r e 0100140 a s e C o l o r F l i p \r \t \t \t 0100160 \t \t \t \t \t \t ( Q U O T E 0100200 D e c r e a s e C o l o r F l 0100220 i p ) \r \t \t \t \t \t \t \t \t \t 0100240 \r \t \t \t \t " R e d u c e s 0100260 t h e f r e q u e n c y o 0100300 f c o l o r m a p c h a n g 0100320 e s i n t h e K i n e t i 0100340 c r e g i o n " ) ) ) \r \t \t \t 0100360 \t \t \t \t \t C H A N G 0100400 E O F F S E T F L G _ T \r \t 0100420 \t \t \t \t \t \t \t C E N 0100440 T E R F L G _ T ] ) \r ) \r \r 0100460 ( R P A Q Q 006 002 K I N C Y C L 0100500 E W A I T T I M E 006 001 5 1 1 4 0100520 ) \r \r ( R P A Q Q 006 002 C O L O 0100540 R K I N E T I C C O M M A N D M 0100560 E N U 006 001 N I L ) \r \r ( R P A 0100600 Q Q 006 002 C O L O R P R I N T C 0100620 H A R D S 006 001 N I L ) \r \r ( R 0100640 P A Q Q 006 002 C O L O R D E M O 0100660 2 M E N U 006 001 N I L ) \r \r ( R 0100700 P A Q Q 006 002 R A I N B O W I N 0100720 T E N S I T I E S 006 001 ( ( 1 7 0100740 8 0 0 ) \r \t \t \t ( 2 5 0100760 5 0 0 ) \r \t \t \t ( 2 5 0101000 5 1 2 8 0 ) \r \t \t \t ( 0101020 2 5 5 2 5 5 0 ) \r \t \t \t 0101040 ( 1 2 8 2 5 5 0 ) \r \t \t \t 0101060 ( 0 2 5 5 0 ) \r \t \t \t 0101100 ( 0 2 5 5 1 2 8 ) \r \t 0101120 \t \t ( 0 2 5 5 2 5 5 ) 0101140 \r \t \t \t ( 0 1 2 8 2 5 0101160 5 ) \r \t \t \t ( 0 0 2 5 0101200 5 ) \r \t \t \t ( 1 2 8 0 0101220 2 5 5 ) \r \t \t \t ( 2 5 5 0101240 0 2 5 5 ) \r \t \t \t ( 2 5 0101260 5 1 2 8 2 5 5 ) \r \t \t \t 0101300 ( 2 5 5 2 5 5 2 5 5 ) \r \t 0101320 \t \t ( 1 2 8 1 2 8 1 2 0101340 8 ) \r \t \t \t ( 0 0 0 ) 0101360 ) ) \r \r \r \r 006 004 ( * S i m p l 0101400 e d e m o s ) 006 001 \r \r ( D E F 0101420 I N E Q \r \r ( 006 004 R E D G R E E 0101440 N 006 001 \r [ L A M B D A N I 0101460 L 0101500 * 0101540 006 003 ( * r r b " 2 - J U 0101560 L - 8 2 1 8 : 2 6 " ) 006 001 \r 0101600 ( R E S E T F O R M ( C 0101620 O L O R D I S P L A Y T ) \r \t 0101640 ( R E S E T F O R 0101660 M ( S C R E E N C O L O R M A 0101700 P ( M A P O F A C O L O R ( 0101720 Q U O T E R E D ) ) ) \r \t \t \t 0101740 ( S H O W C O L O R T E S T 0101760 P A T T E R N ) \r \t \t \t ( 006 0102000 002 B I N D 006 001 ( N C O L O R M 0102020 A S K _ ( C O N D \r \t \t \t \t \t 0102040 ( ( E Q \ C O L O 0102060 R D I S P L A Y B I T S P E R P 0102100 I X E L 4 ) \r \t \t \t \t \t \t 1 5 0102120 ) \r \t \t \t \t \t ( T 0102140 2 5 5 ) ) ) \r \t \t \t 006 0102160 002 f o r 006 001 L 006 002 f r o m 006 0102200 001 0 006 002 d o 006 001 [ C O L O 0102220 R L E V E L ( S C R E E N C O 0102240 L O R M A P ) \r \t \t \t \t \t \t \t 0102260 ( L O G A N D L N C O L O R 0102300 M A S K ) \r \t \t \t \t \t \t \t ( C 0102320 O N D \r \t \t \t \t \t \t \t ( ( 0102340 Z E R O P ( L O G A N D L 0102360 2 5 6 ) ) \r \t \t \t \t \t \t \t 0102400 ( Q U O T E G R E E N ) ) 0102420 \r \t \t \t \t \t \t \t ( T ( Q 0102440 U O T E R E D ) ) ) \r \t \t \t \t 0102460 \t \t \t ( C O N D \r \t \t \t \t \t \t 0102500 \t ( ( Z E R O P ( L O G 0102520 A N D L 5 1 2 ) ) \r \t \t \t \t 0102540 \t \t \t ( L O G A N D 0102560 2 5 5 L ) ) \r \t \t \t \t \t \t \t 0102600 ( T ( I D I F F E R E N C 0102620 E 2 5 5 ( L O G A N D 2 5 0102640 5 L ] \r \t \t \t \t \t ( 0102660 R O T A T E C O L O R M A P ( 0102700 S C R E E N C O L O R M A P ) ) 0102720 \r \t \t \t \t \t ( D I S M 0102740 I S S 2 5 ) \r \t \t \t 0102760 006 002 u n t i l 006 001 ( 006 002 Q U I 0103000 T P 006 001 ) ) ) \r \t 0103020 ( C O L O R B A C K G R O U N D 0103040 ( Q U O T E W H I T E ] ) \r 0103060 ) \r \r \r \r 006 004 ( * O v e r p a 0103100 i n t d e m o s ) 006 001 \r \r ( D 0103120 E F I N E Q \r \r ( 006 004 O V E R P 0103140 A I N T D E M O 006 001 \r [ L A 0103160 M B D A N I L 0103200 * 0103240 006 003 ( * r r b 0103260 " 1 5 - O C T - 8 2 1 0 : 3 0103300 6 " ) 006 001 \r ( 006 002 D E C 0103320 L A R E 006 001 ( G L O B A L V A 0103340 R S S T O P D A T E ) ) \r 0103360 ( R E S E T L S T [ R E S 0103400 E T S A V E N I L ( L I S T 0103420 ( Q U O T E C L O S E W ) \r 0103440 \t \t \t \t ( A D D M E N U 0103460 ( 006 002 c r e a t e 006 001 M E N U 0103500 \r \t \t \t \t \t \t I T E M S 0103520 _ ( Q U O T E ( R A N D O M 0103540 L I N E C U R S O R N O N 0103560 E ) ) \r \t \t \t \t \t \t W H 0103600 E N S E L E C T E D F N _ ( Q 0103620 U O T E O V E R P A I N T S E 0103640 L F N ] \r \t ( S E T 0103660 Q M O V E M O D E ( Q U O T 0103700 E R A N D O M ) ) \r \t 0103720 [ S E T Q L A S T X ( S 0103740 E T Q L A S T Y ( S E T Q 0103760 D X ( S E T Q D Y ( S E T 0104000 Q N S T E P S 0 ] \r \t 0104020 ( 006 002 f o r 006 001 I 006 002 0104040 i n 006 001 [ C O N D \r \t \t \t 0104060 ( O V E R P A I N T B I T M A P 0104100 S ) \r \t \t \t ( T ( S E T Q 0104120 O V E R P A I N T B I T M A P 0104140 S ( L I S T ( B I T M A P F 0104160 R O M S T R I N G " I n t e r 0104200 l i s p - D " ] \r \t \t 006 002 u n 0104220 t i l 006 001 ( O R ( 006 002 Q U I 0104240 T P 006 001 2 0 ) \r \t \t \t ( 0104260 E Q M O V E M O D E ( Q U O 0104300 T E N O N E ) ) ) \r \t \t 006 002 0104320 d o 006 001 ( 006 002 O V E R P A I N 0104340 T B M 006 001 I ) ) \r \t 0104360 ( S C R E E N C O L O R M A P 0104400 D E M O R A I N B O W M A P ) 0104420 \r \t ( 006 002 Q U I T P 0104440 006 001 1 0 ) \r \t ( 006 0104460 002 u n t i l 006 001 ( 006 002 Q U I T 0104500 P 006 001 ) 006 002 d o 006 001 ( R O T 0104520 A T E C O L O R M A P ( S C R 0104540 E E N C O L O R M A P ) \r \t \t \t 0104560 \t \t \t 1 ) \r \t \t \t \t ( D I S M I 0104600 S S 4 0 ] ) \r \r ( 006 004 O V E R 0104620 P A I N T B M 006 001 \r [ L A M 0104640 B D A ( B M F O N T ) 0104660 * 0104720 006 003 ( * r r b 0104740 " 2 1 - D E C - 8 2 2 2 : 1 6 0104760 " ) 006 001 \r ( P R O G ( 0105000 E B M B M W B M H S C R 0105020 ( M A X C O L O R ( M A X I M 0105040 U M C O L O R ) ) \r \t 0105060 ( C O L O R S C R E E N B I 0105100 T M A P ( C O L O R S C R E E 0105120 N B I T M A P ) ) ) \r 0105140 ( S E T Q E B M ( 0105160 006 002 C A C H E B I T M A P 006 001 0105200 B M F O N T ( C O L O R N U 0105220 M B E R B I T S P E R P I X E L 0105240 ) ) ) \r ( S 0105260 E T Q B M W ( B I T M A P W 0105300 I D T H B M ) ) \r 0105320 ( S E T Q B M H ( 006 0105340 002 f e t c h 006 001 B I T M A P H 0105360 E I G H T 006 002 o f 006 001 E B M 0105400 ) ) \r ( S E 0105420 T Q S C R ( B I T M A P C O 0105440 P Y E B M ) ) \r 0105460 ( C O L O R B A C K G R O 0105500 U N D 0 ) \r 0105520 ( 006 002 u n t i l 006 001 ( 006 002 Q 0105540 U I T P 006 001 ) \r \t 006 002 0105560 d o 006 001 ( A N D ( E Q 5 1 0105600 ( R A N D 0 3 0 0 ) ) \r \t 0105620 \t ( C O L O R B A C K 0105640 G R O U N D 0 ) ) \r \t \t ( O V 0105660 E R P A I N T E B M C O L O 0105700 R S C R E E N B I T M A P ( 006 0105720 002 N E W X 006 001 B M W C O L O 0105740 R S C R E E N W I D T H ) \r \t \t 0105760 \t ( 006 002 N E W Y 006 001 B M 0106000 H C O L O R S C R E E N H E I 0106020 G H T ) \r \t \t \t ( C O L O 0106040 R T E X T U R E F R O M C O L O 0106060 R # ( R A N D 1 M A X C O 0106100 L O R ) ) \r \t \t \t S C R ] 0106120 ) \r \r ( 006 004 O V E R P A I N T S 0106140 E L F N 006 001 \r [ L A M B D A 0106160 ( V ) 0106200 * 0106240 006 003 ( * b a s : " 2 0106260 6 - A P R - 8 2 1 8 : 0 7 " ) 0106300 006 001 \r ( S E T Q M O V 0106320 E M O D E V ] ) \r \r ( 006 004 C A 0106340 C H E B I T M A P 006 001 \r [ L 0106360 A M B D A ( B M F O N T N 0106400 B I T S ) 0106420 0106440 006 003 ( * r r 0106460 b " 2 1 - D E C - 8 2 2 2 : 0106500 2 4 " ) 006 001 \r ( P R O G 0106520 ( ( B M E X P ( C O N D \r \t 0106540 \t ( ( E Q N B I T S 0106560 8 ) \r \t \t 8 B I T B 0106600 M E X P ) \r \t \t ( T 4 0106620 B I T B M E X P ) ) ) \r \t 0106640 C B M ) \r [ 0106660 C O N D \r \t ( ( B I T M 0106700 A P P B M ) ) \r \t ( T 0106720 ( S E T Q B M ( O R ( G 0106740 E T H A S H B M B M E X P ) 0106760 \r \t \t \t ( P U T H A S H 0107000 B M ( B I T M A P F R O M S 0107020 T R I N G B M F O N T ) \r \t 0107040 \t \t \t B M E X P ] \r 0107060 ( R E T U R N 0107100 ( O R ( G E T H A S H B M 0107120 B M E X P ) \r \t \t 0107140 ( P U T H A S H B M ( P R O 0107160 G 1 ( S E T Q C B M ( E X 0107200 P A N D B I T M A P B M ( O 0107220 R N B I T S 4 ) ) ) \r \t \t \t 0107240 \t \t ( 006 002 r e p l a c e 006 001 0107260 ( B I T M A P B I T M A P B I 0107300 T S P E R P I X E L ) 006 002 o f 0107320 006 001 C B M \r \t \t \t \t \t 0107340 006 002 w i t h 006 001 ( O R N B I 0107360 T S 4 ) ) ) \r \t \t \t 0107400 B M E X P ] ) \r \r ( 006 004 N E 0107420 W X 006 001 \r [ L A M B D A ( 0107440 B W S W ) 0107460 * 0107520 006 003 ( * r r b " 1 3 - S 0107540 E P - 8 2 1 1 : 4 2 " ) 006 001 \r 0107560 ( S E L E C T Q M O V 0107600 E M O D E \r \t ( R A N 0107620 D O M ( R A N D ( I M I N U 0107640 S B W ) \r \t \t \t S W ) ) 0107660 \r \t ( C U R S O R ( 0107700 I M I N ( I D I F F E R E N C 0107720 E L A S T M O U S E X ( I Q 0107740 U O T I E N T B W 2 ) ) \r \t 0107760 \t \t S W ) ) \r \t 0110000 ( L I N E [ C O N D \r \t \t 0110020 ( ( I L E Q ( S E T Q 0110040 N S T E P S ( S U B 1 N S T 0110060 E P S ) ) \r \t \t \t 0 ) \r 0110100 \t \t ( S E T Q N 0110120 S T E P S ( R A N D 0 5 0 0110140 ) ) \r \t \t ( C O N 0110160 D \r \t \t \t ( ( I G E Q ( R A 0110200 N D 0 4 ) \r \t \t \t \t 2 ) \r \t 0110220 \t \t ( S E T Q D X ( R 0110240 A N D - 1 0 1 0 ) ) ) \r \t \t 0110260 \t ( T ( S E T Q D Y ( R 0110300 A N D - 1 0 1 0 ] \r \t \t 0110320 ( C O N D \r \t \t ( ( 0110340 I L E S S P ( S E T Q L A S 0110360 T X ( I P L U S L A S T X 0110400 D X ) ) \r \t \t \t 0 ) 0110420 \r \t \t ( S E T Q 0110440 L A S T X ( I M I N U S L A 0110460 S T X ) ) \r \t \t ( 0110500 S E T Q D X ( I M I N U S 0110520 D X ) ) ) \r \t \t [ ( I 0110540 G E Q L A S T X ( I D I F F 0110560 E R E N C E S W B W ) ) \r \t 0110600 \t ( S E T Q L A 0110620 S T X ( I P L U S L A S T X 0110640 ( S E T Q D X ( I M I N U 0110660 S D X ] \r \t \t ( T 0110700 L A S T X ) ) ) \r \t ( 0110720 N O N E 0 ) \r \t ( S 0110740 H O U L D N T ] ) \r \r ( 006 004 N E 0110760 W Y 006 001 \r [ L A M B D A ( 0111000 B H S H ) 0111020 * 0111060 006 003 ( * r r b " 1 3 - S 0111100 E P - 8 2 1 1 : 4 2 " ) 006 001 \r 0111120 ( S E L E C T Q M O V 0111140 E M O D E \r \t ( R A N 0111160 D O M ( R A N D ( I M I N U 0111200 S B H ) \r \t \t \t S H ) ) 0111220 \r \t ( C U R S O R ( 0111240 I D I F F E R E N C E L A S T 0111260 M O U S E Y ( I Q U O T I E N 0111300 T B H 2 ) ) ) \r \t 0111320 ( L I N E [ C O N D \r \t \t 0111340 ( ( I L E Q ( S E T Q 0111360 N S T E P S ( S U B 1 N S T 0111400 E P S ) ) \r \t \t \t 0 ) \r 0111420 \t \t ( S E T Q N 0111440 S T E P S ( R A N D 0 5 0 0111460 ) ) \r \t \t ( C O N 0111500 D \r \t \t \t ( ( I G E Q ( R A 0111520 N D 0 4 ) \r \t \t \t \t 2 ) \r \t 0111540 \t \t ( S E T Q D X ( R 0111560 A N D - 1 0 1 0 ) ) ) \r \t \t 0111600 \t ( T ( S E T Q D Y ( R 0111620 A N D - 1 0 1 0 ] \r \t \t 0111640 ( C O N D \r \t \t ( ( 0111660 I L E S S P ( S E T Q L A S 0111700 T Y ( I P L U S L A S T Y 0111720 D Y ) ) \r \t \t \t 0 ) 0111740 \r \t \t ( S E T Q 0111760 L A S T Y ( I M I N U S L A 0112000 S T Y ) ) \r \t \t ( 0112020 S E T Q D Y ( I M I N U S 0112040 D Y ) ) ) \r \t \t [ ( I 0112060 G E Q L A S T Y ( I D I F F 0112100 E R E N C E S H B H ) ) \r \t 0112120 \t ( S E T Q L A 0112140 S T Y ( I P L U S L A S T Y 0112160 ( S E T Q D Y ( I M I N U 0112200 S D Y ] \r \t \t ( T 0112220 L A S T Y ) ) ) \r \t ( 0112240 N O N E 0 ) \r \t ( S 0112260 H O U L D N T ] ) \r ) \r \r ( R P 0112300 A Q Q 006 002 O V E R P A I N T B 0112320 I T M A P S 006 001 N I L ) \r \r \r 0112340 \r 006 004 ( * W a l k d e m o s 0112360 ) 006 001 \r \r ( D E F I N E Q \r \r ( 0112400 006 004 W A L K D E M O 006 001 \r [ 0112420 L A M B D A ( W A I T S P E 0112440 E D W O R D 1 W O R D S ) 0112460 0112500 006 003 ( * r 0112520 r b " 1 3 - S E P - 8 2 1 0 0112540 : 4 9 " ) 006 001 \r ( 006 002 D 0112560 E C L A R E 006 001 ( G L O B A L 0112600 V A R S S T O P D A T E ) ) \r 0112620 ( R E S E T F O R M ( 0112640 S C R E E N C O L O R M A P N 0112660 I L ) \r \t ( C O L 0112700 O R B A C K G R O U N D 0 ) \r 0112720 \t ( 006 002 f o r 006 001 0112740 I 006 002 i n 006 001 [ C O N D \r 0112760 \t \t \t ( O V E R P A I N T 0113000 B I T M A P S ) \r \t \t \t ( 0113020 T ( S E T Q O V E R P A I N 0113040 T B I T M A P S ( L I S T ( 0113060 B I T M A P F R O M S T R I N G 0113100 " I n t e r l i s p - D " ] \r 0113120 \t \t 006 002 u n t i l 006 001 ( 006 0113140 002 Q U I T P 006 001 ( O R W A I 0113160 T 1 0 ) ) 006 002 d o 006 001 ( 006 0113200 002 W A L K B M 006 001 I N I L 0113220 S P E E D ) \r \t \t \t \t \t \t ( O R 0113240 ( 006 002 Q U I T P 006 001 1 0 ) \r 0113260 \t \t \t \t \t \t ( 006 002 W A L 0113300 K B M 006 001 N I L N I L S P 0113320 E E D ] ) \r \r ( 006 004 W A L K B M 0113340 006 001 \r [ L A M B D A ( B M 0113360 F O N T S P E E D ) 0113400 * 0113440 006 003 ( * r r b " 2 1 - D E C 0113460 - 8 2 2 2 : 2 9 " ) 006 001 \r 0113500 ( O R S P E E D ( S E T 0113520 Q S P E E D 5 ) ) \r 0113540 ( P R O G ( E B M S C R M 0113560 A X X M A X Y ( M A X C O L 0113600 O R ( M A X I M U M C O L O R 0113620 ) ) ) \r ( S 0113640 E T Q E B M ( 006 002 C A C H E 0113660 B I T M A P 006 001 B M F O N T 0113700 ( C O L O R N U M B E R B I T 0113720 S P E R P I X E L ) ) ) \r 0113740 ( S E T Q S C R 0113760 ( B I T M A P C O P Y E B M 0114000 ) ) \r ( S E 0114020 T Q M A X X ( I D I F F E R 0114040 E N C E C O L O R S C R E E N 0114060 W I D T H ( B I T M A P W I D 0114100 T H E B M ) ) ) \r 0114120 ( S E T Q M A X Y ( 0114140 I D I F F E R E N C E C O L O 0114160 R S C R E E N H E I G H T ( 006 0114200 002 f e t c h 006 001 B I T M A P H 0114220 E I G H T 006 002 o f 006 001 E B M 0114240 ) ) ) \r ( S 0114260 C R E E N C O L O R M A P ( 006 0114300 002 R A N D C O L O R M A P 006 001 ) 0114320 ) \r ( 006 002 b 0114340 i n d 006 001 ( X _ - 1 ) \r \t 0114360 \t ( Y _ - 1 ) \r \t \t ( D X 0114400 _ 0 ) \r \t \t ( D Y _ 0 ) \r 0114420 \t \t ( I _ 1 ) \r \t \t ( J _ 0114440 0 ) \r \t \t ( C O L O R C O U N 0114460 T E R _ 0 ) 006 002 u n t i l 0114500 006 001 ( 006 002 Q U I T P 006 001 ) \r \t 0114520 006 002 d o 006 001 [ C O N 0114540 D \r \t \t ( ( E Q I M A X 0114560 C O L O R ) \r \t \t ( S E 0114600 T Q I 1 ) ) \r \t \t ( T 0114620 ( S E T Q I ( A D D 1 I ] 0114640 \r \t \t ( 006 002 a d d 006 001 X D X 0114660 ) \r \t \t ( 006 002 a d d 006 001 Y D 0114700 Y ) \r \t \t [ C O N D \r \t \t ( 0114720 ( O R ( I L E Q J 0 ) \r \t 0114740 \t ( I L E S S P 0114760 X 0 ) \r \t \t ( I 0115000 G E Q X M A X X ) \r \t \t 0115020 ( I L E S S P Y 0 0115040 ) \r \t \t ( I G E Q 0115060 Y M A X Y ) ) \r \t \t 0115100 ( S E T Q X ( R A N D 0 0115120 M A X X ) ) \r \t \t ( S E 0115140 T Q Y ( R A N D 0 M A X 0115160 Y ) ) \r \t \t ( S E T Q 0115200 D X ( R A N D ( I M I N U S 0115220 S P E E D ) \r \t \t \t \t S 0115240 P E E D ) ) \r \t \t ( S E 0115260 T Q D Y ( R A N D ( I M I 0115300 N U S S P E E D ) \r \t \t \t \t 0115320 S P E E D ) ) \r \t \t 0115340 ( S E T Q J ( R A N D M I 0115360 N W A L K M A X W A L K ) ) ) 0115400 \r \t \t ( T ( S E T Q J 0115420 ( S U B 1 J ] \r \t \t ( O V E R 0115440 P A I N T E B M ( C O L O R 0115460 S C R E E N B I T M A P ) \r \t \t 0115500 \t X Y ( C O L O R T E 0115520 X T U R E F R O M C O L O R # 0115540 I ) \r \t \t \t S C R ) \r \t \t 0115560 ( C O N D \r \t \t ( ( I G R E 0115600 A T E R P ( S E T Q C O L O 0115620 R C O U N T E R ( A D D 1 C 0115640 O L O R C O U N T E R ) ) \r \t \t 0115660 \t 3 0 0 ) \r \t \t 0115700 ( S E T Q C O L O R C O U 0115720 N T E R 0 ) \r \t \t ( S 0115740 C R E E N C O L O R M A P ( 006 0115760 002 R A N D C O L O R M A P 006 001 ) 0116000 ) ) \r \t \t ( T ( R O T A T 0116020 E C O L O R M A P ( S C R E E 0116040 N C O L O R M A P ) \r \t \t \t \t 0116060 1 M A X C O L O R ) ) 0116100 ) \r \t \t ( D I S M I S S 1 5 ] 0116120 ) \r \r ( 006 004 R A N D C O L O R M 0116140 A P 006 001 \r [ L A M B D A N 0116160 I L 0116200 * 0116240 006 003 ( * e d i t e d : " 0116260 1 0 - S E P - 8 2 1 4 : 5 8 " 0116300 ) 006 001 \r ( P R O G [ ( 0116320 M A X C O L O R ( S U B 1 ( 0116340 E X P T 2 ( C O L O R M A P 0116360 B I T S ( S C R E E N C O L O 0116400 R M A P ] \r 0116420 ( R E T U R N ( S E L E C T Q 0116440 ( R A N D 1 2 ) \r \t \t \t 0116460 [ 1 ( C O N D \r \t \t \t \t ( 0116500 ( C O L O R M A P P W A L K R 0116520 A N D O M C O L O R M A P ) \r \t 0116540 \t \t \t W A L K R A N D O M C 0116560 O L O R M A P ) \r \t \t \t \t ( T 0116600 ( S E T Q W A L K R A N D O M 0116620 C O L O R M A P ( C O L O R M 0116640 A P C R E A T E ) ) \r \t \t \t \t 0116660 ( 006 002 f o r 006 001 C N 006 002 0116700 f r o m 006 001 0 006 002 t o 006 001 0116720 M A X C O L O R 006 002 d o 006 001 0116740 ( C O L O R L E V E L W A L K 0116760 R A N D O M C O L O R M A P C 0117000 N \r \t \t \t \t \t \t \t \t \t 0117020 ( Q U O T E R E D ) \r \t \t \t \t 0117040 \t \t \t \t \t ( R A N D 0117060 0 2 5 5 ) ) \r \t \t \t \t \t \t \t \t 0117100 ( C O L O R L E V E L W A L 0117120 K R A N D O M C O L O R M A P 0117140 C N \r \t \t \t \t \t \t \t \t \t 0117160 ( Q U O T E G R E E N ) \r \t 0117200 \t \t \t \t \t \t \t \t ( R A 0117220 N D 0 2 5 5 ) ) \r \t \t \t \t \t 0117240 \t \t \t ( C O L O R L E V E L 0117260 W A L K R A N D O M C O L O R M 0117300 A P C N \r \t \t \t \t \t \t \t \t \t 0117320 ( Q U O T E B L U E ) 0117340 \r \t \t \t \t \t \t \t \t \t ( 0117360 R A N D 0 2 5 5 ] \r \t \t \t 0117400 ( 2 ( C O N D \r \t \t \t \t ( 0117420 ( C O L O R M A P P W A L K R 0117440 A I N B O W C O L O R M A P ) \r 0117460 \t \t \t \t W A L K R A I N B O 0117500 W C O L O R M A P ) \r \t \t \t \t ( 0117520 T [ S E T Q W A L K R A I N 0117540 B O W C O L O R M A P ( R A I 0117560 N B O W M A P ( C O L O R M A 0117600 P B I T S ( S C R E E N C O L 0117620 O R M A P \r \t \t \t \t \t \t \t \t \t \t 0117640 \t ] \r 0117660 * 0117740 006 003 ( * m a k e e v e r y 0117760 1 6 t h c o l o r r a n d 0120000 o m ) 006 001 \r \t \t \t \t ( 006 002 0120020 f o r 006 001 C N 006 002 f r o m 006 0120040 001 ( R A N D 0 1 5 ) 006 002 0120060 t o 006 001 M A X C O L O R 006 002 0120100 b y 006 001 1 6 \r \t \t \t \t 0120120 006 002 d o 006 001 ( C O L O R L 0120140 E V E L W A L K R A I N B O W 0120160 C O L O R M A P C N ( Q U O 0120200 T E R E D ) \r \t \t \t \t \t \t 0120220 ( R A N D 0 2 5 5 ) ) 0120240 \r \t \t \t \t \t ( C O L O R L E V 0120260 E L W A L K R A I N B O W C O 0120300 L O R M A P C N ( Q U O T E 0120320 G R E E N ) \r \t \t \t \t \t \t 0120340 ( R A N D 0 2 5 5 ) ) 0120360 \r \t \t \t \t \t ( C O L O R L E V 0120400 E L W A L K R A I N B O W C O 0120420 L O R M A P C N ( Q U O T E 0120440 B L U E ) \r \t \t \t \t \t \t 0120460 ( R A N D 0 2 5 5 ) ) ) 0120500 \r \t \t \t \t W A L K R A I N 0120520 B O W C O L O R M A P ) ) ) \r \t 0120540 \t \t ( P R O G [ ( C M 0120560 ( M A P O F A C O L O R ( C A 0120600 R ( N T H ( Q U O T E ( ( 0120620 R E D G R E E N ) \r \t \t \t \t \t 0120640 \t \t \t R E D \r \t \t \t 0120660 \t \t \t \t \t ( B L U E 0120700 G R E E N ) \r \t \t \t \t \t \t \t \t 0120720 ( B L U E R E D ) 0120740 \r \t \t \t \t \t \t \t \t G 0120760 R E E N \r \t \t \t \t \t \t \t \t 0121000 ( R E D G R E E N B L 0121020 U E ) ) ) \r \t \t \t \t \t \t \t 0121040 ( R A N D 1 6 ] \r 0121060 * 0121140 006 003 ( * m 0121160 a k e e v e r y 1 6 t h c 0121200 o l o r r a n d o m ) 006 001 \r \t 0121220 \t \t ( 006 002 f o 0121240 r 006 001 C N 006 002 f r o m 006 001 0121260 ( R A N D 0 1 5 ) 006 002 t o 0121300 006 001 M A X C O L O R 006 002 b y 0121320 006 001 1 6 \r \t \t \t \t 006 002 0121340 d o 006 001 ( C O L O R L E V E L 0121360 C M C N ( Q U O T E R E 0121400 D ) \r \t \t \t \t \t \t ( R A N 0121420 D 0 2 5 5 ) ) \r \t \t \t \t 0121440 ( C O L O R L E V E L 0121460 C M C N ( Q U O T E G R 0121500 E E N ) \r \t \t \t \t \t \t ( R 0121520 A N D 0 2 5 5 ) ) \r \t \t \t \t 0121540 ( C O L O R L E V 0121560 E L C M C N ( Q U O T E 0121600 B L U E ) \r \t \t \t \t \t \t ( 0121620 R A N D 0 2 5 5 ) ) ) \r \t \t 0121640 \t ( R E T U R 0121660 N C M ] ) \r ) \r \r ( R P A Q ? 0121700 006 002 M A X W A L K 006 001 N I L 0121720 ) \r \r ( R P A Q ? 006 002 M I N W 0121740 A L K 006 001 N I L ) \r \r ( R P A 0121760 Q ? 006 002 R A N D C O L O R P R 0122000 O B 006 001 N I L ) \r \r ( R P A Q 0122020 ? 006 002 W A L K R A N D O M C O 0122040 L O R M A P 006 001 ) \r \r ( R P A 0122060 Q ? 006 002 8 B I T B M E X P 006 001 0122100 ( L I S T ( H A R R A Y 6 0122120 0 ) ) ) \r \r ( R P A Q ? 006 002 4 0122140 B I T B M E X P 006 001 ( L I S T 0122160 ( H A R R A Y 6 0 ) ) ) \r ( 0122200 D E C L A R E : D O E V A L @ 0122220 C O M P I L E D O N T C O P Y 0122240 \r \r ( G L O B A L V A R S 8 B 0122260 I T B M E X P 4 B I T B M E X 0122300 P W A L K R A N D O M C O L O 0122320 R M A P ) \r ) \r \r \r \r 006 004 ( * 0122340 V i n e s d e m o ) 006 001 \r \r ( 0122360 D E F I N E Q \r \r ( 006 004 V I N E 0122400 D E M O 006 001 \r ( L A M B D A 0122420 ( W A I T ) 0122440 * 0122500 006 003 ( * k b r : " 0122520 4 - M a r - 8 5 1 5 : 2 6 " ) 0122540 006 001 \r ( 006 001 P R O G 006 001 0122560 ( X 1 Y 1 D X D Y X 2 0122600 Y 2 C O L O R M A X C O L 0122620 O R W I D T H M A X W I D T 0122640 H D S ) \r 0122660 ( 006 001 S E T Q 006 001 X 1 ( 006 001 0122700 I Q U O T I E N T 006 001 C O L O 0122720 R S C R E E N W I D T H 2 ) ) 0122740 \r ( 006 001 S E 0122760 T Q 006 001 Y 1 ( 006 001 I Q U O T 0123000 I E N T 006 001 C O L O R S C R E 0123020 E N H E I G H T 2 ) ) \r 0123040 ( 006 001 S E T Q 006 001 0123060 M A X C O L O R ( 006 001 M A X 0123100 I M U M C O L O R 006 001 ) ) \r 0123120 ( 006 001 S E T Q 006 0123140 001 C O L O R ( 006 001 I Q U O T 0123160 I E N T 006 001 M A X C O L O R 0123200 2 ) ) \r ( 006 0123220 001 S E T Q 006 001 M A X W I D T H 0123240 2 0 0 ) \r 0123260 ( 006 001 S E T Q 006 001 W I D T H 0123300 1 0 ) \r ( 006 0123320 001 S E T Q 006 001 D X ( 006 001 R A 0123340 N D 006 001 - 1 0 0 1 0 0 ) ) \r 0123360 ( 006 001 S E T 0123400 Q 006 001 D Y ( 006 001 R A N D 006 001 0123420 - 1 0 0 1 0 0 ) ) \r 0123440 ( 006 001 S E T C O L O 0123460 R I N T E N S I T Y 006 001 ( 006 001 0123500 S C R E E N C O L O R M A P 006 001 0123520 ) \r \t \t \t M A X C O L 0123540 O R \r \t \t \t ( 006 001 L I 0123560 S T 006 001 ( 006 001 R A N D 006 001 0 0123600 2 5 5 ) \r \t \t \t \t ( 006 001 0123620 R A N D 006 001 0 2 5 5 ) \r \t \t 0123640 \t \t ( 006 001 R A N D 006 001 0 0123660 2 5 5 ) ) ) \r 0123700 ( 006 001 B I T B L T 006 001 N I 0123720 L N I L N I L ( 006 001 C O L 0123740 O R S C R E E N B I T M A P 006 001 0123760 ) \r \t \t N I L N I L N I 0124000 L N I L ( 006 001 Q U O T E 006 001 0124020 T E X T U R E ) \r \t \t ( 006 0124040 001 Q U O T E 006 001 R E P L A C E 0124060 ) \r \t \t M A X C O L O R ) \r 0124100 ( 006 001 S E T 0124120 Q 006 001 D S ( 006 001 D S P C R E 0124140 A T E 006 001 ( 006 001 C O L O R S C 0124160 R E E N B I T M A P 006 001 ) ) ) \r 0124200 ( 006 002 Q U I 0124220 T P 006 001 ( 006 001 O R 006 001 W A I 0124240 T 1 2 0 ) ) \r 0124260 ( 006 002 u n t i l 006 001 ( 006 002 0124300 Q U I T P 006 001 N I L ) \r \t 0124320 006 002 d o 006 001 ( 006 001 S E T 0124340 Q 006 001 D X ( 006 002 I N R A N G 0124360 E 006 001 - 1 0 0 1 0 0 ( 006 001 0124400 I P L U S 006 001 D X ( 006 001 R A 0124420 N D 006 001 - 1 0 1 0 ) ) ) ) \r 0124440 \t \t ( 006 001 S E T Q 006 001 D Y ( 0124460 006 002 I N R A N G E 006 001 - 1 0 0 0124500 1 0 0 ( 006 001 I P L U S 006 001 0124520 D Y ( 006 001 R A N D 006 001 - 1 0 0124540 1 0 ) ) ) ) \r \t \t ( 006 001 S E T 0124560 Q 006 001 X 2 ( 006 002 I N R A N G 0124600 E 006 001 0 C O L O R S C R E E 0124620 N W I D T H ( 006 001 I P L U S 006 0124640 001 X 1 D X ) ) ) \r \t \t ( 006 001 0124660 C O N D 006 001 \r \t \t ( ( 006 001 O 0124700 R 006 001 ( 006 001 E Q 006 001 X 2 0 0124720 ) \r \t \t ( 006 001 E Q 0124740 006 001 X 2 C O L O R S C R E E 0124760 N W I D T H ) ) \r \t \t ( 0125000 006 001 S E T Q 006 001 D X ( 006 001 I 0125020 M I N U S 006 001 D X ) ) ) ) \r \t 0125040 \t ( 006 001 S E T Q 006 001 Y 2 ( 006 0125060 002 I N R A N G E 006 001 0 C O L 0125100 O R S C R E E N H E I G H T ( 0125120 006 001 I P L U S 006 001 Y 1 D Y ) 0125140 ) ) \r \t \t ( 006 001 C O N D 006 001 \r \t 0125160 \t ( ( 006 001 O R 006 001 ( 006 001 E 0125200 Q 006 001 Y 2 0 ) \r \t \t 0125220 ( 006 001 E Q 006 001 Y 2 C O 0125240 L O R S C R E E N H E I G H T ) 0125260 ) \r \t \t ( 006 001 S E T Q 006 0125300 001 D Y ( 006 001 I M I N U S 006 001 0125320 D Y ) ) ) ) \r \t \t ( 006 001 S E T 0125340 Q 006 001 W I D T H \r \t \t ( 006 0125360 002 I N R A N G E 006 001 1 M A X 0125400 W I D T H \r \t \t \t ( 006 001 I 0125420 P L U S 006 001 W I D T H \r \t \t \t 0125440 \t ( 006 001 I T I M E S 006 001 ( 0125460 006 001 C A R 006 001 ( 006 001 N T H 006 001 0125500 ( 006 001 Q U O T E 006 001 ( - 1 0125520 0 0 0 0 0 0 1 ) ) \r 0125540 \t \t \t \t \t \t ( 006 001 R A N 0125560 D 006 001 1 8 ) ) ) \r \t \t \t \t \t 0125600 ( 006 001 A D D 1 006 001 ( 006 001 I 0125620 Q U O T I E N T 006 001 W I D T H 0125640 3 ) ) ) ) ) ) \r \t \t ( 006 001 S E 0125660 T Q 006 001 C O L O R \r \t \t ( 0125700 006 001 I M O D 006 001 ( 006 001 I P L U 0125720 S 006 001 C O L O R ( 006 001 C A R 0125740 006 001 ( 006 001 N T H 006 001 ( 006 001 Q 0125760 U O T E 006 001 ( - 1 0 0 0 0126000 0 0 0 1 ) ) \r \t \t \t \t \t 0126020 ( 006 001 R A N D 006 001 0126040 1 8 ) ) ) ) \r \t \t \t ( 006 001 S 0126060 U B 1 006 001 M A X C O L O R ) ) 0126100 ) \r \t \t ( 006 001 D R A W L I N E 006 0126120 001 X 1 Y 1 X 2 Y 2 W I 0126140 D T H ( 006 001 Q U O T E 006 001 R 0126160 E P L A C E ) \r \t \t \t D S 0126200 C O L O R ) \r \t \t ( 006 001 S E T Q 0126220 006 001 X 1 X 2 ) \r \t \t ( 006 001 S 0126240 E T Q 006 001 Y 1 Y 2 ) \r \t \t ( 0126260 006 001 S E T C O L O R I N T E N S 0126300 I T Y 006 001 ( 006 001 S C R E E N C 0126320 O L O R M A P 006 001 ) \r \t \t \t \t 0126340 ( 006 001 R A N D 006 001 0 ( 006 0126360 001 S U B 1 006 001 M A X C O L O R 0126400 ) ) \r \t \t \t \t ( 006 001 L I S 0126420 T 006 001 ( 006 001 R A N D 006 001 0 0126440 2 5 5 ) \r \t \t \t \t \t ( 006 001 R A 0126460 N D 006 001 0 2 5 5 ) \r \t \t \t \t 0126500 \t ( 006 001 R A N D 006 001 0 2 5 0126520 5 ) ) ) ) ) ) ) \r \r ( 006 004 I N R 0126540 A N G E 006 001 \r ( L A M B D A 0126560 ( 006 001 M I N 006 001 M A X V A 0126600 L U E ) 0126620 0126640 006 003 ( * k b r 0126660 : " 4 - M a r - 8 5 1 4 : 0126700 1 2 " ) 006 001 \r ( 006 001 I M 0126720 A X 006 001 M I N ( 006 001 I M I N 0126740 006 001 M A X V A L U E ) ) ) ) 0126760 \r ) \r ( F I L E S L O A D C O 0127000 L O R ) \r ( P U T P R O P S C 0127020 O L O R D E M O C O P Y R I G 0127040 H T ( " X e r o x C o r p o 0127060 r a t i o n " 1 9 8 2 1 9 8 0127100 3 1 9 8 5 ) ) \r ( D E C L A R 0127120 E : D O N T C O P Y \r ( F 0127140 I L E M A P ( N I L ( 1 8 9 0127160 8 1 6 4 9 1 ( C O L O R D E 0127200 M O 1 9 0 8 . 4 2 8 5 ) 0127220 ( C H O O S E D E M O 4 2 8 7 0127240 . 4 4 4 4 ) ( D O C O L O 0127260 R D R O P 4 4 4 6 . 5 0 5 0127300 8 ) ( \r E X M I N E S H A F T 0127320 5 0 6 0 . 6 2 9 5 ) ( M 0127340 I N E S H A F T 6 2 9 7 . 0127360 7 1 0 8 ) ( M O D A R T 7 1 0127400 1 0 . 7 9 7 4 ) ( M O D A 0127420 R T D E M O 7 9 7 6 . 9 6 0127440 8 6 ) ( \r P O I N T T E S T 0127460 9 6 8 8 . 1 0 5 7 4 ) ( P 0127500 U T D R O P S 1 0 5 7 6 . 0127520 1 1 0 4 8 ) ( Q U I T P 1 1 0127540 0 5 0 . 1 1 4 2 2 ) ( R A 0127560 I N I N G 1 1 4 2 4 . 1 2 0127600 6 0 9 ) ( \r R A I N I N G C O 0127620 L O R M A P 1 2 6 1 1 . 1 0127640 3 1 1 1 ) ( R O T A T E I T 0127660 1 3 1 1 3 . 1 3 5 2 0 ) ( 0127700 S H O W C O L O R W 1 3 5 2 2 0127720 . 1 4 0 9 8 ) ( T U N N E 0127740 L 1 4 1 0 0 . \r 1 4 2 5 6 0127760 ) ( T U N N E L D E M O 1 4 0130000 2 5 8 . 1 5 1 3 5 ) ( C I 0130020 R C L E D E M O 1 5 1 3 7 . 0130040 1 5 8 4 6 ) ( W E L L 1 5 0130060 8 4 8 . 1 6 4 8 9 ) ) ( 1 0130100 6 9 3 3 2 2 0 4 1 ( \r L O G 0130120 O D E M O 1 6 9 4 3 . 1 8 0130140 0 3 5 ) ( C O L O R L O G O 0130160 1 8 0 3 7 . 1 9 6 2 4 ) ( 0130200 D R A W A C O L O R W I N D O W 0130220 1 9 6 2 6 . 2 0 0 6 6 ) 0130240 ( \r I N I T / L O G O / C O L O 0130260 R B I T M A P 2 0 0 6 8 . 0130300 2 0 8 2 6 ) ( C O L O R P R I 0130320 N T C H A R 2 0 8 2 8 . 2 0130340 2 0 3 9 ) ) ( 2 2 3 2 3 2 8 0130360 1 1 5 ( C O L O R K I N E T I 0130400 C 2 2 3 3 3 \r . 2 3 6 3 3 0130420 ) ( D E M O C O L O R K I N E 0130440 T I C 2 3 6 3 5 . 2 7 0 3 0130460 1 ) ( C I R K I N 2 7 0 3 3 0130500 . 2 8 1 1 3 ) ) ( 2 8 2 1 0130520 5 3 3 0 7 0 ( C O L O R D E 0130540 M O 1 2 8 2 2 5 . \r 2 8 9 0130560 9 4 ) ( C O L O R D E M O 2 0130600 2 8 9 9 6 . 3 0 5 4 3 ) ( 0130620 I N I T / C O L O R D E M O / M 0130640 E N U S 3 0 5 4 5 . 3 3 0 0130660 6 8 ) ) ( 3 3 5 4 8 3 4 3 5 0130700 3 ( R E D G R E E N 3 3 5 5 0130720 8 \r . 3 4 3 5 1 ) ) ( 3 4 0130740 3 8 2 3 8 0 7 5 ( O V E R P 0130760 A I N T D E M O 3 4 3 9 2 . 0131000 3 5 2 0 7 ) ( O V E R P A I 0131020 N T B M 3 5 2 0 9 . 3 5 9 0131040 2 1 ) ( O V E R P A I N T S E 0131060 L F N \r 3 5 9 2 3 . 3 6 0 0131100 5 7 ) ( C A C H E B I T M A P 0131120 3 6 0 5 9 . 3 6 6 1 7 ) 0131140 ( N E W X 3 6 6 1 9 . 3 7 0131160 3 5 3 ) ( N E W Y 3 7 3 5 5 0131200 . 3 8 0 7 3 ) ) ( 3 8 1 3 0131220 3 4 1 9 1 2 ( \r W A L K D E 0131240 M O 3 8 1 4 3 . 3 8 6 1 3 0131260 ) ( W A L K B M 3 8 6 1 5 0131300 . 4 0 0 1 7 ) ( R A N D C O 0131320 L O R M A P 4 0 0 1 9 . 4 0131340 1 9 1 0 ) ) ( 4 2 2 2 3 4 4 0131360 5 3 0 ( V I N E D E M O \r 4 0131400 2 2 3 3 . 4 4 3 7 6 ) ( I 0131420 N R A N G E 4 4 3 7 8 . 4 0131440 4 5 2 8 ) ) ) ) ) \r S T O P \r 0131457