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