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