$ od -c -N 50000 [eris]<TEdit>TEDITPAGE!39
0000000 006 001 ( F I L E C R E A T E D "
0000020 2 5 - S e p - 8 6 2 3 : 3 7 :
0000040 5 0 " 006 004 { E R I S } < T E D
0000060 I T > T E D I T P A G E . ; 3 9
0000100 006 001 8 4 5 3 6 \r \r
0000120 c h a n g e s t o : (
0000140 V A R S T E D I T P A G E C O
0000160 M S ) \r \r p r e v i
0000200 o u s d a t e : " 4 - J u
0000220 n - 8 6 1 8 : 1 8 : 4 3 " {
0000240 E R I S } < T E D I T > T E D I
0000260 T P A G E . ; 3 8 ) \r \r \r ( *
0000300 " \r C o p y r i g h t ( c )
0000320 1 9 8 4 , 1 9 8 5 , 1 9 8 6
0000340 b y X e r o x C o r p o r
0000360 a t i o n . A l l r i g h
0000400 t s r e s e r v e d . \r " ) \r
0000420 \r ( P R E T T Y C O M P R I N T
0000440 T E D I T P A G E C O M S ) \r
0000460 \r ( R P A Q Q 006 002 T E D I T P
0000500 A G E C O M S 006 001 \r
0000520 ( ( F I L E S T E D I T D
0000540 E C L S ) \r [ V
0000560 A R S ( M A X P A G E # 6 5
0000600 5 3 5 ) \r
0000620 ( M I N P A G E # 1 ) \r
0000640 ( T
0000660 E D I T . P A G E . F R A M E S
0000700 ( L I S T ( T E D I T . S I
0000720 N G L E . P A G E F O R M A T
0000740 N I L N I L N I L N I L
0000760 N I L 7 2 7 2 7 2 7 2
0001000 N I L 1 \r
0001020
*
0001060 ) \r
0001100
0001120 ( T E
0001140 D I T . S I N G L E . P A G E F
0001160 O R M A T T 7 2 7 5 6 N
0001200 I L ( Q U O T E L E F T ) \r
0001220
*
0001260 7 2
0001300 7 2 7 2 7 2 N I L 1 )
0001320 \r
0001340
0001360 ( T E D I T . S
0001400 I N G L E . P A G E F O R M A T
0001420 T 5 4 0 7 5 6 N I L (
0001440 Q U O T E R I G H T ) \r
0001460
*
0001520 7 2 7 2
0001540 7 2 7 2 N I L 1 ] \r
0001560 ( C O M S ( * C
0001600 r e a t i o n , G E T , a n
0001620 d P U T o f p a g e f r
0001640 a m e s . ) \r
0001660 ( F N S T E D I T .
0001700 G E T . P A G E F R A M E S T
0001720 E D I T . P A R S E . P A G E F
0001740 R A M E S T E D I T . P U T .
0001760 P A G E F R A M E S \r
0002000 T
0002020 E D I T . U N P A R S E . P A G
0002040 E F R A M E S ) ) \r
0002060 ( C O M S ( * F o r s
0002100 e t t i n g u p p a g e l
0002120 a y o u t s ) \r
0002140 ( F N S T E D I T
0002160 . S I N G L E . P A G E F O R M
0002200 A T T E D I T . C O M P O U N
0002220 D . P A G E F O R M A T T E D
0002240 I T . P A G E F O R M A T \ M
0002260 I C A S T O P T S \r
0002300 \ P
0002320 T S T O M I C A S ) ) \r
0002340 ( C O M S ( * P e r
0002360 f o r m p a g e l a y o u t
0002400 , b a s e d o n a r e g
0002420 u l a r e x p r e s s i o n
0002440 o f t y p e d r e g i o n s
0002460 . ) \r
0002500 ( F N S T E D I T . F O R M
0002520 A T . H A R D C O P Y T E D I
0002540 T . F O R M A T B O X T E D I
0002560 T . F O R M A T H E A D I N G
0002600 T E D I T . F O R M A T P A G E
0002620 \r
0002640 T E D I T . F O R M A
0002660 T T E X T B O X T E D I T . F
0002700 O R M A T F O L I O \ T E D I
0002720 T . F O R M A T . F O U N D B O
0002740 X ? ) \r
0002760 ( * A u x f u n c t i o
0003000 n t o c a p t u r e p a g
0003020 e h e a d i n g s d u r i n
0003040 g l i n e f o r m a t t i n
0003060 g . ) \r
0003100 ( F N S T E D I T . H A R
0003120 D C O P Y . P A G E H E A D I N
0003140 G ) ) \r [ C O M
0003160 S ( * H a n d l e v a r y
0003200 i n g p a p e r s i z e s )
0003220 \r (
0003240 F N S S C A L E P A G E U N I
0003260 T S S C A L E P A G E X U N I
0003300 T S S C A L E P A G E Y U N I
0003320 T S \ T E D I T . P A P E R H
0003340 E I G H T \r
0003360 \ T E D I T
0003400 . P A P E R W I D T H ) \r
0003420 ( G L O B
0003440 A L V A R S T E D I T . P A P
0003460 E R . S I Z E S ) \r
0003500 ( V A R S ( T
0003520 E D I T . P A P E R . S I Z E S
0003540 ( Q U O T E ( ( A 0 2 3 8
0003560 4 3 3 7 0 ) \r
0003600
*
0003640 ( A 1 1 6 8 4
0003660 2 3 8 4 ) \r
0003700
*
0003740 ( A 2 1 1 9 1 1 6
0003760 8 4 ) \r
0004000
*
0004040 ( A 3 8 4 2 1 1 9 1 )
0004060 \r
0004100
*
0004140 ( A 4 5 9 5 8 4 2 ) \r
0004160
*
0004220 ( A 5
0004240 4 2 0 5 9 5 ) \r
0004260
*
0004320 ( B 0 2 8 3 5
0004340 4 0 0 8 ) \r
0004360
*
0004420 ( B 1 2 0 0 4 2
0004440 8 3 5 ) \r
0004460
*
0004520 ( B 2 1 4 1 7 2 0 0
0004540 4 ) \r
0004560
*
0004620 ( B 3 1 0 0 1 1 4 1 7 )
0004640 \r
0004660
*
0004720 ( B 4 7 0 9 1 0 0 1 ) \r
0004740
*
0005000 ( B 5
0005020 4 9 9 7 0 9 ] \r
0005040 ( C O M S ( * P a g e
0005060 n u m b e r i n g o p t i o n
0005100 s u p p o r t ) \r
0005120 ( F N S R O M
0005140 A N N U M E R A L S ) ) ) ) \r (
0005160 F I L E S L O A D T E D I T D
0005200 E C L S ) \r \r ( R P A Q Q 006 002
0005220 M A X P A G E # 006 001 6 5 5 3 5
0005240 ) \r \r ( R P A Q Q 006 002 M I N P
0005260 A G E # 006 001 1 ) \r \r ( R P A Q
0005300 006 002 T E D I T . P A G E . F R
0005320 A M E S 006 001 ( L I S T ( T E
0005340 D I T . S I N G L E . P A G E F
0005360 O R M A T N I L N I L N I
0005400 L N I L N I L 7 2 7 2
0005420 7 2 7 2 N I L 1 ) \r
0005440
0005460 ( T E D I
0005500 T . S I N G L E . P A G E F O R
0005520 M A T T 7 2 7 5 6 N I L
0005540 ( Q U O T E L E F T ) \r
0005560
*
0005620 7 2 7 2 7 2 7 2 N
0005640 I L 1 ) \r
0005660
0005700 ( T E D I T . S I N G L
0005720 E . P A G E F O R M A T T 5
0005740 4 0 7 5 6 N I L ( Q U O T
0005760 E R I G H T ) \r
0006000
0006020 7 2
0006040 7 2 7 2 7 2 N I L 1 )
0006060 ) ) \r \r \r \r 006 004 ( * C r e a t
0006100 i o n , G E T , a n d P U
0006120 T o f p a g e f r a m e s
0006140 . ) 006 001 \r \r ( D E F I N E Q \r \r
0006160 ( 006 004 T E D I T . G E T . P A G
0006200 E F R A M E S 006 001 \r [ L A M
0006220 B D A ( F I L E )
0006240
*
0006300 006 003 ( * j d s
0006320 " 1 8 - J u n - 8 4 0 2 : 5 5
0006340 " ) 006 001 \r
0006360
*
0006440 006 003 ( * R e a d a b u
0006460 n c h o f p a g e f r a m
0006500 e s f r o m t h e f i l e
0006520 , a n d r e t u r n 006 001 \r \t
0006540 \t \t \t \t \t \t 006 003 i t .
0006560 ) 006 001 \r ( 006 002 T E D I T
0006600 . P A R S E . P A G E F R A M E
0006620 S 006 001 ( R E A D F I L E ] )
0006640 \r \r ( 006 004 T E D I T . P A R S E
0006660 . P A G E F R A M E S 006 001 \r
0006700 [ L A M B D A ( P A G E L I S
0006720 T P A R E N T )
0006740
0006760 006 003 ( *
0007000 j d s " 3 1 - J u l - 8 4 1
0007020 5 : 3 0 " ) 006 001 \r
0007040
*
0007120 006 003 ( * T a k e
0007140 a n e x t e r n a l p a g e
0007160 f r a m e a n d i n t e r n
0007200 a l i z e i t . ) 006 001 \r
0007220 ( P R O G ( F R A M E T Y P
0007240 E P A G E F R A M E ) \r
0007260 ( C O N D \r \t
0007300 ( ( 006 002 t y p e ? 006 001 P A
0007320 G E R E G I O N P A G E L I S
0007340 T ) \r \t ( R E T U R
0007360 N P A G E L I S T ) ) \r \t
0007400 ( ( N E Q ( Q U O T E L
0007420 I S T ) \r \t \t ( S E T Q F
0007440 R A M E T Y P E ( 006 002 p o p 006
0007460 001 P A G E L I S T ) ) ) \r \t
0007500 [ S E T Q P A G E F
0007520 R A M E ( 006 002 c r e a t e 006 001
0007540 P A G E R E G I O N \r \t \t \t \t
0007560 R E G I O N F I L L
0007600 M E T H O D _ F R A M E T Y
0007620 P E \r \t \t \t \t R E G
0007640 I O N T Y P E _ ( 006 002 p o p 006
0007660 001 P A G E L I S T ) \r \t \t \t \t
0007700 R E G I O N L O C A
0007720 L I N F O _ ( 006 002 p o p 006 001
0007740 P A G E L I S T ) \r \t \t \t \t
0007760 R E G I O N S P E C _
0010000 ( O R ( 006 002 p o p 006 001 P A G
0010020 E L I S T ) \r \t \t \t \t \t \t
0010040 ( L I S T 0 0 0 0
0010060 ] \r \t ( 006 002 r e p l
0010100 a c e 006 001 R E G I O N S U B B
0010120 O X E S 006 002 o f 006 001 P A G E
0010140 F R A M E 006 002 w i t h 006 001 (
0010160 006 002 f o r 006 001 A L I S T 006 002
0010200 i n 006 001 ( 006 002 p o p 006 001 P A
0010220 G E L I S T ) \r \t \t \t \t \t \t \t
0010240 006 002 c o l l e c t 006 001 ( 006
0010260 002 T E D I T . P A R S E . P A G
0010300 E F R A M E S 006 001 A L I S T
0010320 \r \t \t \t \t \t \t \t \t \t \t \t P A G E
0010340 F R A M E ) ) ) \r \t
0010360 ( R E T U R N P A G E F R A M
0010400 E ) ) \r \t ( T ( R E T
0010420 U R N ( 006 002 f o r 006 001 F R A
0010440 M E S P E C 006 002 i n 006 001 ( C
0010460 A R P A G E L I S T ) 006 002 c
0010500 o l l e c t 006 001 ( 006 002 T E D I
0010520 T . P A R S E . P A G E F R A M
0010540 E S 006 001 F R A M E S P E C N
0010560 I L ] \r ) \r \r ( 006 004 T E D I T .
0010600 P U T . P A G E F R A M E S 006 001
0010620 \r [ L A M B D A ( F I L E
0010640 P A G E F R A M E S ) 006 003 006 001
0010660
*
0010720 006 003 ( * j d s " 4 - J
0010740 u n - 8 6 1 6 : 0 2 " ) 006 001 \r
0010760
*
0011040 006 003 (
0011060 * P u t o u t a d e s c
0011100 r i p t i o n o f a s e t
0011120 o f \r 006 001
0011140
*
0011220 006 003 p a g e - l a y o u
0011240 t f r a m e s ) 006 001 \r
0011260 ( P R O G ( S T R ) \r
0011300 ( \ D W O U T F I
0011320 L E 0 )
0011340
0011360 006 003 ( * T h
0011400 e l e n g t h o f t h i s
0011420 r u n o f l o o k s ) 006 001
0011440 \r ( \ S M A
0011460 L L P O U T F I L E \ P i e
0011500 c e D e s c r i p t o r P A G E
0011520 F R A M E ) 006 003
0011540 ( * M a r k t h i s a s
0011560 a s e t o f p a g e f r
0011600 a m e s ) 006 001 \r
0011620 ( P R I N 2 ( 006 002 T E D I
0011640 T . U N P A R S E . P A G E F R
0011660 A M E S 006 001 P A G E F R A M E
0011700 S ) \r
0011720 F I L E ] ) \r \r ( 006 004 T
0011740 E D I T . U N P A R S E . P A G
0011760 E F R A M E S 006 001 \r [ L A M
0012000 B D A ( P A G E F R A M E )
0012020
*
0012060 006 003 ( * j d s
0012100 " 3 1 - J u l - 8 4 1 5 : 0 0
0012120 " ) 006 001 \r
0012140
*
0012220 006 003 ( * T a k e a n i
0012240 n t e r n a l p a g e f r a
0012260 m e , a n d c r e a t e a
0012300 n e q u i v a l e n t 006 001 \r \t
0012320 \t \t \t \t \t \t 006 003 l i s
0012340 t s t r u c t u r e . ) 006 001 \r
0012360 ( C O N D \r
0012400 [ ( L I S T P P A G E F R A M
0012420 E ) \r \t ( L I S T ( Q U O T E
0012440 L I S T ) \r \t ( 006
0012460 002 f o r 006 001 F R A M E 006 002 i
0012500 n 006 001 P A G E F R A M E 006 002
0012520 c o l l e c t 006 001 ( 006 002 T E D
0012540 I T . U N P A R S E . P A G E F
0012560 R A M E S 006 001 F R A M E ] \r
0012600 ( T ( L I S T ( 006
0012620 002 f e t c h 006 001 R E G I O N F
0012640 I L L M E T H O D 006 002 o f 006 001
0012660 P A G E F R A M E ) \r \t
0012700 ( 006 002 f e t c h 006 001 R
0012720 E G I O N T Y P E 006 002 o f 006 001
0012740 P A G E F R A M E ) \r \t
0012760 ( 006 002 f e t c h 006 001 R
0013000 E G I O N L O C A L I N F O 006
0013020 002 o f 006 001 P A G E F R A M E )
0013040 \r \t ( 006 002 f e t c
0013060 h 006 001 R E G I O N S P E C 006
0013100 002 o f 006 001 P A G E F R A M E )
0013120 \r \t ( 006 002 f o r 006
0013140 001 S U B R E G I O N 006 002 i n
0013160 006 001 ( 006 002 f e t c h 006 001 R E
0013200 G I O N S U B B O X E S 006 002 o
0013220 f 006 001 P A G E F R A M E ) 006
0013240 002 c o l l e c t 006 001 ( 006 002 T E
0013260 D I T . U N P A R S E . P A G E
0013300 F R A M E S 006 001 \r \t \t \t \t \t \t \t
0013320 \t \t S U B R E G I
0013340 O N ] ) \r ) \r \r \r \r 006 004 ( * F
0013360 o r s e t t i n g u p p a
0013400 g e l a y o u t s ) 006 001 \r \r (
0013420 D E F I N E Q \r \r ( 006 004 T E D I
0013440 T . S I N G L E . P A G E F O R
0013460 M A T 006 001 \r [ L A M B D A
0013500 ( P A G E # S ? P X P Y P
0013520 F O N T P Q U A D L E F T
0013540 R I G H T T O P B O T T O M
0013560 C O L S C O L W I D T H I
0013600 N T E R C O L H E A D I N G S
0013620 U N I T S \r \t \t P A G
0013640 E P R O P S P A P E R S I Z E
0013660 )
0013700 006 003 ( * j d s
0013720 " 8 - J a n - 8 6 1 4 : 3 2
0013740 " ) 006 001 \r
0013760
*
0014040 006 003 ( * G i v e n a d
0014060 e s c r i p t i o n i n t h
0014100 e a r g s , c r e a t e a
0014120 p a g e f r a m e 006 001 \r \t \t \t
0014140 \t \t \t \t 006 003 t o d e
0014160 s c r i b e a s i n g l e
0014200 k i n d o f p a g e . ) 006 001
0014220 \r ( 006 001 P R O G 006 001 (
0014240 [ P A G E R E G I O N ( 006 002 c
0014260 r e a t e 006 001 P A G E R E G I
0014300 O N \r \t \t \t \t R E G I O N
0014320 F I L L M E T H O D _ ( 006 001 Q
0014340 U O T E 006 001 P A G E ) \r \t \t \t
0014360 \t R E G I O N S P E C _
0014400 ( 006 002 c r e a t e 006 001 R E G I
0014420 O N \r \t \t \t \t \t \t \t L E F T
0014440 _ 0 \r \t \t \t \t \t \t \t B O T T
0014460 O M _ 0 \r \t \t \t \t \t \t \t W
0014500 I D T H _ 6 1 2 \r \t \t \t \t \t
0014520 \t \t H E I G H T _ 7 9 2 )
0014540 \r \t \t \t \t R E G I O N L O
0014560 C A L I N F O _ ( 006 001 C O N S
0014600 006 001 ( 006 001 Q U O T E 006 001 P A
0014620 P E R S I Z E ) \r \t \t \t \t \t \t \t
0014640 ( 006 001 C O N S 006 001 P A
0014660 P E R S I Z E P A G E P R O P
0014700 S ] \r \t ( P A P E R W
0014720 I D T H ( 006 002 \ T E D I T . P
0014740 A P E R W I D T H 006 001 P A P E
0014760 R S I Z E ) ) \r \t ( P
0015000 A P E R H E I G H T ( 006 002 \ T
0015020 E D I T . P A P E R H E I G H T
0015040 006 001 P A P E R S I Z E ) ) \r \t
0015060 ( L A N D S C A P E ?
0015100 ( 006 001 L I S T G E T 006 001 P A
0015120 G E P R O P S ( 006 001 Q U O T E
0015140 006 001 L A N D S C A P E ? ) ) )
0015160 \r \t P A G E W I D T H
0015200 S U B R E G I O N S F O L I
0015220 O F O L I O L E F T S C A L
0015240 E F A C T O R H E A D I N G R
0015260 E G I O N S ) \r \t ( 006 001
0015300 C O N D 006 001 \r \t ( L
0015320 A N D S C A P E ?
0015340
0015360 006 003 (
0015400 * T h e p a p e r i s t
0015420 o b e p r i n t e d o n
0015440 s i d e w a y s - - s o - c
0015460 a l l e d 006 001 \r \t \t \t \t \t \t \t
0015500 006 003 l a n d s c a p e
0015520 m o d e . S w i t c h t h e
0015540 w i d t h a n d h e i g h
0015560 t . ) 006 001 \r \t \t \t ( 006 002 s w
0015600 a p 006 001 P A P E R W I D T H
0015620 P A P E R H E I G H T ) ) ) \r \t
0015640 ( 006 001 S E L E C T Q 006 001
0015660 U N I T S \r \t \t
0015700 ( ( P O I N T S N I L )
0015720
0015740 006 003 ( * I f u n
0015760 i t s a r e i n p r i n t
0016000 e r s p o i n t s , t h e
0016020 d e f a u l t , d o n o 006 001
0016040 \r \t \t \t \t \t \t \t 006 003 s
0016060 c a l i n g ) 006 001 \r \t \t \t ( 006
0016100 001 S E T Q 006 001 S C A L E F A C
0016120 T O R 1 ) ) \r \t \t
0016140 ( P I C A S
0016160
0016200 006 003 ( * T h e
0016220 u n i t s a r e i n p i c
0016240 a s - - 1 2 p t s p e r . 006 001
0016260 \r \t \t \t \t \t \t \t 006 003 S
0016300 c a l e a l l v a l u e s .
0016320 ) 006 001 \r \t \t \t ( 006 001
0016340 S E T Q 006 001 S C A L E F A C T
0016360 O R 1 2 ) ) \r \t \t
0016400 ( I N C H E S
0016420
0016440 006 003 ( * T h e
0016460 u n i t s a r e i n i n c
0016500 h e s , a t 7 2 . 2 7 p t s
0016520 p e r . 006 001 \r \t \t \t \t \t \t \t
0016540 006 003 S e t t h e s c
0016560 a l e f a c t o r ) 006 001 \r \t \t
0016600 \t ( 006 001 S E T Q 006
0016620 001 S C A L E F A C T O R 7 2
0016640 ) ) \r \t \t ( M I C
0016660 A S
0016700
0016720 006 003 ( * T h e u n i t s
0016740 a r e M I C A S , a t 2
0016760 5 4 0 t o t h e i n c h .
0017000 ) 006 001 \r \t \t \t ( 006 001
0017020 S E T Q 006 001 S C A L E F A C T
0017040 O R . 0 2 8 3 4 6 4 6 ) ) \r \t
0017060 \t [ C M
0017100
0017120 006 003
0017140 ( * U n i t s a r e i n
0017160 C M , a t 7 2 . 2 7 / 2 . 5
0017200 4 p t s p e r . ) 006 001 \r \t \t \t
0017220 ( 006 001 S E T Q 006 001 S C A
0017240 L E F A C T O R ( 006 001 C O N S
0017260 T A N T 006 001 ( 006 001 F Q U O T I
0017300 E N T 006 001 7 2 2 . 5 4 ] \r \t
0017320 \t ( 006 001 \ I L L E
0017340 G A L . A R G 006 001 U N I T S )
0017360 )
0017400 006 003 ( * W e n e e d t o
0017420 d o t h e s c a l i n g . )
0017440 006 001 \r \t ( 006 001 S E T Q 006
0017460 001 P X ( 006 002 S C A L E P A G
0017500 E X U N I T S 006 001 P X S C A
0017520 L E F A C T O R P A P E R S I
0017540 Z E ) ) \r \t ( 006 001 S E T
0017560 Q 006 001 P Y ( 006 002 S C A L E P
0017600 A G E Y U N I T S 006 001 P Y S
0017620 C A L E F A C T O R P A P E R
0017640 S I Z E ) ) \r \t [ 006 001 A
0017660 N D 006 001 L E F T ( 006 001 S E T
0017700 Q 006 001 L E F T ( 006 001 F I X R
0017720 006 001 ( 006 001 F T I M E S 006 001 L
0017740 E F T S C A L E F A C T O R ]
0017760 \r \t [ 006 001 A N D 006 001 R
0020000 I G H T ( 006 001 S E T Q 006 001 R
0020020 I G H T ( 006 001 F I X R 006 001 (
0020040 006 001 F T I M E S 006 001 R I G H T
0020060 S C A L E F A C T O R ] \r \t
0020100 [ 006 001 A N D 006 001 T O P
0020120 ( 006 001 S E T Q 006 001 T O P ( 006
0020140 001 F I X R 006 001 ( 006 001 F T I M E
0020160 S 006 001 T O P S C A L E F A C
0020200 T O R ] \r \t [ 006 001 A N D
0020220 006 001 B O T T O M ( 006 001 S E T
0020240 Q 006 001 B O T T O M ( 006 001 F I
0020260 X R 006 001 ( 006 001 F T I M E S 006 001
0020300 B O T T O M S C A L E F A C
0020320 T O R ] \r \t [ 006 001 A N D
0020340 006 001 C O L W I D T H ( 006 001 S
0020360 E T Q 006 001 C O L W I D T H (
0020400 006 001 F I X R 006 001 ( 006 001 F T I M
0020420 E S 006 001 C O L W I D T H S C
0020440 A L E F A C T O R ] \r \t
0020460 [ 006 001 A N D 006 001 I N T E R C O
0020500 L ( 006 001 S E T Q 006 001 I N T E
0020520 R C O L ( 006 001 F I X R 006 001 (
0020540 006 001 F T I M E S 006 001 I N T E R
0020560 C O L S C A L E F A C T O R ]
0020600 \r \t [ 006 001 S E T Q 006 001
0020620 H E A D I N G S ( 006 002 f o r 006
0020640 001 H D G 006 002 i n 006 001 H E A
0020660 D I N G S 006 002 c o l l e c t 006
0020700 001 ( 006 001 L I S T 006 001 ( 006 001 C
0020720 A R 006 001 H D G ) \r \t \t \t \t \t \t
0020740 \t \t \t ( 006 002 S C A L E P A G E X
0020760 U N I T S 006 001 \r \t \t \t \t \t \t \t \t
0021000 \t ( 006 001 C A D R 006 001 H D G
0021020 ) \r \t \t \t \t \t \t \t \t \t S C A
0021040 L E F A C T O R P A P E R S I
0021060 Z E ) \r \t \t \t \t \t \t \t \t \t ( 006 002
0021100 S C A L E P A G E Y U N I T S 006
0021120 001 \r \t \t \t \t \t \t \t \t \t ( 006 001
0021140 C A D D R 006 001 H D G ) \r \t \t \t
0021160 \t \t \t \t \t \t S C A L E F A C
0021200 T O R P A P E R S I Z E ] \r \t
0021220 ( 006 001 S E T Q 006 001 P A
0021240 G E W I D T H ( 006 001 I D I F F
0021260 E R E N C E 006 001 ( 006 001 I D I F
0021300 F E R E N C E 006 001 P A P E R W
0021320 I D T H R I G H T ) \r \t \t \t \t
0021340 \t L E F T ) ) \r \t
0021360 ( 006 001 C O N D 006 001 \r \t
0021400 [ P A G E # S ? ( 006 001 S
0021420 E L E C T Q 006 001 P Q U A D \r \t
0021440 \t \t \t ( L E F T
0021460
0021500 006 003 ( * I f t h e p a g e
0021520 n u m b e r i s f l u s h
0021540 l e f t , s e t u p t h
0021560 e r e g i o n 006 001 \r \t \t \t \t \t
0021600 \t \t 006 003 t o s t a r
0021620 t w h e r e h e s p e c i
0021640 f i e d . ) 006 001 \r \t \t \t \t \t ( 006
0021660 001 S E T Q 006 001 F O L I O L E F
0021700 T P X ) ) \r \t \t \t \t ( R I
0021720 G H T
0021740 006 003 ( * I f
0021760 i t ' s f l u s h r i g h t
0022000 , s e t u p t h e r e g
0022020 i o n t o E N D 006 001 \r \t \t
0022040 \t \t \t \t \t 006 003 t h e r
0022060 e ) 006 001 \r \t \t \t \t \t ( 006 001 S E
0022100 T Q 006 001 F O L I O L E F T (
0022120 006 001 I D I F F E R E N C E 006 001
0022140 P X 2 8 8 ) ) ) \r \t \t \t \t
0022160 ( ( C E N T E R E D N I L )
0022200 006 003 ( *
0022220 O t h e r w i s e , c e n t e
0022240 r t h e p a g e n u m b e
0022260 r a r o u n d t h e p o i
0022300 n t 006 001 \r \t \t \t \t \t \t \t
0022320 006 003 h e s p e c i f i e s
0022340 ) 006 001 \r \t \t \t \t ( 006 001 S
0022360 E T Q 006 001 F O L I O L E F T
0022400 ( 006 001 I D I F F E R E N C E 006 001
0022420 P X 1 4 4 ) ) ) \r \t \t \t \t
0022440 ( 006 001 S H O U L D N T 006 001 ) )
0022460 \r \t \t [ 006 001 S E T
0022500 Q 006 001 S U B R E G I O N S \r \t
0022520 \t \t ( 006 001 L I S T 006 001 ( 006 001
0022540 S E T Q 006 001 F O L I O \r \t \t \t
0022560 \t ( 006 002 c r e a t e 006 001
0022600 P A G E R E G I O N \r \t \t \t \t \t
0022620 R E G I O N F I L L M
0022640 E T H O D _ ( 006 001 Q U O T E 006
0022660 001 F O L I O ) \r \t \t \t \t \t
0022700 R E G I O N S P E C _ (
0022720 006 002 c r e a t e 006 001 R E G I O
0022740 N \r \t \t \t \t \t \t \t \t L E F
0022760 T _ F O L I O L E F T \r \t \t
0023000 \t \t \t \t \t \t B O T T O M
0023020 _ P Y \r \t \t \t \t \t \t \t \t
0023040 W I D T H _ 2 8 8 \r \t \t \t \t
0023060 \t \t \t \t H E I G H T _
0023100 3 6 ] \r \t \t ( 006 002
0023120 r e p l a c e 006 001 R E G I O N
0023140 L O C A L I N F O 006 002 o f 006 001
0023160 F O L I O \r \t \t \t 006 002 w i
0023200 t h 006 001 ( 006 001 L I S T 006 001 (
0023220 006 001 Q U O T E 006 001 P A R A L O
0023240 O K S ) \r \t \t \t \t \t ( 006 001 L I
0023260 S T 006 001 ( 006 001 Q U O T E 006 001
0023300 Q U A D ) \r \t \t \t \t \t \t ( 006 001
0023320 O R 006 001 P Q U A D ( 006 001 Q U
0023340 O T E 006 001 C E N T E R E D ) )
0023360 ) \r \t \t \t \t \t ( 006 001 Q U O T E
0023400 006 001 C H A R L O O K S ) \r \t \t
0023420 \t \t \t ( 006 001 \ T E D I T . U N
0023440 P A R S E . C H A R L O O K S .
0023460 L I S T 006 001 ( 006 001 006 001 \r \t \t \t
0023500 \t \t \t \t \t 006 001 \ T E
0023520 D I T . P A R S E . C H A R L O
0023540 O K S . L I S T 006 001 \r \t \t \t \t \t
0023560 \t \t \t \t P F O N T ) ) \r
0023600 \t \t \t \t \t ( 006 001 Q U O T E 006 001
0023620 F O R M A T I N F O ) \r \t \t \t
0023640 \t \t ( 006 001 L I S T G E T 006 001
0023660 P A G E P R O P S ( 006 001 Q U O
0023700 T E 006 001 F O L I O I N F O ] \r
0023720 \t ( T ( 006 001 S E T
0023740 Q 006 001 S U B R E G I O N S N
0023760 I L ) ) ) \r \t [ 006 001 C O
0024000 N D 006 001 \r \t ( H E A
0024020 D I N G S
0024040
0024060 006 003 ( *
0024100 T h e r e a r e p a g e h
0024120 e a d i n g s s p e c i f i e
0024140 d f o r t h i s p a g e .
0024160 ) 006 001 \r \t \t \t [ 006 001 S E T Q 006 001
0024200 H E A D I N G R E G I O N S
0024220 ( 006 002 f o r 006 001 H E A D I N G
0024240 006 002 i n 006 001 H E A D I N G S
0024260 \r \t \t \t \t \t \t 006 002 c o l l e
0024300 c t 006 001 \r \r
0024320 006 003 ( * R u n t h r u t
0024340 h e l i s t o f h e a d i
0024360 n g s , b u i l d i n g a
0024400 b o x f o r e a c h . B y
0024420 d e f a u l t , a h e a d
0024440 i n g w i l l h a v e t h
0024460 e s a m e w i d t h r i g
0024500 h t 006 001 \r \t 006 003 m a r g i
0024520 n a s t h e l e f t m a
0024540 r g i n t h a t w a s s p
0024560 e c i f i e d . ) 006 001 \r \r \r \t \t
0024600 \t \t \t \t \t ( 006 002 c r e a
0024620 t e 006 001 \r \t \t \t \t \t \t \t
0024640 P A G E R E G I O N \r \t \t \t
0024660 \t \t \t \t R E G I O N
0024700 F I L L M E T H O D _ ( 006 001 Q
0024720 U O T E 006 001 H E A D I N G ) \r
0024740 \t \t \t \t \t \t \t R E G
0024760 I O N S P E C _ ( 006 002 c r e a
0025000 t e 006 001 \r \t \t \t \t \t \t \t \t R E G
0025020 I O N \r \t \t \t \t \t \t \t \t L E F T
0025040 _ ( 006 001 C A D R 006 001 H E A D
0025060 I N G ) \r \t \t \t \t \t \t \t \t B O T
0025100 T O M _ ( 006 001 C A D D R 006 001
0025120 H E A D I N G ) \r \t \t \t \t \t \t \t
0025140 \t W I D T H _ ( 006 001 I M A X 006
0025160 001 ( 006 001 I D I F F E R E N C E
0025200 006 001 \r \t \t \t \t \t \t \t \t \t \t P A
0025220 P E R W I D T H \r \t \t \t \t \t \t \t
0025240 \t \t \t ( 006 001 C A D R 006 001 H E
0025260 A D I N G ) ) \r \t \t \t \t \t \t \t \t
0025300 \t 7 2 ) \r \t \t \t \t
0025320 \t \t \t \t H E I G H T _ 3 6 )
0025340 \r \t \t \t \t \t \t \t R E
0025360 G I O N L O C A L I N F O _ (
0025400 006 001 L I S T 006 001 ( 006 001 Q U O T
0025420 E 006 001 \r \t \t \t \t \t \t \t \t \t \t \t
0025440 H E A D I N G T Y P E ) \r \t \t \t
0025460 \t \t \t \t \t \t \t ( 006
0025500 001 C A R 006 001 H E A D I N G ] \r
0025520 \t \t \t ( 006 001 S E T Q 006 001 S U B
0025540 R E G I O N S ( 006 001 A P P E N
0025560 D 006 001 S U B R E G I O N S H
0025600 E A D I N G R E G I O N S ] \r \t
0025620 [ 006 001 C O N D 006 001 \r \t
0025640 [ ( 006 001 O R 006 001 ( 006
0025660 001 N U L L 006 001 C O L S ) \r \t \t
0025700 ( 006 001 I E Q P 006 001 C
0025720 O L S 1 ) )
0025740 006
0025760 003 ( * T h e r e i s a s
0026000 i n g l e c o l u m n , s o
0026020 t r e a t i t a s j u s
0026040 t o n e 006 001 \r \t \t \t \t \t \t \t
0026060 006 003 t e x t r e g i
0026100 o n b o u n d e d b y t h
0026120 e p a g e m a r g i n s . )
0026140 006 001 \r \t \t ( 006 001 S E T Q 006 001 S
0026160 U B R E G I O N S \r \t \t ( 006
0026200 001 N C O N C 1 006 001 S U B R E G
0026220 I O N S \r \t \t \t ( 006 002 c
0026240 r e a t e 006 001 P A G E R E G I
0026260 O N \r \t \t \t \t R E G
0026300 I O N F I L L M E T H O D _ (
0026320 006 001 Q U O T E 006 001 T E X T ) \r
0026340 \t \t \t \t R E G I O N
0026360 S P E C _ ( 006 002 c r e a t e 006
0026400 001 R E G I O N \r \t \t \t \t \t \t \t
0026420 L E F T _ L E F T \r
0026440 \t \t \t \t \t \t \t B O T T O
0026460 M _ B O T T O M \r \t \t \t \t \t
0026500 \t \t W I D T H _ P A
0026520 G E W I D T H \r \t \t \t \t \t \t \t
0026540 H E I G H T _ ( 006 001 I D
0026560 I F F E R E N C E 006 001 ( 006 001 I
0026600 D I F F E R E N C E 006 001 \r \t \t \t
0026620 \t \t \t \t \t \t \t P A P E
0026640 R H E I G H T T O P ) \r \t \t \t
0026660 \t \t \t \t \t \t \t B O T T O M
0026700 ] \r \t ( T
0026720
*
0026760 006 003 ( * T h e
0027000 r e a r e s e v e r a l c
0027020 o l u m n s . 006 001 \r \t \t \t \t \t \t
0027040 \t 006 003 W e n e e d
0027060 t o c r e a t e a t e x t
0027100 b o x f o r e a c h c o
0027120 l . ) 006 001 \r \t \t [ 006 001 C O N D
0027140 006 001 \r \t \t [ ( 006 001 N U L L
0027160 006 001 C O L W I D T H )
0027200
0027220 006 003 ( * H e w a n t
0027240 s u s t o f i l l i n
0027260 t h e c o l u m n w i d t h
0027300 , g i v e n 006 001 \r \t \t \t \t \t
0027320 \t \t 006 003 m a r g i n s
0027340 a n d i n t e r c o l u m n
0027360 s p a c i n g . ) 006 001 \r \t \t
0027400 ( 006 001 C O N D 006 001 \r \t \t
0027420 [ I N T E R C O L
0027440 ( 006 001 S E T Q 006 001 C O L W I
0027460 D T H ( 006 001 F I X R 006 001 ( 006
0027500 001 F Q U O T I E N T 006 001 ( 006 001
0027520 I D I F F E R E N C E 006 001 \r \t \t
0027540 \t \t \t \t \t \t \t P A G E W I D T
0027560 H \r \t \t \t \t \t \t \t \t \t ( 006 001 I
0027600 T I M E S 006 001 I N T E R C O L
0027620 \r \t \t \t \t \t \t \t \t \t \t ( 006
0027640 001 S U B 1 006 001 C O L S ) ) ) \r
0027660 \t \t \t \t \t \t \t \t C
0027700 O L S ] \r \t \t ( T
0027720
*
0027760 006 003 ( * C a n ' t d
0030000 e f a u l t b o t h o f t
0030020 h e m . ) 006 001 \r \t \t \t ( 006 001
0030040 S H O U L D N T 006 001 " C a n '
0030060 t d e f a u l t b o t h C
0030100 o l w i d t h a n d s p a
0030120 c i n g " ] \r \t \t ( ( 006 001
0030140 N U L L 006 001 I N T E R C O L )
0030160
0030200 006 003 ( * O r
0030220 e l s e h e w a n t s t o
0030240 g i v e u s j u s t t h
0030260 e c o l w i d t h a n d
0030300 006 001 \r \t \t \t \t \t \t \t 006
0030320 003 h a v e u s c a l c t h
0030340 e s p a c i n g . ) 006 001 \r \t \t
0030360 ( 006 001 S E T Q 006 001 I
0030400 N T E R C O L ( 006 001 F I X R 006
0030420 001 ( 006 001 F Q U O T I E N T 006 001
0030440 ( 006 001 I D I F F E R E N C E 006
0030460 001 P A G E W I D T H ( 006 001 I
0030500 T I M E S 006 001 \r \t \t \t \t \t \t \t
0030520 \t \t \t \t C O L W I D T H \r \t
0030540 \t \t \t \t \t \t \t \t \t \t C
0030560 O L S ) ) \r \t \t \t \t \t \t \t
0030600 ( 006 001 S U B 1 006 001 C O L S ] \r
0030620 \t \t ( 006 002 f o r 006 001 C O L
0030640 006 002 f r o m 006 001 1 006 002 t o 006
0030660 001 C O L S 006 002 a s 006 001 C L
0030700 E F T 006 002 f r o m 006 001 L E F
0030720 T 006 002 b y 006 001 ( 006 001 I P L U
0030740 S 006 001 C O L W I D T H I N T
0030760 E R C O L ) \r \t \t 006 002 d
0031000 o 006 001 ( 006 001 S E T Q 006 001 S U
0031020 B R E G I O N S \r \t \t \t (
0031040 006 001 N C O N C 1 006 001 S U B R E
0031060 G I O N S \r \t \t \t \t (
0031100 006 002 c r e a t e 006 001 P A G E R
0031120 E G I O N \r \t \t \t \t \t
0031140 R E G I O N F I L L M E T H
0031160 O D _ ( 006 001 Q U O T E 006 001 T
0031200 E X T ) \r \t \t \t \t \t
0031220 R E G I O N S P E C _ ( 006 002
0031240 c r e a t e 006 001 R E G I O N \r
0031260 \t \t \t \t \t \t \t \t L E F
0031300 T _ C L E F T \r \t \t \t \t \t \t
0031320 \t \t B O T T O M _
0031340 B O T T O M \r \t \t \t \t \t \t \t \t
0031360 W I D T H _ C O L W
0031400 I D T H \r \t \t \t \t \t \t \t \t
0031420 H E I G H T _ ( 006 001 I D I
0031440 F F E R E N C E 006 001 \r \t \t \t \t \t
0031460 \t \t \t ( 006 001 I D I
0031500 F F E R E N C E 006 001 P A P E R
0031520 H E I G H T T O P ) \r \t \t \t \t
0031540 \t \t \t \t B O T T O
0031560 M ] \r \t ( 006 002 r e p l a
0031600 c e 006 001 R E G I O N S U B B O
0031620 X E S 006 002 o f 006 001 P A G E R
0031640 E G I O N 006 002 w i t h 006 001 S
0031660 U B R E G I O N S ) \r \t
0031700 ( 006 001 R E T U R N 006 001 P A G E
0031720 R E G I O N ] ) \r \r ( 006 004 T E D
0031740 I T . C O M P O U N D . P A G E
0031760 F O R M A T 006 001 \r [ L A M B
0032000 D A ( 006 002 F I R S T 006 001 V E
0032020 R S O R E C T O )
0032040
0032060 006 003 ( * j
0032100 d s " 2 7 - J u l - 8 4 1 0
0032120 : 1 5 " ) 006 001 \r ( 006 002 c
0032140 r e a t e 006 001 P A G E R E G I
0032160 O N \r \t R E G I O N F I
0032200 L L M E T H O D _ ( Q U O T E
0032220 S E Q U E N C E ) \r \t
0032240 R E G I O N S U B B O X E S _
0032260 ( L I S T F I R S T ( 006 002 c
0032300 r e a t e 006 001 P A G E R E G I
0032320 O N \r \t \t \t \t \t \t R E G I O N F
0032340 I L L M E T H O D _ ( Q U O T
0032360 E A L T E R N A T E ) \r \t \t \t
0032400 \t \t \t R E G I O N S U B B O X E
0032420 S _ ( L I S T ( O R V E R
0032440 S O F I R S T ) \r \t \t \t \t \t \t
0032460 \t \t ( O R R E C T
0032500 O V E R S O F I R S T ) ) \r
0032520 \t \t \t \t \t \t R E G I O N S P E C
0032540 _ ( L I S T 0 0 0 0 )
0032560 ) ) \r \t R E G I O N S P
0032600 E C _ ( L I S T 0 0 0
0032620 0 ] ) \r \r ( 006 004 T E D I T . P A
0032640 G E F O R M A T 006 001 \r [ L A
0032660 M B D A ( S T R E A M F O R
0032700 M A T )
0032720
0032740 006 003 ( * j d s
0032760 " 9 - J a n - 8 6 1 5 : 2
0033000 8 " ) 006 001 \r \r
0033020 006 003 ( * * P r o g r a m m
0033040 a t i c i n t e r f a c e f
0033060 o r p a g e f o r m a t t i
0033100 n g ) 006 001 \r \r \r ( 006 001 P
0033120 R O G 006 001 ( ( 006 001 T E X T O B
0033140 J 006 001 ( 006 001 T E X T O B J 006 001
0033160 S T R E A M ) ) ) \r \t
0033200 ( 006 001 C O N D 006 001 \r \t
0033220 ( [ 006 001 O R 006 001 ( 006 002 t y p
0033240 e ? 006 001 P A G E R E G I O N
0033260 F O R M A T ) \r \t \t (
0033300 006 001 A N D 006 001 ( 006 001 L I S T P
0033320 006 001 F O R M A T ) \r \t \t \t
0033340 ( 006 002 t y p e ? 006 001 P A G
0033360 E R E G I O N ( 006 001 C A R 006 001
0033400 F O R M A T ] \r \r
0033420 006 003 ( * I t ' s i n
0033440 o n e o f t h e t w o
0033460 f o r m s a c c e p t a b l e
0033500 t o t h e p a g e f o r
0033520 m a t t e r - - e i t h e r a
0033540 r e a l t r e e o f l a
0033560 y o u t i n f o , o r a
0033600 l i s t o f 006 001 \r \t 006 003
0033620 f i r s t / l e f t / r i g h t
0033640 i n f o s ) 006 001 \r \r \r \t \t ( 006
0033660 002 r e p l a c e 006 001 T X T P A
0033700 G E F R A M E S 006 002 o f 006 001
0033720 T E X T O B J 006 002 w i t h 006 001
0033740 F O R M A T ) \r \t \t ( 006 002 r e
0033760 p l a c e 006 001 \ D I R T Y 006
0034000 002 o f 006 001 T E X T O B J 006 002
0034020 w i t h 006 001 T ) ) \r \t
0034040 ( ( 006 001 L I S T P 006 001 F O
0034060 R M A T )
0034100
0034120 006 003 ( * I t ' s l i k
0034140 e l y t o b e a l i s t
0034160 a c c e p t a b l e t o t
0034200 h e p a r s e r . 006 001 \r \t \t \t
0034220 \t \t \t \t 006 003 T r y i
0034240 t t h a t w a y . ) 006 001 \r \t
0034260 \t ( 006 002 r e p l a c e 006 001 T X
0034300 T P A G E F R A M E S 006 002 o f
0034320 006 001 T E X T O B J 006 002 w i t
0034340 h 006 001 F O R M A T ) \r \t \t ( 006
0034360 002 r e p l a c e 006 001 \ D I R T
0034400 Y 006 002 o f 006 001 T E X T O B J
0034420 006 002 w i t h 006 001 T ) ) \r \t
0034440 ( T ( 006 001 \ I L L E
0034460 G A L . A R G 006 001 F O R M A T
0034500 ] ) \r \r ( 006 004 \ M I C A S T O P
0034520 T S 006 001 \r [ L A M B D A (
0034540 M i c a V a l u e )
0034560
*
0034620 006 003 ( * j d s " 3 1 - J
0034640 u l - 8 4 1 3 : 5 6 " ) 006 001 \r
0034660 ( F I X R ( F Q U O T
0034700 I E N T M i c a V a l u e 3
0034720 5 . 2 7 7 7 8 ] ) \r \r ( 006 004 \ P
0034740 T S T O M I C A S 006 001 \r [ L
0034760 A M B D A ( P o i n t V a l u
0035000 e ) 006 003 006 001
0035020
*
0035060 006 003 ( * j d s
0035100 \r
0035120
*
0035200 " 9 -
0035220 F e b - 8 6 1 5 : 2 7 " ) 006 001
0035240 \r ( H E L P )
0035260
*
0035340 006 003 ( *
0035360 ( F I X R ( F T I M E S \r
0035400
*
0035500 P o i n t
0035520 V a l u e 3 5 . 2 7 7 7 8 ) )
0035540 ) 006 001 \r ] ) \r ) \r \r \r \r
0035560 006 004 ( * P e r f o r m p a g
0035600 e l a y o u t , b a s e d
0035620 o n a r e g u l a r e x p
0035640 r e s s i o n o f t y p e d
0035660 r e g i o n s . ) 006 001 \r \r ( D
0035700 E F I N E Q \r \r ( 006 004 T E D I T
0035720 . F O R M A T . H A R D C O P Y
0035740 006 001 \r [ L A M B D A ( S T
0035760 R E A M F I L E D O N T S E
0036000 N D B R E A K P A G E T I T L
0036020 E S E R V E R P R I N T O P
0036040 T I O N S I M A G E T Y P E
0036060 F I R S T P G # ) 006 003 006 001 \r
0036100
*
0036160 006 003 ( *
0036200 j d s " 2 2 - A p r - 8 6 0
0036220 9 : 0 7 " ) 006 001 \r
0036240 \r 006 003
0036260 ( * * F o r m a t a d o
0036300 c u m e n t f o r h a r d c
0036320 o p y ) 006 001 \r \r ( R E S
0036340 E T L S T ( P R O G ( ( T E
0036360 X T O B J ( T E X T O B J S
0036400 T R E A M ) ) \r
0036420 ( F O
0036440 R C E N E X T P A G E N I L )
0036460 \r
0036500 [ F O R M A T T I N
0036520 G S T A T E ( 006 002 c r e a t e
0036540 006 001 P A G E F O R M A T T I N
0036560 G S T A T E \r
0036600
*
0036640 P A G E # _ ( C O N D
0036660 \r
0036700
*
0036740 ( ( N U M B E R
0036760 P F I R S T P G # ) ) \r
0037000
*
0037060 ( T N I L ) ) \r
0037100
*
0037140 F I R S T P
0037160 A G E _ T \r
0037200
*
0037240 S T A T E _ F I R
0037260 S T P G # \r
0037300
*
0037340 M I N P A G E # _ N I
0037360 L \r
0037400
0037420 M
0037440 A X P A G E # _ 6 5 5 3 5 \r
0037460
*
0037520 C H N
0037540 O _ 1 \r
0037560
*
0037620 P A G E H E A D I N G S
0037640 _ ( L I S T N I L N I L ) \r
0037660
*
0037720 P A G
0037740 E # G E N E R A T O R _ ( A N
0037760 D ( L I S T P F I R S T P G
0040000 # ) \r
0040020
*
0040100 ( C D R F I R S T P
0040120 G # ) ) \r
0040140
*
0040200 P A G E # T E X T _ ( A N
0040220 D ( L I S T P F I R S T P G
0040240 # ) \r
0040260
*
0040340 ( C A R F I R S T P G # ] \r
0040360
0040400 T E X T L E N T H I S
0040420 L I N E L I N E R E G I O N
0040440 L I N E S N C H N O P R S
0040460 T R E A M P A G E F R A M E S
0040500 S C R A T C H F I L E W A S
0040520 O P E N \r
0040540 B E F O R
0040560 E F N A F T E R F N ) \r
0040600
0040620 ( S E T Q P A G E F R A M E
0040640 S ( O R ( 006 002 f e t c h 006 001
0040660 T X T P A G E F R A M E S 006
0040700 002 o f 006 001 T E X T O B J ) \r
0040720
*
0040760 T E D I T . P A
0041000 G E . F R A M E S ) ) \r
0041020
0041040 [ C O N D \r
0041060 ( ( L
0041100 I S T P P A G E F R A M E S )
0041120
0041140 006 003 ( * I f i t ' s
0041160 a l i s t , p a c k i t
0041200 i n t o a r e a l \r 006 001
0041220
*
0041300 006 003 s e
0041320 t o f s p e c s . ) 006 001 \r
0041340
0041360 ( S E T Q P A G
0041400 E F R A M E S ( 006 002 T E D I T
0041420 . C O M P O U N D . P A G E F O
0041440 R M A T 006 001 ( C A R P A G E
0041460 F R A M E S ) \r
0041500
*
0041540 ( C A D R P A
0041560 G E F R A M E S ) \r
0041600
*
0041640 ( C A D D R
0041660 P A G E F R A M E S ] \r
0041700
0041720 ( S E T Q T E X T L E N (
0041740 006 002 f e t c h 006 001 T E X T L E
0041760 N 006 002 o f 006 001 T E X T O B J
0042000 ) ) \r
0042020 ( S E T Q T H I
0042040 S L I N E ( 006 002 f e t c h 006 001
0042060 T H I S L I N E 006 002 o f 006 001
0042100 T E X T O B J ) ) \r
0042120 (
0042140 006 002 r e p l a c e 006 001 P R E S
0042160 S R E G I O N 006 002 o f 006 001 F
0042200 O R M A T T I N G S T A T E 006
0042220 002 w i t h 006 001 T E D I T . D E
0042240 F A U L T P A G E R E G I O N )
0042260 \r
0042300
*
0042340 006 003
0042360 ( * P r i n t i n t h e
0042400 u s u a l r e g i o n o n
0042420 t h e \r 006 001
0042440
*
0042520 006 003 p a g e ) 006 001 \r
0042540
0042560 [ S E T Q B R E A K P A G
0042600 E T I T L E ( C O N D \r
0042620
*
0042660 ( B R E A K P
0042700 A G E T I T L E ) \r
0042720
*
0042760 ( ( L I S T G E T
0043000 P R I N T O P T I O N S ( Q U
0043020 O T E D O C U M E N T . N A M
0043040 E ) ) ) \r
0043060
*
0043120 ( [ O R ( N O T ( 006 002 f e
0043140 t c h 006 001 T X T F I L E 006 002
0043160 o f 006 001 T E X T O B J ) ) \r
0043200
*
0043260 ( 006 002 t y p e ? 006 001 S T R E A
0043300 M ( 006 002 f e t c h 006 001 F U L
0043320 L N A M E \r
0043340
*
0043420 006 002 o f 006 001 (
0043440 006 002 f e t c h 006 001 T X T F I L
0043460 E 006 002 o f 006 001 T E X T O B J
0043500 ) ) ) \r
0043520
*
0043560 ( 006 002 t y p e ? 006 001
0043600 S T R I N G P ( 006 002 f e t c h
0043620 006 001 T X T F I L E 006 002 o f 006
0043640 001 T E X T O B J ) ) \r
0043660
*
0043720 ( 006 002
0043740 t y p e ? 006 001 S T R I N G P
0043760 ( 006 002 f e t c h 006 001 F U L L N
0044000 A M E \r
0044020
*
0044100 006 002 o f 006 001 ( 006
0044120 002 f e t c h 006 001 T X T F I L E
0044140 006 002 o f 006 001 T E X T O B J ]
0044160 \r
0044200
0044220 " T
0044240 E d i t H a r d c o p y O u
0044260 t p u t " ) \r
0044300
*
0044340 ( T ( 006 002 f e t c h 006 001
0044360 F U L L N A M E 006 002 o f 006 001
0044400 ( 006 002 f e t c h 006 001 T X T F
0044420 I L E 006 002 o f 006 001 T E X T O
0044440 B J ] \r
0044460 [ S E T Q S C
0044500 R A T C H F I L E ( O R F I
0044520 L E ( P R I N T E R . S C R A
0044540 T C H . F I L E ( T E X T S T
0044560 R E A M S T R E A M ] \r
0044600
0044620 ( S E T Q B E F O R E F N
0044640 ( T E X T P R O P T E X T O B
0044660 J ( Q U O T E B E F O R E H
0044700 A R D C O P Y F N ) ) ) \r
0044720
0044740 [ C O N D \r
0044760 ( B
0045000 E F O R E F N
0045020
0045040 006 003 ( * L e t t h e
0045060 g u y d o a n y p r e -
0045100 h a r d c o p y \r 006 001
0045120
*
0045200 006 003 p r o c e
0045220 s s i n g h e w a n t s t
0045240 o d o ) 006 001 \r
0045260
0045300 ( C O N D \r
0045320
0045340 ( ( E
0045360 Q ( Q U O T E D O N ' T ) \r
0045400
*
0045440 ( A P P L Y * B E
0045460 F O R E F N T E X T S T R E A
0045500 M T E X T O B J ) ) \r
0045520
*
0045600 006 003 ( * I f
0045620 i t s a y s n o t t o
0045640 d o t h e h a r d c o p y ,
0045660 \r 006 001
0045700
*
0045760 006 003 t h e n d o n ' t . ) 006
0046000 001 \r
0046020
0046040 ( R E T U R N ] \r
0046060
0046100 ( R E S E T L S T ( S E T Q
0046120 A F T E R F N ( T E X T P R
0046140 O P T E X T O B J ( Q U O T
0046160 E A F T E R H A R D C O P Y F
0046200 N ) ) ) \r
0046220
0046240 ( A N D A F T E R F N ( R E
0046260 S E T S A V E N I L ( L I S
0046300 T A F T E R F N T E X T S T
0046320 R E A M ) ) ) \r
0046340
*
0046420 006 003 ( * S e t u p
0046440 t o d o t h e u s e r '
0046460 s c l e a n u p o n \r 006 001
0046500
*
0046560 006 003 t
0046600 h e w a y o u t , a s w
0046620 e l l . ) 006 001 \r
0046640
0046660 ( T E D I T . P R O M P T
0046700 P R I N T T E X T O B J " F
0046720 o r m a t t i n g f o r p r
0046740 i n t . . . " T ) \r
0046760
0047000 [ C O N D \r
0047020
0047040 ( ( A N D
0047060 F I L E ( O P E N P F I L E
0047100 ) \r
0047120
0047140 ( I M A G E S T R E
0047160 A M T Y P E F I L E ) ) 006
0047200 003 ( * T h e f i l e h e
0047220 h a n d e d u s i s a l r
0047240 e a d y a n \r 006 001
0047260
*
0047340 006 003 i m a g e -
0047360 t y p e f i l e . J u s t
0047400 a p p e n d t h e n e w \r
0047420 006 001
0047440
*
0047500 006
0047520 003 s t u f f t o i t . ) 006 001
0047540 \r
0047560
0047600 ( S E T Q W A S O P E N T )
0047620 \r
0047640
0047660 ( S E T Q P R S T R E A M F
0047700 I L E ) ) \r
0047720
0047740 ( T
0047760
0050000 006 003 ( * T ' w a s n ' t
0050020 a n i m a g e s t r e a m
0050040 , s o l e t ' s \r 006 001
0050060
*
0050140 006 003 o p e
0050160 n u s o n e . ) 006 001 \r
0050200
0050220 ( R
0050240 E S E T S A V E ( S E T Q P
0050260 R S T R E A M ( O P E N I M A
0050300 G E S T R E A M \r
0050320
*
0050400 S C R A T C H F I L E
0050420 \r
0050440
*
0050500 [ O R
0050520 I M A G E T Y P E \r
0050540
*
0050620 ( S E T Q
0050640 I M A G E T Y P E \r
0050660
*
0050740 ( C A R
0050760 ( P R I N T E R P R O P ( P
0051000 R I N T E R T Y P E \r
0051020
*
0051120 S
0051140 E R V E R ) \r
0051160
*
0051260 ( Q U O T E C A N P R
0051300 I N T ] \r
0051320
*
0051400 ( L I S T ( Q U O T E F O
0051420 N T ) \r
0051440
*
0051520 ( F O N T C R E A T
0051540 E ( Q U O T E G A C H A ) \r
0051560
*
0051660 1 0 ) \r
0051700
*
0051760 (
0052000 Q U O T E B R E A K P A G E F
0052020 I L E N A M E ) \r
0052040
*
0052120 B R E A K
0052140 P A G E T I T L E ) ) ) \r
0052160
*
0052220 ( Q U O T E ( A N D
0052240 R E S E T S T A T E ( D E L
0052260 F I L E ( C L O S E F ? O L
0052300 D V A L U E ] \r
0052320
*
0052400 006 003 ( * S o w e
0052420 c l o s e a n d d e l e t e
0052440 t h e f i l e i n \r 006 001
0052460
*
0052540 006 003 c
0052560 a s e o f t r o u b l e . )
0052600 006 001 \r
0052620 ( S
0052640 T R E A M P R O P P R S T R E
0052660 A M ( Q U O T E F O R M A T
0052700 T I N G S T A T E ) \r
0052720
0052740 F O R
0052760 M A T T I N G S T A T E )
0053000 006 003 ( * S o
0053020 t h a t s u b s i d i a r y
0053040 p e o p l e c a n f i n d
0053060 \r 006 001
0053100
*
0053160 006 003 o u t t h e s t a t e
0053200 o f t h e f o r m a t t i n
0053220 g . ) 006 001 \r
0053240
0053260 ( D S P R I G H T M A R G I N
0053300 6 5 5 3 5 P R S T R E A M )
0053320 \r
0053340 ( 006 002 w
0053360 h i l e 006 001 ( I L E Q ( 006 002
0053400 f e t c h 006 001 C H N O 006 002 o
0053420 f 006 001 F O R M A T T I N G S T
0053440 A T E ) \r
0053460
0053500 T E X
0053520 T L E N ) \r
0053540
0053560 006 002 d o 006 001 ( 006 002 f o
0053600 r 006 001 R E G I O N 006 002 i n s
0053620 i d e 006 001 P A G E F R A M E S
0053640 \r
0053660
0053700 006 002 d o 006 001 ( 006 002 T
0053720 E D I T . F O R M A T B O X 006 001
0053740 T E X T O B J P R S T R E A
0053760 M ( 006 002 f e t c h 006 001 C H N
0054000 O 006 002 o f 006 001 \r
0054020
*
0054140 F O R M A T T I N G S T A T E \r
0054160
*
0054300 ) \r
0054320
*
0054360 R E G I O N F O R M A T T I N
0054400 G S T A T E I M A G E T Y P E
0054420 ) ) ) \r
0054440 [
0054460 C O N D \r
0054500
0054520 ( ( N O T W A S O P E N
0054540 )
0054560 006 003 ( * O n l y i f w
0054600 e c r e a t e d t h e i m
0054620 a g e s t r e a m \r 006 001
0054640
*
0054720 006 003 s h o
0054740 u l d w e c l o s e i t .
0054760 ) 006 001 \r
0055000
0055020 ( S E T Q P R S T R E A
0055040 M ( C L O S E F P R S T R E
0055060 A M ) ) \r
0055100
0055120 ( O R D O N T S E N D
0055140 ( S E N D . F I L E . T O . P
0055160 R I N T E R P R S T R E A M
0055200 S E R V E R \r
0055220
*
0055260 ( A P P E N
0055300 D P R I N T O P T I O N S (
0055320 L I S T ( Q U O T E D O C U
0055340 M E N T . N A M E ) \r
0055360
*
0055460 B R E A K P A
0055500 G E T I T L E ] \r
0055520
0055540 ( O R F I L E ( D E
0055560 L F I L E S C R A T C H F I L
0055600 E ) ) ) \r
0055620 ( T E D I T .
0055640 P R O M P T P R I N T T E X T
0055660 O B J ( C O N C A T ( M K S
0055700 T R I N G ( 006 002 f e t c h 006 001
0055720 ( P A G E F O R M A T T I N G
0055740 S T A T E \r
0055760
*
0056060 P A G E C O U N T )
0056100 \r
0056120
*
0056200 006 002 o f 006 001 F O R M
0056220 A T T I N G S T A T E ) ) \r
0056240
*
0056320 " p g d o n e . " ] )
0056340 \r \r ( 006 004 T E D I T . F O R M A
0056360 T B O X 006 001 \r [ L A M B D A
0056400 ( T E X T O B J P R S T R E
0056420 A M C H # R E G I O N F O
0056440 R M A T T I N G S T A T E S E
0056460 R V E R T Y P E ) 006 003 006 001 \r
0056500
*
0056560 006 003 ( *
0056600 j d s " 3 - A p r - 8 6 1
0056620 4 : 1 3 " ) 006 001 \r
0056640 \r 006 003
0056660 ( * G r a b t e x t f r o
0056700 m t h e T E X T O B J , s
0056720 t a r t i n g w i t h C H #
0056740 , a n d u s e i t t o
0056760 f i l l R E G I O N o n \r
0057000 006 001 006 003 a
0057020 p a g e . R e t u r n a l
0057040 i s t o f l i n e d e s c
0057060 r i p t o r s w h i c h , t
0057100 a k e n t o g e t h e r , f
0057120 i l l t h e \r 006 001
0057140 006 003 r e g i o n . ) 006
0057160 001 \r \r ( P R O G ( ( R
0057200 E G I O N S P E C ( 006 002 f e t
0057220 c h 006 001 ( P A G E R E G I O N
0057240 R E G I O N S P E C ) 006 002 o
0057260 f 006 001 R E G I O N ) ) \r
0057300 ( T E X T L E N
0057320 ( 006 002 f e t c h 006 001 T E X T
0057340 L E N 006 002 o f 006 001 T E X T O
0057360 B J ) ) \r
0057400 C H N O N C H N O L I N E S
0057420 S U B R E G I O N S P E C ) \r
0057440 ( S E L E C
0057460 T Q ( 006 002 f e t c h 006 001 R E
0057500 G I O N F I L L M E T H O D 006
0057520 002 o f 006 001 R E G I O N ) \r
0057540 ( T E X
0057560 T
0057600
0057620 006 003 ( *
0057640 A n o r m a l t e x t r e
0057660 g i o n . \r 006 001
0057700
*
0057760 006 003 F i l l i t w
0060000 i t h t e x t f o r m a t t
0060020 e d t h e u s u a l \r 006 001
0060040
*
0060120 006 003 w
0060140 a y . ) 006 001 \r
0060160 [ C O N D
0060200 \r
0060220 ( ( 006 002 \ T E D
0060240 I T . F O R M A T . F O U N D B
0060260 O X ? 006 001 R E G I O N F O R
0060300 M A T T I N G S T A T E ) \r
0060320
*
0060400 006 003 ( *
0060420 O n l y f o r m a t i f w
0060440 e ' r e n o t l o o k i n g
0060460 \r 006 001
0060500
*
0060560 006 003 f o r s o m e t h i n g
0060600 e l s e . ) 006 001 \r
0060620
0060640 ( S E T Q L I N E S ( 006
0060660 002 T E D I T . F O R M A T T E X
0060700 T B O X 006 001 T E X T O B J P
0060720 R S T R E A M C H # R E G I
0060740 O N F O R M A T T I N G S T A
0060760 T E ] ) \r
0061000 ( F O L I O
0061020
*
0061060 006 003 ( * A P a g e N u
0061100 m b e r . F i l l i t i n
0061120 a c c o r d i n g \r 006 001
0061140
*
0061220 006 003 t o
0061240 t h e i n s t r u c t i o n s
0061260 ) 006 001 \r
0061300 [ C O N D \r
0061320
0061340 ( ( 006 002 \ T E D I
0061360 T . F O R M A T . F O U N D B O
0061400 X ? 006 001 R E G I O N F O R M
0061420 A T T I N G S T A T E ) \r
0061440
*
0061520 006 003 ( * O
0061540 n l y f o r m a t i f w e
0061560 ' r e n o t l o o k i n g
0061600 \r 006 001
0061620
*
0061700 006 003 f o r s o m e t h i n g
0061720 e l s e . ) 006 001 \r
0061740
0061760 ( S E T Q L I N E S ( 006
0062000 002 T E D I T . F O R M A T F O L
0062020 I O 006 001 T E X T O B J P R S
0062040 T R E A M F O R M A T T I N G
0062060 S T A T E R E G I O N ] ) \r
0062100 ( H E
0062120 A D I N G
0062140
0062160 006 003 ( *
0062200 A P a g e h e a d i n g .
0062220 F i l l i t i n f r o m
0062240 a \r 006 001
0062260
*
0062340 006 003 t e x t s o u r c e
0062360 w e s a v e d f o r t h
0062400 e o c c a s i o n . ) 006 001 \r
0062420
0062440 [ C O N D \r
0062460
0062500 ( ( 006 002 \ T E D I T
0062520 . F O R M A T . F O U N D B O X
0062540 ? 006 001 R E G I O N F O R M A
0062560 T T I N G S T A T E ) \r
0062600
*
0062660 006 003 ( * O n
0062700 l y f o r m a t i f w e '
0062720 r e n o t l o o k i n g \r
0062740 006 001
0062760
*
0063020 006
0063040 003 f o r s o m e t h i n g e
0063060 l s e . ) 006 001 \r
0063100
0063120 ( S E T Q L I N E S (
0063140 006 002 T E D I T . F O R M A T H E
0063160 A D I N G 006 001 T E X T O B J
0063200 P R S T R E A M F O R M A T T
0063220 I N G S T A T E R E G I O N ]
0063240 ) \r
0063260 ( P A G E
0063300
0063320 006
0063340 003 ( * T h i s b o x i s
0063360 r e a l l y a P A G E F R
0063400 A M E . \r 006 001
0063420
*
0063500 006 003 F i l l i t i n
0063520 a n d d o w h a t e v e r
0063540 o t h e r \r 006 001
0063560
*
0063640 006 003 p r o c e s s
0063660 i n g i s n e e d f u l f
0063700 o r e n d o f p a g e . )
0063720 006 001 \r
0063740 ( S E T Q L I N
0063760 E S N I L )
0064000
0064020 006 003 ( * T h i s w i l l s
0064040 e n d a l o n g i t s o w
0064060 n l i n e s \r 006 001
0064100
*
0064160 006 003 t o t h e
0064200 p r i n t e r . ) 006 001 \r
0064220
0064240 ( 006 002 \ T E D I T . F O R M A
0064260 T . F O U N D B O X ? 006 001 R E
0064300 G I O N F O R M A T T I N G S
0064320 T A T E ) \r
0064340
*
0064420 006 003 ( * S o t h a t
0064440 i f t h i s i s t h e b
0064460 o x h e ' s \r 006 001
0064500
*
0064560 006 003 l o o k i n
0064600 g f o r , w e ' l l s p o
0064620 t i t a n d s t o p \r 006
0064640 001
0064660
*
0064720 006 003
0064740 s e a r c h i n g ) 006 001 \r
0064760
0065000 ( 006 002 T E D I T . F O R M A T
0065020 P A G E 006 001 T E X T O B J P
0065040 R S T R E A M C H # R E G I
0065060 O N F O R M A T T I N G S T A
0065100 T E ) ) \r
0065120 ( ( R E C U R S I V E S
0065140 E Q U E N C E A L T E R N A T
0065160 E S E L E C T I O N R E P E
0065200 A T ) \r
0065220
*
0065300 006 003 ( * T h i s b o x
0065320 i s r e a l l y a l i s t
0065340 o f b o x e s . \r 006 001
0065360
*
0065440 006 003 F i l l
0065460 t h e m . ) 006 001 \r
0065500 ( 006 002
0065520 \ T E D I T . F O R M A T . F O
0065540 U N D B O X ? 006 001 R E G I O N
0065560 F O R M A T T I N G S T A T E
0065600 ) \r
0065620
*
0065660 006
0065700 003 ( * S o t h a t i f t
0065720 h i s i s t h e b o x h
0065740 e ' s \r 006 001
0065760
*
0066040 006 003 l o o k i n g f o
0066060 r , w e ' l l s p o t i t
0066100 a n d s t o p \r 006 001
0066120
*
0066200 006 003 s e a r
0066220 c h i n g ) 006 001 \r
0066240 ( S E L
0066260 E C T Q ( 006 002 f e t c h 006 001
0066300 R E G I O N F I L L M E T H O D
0066320 006 002 o f 006 001 R E G I O N ) \r
0066340
0066360 ( ( S E Q U E N C
0066400 E R E C U R S I V E ) \r
0066420
*
0066500 006 003 ( *
0066520 J u s t r u n t h r u f i
0066540 l l i n g i n t h e \r 006 001
0066560
*
0066640 006 003 s
0066660 u b - b o x e s i n o r d e
0066700 r . ) 006 001 \r
0066720
0066740 ( 006 002 b i n d 006 001 S U B R
0066760 E G I O N S P E C 006 002 f o r 006
0067000 001 S U B R E G I O N 006 002 i n
0067020 006 001 ( 006 002 f e t c h 006 001 ( P
0067040 A G E R E G I O N R E G I O N
0067060 S U B B O X E S ) \r
0067100
*
0067160 006 002
0067200 o f 006 001 R E G I O N ) \r
0067220
0067240 006 002 w h
0067260 i l e 006 001 ( I L E Q ( 006 002 f
0067300 e t c h 006 001 ( P A G E F O R M
0067320 A T T I N G S T A T E C H N O
0067340 ) 006 002 o f 006 001 F O R M A T T
0067360 I N G S T A T E ) \r
0067400
*
0067440 T E X T L E N ) \r
0067460
0067500 006 002 d
0067520 o 006 001 [ S E T Q S U B R E G
0067540 I O N S P E C ( 006 002 c r e a t
0067560 e 006 001 R E G I O N \r
0067600
*
0067660 006 002 u s i n g 006 001 ( 006
0067700 002 f e t c h 006 001 R E G I O N S
0067720 P E C 006 002 o f 006 001 S U B R E
0067740 G I O N ) \r
0067760
*
0070040 L E F T _ ( I P L U
0070060 S ( 006 002 f e t c h 006 001 L E F
0070100 T \r
0070120
*
0070220 006 002 o f 006 001 ( 006 002 f e t c h
0070240 006 001 R E G I O N S P E C \r
0070260
*
0070400 006 002 o f 006 001 S U B R E G
0070420 I O N ) ) \r
0070440
*
0070540 ( 006 002 f e t c h 006 001 L E F
0070560 T 006 002 o f 006 001 R E G I O N S
0070600 P E C \r
0070620
*
0070720 ) ) \r
0070740
*
0071020 B O T T O M
0071040 _ ( I P L U S ( 006 002 f e t c h
0071060 006 001 B O T T O M \r
0071100
*
0071200 006 002 o f 006
0071220 001 ( 006 002 f e t c h 006 001 R E G
0071240 I O N S P E C \r
0071260
*
0071360 006
0071400 002 o f 006 001 S U B R E G I O N )
0071420 ) \r
0071440
*
0071540 ( 006 002 f e t c h 006 001 B O T T O
0071560 M \r
0071600
*
0071700 006 002 o f 006 001 R E G I O N
0071720 S P E C ] \r
0071740
0071760 ( 006 002 T E D I T
0072000 . F O R M A T B O X 006 001 T E X
0072020 T O B J P R S T R E A M ( 006
0072040 002 f e t c h 006 001 ( P A G E F O
0072060 R M A T T I N G S T A T E \r
0072100
*
0072200 C H N O )
0072220 006 002 o f 006 001 F O R M A T T I N
0072240 G S T A T E ) \r
0072260
*
0072320 ( 006 002 c r e a t e 006 001 P A G
0072340 E R E G I O N 006 002 u s i n g 006
0072360 001 S U B R E G I O N R E G I
0072400 O N S P E C _ \r
0072420
*
0072500 S U B R
0072520 E G I O N S P E C ) \r
0072540
*
0072600 F O R M A T T I N G S T
0072620 A T E ) ) ) \r
0072640 ( A
0072660 L T E R N A T E
0072700
0072720 006 003 ( * R u n t h r
0072740 o u g h t h e s u b - b o x
0072760 e s \r 006 001
0073000
*
0073060 006 003 r e p e a t e d l y
0073100 i n s e q u e n c e . ) 006 001 \r
0073120
*
0073160 ( 006 002 w h i l e 006 001 ( I L
0073200 E Q ( 006 002 f e t c h 006 001 ( P
0073220 A G E F O R M A T T I N G S T A
0073240 T E C H N O ) 006 002 o f 006 001
0073260 F O R M A T T I N G S T A T E )
0073300 \r
0073320
*
0073360 T E X T L E N ) \r
0073400
0073420 006 002
0073440 d o 006 001 ( 006 002 b i n d 006 001 S
0073460 U B R E G I O N S P E C 006 002 f
0073500 o r 006 001 S U B R E G I O N \r
0073520
*
0073560 006 002 i n 006 001
0073600 ( 006 002 f e t c h 006 001 ( P A G
0073620 E R E G I O N R E G I O N S U
0073640 B B O X E S ) 006 002 o f 006 001 R
0073660 E G I O N ) \r
0073700
*
0073740 006 002 w h i l e 006 001 ( I L E
0073760 Q ( 006 002 f e t c h 006 001 ( P A
0074000 G E F O R M A T T I N G S T A T
0074020 E C H N O ) 006 002 o f 006 001 \r
0074040
*
0074160 F O R M A T T I N G
0074200 S T A T E \r
0074220
*
0074300 ) \r
0074320
*
0074360 T E X
0074400 T L E N ) \r
0074420
*
0074460 006 002 d o 006 001 [ S E T Q S U
0074500 B R E G I O N S P E C \r
0074520
*
0074560 ( 006 002 c r
0074600 e a t e 006 001 R E G I O N \r
0074620
*
0074700 006 002 u s i n g 006 001 ( 006 002 f e t
0074720 c h 006 001 R E G I O N S P E C
0074740 006 002 o f 006 001 S U B R E G I O N
0074760 ) \r
0075000
*
0075040 L E F T _
0075060 ( I P L U S ( 006 002 f e t c h 006
0075100 001 L E F T \r
0075120
*
0075200 006
0075220 002 o f 006 001 ( 006 002 f e t c h 006 001
0075240 R E G I O N S P E C \r
0075260
*
0075360 006 002 o f 006 001
0075400 S U B R E G I O N ) ) \r
0075420
*
0075520 ( 006 002 f e t c h 006 001 L E F
0075540 T 006 002 o f 006 001 R E G I O N S
0075560 P E C ) ) \r
0075600
*
0075640 B O
0075660 T T O M _ ( I P L U S ( 006 002
0075700 f e t c h 006 001 B O T T O M \r
0075720
*
0076020 006 002 o f 006 001
0076040 ( 006 002 f e t c h 006 001 R E G I O
0076060 N S P E C \r
0076100
*
0076200 006 002 o f 006 001 S U B
0076220 R E G I O N ) ) \r
0076240
*
0076340 ( 006 002 f e t c h 006 001 B O T T O
0076360 M 006 002 o f 006 001 R E G I O N S
0076400 P E C ] \r
0076420
*
0076460 ( 006 002 T E D I T . F O R M
0076500 A T B O X 006 001 T E X T O B J
0076520 P R S T R E A M ( 006 002 f e t c
0076540 h 006 001 ( \r
0076560
*
0076660 P A G E F O R M
0076700 A T T I N G S T A T E \r
0076720
*
0077040 C H N O ) \r
0077060
*
0077160 006 002 o
0077200 f 006 001 F O R M A T T I N G S T
0077220 A T E \r
0077240
*
0077340 ) \r
0077360
*
0077440 ( 006 002 c r e a t e 006 001 P A
0077460 G E R E G I O N 006 002 u s i n g
0077500 006 001 S U B R E G I O N R E G
0077520 I O N S P E C _ \r
0077540
*
0077640 S U B R E G I
0077660 O N S P E C ) \r
0077700
*
0077740 F O R
0077760 M A T T I N G S T A T E ) ) ) )
0100000 \r
0100020 ( S E L E C T I
0100040 O N
0100060 006 003
0100100 ( * D o o n e o r a n o
0100120 t h e r b o x , d e p e n d
0100140 i n g o n \r 006 001
0100160
*
0100240 006 003 s o m e c r
0100260 i t e r i o n . ) 006 001 ) \r
0100300
0100320 ( S H O U L D N T ) )
0100340
0100360 006 003 ( * F
0100400 o r n o w , d r a w a b
0100420 o x a r o u n d i t , t o
0100440 o . ) 006 001 \r
0100460 ) \r
0100500 N I L ) \r
0100520 ( 006 002 f o r 006 001
0100540 L I N E 006 002 i n 006 001 L I N
0100560 E S 006 002 w h e n 006 001 L I N E
0100600 006 002 d o 006 001
0100620 006 003 ( *
0100640 R u n t h r u t h e l i n
0100660 e s d i s p l a y i n g t h
0100700 e m \r 006 001
0100720
*
0101000 006 003 a l l . ) 006 001 \r
0101020
*
0101060 ( B L O C K ) \r
0101100
*
0101140 ( C O N D \r
0101160
*
0101220 ( ( O R
0101240 ( N O T ( 006 002 f e t c h 006 001
0101260 ( P A G E F O R M A T T I N G
0101300 S T A T E M I N P A G E # ) \r
0101320
*
0101400 006 002 o f 006 001
0101420 F O R M A T T I N G S T A T E
0101440 ) ) \r
0101460
*
0101520 ( I G E Q ( 006 002 f e
0101540 t c h 006 001 ( P A G E F O R M A
0101560 T T I N G S T A T E P A G E #
0101600 ) \r
0101620
*
0101660 006 002 o
0101700 f 006 001 F O R M A T T I N G S T
0101720 A T E ) \r
0101740
*
0102000 ( 006 002
0102020 f e t c h 006 001 ( P A G E F O R
0102040 M A T T I N G S T A T E M I N
0102060 P A G E # ) \r
0102100
*
0102160 006 002 o f 006 001 F O R M A T T
0102200 I N G S T A T E ) ) ) \r
0102220
*
0102300 006 003 ( * W e
0102320 ' r e b e y o n d t h e m
0102340 i n p a g e n u m b e r -
0102360 - \r 006 001
0102400
*
0102460 006 003 g o a h e a d a n d
0102500 p r i n t t h e l i n e ) 006
0102520 001 \r
0102540
*
0102600 ( \ T E D I T . H A R D C O P Y
0102620 . D I S P L A Y L I N E ( 006 002
0102640 f e t c h 006 001 ( T E X T S T R
0102660 E A M T E X T O B J \r
0102700
*
0103020 ) \r
0103040
*
0103140 006 002 o f 006 001 ( 006 002 f
0103160 e t c h 006 001 L T E X T O B J \r
0103200
*
0103320 006 002 o f 006 001 L I N E )
0103340 ) \r
0103360
*
0103420 L I N E \r
0103440
*
0103520 ( 006 002 f e t c h 006 001 C A C H
0103540 E 006 002 o f 006 001 L I N E ) \r
0103560
*
0103640 R E G I O N P R S T R
0103660 E A M ) ) ) \r
0103700
*
0103740 [ C O N D \r
0103760
*
0104020 ( ( E Q T E X T O B J
0104040 ( 006 002 f e t c h 006 001 ( T E X
0104060 T S T R E A M T E X T O B J )
0104100 \r
0104120
*
0104160 006 002
0104200 o f 006 001 ( 006 002 f e t c h 006 001
0104220 L T E X T O B J 006 002 o f 006 001
0104240 L I N E ) ) ) \r
0104260
*
0104340 006 003 ( * T h i s l
0104360 i n e r e f e r s b a c k
0104400 t o t h e m a i n \r 006 001
0104420
*
0104500 006 003 t e
0104520 x t , s o u p d a t e t h
0104540 e c u r r e n t - c h a r \r
0104560 006 001
0104600
*
0104640 006
0104660 003 p o i n t e r . ) 006 001 \r
0104700
*
0104740 ( S E T Q
0104760 C H N O ( A D D 1 ( 006 002 f
0105000 e t c h 006 001 C H A R L I M 006
0105020 002 o f 006 001 L I N E ] \r
0105040
*
0105100 ( 006 002 p u s h 006 001
0105120 ( 006 002 f e t c h 006 001 ( P A G E
0105140 F O R M A T T I N G S T A T E
0105160 P A G E L I N E C A C H E ) \r
0105200
*
0105260 006 002 o f 006 001 F O R M A T T
0105300 I N G S T A T E ) \r
0105320
*
0105360 L I N E ) \r
0105400
*
0105440 ( 006 002 r e p
0105460 l a c e 006 001 L T E X T O B J
0105500 006 002 o f 006 001 L I N E 006 002 w i
0105520 t h 006 001 N I L ) ) \r
0105540 ( C O N D \r
0105560 ( C H N O ( 006
0105600 002 r e p l a c e 006 001 ( P A G E
0105620 F O R M A T T I N G S T A T E
0105640 C H N O ) 006 002 o f 006 001 F O R
0105660 M A T T I N G S T A T E 006 002 w
0105700 i t h 006 001 C H N O ] ) \r \r ( T
0105720 E D I T . F O R M A T H E A D I
0105740 N G \r [ L A M B D A ( T E
0105760 X T O B J P R S T R E A M F
0106000 O R M A T T I N G S T A T E P
0106020 A G E R E G I O N )
0106040 ( *
0106060 j d s \r
0106100
*
0106200 " 1 - M a r - 8 5 1 5 : 3
0106220 1 " ) \r
0106240 \r ( *
0106260 G r a b t e x t f r o m t
0106300 h e T E X T O B J , s t a r
0106320 t i n g w i t h C H # , a
0106340 n d u s e i t t o f i l
0106360 l \r R
0106400 E G I O N o n a p a g e .
0106420 R e t u r n a l i s t o
0106440 f l i n e d e s c r i p t o
0106460 r s w h i c h , t a k e n
0106500 t o g e t h e r , \r
0106520 f i l l t h e
0106540 r e g i o n . ) \r \r ( P
0106560 R O G ( ( C H N O 1 ) \r
0106600 [ R E G I O N
0106620 ( f o r V A L U E i n (
0106640 f e t c h ( P A G E R E G I O
0106660 N R E G I O N S P E C ) o f
0106700 P A G E R E G I O N ) \r
0106720
0106740 c o l l e c t ( F I X R
0106760 ( F T I M E S ( D S P S C A
0107000 L E N I L P R S T R E A M )
0107020 \r
0107040
0107060 V A L U
0107100 E ] \r ( L
0107120 O C A L I N F O ( f e t c h
0107140 ( P A G E R E G I O N R E G I
0107160 O N L O C A L I N F O ) o f
0107200 P A G E R E G I O N ) ) \r
0107220 H E A D I N G S
0107240 T R E A M H E A D I N G T E X
0107260 T O B J P R E C O N D I T I O
0107300 N S T E X T L E N T H I S L
0107320 I N E L I N E Y B O T ( F
0107340 O R C E N E X T P A G E \r
0107360
*
0107460 N
0107500 I L ) \r L
0107520 I N E S H E A D I N G ) \r
0107540 [ C O N D \r
0107560 ( ( S E T
0107600 Q P R E C O N D I T I O N S
0107620 ( L I S T G E T L O C A L I N
0107640 F O ( Q U O T E P R E C O N
0107660 D I T I O N S ) ) ) \r
0107700
*
0110000 ( * T h e r e a
0110020 r e \r
0110040
*
0110120 p
0110140 r e c o n d i t i o n s f o r
0110160 t h i s \r
0110200
*
0110300 h e a d i n g t o a p p
0110320 e a r . \r
0110340
*
0110440 C h e c k t h e m . ) \r
0110460 ( C O N D
0110500 \r
0110520 ( ( f o r F O R M i n s
0110540 i d e P R E C O N D I T I O N
0110560 S t h e r e i s ( N O T (
0110600 E V A L F O R M ) ) ) ( * O
0110620 n e o f t h e \r
0110640
*
0110740 p r e d i c a t e s
0110760 r e t u r n e d \r
0111000
*
0111100 N I L , s o d o
0111120 n ' t d i s p l a y \r
0111140
*
0111240 t h i s h e a
0111260 d i n g . ) \r
0111300 ( R E T U R N
0111320 ] \r ( C O N
0111340 D \r (
0111360 [ N O T ( S E T Q H E A D I
0111400 N G ( L I S T G E T ( f e t
0111420 c h P A G E H E A D I N G S
0111440 o f F O R M A T T I N G S T A
0111460 T E ) \r
0111500
0111520 ( L I S
0111540 T G E T L O C A L I N F O (
0111560 Q U O T E H E A D I N G T Y P
0111600 E ] \r
0111620
*
0111700 ( *
0111720 T h e r e ' s n o t e x t
0111740 f o r \r
0111760
*
0112060 t h i s h e a d i n g . \r
0112100
*
0112200 P u n t . )
0112220 \r (
0112240 R E T U R N ) ) ) \r
0112260 [ S E T Q H E A D I N
0112300 G T E X T O B J ( f e t c h
0112320 ( T E X T S T R E A M T E X T
0112340 O B J ) o f ( S E T Q H E
0112360 A D I N G S T R E A M \r
0112400
*
0112460 ( O P E N
0112500 T E X T S T R E A M \r
0112520
*
0112600 " " N I
0112620 L N I L N I L \r
0112640
*
0112720 ( L I S T
0112740 ( Q U O T E P A R A L O O K S
0112760 ) \r
0113000
*
0113060 ( f e t c h P
0113100 P A R A L O O K S \r
0113120
*
0113220 o f ( C A R H E A D I
0113240 N G ] \r ( \
0113260 T E D I T . I N S E R T . P I E
0113300 C E S H E A D I N G T E X T O
0113320 B J 1 H E A D I N G ) \r
0113340 ( f o r P C
0113360 i n H E A D I N G d o ( a
0113400 d d ( f e t c h T E X T L E
0113420 N o f H E A D I N G T E X T
0113440 O B J ) \r
0113460
0113500 ( f e t c h
0113520 P L E N o f P C ) ) ) \r
0113540 ( S E T Q T
0113560 E X T L E N ( f e t c h T E
0113600 X T L E N o f H E A D I N G
0113620 T E X T O B J ) ) \r
0113640 ( S E T Q L I N E S
0113660 ( w h i l e ( A N D ( I L E
0113700 S S P C H N O T E X T L E N
0113720 ) \r
0113740
0113760 ( N O T F O R C E N E
0114000 X T P A G E ) ) \r
0114020
0114040 c o l l e c t ( S E T Q
0114060 T H I S L I N E ( c r e a t e
0114100 T H I S L I N E ) ) \r
0114120
0114140 ( S E T Q
0114160 F O R C E N E X T P A G E (
0114200 \ T E D I T . H A R D C O P Y .
0114220 F O R M A T L I N E H E A D I
0114240 N G T E X T O B J \r
0114260
*
0114340 ( f e t c h W I D T H
0114360 o f R E G I O N ) \r
0114400
*
0114460 C H N O T H I S L
0114500 I N E ( S E T Q L I N E (
0114520 c r e a t e \r
0114540
*
0114640 L
0114660 I N E D E S C R I P T O R \r
0114700
*
0115020 ) ) \r
0115040
*
0115120 P R S T R E A M T )
0115140 ) \r
0115160
0115200 ( r e p l a c e C A C H E
0115220 o f L I N E w i t h T H I
0115240 S L I N E ) ( *
0115260 M a r k t h i s l i n e a
0115300 s \r
0115320
*
0115400 h a
0115420 v i n g c a c h e d p r i n
0115440 t \r
0115460
*
0115540 i n
0115560 f o . ) \r
0115600
0115620 ( r e p l a c e L T E
0115640 X T O B J o f L I N E w i
0115660 t h H E A D I N G S T R E A M
0115700 ) \r
0115720
*
0116000 ( *
0116020 A n d r e m e m b e r t h
0116040 e \r
0116060
*
0116140 d o
0116160 c u m e n t i t c a m e f
0116200 r o m . ) \r
0116220
0116240 ( a d d ( f e t c h
0116260 L E F T M A R G I N o f L
0116300 I N E ) \r
0116320
0116340 ( f e t c h
0116360 L E F T o f R E G I O N ) )
0116400
0116420 ( * F o r m a t t h e n e
0116440 x t \r
0116460
*
0116540 p
0116560 o s s i b l e l i n e ) \r
0116600
0116620 [ C O
0116640 N D \r
0116660
0116700 [ Y B O T
0116720
0116740 ( *
0116760 W e ' r e i n t o i t ; \r
0117000
*
0117100 t a k e
0117120 a c c o u n t o f t h i s
0117140 \r
0117160
*
0117240 l i n e
0117260 ' s h e i g h t ) \r
0117300
*
0117340 ( S E T Q Y B O T ( I
0117360 D I F F E R E N C E Y B O T
0117400 ( f e t c h L H E I G H T o
0117420 f L I N E ] \r
0117440
0117460 ( T
0117500
*
0117540 ( * J u s t s t a r t
0117560 i n g o u t ; \r
0117600
*
0117700 f i n d t h e l i n
0117720 e ' s \r
0117740
*
0120040 p o s i t i o n w i t h r e
0120060 s p e c t \r
0120100
*
0120200 t o t h e t o p o f
0120220 t h e \r
0120240
*
0120340 r e g i o n t o b e f i l
0120360 l e d . ) \r
0120400
0120420 ( S E T Q
0120440 Y B O T ( I D I F F E R E N
0120460 C E ( f e t c h B O T T O M
0120500 o f R E G I O N ) \r
0120520
*
0120600 ( f e t c h D E S C E N
0120620 T o f L I N E ] \r
0120640
*
0120740 ( * T h i s l
0120760 i n e i s g o o d ; \r
0121000
*
0121100 u s e i t . )
0121120 \r
0121140
0121160 ( r e p l a c e Y B O T o f
0121200 L I N E w i t h Y B O T )
0121220 \r
0121240
0121260 ( r e p l a c e Y B A S E o
0121300 f L I N E w i t h ( I P L
0121320 U S Y B O T ( f e t c h D
0121340 E S C E N T o f L I N E ) )
0121360 ) \r
0121400
0121420 ( S E T Q C H N O ( A D D
0121440 1 ( f e t c h C H A R L I M
0121460 o f L I N E ) ) ) ( *
0121500 K e e p t r a c k o f t h
0121520 e \r
0121540
*
0121620 n e
0121640 x t c h a r a c t e r . . . )
0121660 \r
0121700
0121720 L I N E ) ) \r
0121740 ( R E T U R N L I N E S ] )
0121760 \r \r ( 006 004 T E D I T . F O R M A
0122000 T P A G E 006 001 \r [ L A M B D
0122020 A ( T E X T O B J P R S T R
0122040 E A M C H # R E G I O N F
0122060 O R M A T T I N G S T A T E ) 006
0122100 003 006 001
0122120 006 003 ( * j d s \r
0122140
*
0122240 " 1 7 - F e b -
0122260 8 6 1 6 : 1 8 " ) 006 001 \r
0122300
*
0122400 006 003 ( * S e n
0122420 d t h e t e x t t o \r
0122440
*
0122540 t h e p r
0122560 i n t e r . ) 006 001 \r ( P
0122600 R O G ( ( F O R C E N E X T P
0122620 A G E N I L ) \r
0122640 ( C H N O C H # ) \r
0122660 ( P A G E #
0122700 ( 006 002 f e t c h 006 001 ( P A G
0122720 E F O R M A T T I N G S T A T E
0122740 P A G E # ) 006 002 o f 006 001 F
0122760 O R M A T T I N G S T A T E ) )
0123000 \r ( P A G
0123020 E P R O P S ( 006 002 f e t c h 006
0123040 001 ( P A G E R E G I O N R E
0123060 G I O N L O C A L I N F O ) 006
0123100 002 o f 006 001 R E G I O N ) ) \r
0123120 T E X T L E
0123140 N T H I S L I N E L I N E
0123160 L I N E S N C H N O T P A G
0123200 E ) \r ( S E
0123220 T Q T E X T L E N ( 006 002 f e
0123240 t c h 006 001 T E X T L E N 006 002
0123260 o f 006 001 T E X T O B J ) ) \r
0123300 ( S E T Q T
0123320 H I S L I N E ( 006 002 f e t c h
0123340 006 001 T H I S L I N E 006 002 o f
0123360 006 001 T E X T O B J ) )
0123400 006 003 ( * P
0123420 r i n t i n t h e u s u a
0123440 l \r
0123460
*
0123540 r e
0123560 g i o n o n t h e p a g e
0123600 ) 006 001 \r ( C
0123620 O N D \r
0123640 ( P A G E #
0123660
*
0123720 006
0123740 003 ( * I F w e ' v e a l r
0123760 e a d y \r
0124000
*
0124100 g o t a s t a r t i n g
0124120 p a g e \r
0124140
*
0124240 n u m b e r , d o n ' t s
0124260 e t \r
0124300
*
0124360 a
0124400 n o t h e r o n e ) 006 001 ) \r
0124420 ( ( S E
0124440 T Q T P A G E ( L I S T G E
0124460 T P A G E P R O P S ( Q U O
0124500 T E S T A R T I N G P A G E #
0124520 ) ) ) 006 003 ( * I
0124540 f t h i s p a g e \r
0124560
*
0124660 t e m p l a t e
0124700 s p e c i f i e s a \r
0124720
*
0125020 s t a r t i n
0125040 g p a g e n u m b e r , \r
0125060
*
0125160 u s e i
0125200 t . ) 006 001 \r
0125220 ( S E T Q P A G E #
0125240 T P A G E ) \r
0125260 ( 006 002 r e p l a c e 006
0125300 001 ( P A G E F O R M A T T I N
0125320 G S T A T E P A G E # ) 006 002
0125340 o f 006 001 F O R M A T T I N G S
0125360 T A T E 006 002 w i t h 006 001 T P
0125400 A G E ) ) \r
0125420 ( T ( S E T Q P A G E
0125440 # 1 ) \r
0125460 ( 006 002 r e p l a c e 006
0125500 001 ( P A G E F O R M A T T I N
0125520 G S T A T E P A G E # ) 006 002
0125540 o f 006 001 F O R M A T T I N G S
0125560 T A T E 006 002 w i t h 006 001 P A
0125600 G E # ) ) ) \r
0125620 ( C O N D \r
0125640 ( ( L I S T G E T P A
0125660 G E P R O P S ( Q U O T E L
0125700 A N D S C A P E ? ) )
0125720
0125740 006 003 ( * T h i s i s a
0125760 \r
0126000
*
0126060 l a n
0126100 d s c a p e p a g e . ) 006 001 \r
0126120 ( D
0126140 S P P U S H S T A T E P R S T
0126160 R E A M ) \r
0126200 ( D S P R O T A T E 9
0126220 0 P R S T R E A M ) \r
0126240 ( D S P T R
0126260 A N S L A T E 0 - 2 1 5 9 0
0126300 P R S T R E A M ) ) ) \r
0126320 [ 006 002 w h i l e 006
0126340 001 [ A N D ( I L E Q C H N
0126360 O T E X T L E N ) \r
0126400
0126420 ( E Q ( Q U O T E
0126440 P A G E H E A D I N G ) \r
0126460
0126500 ( 006 002 f e
0126520 t c h 006 001 F M T P A R A T Y P
0126540 E 006 002 o f 006 001 ( 006 002 f e t c
0126560 h 006 001 P P A R A L O O K S \r
0126600
*
0126660 006 002
0126700 o f 006 001 ( \ C H T O P C C H
0126720 N O \r
0126740
*
0127040 ( 006 002 f e t c h 006 001 P C T B \r
0127060
*
0127200 006 002 o f 006 001 T E X T O B J ] \r
0127220 006 002 d
0127240 o 006 001
0127260
*
0127320 006 003 ( *
0127340 G o t h r u a n y \r
0127360
*
0127460 l e a d i n g
0127500 p a g e h e a d i n g \r
0127520
*
0127620 p a r a s o
0127640 n t h e p a g e . ) 006 001 \r
0127660
0127700 ( \ T E D I T . H A R D C O
0127720 P Y . F O R M A T L I N E T E
0127740 X T O B J 1 C H N O T H I
0127760 S L I N E ( S E T Q L I N E
0130000 ( 006 002 c r e a t e 006 001 \r
0130020
*
0130140 L I N E D E S C R I P
0130160 T O R \r
0130200
*
0130300 ) ) \r
0130320
0130340 P R S T R E
0130360 A M ) \r
0130400 ( S E T Q C H N
0130420 O ( A D D 1 ( 006 002 f e t c h
0130440 006 001 C H A R L I M 006 002 o f 006
0130460 001 L I N E ] \r
0130500 ( 006 002 r e p l a c e 006 001 (
0130520 P A G E F O R M A T T I N G S T
0130540 A T E C H N O ) 006 002 o f 006 001
0130560 F O R M A T T I N G S T A T E
0130600 006 002 w i t h 006 001 C H N O ) \r
0130620 ( 006 002 f o r
0130640 006 001 S U B R E G I O N 006 002 i
0130660 n 006 001 ( 006 002 f e t c h 006 001 (
0130700 P A G E R E G I O N R E G I O
0130720 N S U B B O X E S ) 006 002 o f 006
0130740 001 R E G I O N ) \r
0130760 006 002 w h i l e 006 001
0131000 ( I L E Q ( 006 002 f e t c h 006
0131020 001 ( P A G E F O R M A T T I N
0131040 G S T A T E C H N O ) 006 002 o
0131060 f 006 001 F O R M A T T I N G S T
0131100 A T E ) \r
0131120
0131140 T E X T L E N ) 006 002 d o 006
0131160 001
0131200
0131220 006 003 ( * N o w f o r m a t
0131240 t h e \r
0131260
*
0131360 s u b r e g i o n s o f t h
0131400 e p a g e . ) 006 001 \r
0131420
*
0131460 ( 006 002 T E D I T .
0131500 F O R M A T B O X 006 001 T E X T
0131520 O B J P R S T R E A M ( 006 002
0131540 f e t c h 006 001 \r
0131560
*
0131660 ( \r
0131700
*
0132000 P
0132020 A G E F O R M A T T I N G S T A
0132040 T E \r
0132060
*
0132160 C H N O ) \r
0132200
*
0132320 006 002 o f 006 001 \r
0132340
*
0132460 F O R M A T T I N G S T A T E \r
0132500
*
0132620 ) \r
0132640
*
0132700 S U B R E G I O
0132720 N F O R M A T T I N G S T A T
0132740 E ) ) \r ( C
0132760 O N D \r
0133000 ( ( L I S T G E T P A G E P
0133020 R O P S ( Q U O T E L A N D
0133040 S C A P E ? ) )
0133060 006
0133100 003 ( * T h i s i s a \r
0133120
*
0133220 l a n d s c
0133240 a p e p a g e . ) 006 001 \r
0133260 ( D S P P
0133300 O P S T A T E P R S T R E A M
0133320 ) ) ) \r ( C
0133340 O N D \r
0133360 ( ( A N D ( O R ( N O T
0133400 ( 006 002 f e t c h 006 001 ( P A G E
0133420 F O R M A T T I N G S T A T E
0133440 M I N P A G E # ) 006 002 o f 006 001
0133460 F O R M A T T I N G S T A T E
0133500 ) ) \r
0133520 ( I G E Q
0133540 P A G E # ( 006 002 f e t c h 006 001
0133560 ( P A G E F O R M A T T I N G
0133600 S T A T E M I N P A G E # )
0133620 006 002 o f 006 001 F O R M A T T I N
0133640 G S T A T E ) ) \r
0133660
0133700 ) \r
0133720 ( O R ( N O T ( 006
0133740 002 f e t c h 006 001 ( P A G E F O
0133760 R M A T T I N G S T A T E M A
0134000 X P A G E # ) 006 002 o f 006 001 F
0134020 O R M A T T I N G S T A T E ) )
0134040 \r
0134060 ( I L E S S P
0134100 P A G E # ( 006 002 f e t c h 006 001
0134120 ( P A G E F O R M A T T I N G
0134140 S T A T E M A X P A G E # )
0134160 006 002 o f 006 001 F O R M A T T I N
0134200 G S T A T E \r
0134220
*
0134260 ) ) ) \r
0134300 ( I L E Q
0134320 ( 006 002 f e t c h 006 001 ( P A G E
0134340 F O R M A T T I N G S T A T E
0134360 C H N O ) 006 002 o f 006 001 F O R
0134400 M A T T I N G S T A T E ) \r
0134420
0134440 T E X T L E N ) )
0134460
*
0134520 006 003 ( * T h
0134540 e r e i s m o r e t o \r
0134560
*
0134660 p r i n t
0134700 . . . . ) 006 001 \r
0134720 ( D S P N E W P A G
0134740 E P R S T R E A M )
0134760
*
0135020 006 003 ( * F o r c e t h
0135040 e n e w p a g e ) 006 001 \r
0135060 ) \r
0135100 ( ( A N D
0135120 ( 006 002 f e t c h 006 001 ( P A G
0135140 E F O R M A T T I N G S T A T E
0135160 M A X P A G E # ) 006 002 o f 006
0135200 001 F O R M A T T I N G S T A T
0135220 E ) \r
0135240 ( I G E Q P A G E
0135260 # ( 006 002 f e t c h 006 001 ( P A
0135300 G E F O R M A T T I N G S T A T
0135320 E M A X P A G E # ) 006 002 o f
0135340 006 001 F O R M A T T I N G S T A
0135360 T E ) ) ) \r
0135400
*
0135500 006 003 ( * W e ' v e r u n
0135520 p a s t t h e \r
0135540
*
0135640 l a s t p a g e i
0135660 t w a n t s \r
0135700
*
0136000 f o r m a t t e d . S
0136020 t o p t h e \r
0136040
*
0136140 w o r l d . ) 006 001 \r
0136160 ( 006 002 r
0136200 e p l a c e 006 001 ( P A G E F O
0136220 R M A T T I N G S T A T E C H
0136240 N O ) 006 002 o f 006 001 F O R M A
0136260 T T I N G S T A T E 006 002 w i t
0136300 h 006 001 T E X T L E N ) ) ) \r
0136320 ( 006 002 a d d 006
0136340 001 ( 006 002 f e t c h 006 001 ( P A
0136360 G E F O R M A T T I N G S T A T
0136400 E P A G E # ) 006 002 o f 006 001
0136420 F O R M A T T I N G S T A T E )
0136440 \r
0136460 1 ) \r (
0136500 006 002 a d d 006 001 ( 006 002 f e t c h
0136520 006 001 ( P A G E F O R M A T T I
0136540 N G S T A T E P A G E C O U N
0136560 T ) 006 002 o f 006 001 F O R M A T
0136600 T I N G S T A T E ) \r
0136620 1 ) \r
0136640 ( 006 002 r e p l
0136660 a c e 006 001 ( P A G E F O R M A
0136700 T T I N G S T A T E F I R S T
0136720 P A G E ) 006 002 o f 006 001 F O R
0136740 M A T T I N G S T A T E 006 002 w
0136760 i t h 006 001 N I L ) \r
0137000 ( 006 002 r e p l a c e 006
0137020 001 ( P A G E F O R M A T T I N
0137040 G S T A T E P A G E # T E X T
0137060 ) 006 002 o f 006 001 F O R M A T T
0137100 I N G S T A T E \r
0137120 006 002 w i t h 006 001 (
0137140 006 002 p o p 006 001 ( 006 002 f e t c h
0137160 006 001 ( P A G E F O R M A T T I
0137200 N G S T A T E P A G E # G E N
0137220 E R A T O R ) 006 002 o f 006 001 F
0137240 O R M A T T I N G S T A T E \r
0137260
*
0137320 ] ) \r \r ( 006 004 T E D I
0137340 T . F O R M A T T E X T B O X 006
0137360 001 \r [ L A M B D A ( T E X
0137400 T O B J P R S T R E A M C H
0137420 # P A G E R E G I O N F O R
0137440 M A T T I N G S T A T E ) 006 003 006
0137460 001 006 003 ( * j d s " 1 5 -
0137500 A p r - 8 6 1 1 : 3 1 " ) 006 001
0137520 \r \r
0137540 006 003 ( * G r a b
0137560 t e x t f r o m t h e T E
0137600 X T O B J , s t a r t i n g
0137620 w i t h C H # , a n d u s
0137640 e i t t o f i l l R E G
0137660 I O N o n \r 006 001
0137700 006 003 a p a g e . R e
0137720 t u r n a l i s t o f l
0137740 i n e d e s c r i p t o r s
0137760 w h i c h , t a k e n t o g
0140000 e t h e r , f i l l t h e
0140020 \r 006 001 006 003 r
0140040 e g i o n . ) 006 001 \r \r (
0140060 P R O G * ( ( C H N O C H #
0140100 ) \r [ R
0140120 E G I O N ( 006 002 f o r 006 001 V
0140140 A L U E 006 002 i n 006 001 ( 006 002 f
0140160 e t c h 006 001 ( P A G E R E G I
0140200 O N R E G I O N S P E C ) 006
0140220 002 o f 006 001 P A G E R E G I O N
0140240 ) \r
0140260 006 002 c o l l e
0140300 c t 006 001 ( F I X R ( F T I M
0140320 E S ( D S P S C A L E N I L
0140340 P R S T R E A M ) \r
0140360
*
0140420 V A L U E ] \r
0140440 ( C O L U M
0140460 N B O T T O M ( 006 002 f e t c h
0140500 006 001 B O T T O M 006 002 o f 006 001
0140520 R E G I O N ) ) \r
0140540 ( F I R S T L I N E
0140560 T ) \r
0140600 ( B R E A K A F T E R L A S T P
0140620 A R A N I L ) \r
0140640 ( S T R E A M S C A L
0140660 E ( D S P S C A L E N I L
0140700 P R S T R E A M ) ) \r
0140720 ( F O R C E N E X
0140740 T P A G E N I L ) \r
0140760 ( F O O T N O T E
0141000 L I N E S N I L ) \r
0141020 ( P A G E F O O T
0141040 N O T E S N I L ) \r
0141060 T E X T L E N T
0141100 H I S L I N E L I N E Y B O
0141120 T L I N E S O R P H A N L
0141140 A S T L I N E P R E V L I N E
0141160 L H E I G H T F M T S P E C
0141200 S P E C I A L Y P O S \r
0141220 N E W P A G
0141240 E T Y P E ) \r
0141260 ( S E T Q T E X T L E N
0141300 ( 006 002 f e t c h 006 001 T E X T L
0141320 E N 006 002 o f 006 001 T E X T O B
0141340 J ) ) \r (
0141360 S E T Q F O O T N O T E L I N
0141400 E S ( 006 002 f e t c h 006 001 P A
0141420 G E F O O T N O T E L I N E S
0141440 006 002 o f 006 001 F O R M A T T I N
0141460 G S T A T E ) ) \r
0141500
0141520