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