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