$ od -c -N 50000 [phylum]<LISP>Lyric>Lispusers>SCREENPAPER.LCOM!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 R E A D T A B L E " I N
0000040 T E R L I S P " 247 P A C K A G
0000060 E " I N T E R L I S P " ) \r (
0000100 F I L E C R E A T E D " 1 6 -
0000120 D e c - 8 6 1 9 : 0 4 : 3 8 "
0000140 ( " c o m p i l e d o n "
0000160 { E R I S } < L I S P U S E R
0000200 S > L I S P C O R E > S C R E E
0000220 N P A P E R . ; 1 ) \r " 1 6 -
0000240 D e c - 8 6 1 2 : 1 1 : 2 4 "
0000260 b c o m p l ' d i n " X e
0000300 r o x L i s p 1 6 - D e c -
0000320 8 6 . . . " d a t e d " 1
0000340 6 - D e c - 8 6 1 2 : 4 5 : 0
0000360 8 " ) \r ( F I L E C R E A T E D
0000400 " 3 0 - N o v - 8 6 1 2 : 4
0000420 6 : 1 1 " { E R I S } < L I S
0000440 P U S E R S > L I S P C O R E >
0000460 S C R E E N P A P E R . ; 1 1
0000500 0 4 9 3 c h a n g e s t o %
0000520 : ( V A R S \r S C R E E N P
0000540 E R I O D S C R E E N R E P E
0000560 A T S C R E E N P A P E R C O
0000600 M S S C R E E N P A P E R S I
0000620 Z E ) ( F N S S C R E E N P
0000640 A P E R ) p r e v i o u s d
0000660 a t e % : \r " 1 - J a n - 0
0000700 1 0 3 : 3 2 : 5 5 " { E R I
0000720 S } < M A S I N T E R > S C R E
0000740 E N P A P E R . ; 2 ) \r S C R E
0000760 E N P A P E R A 0 0 0 1 : D 4
0001000 \r ( I 1 Y I 0 X F
0001020 2 S I Z E F 3 W I N D O
0001040 W F 4 B U F 1 F 5 C
0001060 N T F 6 S C R E E N R E P
0001100 E A T F 7 S T R E A M F
0001120 8 S C R E E N P E R I O D )
0001140 \0 ` 002 \a \0 002 S \t \0 \0 311 004 @ A T
0001160 j d R d \r \b \0 \0 R k 331 j d R k 331
0001200 \n \0 \0 j R k 331 \n \0 \0 k g \0 \0 W 016
0001220 \r \a \0 \0 T S R \v \0 \0 U m 377 324 c \n
0001240 j 363 254 W 020 c \n V 021 021 001 k Y H 363 221
0001260 h 020 S j d T \f \0 \0 277 T S R \v \0 \0
0001300 277 I k 324 260 350 \0 ( 8 8 K A L S H
0001320 O W 8 1 B K B I T B L T 5
0001340 0 K A L S H O W 4 4 D R A
0001360 W L I N E 3 4 R A N D 2 7
0001400 R A N D 1 6 B K B I T B L
0001420 T 3 \ I N S U R E W I N D O
0001440 W ) \r ( 3 8 I N V E R T ) \r (
0001460 ) \r S C R E E N P A P E R : D
0001500 4 \r ( P 1 3 P O S P 1 2
0001520 C Y P 1 1 C X P 1 0
0001540 B U F 4 P 9 B U F 3 P
0001560 8 B U F 2 P 7 B U F 1
0001600 A P 6 P B T P 5 B I
0001620 G B U F P 4 2 S I Z E P
0001640 3 B U F 1 P 2 S T R E
0001660 A M P 1 T R I A N G L E
0001700 P 0 C N T I 2 O P T I
0001720 O N I 1 S I Z E I 0
0001740 W I N D O W F 1 4 S C R E
0001760 E N P A P E R S I Z E F 1 5
0002000 S C R E E N P E R I O D ) \0
0002020 224 016 002 \0 003 @ 245 \b \0 \0 b \0 277 A 244 W
0002040 034 b 002 277 W 036 021 301 \f A d \n \0 \0 Y A
0002060 d \n \0 \0 [ I \t \0 \0 Z o \0 \0 \0 A d
0002100 032 m 377 A 032 h 032 032 032 n 377 377 J \v \0 \0
0002120 A d \n \0 \0 _ 020 A d \n \0 \0 _ 022 A d
0002140 324 \ d d \n \0 \0 ] ` \0 \0 037 ^ K J \n
0002160 \0 \0 B g \0 \0 360 262 ) 021 020 \r A d \n \0
0002200 \0 _ 032 277 \b \0 \0 O 032 001 O 032 002 K j d
0002220 A d \r \b \0 \0 277 K @ A \v \0 \0 277 260 336
0002240 @ g \0 \0 \n \0 \0 020 \0 ( 1 4 5 M A
0002260 P N 1 3 5 K A L S H O W 1
0002300 2 8 B K B I T B L T 1 1 3
0002320 S C R E E N B I T M A P 1 0 7
0002340 G E T B O X P O S I T I O N
0002360 9 2 D S P D E S T I N A T I O
0002400 N 8 1 B I T M A P C R E A T
0002420 E 7 0 B I T M A P C R E A T
0002440 E 6 3 B I T M A P C R E A T
0002460 E 5 8 F I L L P O L Y G O N
0002500 3 5 D S P C R E A T E 3 0
0002520 B I T M A P C R E A T E 2 4
0002540 B I T M A P C R E A T E 4
0002560 C R E A T E W ) \r ( 1 4 2 S C
0002600 R E E N P A P E R A 0 0 0 1 9
0002620 6 P I C K 8 5 | 004 003 P I L
0002640 O T B B T T Y P E # | ) \r ( 4
0002660 0 ( - 1 . - 1 ) ) \r K A L
0002700 S H O W A 0 0 0 1 : D 4 \r ( I
0002720 1 Y I 0 X F 0 2
0002740 S I Z E F 1 B I G B U F
0002760 F 2 W I N D O W F 3 C
0003000 X F 4 C Y ) \0 024 \0 005 \0 002
0003020 Q h d R S @ P 326 324 T A P 326 324 \r 006
0003040 \0 \0 020 \0 ( 1 7 B K B I T B L T
0003060 ) \r N I L \r ( ) \r K A L S H O W
0003100 : D 4 \r ( P 3 J P 2
0003120 I P 1 C Y P 0 C X
0003140 I 2 S I Z E I 1 W I N
0003160 D O W I 0 B U F 1 F 4
0003200 B U F 2 F 5 P B T F
0003220 6 B U F 3 F 7 B I G B U
0003240 F F 8 2 S I Z E F 9
0003260 T R I A N G L E ) \0 274 004 006 \0 003
0003300 W 022 h d @ h d d d d g \0 \0 \r \n \0
0003320 \0 @ T U \v \0 \0 T V U \v \0 \0 V h d
0003340 @ h d d d d g \0 \0 \r \n \0 \0 021 001
0003360 @ h d W 016 j B \r 006 \0 \0 @ T U \v \0
0003400 \0 T h d W 016 B d \r 006 \0 \0 @ V U \v
0003420 \0 \0 V h d W 016 j d \r 006 \0 \0 V T U
0003440 \v \0 \0 T h d W 016 B j \r 006 \0 \0 A g
0003460 \0 \0 \n \0 \0 l 002 327 X A g \0 \0 \n \0 \0
0003500 l 002 327 Y j 021 001 002 J W 020 H I \n \0 \0
0003520 324 W 020 327 375 363 262 j 021 001 003 K J 363 256
0003540 g \0 \0 K J \v \0 \0 277 K k 324 [ 260 360 023
0003560 J k 324 Z 260 325 023 \b \0 \0 020 \0 ( 1 8 5
0003600 B L O C K 1 6 7 D O P O I
0003620 N T 1 4 3 M A X 1 2 7 G
0003640 E T W I N D O W P R O P 1 1 6
0003660 G E T W I N D O W P R O P 1
0003700 0 9 B K B I T B L T 9 8 I
0003720 N V E R T . B I T M A P . H O R
0003740 I Z O N T A L L Y 9 2 B K B
0003760 I T B L T 8 1 I N V E R T .
0004000 B I T M A P . V E R T I C A L L
0004020 Y 7 5 B K B I T B L T 6 4
0004040 I N V E R T . B I T M A P . H
0004060 O R I Z O N T A L L Y 5 8 B
0004100 K B I T B L T 4 4 B K B I T
0004120 B L T 2 8 I N V E R T . B I
0004140 T M A P . V E R T I C A L L Y
0004160 2 2 R O T A T E . B I T M A P
0004200 1 6 B K B I T B L T ) \r ( 1
0004220 6 2 K A L S H O W A 0 0 0 1
0004240 1 2 4 H E I G H T 1 1 3 W
0004260 I D T H 4 0 P A I N T 1 2
0004300 E R A S E ) \r ( ) \r D O P O I
0004320 N T : D 4 \r ( I 2 Y I
0004340 1 X I 0 F N ) \0 9 \0 \0
0004360 \0 003 B A 363 226 @ B A \v \0 \0 277 A B k
0004400 l 003 @ 017 016 m 377 A 325 B k l 003 @ 017 016
0004420 A m 377 B 325 k l 003 @ 017 016 m 377 A 325 m
0004440 377 B 325 k l 003 @ 017 016 020 \0 ( 9 D O
0004460 P O I N T ) \r N I L \r ( ) \r M A
0004500 P N : D 4 \r ( P 8 I P
0004520 6 S T E P S P 5 N Y P
0004540 4 N X P 3 Y P 2
0004560 X P 1 M A X Y P 0 M
0004600 A X X I 1 F N I 0 W
0004620 I N D O W F 9 S I Z E )
0004640 \0 z \t 001 \0 002 @ g \0 \0 \n \0 \0 W 022 325
0004660 @ g \0 \0 \n \0 \0 W 022 325 021 R 006 j H \n
0004700 \0 \0 Z j I \n \0 \0 [ j H \n \0 \0 274 j
0004720 I \n \0 \0 275 L J 325 \t \0 \0 M K 325 \t \0
0004740 \0 324 l 004 327 ^ j 360 263 341 N k 021 002 \b O
0004760 020 O 016 363 263 $ J L J 325 O 020 326 N 327 324
0005000 K M K 325 O 020 326 N 327 324 l 002 A 017 016 277
0005020 O 020 k 324 _ 020 260 333 023 L 272 M 273 260 254 \0
0005040 ( 5 8 A B S 5 2 A B S 4
0005060 5 R A N D 3 9 R A N D 3
0005100 3 R A N D 2 7 R A N D 1
0005120 6 G E T W I N D O W P R O P
0005140 6 G E T W I N D O W P R O P )
0005160 \r ( 1 3 H E I G H T 3 W I
0005200 D T H ) \r ( ) \r I N V E R T . B
0005220 I T M A P . H O R I Z O N T A L
0005240 L Y : D 4 \r ( P 0 I I
0005260 2 P B T I 1 B M 2 I
0005300 0 B I T M A P ) \0 246 001 \0 \0 003
0005320 A 246 @ \t \0 \0 b 002 277 B 265 \b ` \0 \0 037
0005340 b 004 006 \0 \0 A 310 001 315 \0 277 B 006 \0 \0 A
0005360 310 \0 315 001 277 B 006 \0 \0 @ 310 001 315 004 277 B
0005400 006 \0 \0 @ 310 \0 315 005 277 B 006 \0 \0 A 310 002
0005420 l 020 326 n 377 377 345 315 003 277 B 006 \0 \0 @ 310
0005440 002 l 020 326 n 377 377 345 315 \a 277 B 006 \0 \0 n
0005460 @ \0 315 \n 277 B 006 \0 \0 @ 310 003 315 \t 277 B
0005500 006 \0 \0 k 315 \b 277 j 021 001 \0 H @ 310 004 375
0005520 363 262 " B 006 \0 \0 H 315 006 277 B 006 \0 \0 @
0005540 310 004 k 331 H 325 315 002 277 B j v 277 H k 324
0005560 X 260 333 A 020 \0 ( 5 B I T M A P C
0005600 O P Y ) \r ( 1 4 2 P I L O T B
0005620 B T 1 3 4 P I L O T B B T
0005640 1 1 4 P I L O T B B T 1 0 4
0005660 P I L O T B B T 9 4 P I L
0005700 O T B B T 7 7 P I L O T B B
0005720 T 6 0 P I L O T B B T 5 0
0005740 P I L O T B B T 4 0 P I L
0005760 O T B B T 3 0 P I L O T B B
0006000 T 2 0 P I L O T B B T 1 4
0006020 | 004 003 P I L O T B B T T Y P E
0006040 # | ) \r ( ) \r I N V E R T . B I
0006060 T M A P . V E R T I C A L L Y
0006100 : D 4 \r ( P 0 I I 2 P
0006120 B T I 1 B M 2 I 0 B
0006140 I T M A P ) \0 317 001 \0 \0 003 A 246 @
0006160 \t \0 \0 b 002 277 B 265 \b ` \0 \0 037 b 004 006
0006200 \0 \0 A 310 \0 315 001 277 B 006 \0 \0 A 310 001 @
0006220 310 003 k 331 A 310 002 326 324 315 \0 277 B 006 \0 \0
0006240 @ 310 001 315 004 277 B 006 \0 \0 @ 310 \0 315 005 277
0006260 B 006 \0 \0 A 310 002 l 020 326 n 377 377 345 315 003
0006300 277 B 006 \0 \0 @ 310 002 l 020 326 n 377 377 345 315
0006320 \a 277 B 006 \0 \0 j 315 006 277 B 006 \0 \0 j 315
0006340 002 277 B 006 \0 \0 n @ \0 315 \n 277 B 006 \0 \0
0006360 k 315 \t 277 B 006 \0 \0 @ 310 004 315 \b 277 j 021
0006400 001 \0 H @ 310 003 375 363 262 1 B j v 277 B 006
0006420 \0 \0 B 006 \0 \0 310 004 @ 310 002 324 315 004 277 B
0006440 006 \0 \0 B 006 \0 \0 310 \0 A 310 002 \t \0 \0 324
0006460 315 \0 277 H k 324 X 260 314 A 020 \0 ( 1 9 3
0006500 M I N U S 5 B I T M A P C
0006520 O P Y ) \r ( 1 8 5 P I L O T B
0006540 B T 1 8 1 P I L O T B B T
0006560 1 6 8 P I L O T B B T 1 6 4
0006600 P I L O T B B T 1 3 8 P I
0006620 L O T B B T 1 3 0 P I L O T
0006640 B B T 1 2 0 P I L O T B B T
0006660 1 1 2 P I L O T B B T 1 0
0006700 4 P I L O T B B T 8 7 P I
0006720 L O T B B T 7 0 P I L O T B
0006740 B T 6 0 P I L O T B B T 5
0006760 0 P I L O T B B T 3 0 P I
0007000 L O T B B T 2 0 P I L O T B
0007020 B T 1 4 | 004 003 P I L O T B B
0007040 T T Y P E # | ) \r ( ) \r R O T A
0007060 T E . B I T M A P : D 4 \r ( P
0007100 0 I I 2 P B T I 1
0007120 B M 2 I 0 B I T M A P )
0007140 \0 275 001 \0 \0 003 A 253 @ 310 003 @ 310 004 \n
0007160 \0 \0 b 002 277 B 265 \b ` \0 \0 037 b 004 006 \0
0007200 \0 A 310 \0 315 001 277 B 006 \0 \0 A 310 001 315 \0
0007220 277 B 006 \0 \0 @ 310 001 315 004 277 B 006 \0 \0 @
0007240 310 \0 315 005 277 B 006 \0 \0 A 310 002 l 020 326 n
0007260 377 377 345 315 003 277 B 006 \0 \0 k 315 \a 277 B 006
0007300 \0 \0 j 315 006 277 B 006 \0 \0 A 310 004 315 002 277
0007320 B 006 \0 \0 j 315 \n 277 B 006 \0 \0 A 310 003 315
0007340 \t 277 B 006 \0 \0 k 315 \b 277 j 021 001 \0 H @
0007360 310 003 375 363 262 - B 006 \0 \0 B 006 \0 \0 310 002
0007400 m 377 324 315 002 277 B j v 277 B 006 \0 \0 B 006
0007420 \0 \0 310 004 @ 310 002 324 315 004 277 H k 324 X 260
0007440 320 A 020 \0 ( 1 0 B I T M A P C R
0007460 E A T E ) \r ( 1 7 0 P I L O T
0007500 B B T 1 6 6 P I L O T B B T
0007520 1 5 0 P I L O T B B T 1 4
0007540 6 P I L O T B B T 1 2 6 P
0007560 I L O T B B T 1 1 6 P I L O
0007600 T B B T 1 0 8 P I L O T B B
0007620 T 9 8 P I L O T B B T 9 0
0007640 P I L O T B B T 8 2 P I L
0007660 O T B B T 6 5 P I L O T B B
0007700 T 5 5 P I L O T B B T 4 5
0007720 P I L O T B B T 3 5 P I L
0007740 O T B B T 2 5 P I L O T B B
0007760 T 1 9 | 004 003 P I L O T B B T
0010000 T Y P E # | ) \r ( ) \r ( P R E T
0010020 T Y C O M P R I N T S C R E E
0010040 N P A P E R C O M S ) \r ( R P A
0010060 Q Q S C R E E N P A P E R C O
0010100 M S ( ( F N S S C R E E N P
0010120 A P E R K A L S H O W D O P
0010140 O I N T M A P N ) ( A D D V
0010160 A R S ( I D L E . F U N C T I
0010200 O N S ( \r " S c r e e n w a
0010220 l l p a p e r " ( Q U O T E
0010240 S C R E E N P A P E R ) ) ) )
0010260 ( * * f a s t e r v e r s
0010300 i o n s o f e d i t b i t m
0010320 a p f u n c t i o n s ) ( F
0010340 N S \r I N V E R T . B I T M A
0010360 P . H O R I Z O N T A L L Y I
0010400 N V E R T . B I T M A P . V E R
0010420 T I C A L L Y R O T A T E . B
0010440 I T M A P ) ( V A R S S C R
0010460 E E N P A P E R S I Z E S C R
0010500 E E N P E R I O D \r S C R E E
0010520 N R E P E A T ) ) ) \r ( A D D T
0010540 O V A R I D L E . F U N C T I
0010560 O N S ( " S c r e e n w a l
0010600 l p a p e r " ( Q U O T E S
0010620 C R E E N P A P E R ) ) ) \r ( R
0010640 P A Q Q S C R E E N P A P E R
0010660 S I Z E 6 4 ) \r ( R P A Q Q
0010700 S C R E E N P E R I O D 1 0 0
0010720 ) \r ( R P A Q Q S C R E E N R
0010740 E P E A T 0 ) \r ( P U T P R O
0010760 P S S C R E E N P A P E R C
0011000 O P Y R I G H T ( " X e r o x
0011020 C o r p o r a t i o n " 1 9
0011040 0 1 1 9 8 6 ) ) \r N I L \r
0011056