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