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