$ od -c -N 50000 [eris]<Lisp>JCAI>sources>AOFD.DCOM!1
0000000 ( F I L E C R E A T E D " 3 1
0000020 - M a r - 8 5 2 1 : 3 9 : 3 6
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > S O U R C E S > A O F D . ;
0000120 1 5 ) \r " 1 9 - M a r - 8 5
0000140 1 4 : 3 4 : 1 7 " b r e c o m
0000160 p i l e d e x p l i c i t l y
0000200 : n o t h i n g i n " I N
0000220 T E R L I S P - D 1 9 - M a r
0000240 - 8 5 . . . " d a t e d \r
0000260 " 1 9 - M a r - 8 5 1 4 : 4 8
0000300 : 3 5 " ) \r ( F I L E C R E A T
0000320 E D " 3 0 - M a r - 8 5 0 5
0000340 : 4 4 : 1 3 " { E R I S } < L
0000360 I S P C O R E > S O U R C E S >
0000400 A O F D . ; 1 5 2 7 5 5 1 c
0000420 h a n g e s t o : ( F N S
0000440 \ G E T S T R E A M ) \r p r e
0000460 v i o u s d a t e : " 3 0 -
0000500 M a r - 8 5 0 3 : 3 6 : 0 4 "
0000520 { E R I S } < L I S P C O R E
0000540 > S O U R C E S > A O F D . ; 1
0000560 4 ) \r C L O S E A L L D 1 \r (
0000600 L ( 0 A L L F L G ) ) \0 H
0000620 005 \0 \0 001 ` \0 \0 \t \0 \0 021 A 004 H 003 265
0000640 004 I 020 001 \ 006 \0 \0 312 004 @ j 360 263 $ L
0000660 h i \v \0 \0 262 034 @ 251 L d g \0 \0 \n \0
0000700 \0 221 214 L \t \0 \0 273 J 265 \r K h 032 Z Y
0000720 277 H 002 X 260 312 K & Z 260 367 \0 ( 6 2 Q
0000740 C L O S E F 5 4 Q S T R E
0000760 A M P R O P 4 0 Q \ I O M O
0001000 D E P 5 \ A P P E N D 2 ) \r
0001020 ( 5 1 Q C L O S E A L L 2 3
0001040 Q S T R E A M 2 \ O P E N
0001060 F I L E S ) \r ( ) \r C L O S E F
0001100 D 1 \r ( L ( 0 F I L E )
0001120 F 3 \ T E R M . O F D F
0001140 4 \ P R I M I N . O F D F
0001160 5 \ P R I M O U T . O F D F
0001200 6 \ L I N E B U F . O F D )
0001220 \0 i 003 004 \0 001 @ \t \0 \0 021 ! 002 H S
0001240 360 252 H d 006 \0 \0 312 004 0 j 360 221 h 020 g
0001260 \0 \0 \n \0 \0 211 d 001 271 H k I 017 016 277 002
0001300 003 265 365 \b \0 \0 H d T 360 225 277 V c \b 277
0001320 H U 360 223 S c \n 277 H \t \0 \0 H \t \0 \0
0001340 H g \0 \0 \n \0 \0 211 d 001 272 H k J 017 016
0001360 277 002 003 265 365 H 006 \0 \0 311 004 265 003 H 020 \0
0001400 ( 1 1 7 Q S T R E A M P R O P
0001420 1 1 0 Q \ C L O S E F I L E
0001440 1 0 4 Q \ D E L E T E O F D
0001460 5 6 Q \ C L E A R O F D 3
0001500 5 Q S T R E A M P R O P 3
0001520 \ G E T S T R E A M ) \r ( 1 4 1
0001540 Q S T R E A M 1 1 4 Q A F
0001560 T E R C L O S E 3 2 Q B E F
0001600 O R E C L O S E 1 7 Q S T R
0001620 E A M ) \r ( ) \r E O F C L O S E
0001640 F D 1 \r ( L ( 0 F I L E )
0001660 ) \0 034 002 \0 \0 001 @ \t \0 \0 021 021 001 H
0001700 g \0 \0 \n \0 \0 265 005 ` \0 \0 271 H k I 017
0001720 016 h 020 \0 ( 1 5 Q S T R E A M P
0001740 R O P 3 G E T S T R E A M )
0001760 \r ( 2 2 Q D E F A U L T E O F
0002000 C L O S E 1 2 Q E O F C L O
0002020 S E ) \r ( ) \r I N P U T D 1 \r
0002040 ( L ( 0 F I L E ) F 0
0002060 \ P R I M I N . O F D F 1
0002100 \ L I N E B U F . O F D ) \0 037
0002120 \0 002 \0 001 P 006 \0 \0 311 004 265 003 P @ 262 023
0002140 @ d i 360 222 277 Q 205 g \0 \0 \n \0 \0 c \0
0002160 277 020 \0 ( 3 1 Q \ G E T S T R E
0002200 A M ) \r ( 2 6 Q I N P U T 3
0002220 S T R E A M ) \r ( ) \r O P E N
0002240 P D 1 \r ( L ( 1 A C C E S
0002260 S 0 F I L E ) ) \0 S 005 \0 \0
0002300 002 ` \0 \0 021 A 004 @ 265 \b H 003 265 026 I 020
0002320 A i \v \0 \0 \ d 262 370 006 \0 \0 311 004 265 361
0002340 L 020 001 \ 006 \0 \0 312 004 @ j 360 263 035 L d
0002360 A i \v \0 \0 262 023 006 \0 \0 311 004 265 003 L 273
0002400 J 265 \r K h 032 Z Y 277 H 002 X 260 277 K &
0002420 Z 260 367 \0 ( 6 3 Q \ I O M O D E
0002440 P 2 3 Q \ G E T S T R E A M
0002460 ) \r ( 7 0 Q S T R E A M 4 5
0002500 Q S T R E A M 3 2 Q S T R
0002520 E A M 2 \ O P E N F I L E S
0002540 ) \r ( ) \r O U T P U T D 1 \r (
0002560 L ( 0 F I L E ) F 0 \
0002600 P R I M O U T . O F D F 1
0002620 \ T E R M . O F D ) \0 037 \0 002 \0
0002640 001 P 006 \0 \0 311 004 265 003 P @ 262 023 @ d i
0002660 360 222 277 Q 205 g \0 \0 \n \0 \0 c \0 277 020 \0
0002700 ( 3 1 Q \ G E T S T R E A M )
0002720 \r ( 2 6 Q O U T P U T 3 S
0002740 T R E A M ) \r ( ) \r P O S I T I
0002760 O N D 1 \r ( L ( 1 N 0
0003000 F I L E ) F 1 \ P R I M O
0003020 U T . O F D ) \0 % 001 001 \0 002 @ 265
0003040 031 Q 021 001 \0 H 006 \0 \0 310 035 A 262 025 H 006
0003060 \0 \0 A j 361 226 A 205 \t \0 \0 260 347 j 315 035
0003100 277 020 \0 ( 3 4 Q \ G E T S T R E
0003120 A M ) \r ( 2 3 Q S T R E A M
0003140 1 2 Q S T R E A M ) \r ( ) \r R
0003160 A N D A C C E S S P D 1 \r ( L
0003200 ( 0 F I L E ) F 1 \ L
0003220 I N E B U F . O F D ) \0 + 001 001
0003240 \0 001 @ \t \0 \0 021 001 \0 H 006 \0 \0 311 006 006
0003260 \0 \0 312 \0 020 j 360 h 360 264 022 H Q 360 h 360
0003300 264 \v H 006 \0 \0 311 004 265 003 H 020 \0 ( 3
0003320 \ G E T S T R E A M ) \r ( 4 3 Q
0003340 S T R E A M 1 7 Q F D E V
0003360 1 2 Q S T R E A M ) \r ( ) \r
0003400 \ I O M O D E P D 1 \r ( L (
0003420 2 N O E R R O R 1 A C C E
0003440 S S 0 S T R E A M ) ) \0 9
0003460 \0 \0 \0 003 A 265 \b @ \t \0 \0 260 ( @ \t \0
0003500 \0 360 263 " @ d \t \0 \0 g \0 \0 360 227 277 A
0003520 o \0 \0 \0 034 214 \t \0 \0 g \0 \0 360 227 A g
0003540 \0 \0 360 221 @ 020 @ B \n \0 \0 020 \0 ( 6 6
0003560 Q \ F I L E . N O T . O P E N
0003600 4 4 Q \ G E T A C C E S S
0003620 2 4 Q \ G E T A C C E S S 1
0003640 4 Q \ G E T A C C E S S 6
0003660 \ G E T A C C E S S ) \r ( 5 5 Q
0003700 O U T P U T 4 7 Q A P P E
0003720 N D 2 7 Q B O T H ) \r ( 3
0003740 7 Q ( I N P U T O U T P U T
0003760 ) ) \r W H E N C L O S E D 1 \r
0004000 ( L ( 0 N A R G S ) ) \0 263
0004020 005 \0 002 \0 e 021 001 \0 H j 361 264 006 @ \t \0
0004040 \0 021 001 001 H l 002 021 022 004 K J 363 222 261 \0
0004060 226 H K 361 264 006 K k 330 a 274 K a d g \0
0004100 \0 360 262 & 277 I g \0 \0 L d g \0 \0 360 222
0004120 277 i 217 g \0 \0 360 221 h 210 l 033 L h 032 032
0004140 \t \0 \0 \v \0 \0 260 U d g \0 \0 360 236 277 L
0004160 262 L I g \0 \0 L i \f \0 \0 260 @ d g \0
0004200 \0 360 236 277 L 262 7 I g \0 \0 L i \f \0 \0
0004220 260 + d g \0 \0 360 232 277 I g \0 \0 L \v \0
0004240 \0 260 032 g \0 \0 360 230 I g \0 \0 L \v \0 \0
0004260 211 l 033 K a h 032 032 \t \0 \0 277 K l 002 324
0004300 [ 261 377 j I 020 \0 ( 2 4 6 Q E R R
0004320 O R X 2 3 3 Q S T R E A M P
0004340 R O P 2 1 4 Q S T R E A M P
0004360 R O P 1 7 3 Q S T R E A M A
0004400 D D P R O P 1 4 6 Q S T R E
0004420 A M A D D P R O P 1 2 1 Q S
0004440 T R E A M P R O P 1 1 6 Q E
0004460 R R O R X 1 4 Q G E T S T R
0004500 E A M ) \r ( 2 2 7 Q E O F C L
0004520 O S E 2 2 1 Q E O F 2 1 0
0004540 Q S T A T U S F N 2 0 1 Q
0004560 S T A T U S 1 6 6 Q A F T E
0004600 R C L O S E 1 5 4 Q A F T E
0004620 R 1 4 1 Q B E F O R E C L O
0004640 S E 1 2 7 Q B E F O R E 1
0004660 0 1 Q Y E S 7 1 Q N O 6
0004700 4 Q C L O S E A L L 5 4 Q
0004720 C L O S E A L L ) \r ( ) \r S T R
0004740 E A M A D D P R O P D 1 \r ( L
0004760 ( 2 V A L 1 P R O P 0
0005000 S T R E A M ) ) \0 016 \0 \0 \0 003
0005020 @ A B @ A \n \0 \0 032 \v \0 \0 020 \0 ( 1
0005040 3 Q S T R E A M P R O P 7
0005060 S T R E A M P R O P ) \r N I L \r
0005100 ( ) \r \ B A S E B Y T E S . I O
0005120 . I N I T A 0 0 3 0 D 1 \r ( L
0005140 ( 5 S T R E A M 4 F D E
0005160 V 3 O T H E R I N F O 2
0005200 R E C O G 1 A C C E S S 0
0005220 F I L E ) ) \0 003 \0 \0 \0 006 E 020
0005240 \0 N I L \r N I L \r ( ) \r \ B A S
0005260 E B Y T E S . I O . I N I T A 0
0005300 0 3 3 D 1 \r ( L ( 1 I 0
0005320 S T R E A M ) ) \0 003 \0 \0 \0 002
0005340 h 020 \0 N I L \r N I L \r ( ) \r \ B
0005360 A S E B Y T E S . I O . I N I T
0005400 A 0 0 4 0 D 1 \r ( L ( 0 S
0005420 T R E A M ) ) \0 027 \0 \0 \0 001 @ 006
0005440 \0 \0 310 \0 @ 006 \0 \0 310 026 360 h 360 264 006 @
0005460 \t \0 \0 020 \0 ( 2 4 Q \ P A G E D
0005500 B A C K F I L E P T R ) \r ( 1 1
0005520 Q S T R E A M 3 S T R E A
0005540 M ) \r ( ) \r \ B A S E B Y T E S
0005560 . I O . I N I T A 0 0 4 3 D 1
0005600 \r ( L ( 0 S T R E A M ) )
0005620 \0 017 \0 \0 \0 001 @ 006 \0 \0 310 \0 @ 006 \0 \0
0005640 310 026 331 020 \0 N I L \r ( 1 1 Q S T
0005660 R E A M 3 S T R E A M ) \r (
0005700 ) \r \ B A S E B Y T E S . I O .
0005720 I N I T A 0 0 4 5 D 1 \r ( L
0005740 ( 0 S T R E A M ) ) \0 017 \0 \0
0005760 \0 001 @ 006 \0 \0 310 \v @ 006 \0 \0 310 026 331 020
0006000 \0 N I L \r ( 1 1 Q S T R E A M
0006020 3 S T R E A M ) \r ( ) \r \ B
0006040 A S E B Y T E S . I O . I N I T
0006060 A 0 0 4 7 D 1 \r ( L ( 0 S
0006100 T R E A M ) ) \0 022 \0 \0 \0 001 @ 006
0006120 \0 \0 310 \0 @ 006 \0 \0 310 \v 375 361 h 360 020 \0
0006140 N I L \r ( 1 1 Q S T R E A M
0006160 3 S T R E A M ) \r ( ) \r \ B A
0006200 S E B Y T E S . I O . I N I T A
0006220 0 0 4 9 D 1 \r ( L ( 3 N
0006240 2 O F F S T 1 B A S E 0
0006260 S T R E A M ) ) \0 \r \0 \0 \0 004
0006300 @ A B C g \0 \0 \r 005 \0 \0 020 \0 ( 1 2
0006320 Q \ B A S E B Y T E S . B L O
0006340 C K I O ) \r ( 6 I N P U T ) \r
0006360 ( ) \r \ B A S E B Y T E S . I O
0006400 . I N I T A 0 0 5 1 D 1 \r ( L
0006420 ( 3 N 2 O F F S T 1
0006440 B A S E 0 S T R E A M ) )
0006460 \0 \r \0 \0 \0 004 @ A B C g \0 \0 \r 005 \0
0006500 \0 020 \0 ( 1 2 Q \ B A S E B Y T
0006520 E S . B L O C K I O ) \r ( 6 O
0006540 U T P U T ) \r ( ) \r \ B A S E B
0006560 Y T E S . I O . I N I T D 1 \r
0006600 N I L \0 370 \0 \0 \0 \0 ` \0 \0 037 d g
0006620 \0 \0 024 \0 277 d k 317 \0 \0 277 d k 317 \0 020
0006640 277 d j 317 \0 0 277 d k 317 \0 @ 277 d k 317
0006660 \0 P 277 d j 317 \0 ` 277 d g \0 \0 024 002 277
0006700 d g \0 \0 024 004 277 d g \0 \0 024 006 277 d g
0006720 \0 \0 024 \b 277 d g \0 \0 024 \n 277 d g \0 \0
0006740 024 \f 277 d g \0 \0 024 016 277 d g \0 \0 024 020
0006760 277 d g \0 \0 024 022 277 d g \0 \0 024 024 277 d
0007000 g \0 \0 024 026 277 d g \0 \0 024 030 277 d g \0
0007020 \0 024 032 277 d g \0 \0 024 034 277 d g \0 \0 024
0007040 036 277 d g \0 \0 024 277 d g \0 \0 024 " 277
0007060 d g \0 \0 024 $ 277 d g \0 \0 024 & 277 d g
0007100 \0 \0 024 . 277 d g \0 \0 024 0 277 d g \0 \0
0007120 024 2 277 d g \0 \0 024 4 277 d g \0 \0 024 6
0007140 277 d g \0 \0 024 8 277 d g \0 \0 024 : 277 d
0007160 g \0 \0 024 * 277 027 \0 \0 h ` \0 \0 \n \0 \0
0007200 020 \0 ( 3 6 5 Q \ D E F I N E D
0007220 E V I C E ) \r ( 3 6 2 Q \ B A
0007240 S E B Y T E S D E V I C E 3 5
0007260 6 Q \ B A S E B Y T E S D E V
0007300 I C E 3 5 0 Q N I L L 3 4
0007320 1 Q \ I L L E G A L . D E V I
0007340 C E O P 3 3 2 Q \ B A S E B
0007360 Y T E S . I O . I N I T A 0 0 5
0007400 1 3 2 3 Q \ B A S E B Y T E
0007420 S . I O . I N I T A 0 0 4 9 3
0007440 1 4 Q \ B A S E B Y T E S . I
0007460 O . I N I T A 0 0 4 7 3 0 5 Q
0007500 \ B A S E B Y T E S . I O . I
0007520 N I T A 0 0 4 5 2 7 6 Q \ B
0007540 A S E B Y T E S . I O . I N I T
0007560 A 0 0 4 3 2 6 7 Q \ B A S E
0007600 B Y T E S . S E T F I L E P T R
0007620 2 6 0 Q \ B A S E B Y T E S
0007640 . I O . I N I T A 0 0 4 0 2 5
0007660 1 Q \ B A S E B Y T E S . R E
0007700 A D P 2 4 2 Q \ B A S E B Y
0007720 T E S . P E E K B I N 2 3 3 Q
0007740 \ B A S E B Y T E S . B O U T
0007760 2 2 4 Q \ B A S E B Y T E S
0010000 . B I N 2 1 5 Q \ I L L E G
0010020 A L . D E V I C E O P 2 0 6 Q
0010040 \ B A S E B Y T E S . I O . I
0010060 N I T A 0 0 3 3 1 7 7 Q N I
0010100 L L 1 7 0 Q \ B A S E B Y T
0010120 E S . I O . I N I T A 0 0 3 0
0010140 1 6 1 Q N I L L 1 5 2 Q \
0010160 B A S E B Y T E S . O P E N F N
0010200 1 4 3 Q N I L L 1 3 4 Q
0010220 \ B A S E B Y T E S . N A M E .
0010240 F R O M . S T R E A M 1 2 5 Q
0010260 N I L L 1 1 6 Q \ G E N E
0010300 R A T E N O F I L E S 1 0 7 Q
0010320 N I L L 1 0 0 Q N I L L
0010340 7 1 Q N I L L 6 2 Q N I L
0010360 L 7 B A S E B Y T E S 2
0010400 004 003 F D E V T Y P E # ) \r ( ) \r
0010420 \ M A K E B A S E B Y T E S T R
0010440 E A M D 1 \r ( L ( 5 O S T
0010460 R E A M 4 W R I T E X T E N
0010500 S I O N F N 3 A C C E S S
0010520 2 L E N 1 O F F S T 0
0010540 B A S E ) P 0 \ I N T E R
0010560 R U P T A B L E ) 002 Y 001 \0 \0 006
0010600 @ 247 B j 360 243 \b \0 \0 277 A 005 001 233 B 005
0010620 001 227 B A 324 b 004 005 001 247 o \0 \0 \0 \t \0
0010640 \0 277 C 265 \t g \0 \0 b 006 260 030 g \0 \0 360
0010660 263 023 C g \0 \0 360 252 C d g \0 \0 360 242 \t
0010700 \0 \0 277 E 004 ` \0 \0 360 242 261 001 + E d 311
0010720 006 ` \0 \0 360 225 \t \0 \0 261 001 210 \t \0 \0 277
0010740 E d 006 \0 \0 ` \0 \0 024 006 277 d j 317 2 \a
0010760 277 d h 024 2 277 d j 315 1 277 d j 315 0 277
0011000 d g \0 \0 024 . 277 d g \0 \0 024 , 277 d h
0011020 024 * 277 d h 024 ( 277 d ` \0 \0 024 & 277 d
0011040 h 024 $ 277 d g \0 \0 024 " 277 d g \0 \0 024
0011060 277 d j 317 002 4 277 d j 317 030 277 d j
0011100 317 030 001 277 d ` \0 \0 315 037 277 d j 315 036 277
0011120 d j 315 035 277 d ` \0 \0 315 034 277 d j 315 033
0011140 277 d j 315 032 277 d h 024 030 277 d l \b 317 024
0011160 \a 277 d j 315 027 277 d j 315 026 277 d h 024 024
0011200 277 d h 024 022 277 d h 024 020 277 d h 024 016 277
0011220 d h 024 \f 277 d j 315 \v 277 d j 315 \n 277 d
0011240 h 024 \b 277 d h 024 004 277 d j 317 004 R 277 d
0011260 k 317 004 @ 277 d k 317 004 0 277 d j 317 004
0011300 277 d j 317 004 020 277 d j 317 004 \0 277 d h 024
0011320 002 277 d j 317 002 4 277 d j 317 002 277 d j
0011340 317 002 020 277 d j 317 002 \0 277 d j 315 001 277 d
0011360 j 315 \0 260 k ` \0 \0 037 d ` \0 \0 024 006 277
0011400 d g \0 \0 024 . 277 d g \0 \0 024 , 277 d `
0011420 \0 \0 024 & 277 d g \0 \0 024 " 277 d g \0 \0
0011440 024 277 d j 317 030 001 277 d ` \0 \0 315 037 277
0011460 d j 315 035 277 d ` \0 \0 315 034 277 d h 024 030
0011500 277 d l \b 317 024 \a 277 d j 317 004 R 277 d k
0011520 317 004 @ 277 d k 317 004 0 277 d h 024 002 277 b
0011540 \n 277 021 020 \0 E j 317 004 0 277 E j 317 004 @
0011560 277 E l \b 317 024 \a 277 E d j 315 \n 277 j 315
0011600 032 277 E @ 024 002 277 E d 006 \0 \0 A 315 026 277
0011620 A 315 \0 277 E d B 315 \v 277 B 315 001 277 E C
0011640 \n \0 \0 277 E h 024 004 277 E g \0 \0 024 277
0011660 E j 315 037 277 E j 315 035 277 E 006 \0 \0 C g
0011700 \0 \0 360 246 C g \0 \0 360 264 003 D 024 \f 277 E
0011720 006 \0 \0 j 315 027 E 020 \0 ( 1 0 4 2 Q
0011740 \ S E T A C C E S S 1 3 6 Q
0011760 C L O S E F 1 3 0 Q \ S E T
0012000 A C C E S S 1 0 1 Q \ I L L
0012020 E G A L . A R G 4 0 Q S H O
0012040 U L D N T 1 0 Q S H O U L D
0012060 N T ) \r ( 1 1 2 2 Q S T R E A
0012100 M 1 1 0 7 Q B O T H 1 1 0
0012120 1 Q O U T P U T 1 0 7 5 Q
0012140 S T R E A M 1 0 5 4 Q \ M B
0012160 S . O U T C H A R F N 1 0 1 3
0012200 Q S T R E A M 6 7 0 Q \ S
0012220 T R E A M . D E F A U L T . M A
0012240 X B U F F E R S 6 5 4 Q F I
0012260 L E L I N E L E N G T H 6 3 7
0012300 Q \ F I L E O U T C H A R F N
0012320 6 3 0 Q \ E O S E R R O R
0012340 6 2 1 Q \ N O I M A G E O P S
0012360 6 1 2 Q \ S T R E A M . N O
0012400 T . O P E N 6 0 3 Q \ S T R
0012420 E A M . N O T . O P E N 5 7 4
0012440 Q \ B A S E B Y T E S D E V I
0012460 C E 5 6 7 Q 004 003 S T R E A M
0012500 T Y P E # 3 3 0 Q \ S T R E
0012520 A M . D E F A U L T . M A X B U
0012540 F F E R S 3 0 7 Q F I L E L
0012560 I N E L E N G T H 2 5 6 Q \
0012600 F I L E O U T C H A R F N 2 4
0012620 7 Q \ E O S E R R O R 2 3 3
0012640 Q \ N O I M A G E O P S 2 1
0012660 2 Q \ S T R E A M . N O T . O
0012700 P E N 2 0 3 Q \ S T R E A M
0012720 . N O T . O P E N 1 4 7 Q \
0012740 B A S E B Y T E S D E V I C E
0012760 1 4 4 Q S T R E A M 1 2 3 Q
0013000 \ B A S E B Y T E S D E V I C
0013020 E 1 0 7 Q 004 003 S T R E A M T
0013040 Y P E # 7 4 Q B O T H 6 5
0013060 Q O U T P U T 5 6 Q I N P
0013100 U T 4 7 Q I N P U T ) \r (
0013120 3 5 Q " C u r r e n t l y c
0013140 a n ' t s u p p o r t f i x
0013160 p - s i z e d o f f s e t s "
0013200 ) \r \ M B S . O U T C H A R F N
0013220 D 1 \r ( L ( 1 C H A R 0
0013240 S T R E A M ) ) \0 002 \0 \0 002
0013260 @ 006 \0 \0 b \0 A \n \0 \0 @ 006 \0 \0 @ 006
0013300 \0 \0 310 027 k 324 021 002 001 H I 315 027 I 020 \0
0013320 ( 1 1 Q B O U T ) \r ( 2 1 Q
0013340 S T R E A M 1 5 Q S T R E A
0013360 M 3 S T R E A M ) \r ( ) \r \
0013400 B A S E B Y T E S . N A M E . F
0013420 R O M . S T R E A M D 1 \r ( L
0013440 ( 0 S T R E A M ) ) \0 036 \0
0013460 \0 \0 001 @ 006 \0 \0 311 004 265 026 @ 006 \0 \0 311
0013500 002 @ 006 \0 \0 310 026 @ \t \0 \0 h 032 032 032 020
0013520 \0 ( 2 7 Q G E T E O F P T R )
0013540 \r ( 2 1 Q S T R E A M 1 3 Q
0013560 S T R E A M 3 S T R E A M
0013600 ) \r ( ) \r \ B A S E B Y T E S .
0013620 B O U T D 1 \r ( L ( 1 B Y
0013640 T E 0 S T R E A M ) ) \0 >
0013660 001 \0 \0 002 021 020 \0 @ 006 \0 \0 310 \0 X @ 006
0013700 \0 \0 310 \v 375 361 263 032 @ 006 \0 \0 311 \f X 227
0013720 @ k H 017 016 277 260 341 o \0 \0 \0 \t \0 \0 277
0013740 @ 006 \0 \0 311 002 H @ H k 330 315 \0 277 A 307
0013760 020 \0 ( 5 2 Q E R R O R ) \r ( 5
0014000 7 Q S T R E A M 2 7 Q S T
0014020 R E A M 1 5 Q S T R E A M
0014040 6 S T R E A M ) \r ( 4 7 Q
0014060 " A t t e m p t t o w r i t
0014100 e p a s t e n d o f b y
0014120 t e s b l o c k " ) \r \ B A S
0014140 E B Y T E S . S E T F I L E P T
0014160 R D 1 \r ( L ( 1 I 0 S
0014200 T R E A M ) ) \0 ) 001 \0 \0 002 A 021
0014220 001 \0 H @ 006 \0 \0 310 026 324 X d @ 006 \0 \0
0014240 310 \v 361 230 o \0 \0 \0 A \n \0 \0 206 @ 006 \0
0014260 \0 H 315 \0 h 020 \0 ( 3 5 Q E R R O
0014300 R ) \r ( 4 2 Q S T R E A M 2
0014320 1 Q S T R E A M 1 0 Q S T
0014340 R E A M ) \r ( 3 1 Q " B e y
0014360 o n d e n d o f b y t e
0014400 r a n g e " ) \r \ B A S E B Y T
0014420 E S . R E A D P D 1 \r ( L (
0014440 1 F L G 0 S T R E A M ) )
0014460 \0 : 002 \0 \0 002 @ 006 \0 \0 310 \0 @ 006 \0
0014500 \0 310 \v 021 002 001 I j H 331 324 Y l 002 I 361
0014520 h 360 265 035 d j 360 221 h 020 A 265 024 @ 006 \0
0014540 \0 311 002 @ 006 \0 \0 310 \0 302 l \r 360 h 360 020
0014560 \0 N I L \r ( 5 7 Q S T R E A M
0014600 5 1 Q S T R E A M 1 1 Q
0014620 S T R E A M 3 S T R E A M )
0014640 \r ( ) \r \ B A S E B Y T E S . B
0014660 I N D 1 \r ( L ( 0 S T R E
0014700 A M ) ) \0 025 \0 \0 \0 001 @ \t \0 \0 @
0014720 006 \0 \0 @ 006 \0 \0 310 \0 k 324 315 \0 277 020 \0
0014740 ( 3 \ B A S E B Y T E S . P E
0014760 E K B I N ) \r ( 1 3 Q S T R E
0015000 A M 7 S T R E A M ) \r ( ) \r
0015020 \ B A S E B Y T E S . P E E K B
0015040 I N D 1 \r ( L ( 1 N O E R
0015060 R O R F L G 0 S T R E A M )
0015100 ) \0 - 002 \0 \0 002 @ 006 \0 \0 310 \0 021 021
0015120 001 H @ 006 \0 \0 310 \v 375 361 257 A 253 @ 006 \0
0015140 \0 311 " 271 @ k I 016 020 h 020 @ 006 \0 \0 311
0015160 002 H 302 020 \0 N I L \r ( 4 6 Q S T
0015200 R E A M 3 0 Q S T R E A M
0015220 1 5 Q S T R E A M 3 S T R
0015240 E A M ) \r ( ) \r \ B A S E B Y T
0015260 E S . T R U N C A T E F N D 1
0015300 \r ( L ( 1 I 0 S T R E A
0015320 M ) ) \0 7 003 \0 \0 002 A @ 006 \0 \0 310
0015340 026 @ 006 \0 \0 310 \v 021 003 002 H I 324 X j A
0015360 361 223 d J 324 270 I A 361 243 H J 361 230 o \0
0015400 \0 \0 A \n \0 \0 020 @ 006 \0 \0 H 315 \v H 020
0015420 \0 ( 5 3 Q E R R O R ) \r ( 6 0
0015440 Q S T R E A M 1 2 Q S T R
0015460 E A M 4 S T R E A M ) \r (
0015500 4 7 Q " B e y o n d e n d
0015520 o f b y t e r a n g e " ) \r
0015540 \ B A S E B Y T E S . O P E N F
0015560 N D 1 \r ( L ( 4 F D E V
0015600 3 O T H E R I N F O 2 R E
0015620 C O G 1 A C C E S S 0 N
0015640 A M E ) ) \0 , \0 \0 \0 005 @ d 006 \0
0015660 \0 311 004 226 277 @ A \n \0 \0 020 006 \0 \0 311 002
0015700 @ 006 \0 \0 310 026 @ \t \0 \0 A @ 006 \0 \0 311
0015720 \f @ \r 006 \0 \0 020 \0 ( 5 1 Q \ M A
0015740 K E B A S E B Y T E S T R E A M
0015760 3 5 Q G E T E O F P T R 1
0016000 5 Q O P E N S T R I N G S T R
0016020 E A M ) \r ( 4 2 Q S T R E A M
0016040 2 7 Q S T R E A M 2 1 Q
0016060 S T R E A M 4 S T R E A M )
0016100 \r ( ) \r \ B A S E B Y T E S . B
0016120 L O C K I O D 1 \r ( L ( 4
0016140 D I R E C T I O N 3 N 2
0016160 O F F S T 1 B A S E 0 S
0016200 T R E A M ) ) \0 w 004 \0 \0 005 021 @
0016220 003 C j 361 264 Y @ 006 \0 \0 311 002 270 @ 006 \0
0016240 \0 310 \0 271 @ 006 \0 \0 310 \v 272 C J I k 331
0016260 331 361 262 025 D g \0 \0 360 262 5 @ 006 \0 \0 311
0016300 " 273 @ k K 016 277 @ 006 \0 \0 I C 330 315 \0
0016320 277 D g \0 \0 360 233 A H b 002 277 270 B I b
0016340 004 277 271 H I A B C \r 005 \0 \0 h 020 @ A
0016360 B 302 \n \0 \0 277 B k 324 b 004 277 C m 377 324
0016400 b 006 260 220 \0 ( 1 4 6 Q B O U T
0016420 1 3 5 Q \ M O V E B Y T E S )
0016440 \r ( 1 0 6 Q O U T P U T 7 4
0016460 Q S T R E A M 6 0 Q S T R
0016500 E A M 5 1 Q I N P U T 3 1
0016520 Q S T R E A M 2 2 Q S T R
0016540 E A M 1 3 Q S T R E A M ) \r
0016560 ( ) \r O P E N S T R I N G S T R
0016600 E A M D 1 \r ( L ( 1 A C C
0016620 E S S 0 S T R ) ) \0 214 002 \0
0016640 \0 002 021 001 @ d 005 \a 246 277 @ \t \0 \0 277
0016660 @ 312 \0 C d l 003 360 233 277 @ 311 \0 312 \0 C
0016700 j 360 h 360 205 j 360 221 h 200 i Y @ d 312 \0
0016720 C l 003 360 221 311 \0 311 \0 265 003 i I 224 @ 310
0016740 003 340 202 @ 310 003 I 224 @ 310 002 340 202 @ 310 002
0016760 A d g \0 \0 360 263 027 d g \0 \0 360 256 d g
0017000 \0 \0 360 250 265 006 g \0 \0 202 \t \0 \0 \f \0 \0
0017020 X I 226 d l 377 317 2 \a 277 H k 317 004 0 277
0017040 H k 317 004 @ 277 k j 360 h 360 H 020 \0 ( 1
0017060 5 5 Q \ M A K E B A S E B Y T
0017100 E S T R E A M 1 5 2 Q \ I L
0017120 L E G A L . A R G 1 4 Q \ I
0017140 L L E G A L . A R G ) \r ( 1 4 6
0017160 Q I N P U T 1 3 7 Q B O T
0017200 H 1 3 1 Q O U T P U T 1 2
0017220 2 Q I N P U T ) \r ( ) \r \ S T
0017240 R I N G S T R E A M . I N I T A
0017260 0 0 1 2 D 1 \r ( L ( 5 S T
0017300 R E A M 4 F D E V 3 O T
0017320 H E R I N F O 2 R E C O G
0017340 1 A C C E S S 0 F I L E )
0017360 ) \0 003 \0 \0 \0 006 E 020 \0 N I L \r N
0017400 I L \r ( ) \r \ S T R I N G S T R
0017420 E A M . I N I T A 0 0 1 7 D 1
0017440 \r ( L ( 0 S T R E A M ) )
0017460 \0 . 002 \0 \0 001 @ d d 006 \0 \0 311 \f 234 277
0017500 @ 006 \0 \0 311 \f @ h 024 \f 277 215 006 \0 \0 311
0017520 004 \t \0 \0 265 006 @ \t \0 \0 021 002 001 H I 024
0017540 016 I 020 \0 ( 4 3 Q \ E O F . A C
0017560 T I O N 3 5 Q G N C C O D E
0017600 ) \r ( 3 0 Q S T R E A M 1 5
0017620 Q S T R E A M 5 S T R E A
0017640 M ) \r ( ) \r \ S T R I N G S T R
0017660 E A M . I N I T A 0 0 2 1 D 1
0017700 \r ( L ( 1 N O E R R O R F L
0017720 G 0 S T R E A M ) ) \0 036 \0
0017740 \0 \0 002 @ 006 \0 \0 311 \f 265 026 @ 006 \0 \0 311
0017760 004 \t \0 \0 265 \v A h 360 264 006 @ \t \0 \0 020
0020000 \0 ( 3 3 Q \ E O F . A C T I O
0020020 N 2 0 Q C H C O N 1 ) \r ( 1
0020040 3 Q S T R E A M 3 S T R E
0020060 A M ) \r ( ) \r \ S T R I N G S T
0020100 R E A M . I N I T A 0 0 2 3 D
0020120 1 \r ( L ( 0 S T R E A M ) )
0020140 \0 \b \0 \0 \0 001 @ \t \0 \0 h 360 020 \0 (
0020160 3 E O F P ) \r N I L \r ( ) \r \
0020200 S T R I N G S T R E A M . I N I
0020220 T A 0 0 2 5 D 1 \r ( L ( 0
0020240 S T R E A M ) ) \0 021 002 \0 \0 001 @
0020260 d 006 \0 \0 311 016 021 002 001 H I 024 \f I 020 \0
0020300 N I L \r ( 4 S T R E A M ) \r (
0020320 ) \r \ S T R I N G S T R E A M .
0020340 I N I T A 0 0 2 9 D 1 \r ( L
0020360 ( 0 S T R E A M ) ) \0 027 \0 \0
0020400 \0 001 @ 006 \0 \0 311 \f h 360 264 \r @ 006 \0 \0
0020420 311 004 \t \0 \0 j 360 020 \0 ( 2 2 Q N C
0020440 H A R S ) \r ( 1 5 Q S T R E A
0020460 M 3 S T R E A M ) \r ( ) \r \
0020500 S T R I N G S T R E A M . I N I
0020520 T D 1 \r ( F 0 \ S T R I N
0020540 G S T R E A M . F D E V ) \0 305
0020560 \0 001 \0 \0 ` \0 \0 037 d g \0 \0 024 \0 277 d
0020600 g \0 \0 024 002 277 d g \0 \0 024 004 277 d g \0
0020620 \0 024 006 277 d g \0 \0 024 \b 277 d g \0 \0 024
0020640 \n 277 d g \0 \0 024 \f 277 d g \0 \0 024 016 277
0020660 d g \0 \0 024 020 277 d g \0 \0 024 022 277 d g
0020700 \0 \0 024 024 277 d g \0 \0 024 026 277 d g \0 \0
0020720 024 030 277 d g \0 \0 024 032 277 d g \0 \0 024 034
0020740 277 d g \0 \0 024 036 277 d g \0 \0 024 " 277 d
0020760 g \0 \0 024 $ 277 d g \0 \0 024 & 277 d g \0
0021000 \0 024 4 277 d g \0 \0 024 : 277 d g \0 \0 024
0021020 8 277 d g \0 \0 024 6 277 d g \0 \0 024 2 277
0021040 d g \0 \0 024 0 277 d g \0 \0 024 . 277 d g
0021060 \0 \0 024 * 277 c \0 020 \0 N I L \r ( 2 7
0021100 5 Q N I L L 2 6 6 Q \ I S
0021120 . N O T . R A N D A C C E S S P
0021140 2 5 7 Q \ I L L E G A L . D
0021160 E V I C E O P 2 5 0 Q \ I S
0021200 . N O T . R A N D A C C E S S P
0021220 2 4 1 Q \ G E N E R I C . B
0021240 I N S 2 3 2 Q \ G E N E R I
0021260 C . B O U T S 2 2 3 Q \ G E
0021300 N E R I C . R E N A M E F I L E
0021320 2 1 4 Q \ S T R I N G S T R
0021340 E A M . I N I T A 0 0 2 9 2 0
0021360 5 Q \ S T R I N G S T R E A M
0021400 . I N I T A 0 0 2 5 1 7 6 Q
0021420 \ S T R I N G S T R E A M . I N
0021440 I T A 0 0 2 3 1 6 7 Q \ S T
0021460 R I N G S T R E A M . I N I T A
0021500 0 0 2 1 1 6 0 Q \ S T R I N
0021520 G S T R E A M . I N I T A 0 0 1
0021540 7 1 5 1 Q \ I L L E G A L .
0021560 D E V I C E O P 1 4 2 Q N I
0021600 L L 1 3 3 Q N I L L 1 2 4
0021620 Q \ S T R I N G S T R E A M .
0021640 I N I T A 0 0 1 2 1 1 5 Q \
0021660 I L L E G A L . D E V I C E O P
0021700 1 0 6 Q N I L L 7 7 Q N
0021720 I L L 7 0 Q N I L L 6 1 Q
0021740 N I L L 5 2 Q \ N U L L F
0021760 I L E G E N E R A T O R 4 3 Q
0022000 N I L L 3 4 Q N I L L 2
0022020 5 Q N I L L 1 6 Q N I L L
0022040 7 S T R I N G 2 004 003 F D
0022060 E V T Y P E # ) \r ( ) \r G E T S
0022100 T R E A M D 1 \r ( L ( 1 A
0022120 C C E S S 0 F I L E ) ) \0
0022140 \a \0 \0 \0 002 @ A \n \0 \0 020 \0 ( 4 \
0022160 G E T S T R E A M ) \r N I L \r (
0022200 ) \r \ A D D O F D D 1 \r ( L
0022220 ( 0 S T R E A M ) ) \0 027 \0 \0
0022240 \0 001 \b \0 \0 @ d 006 \0 \0 311 004 231 277 @ `
0022260 \0 \0 032 027 \0 \0 @ 020 \0 ( 2 \ C L E
0022300 A R O F D ) \r ( 2 3 Q \ O P E
0022320 N F I L E S 1 7 Q \ O P E N
0022340 F I L E S 7 S T R E A M ) \r
0022360 ( ) \r \ C L E A R O F D D 1 \r
0022400 N I L \0 005 \0 \0 \0 \0 g \0 \0 020 \0 N
0022420 I L \r ( 2 I F ) \r ( ) \r \ D E
0022440 L E T E O F D D 1 \r ( L ( 0
0022460 O F D ) ) \0 \f \0 \0 \0 001 @ ` \0
0022500 \0 \n \0 \0 027 \0 \0 020 \0 ( 6 D R E M
0022520 O V E ) \r ( 1 1 Q \ O P E N F
0022540 I L E S 3 \ O P E N F I L E
0022560 S ) \r ( ) \r \ G E T S T R E A M
0022600 D 1 \r ( L ( 2 N O E R R O
0022620 R 1 A C C E S S 0 X )
0022640 F 0 \ P R I M I N . O F D
0022660 F 1 \ P R I M O U T . O F D
0022700 F 2 \ L I N E B U F . O F
0022720 D F 3 \ T E R M . O F D
0022740 F 4 \ S T R I N G S T R E A
0022760 M . F D E V ) 001 G \0 005 \0 003 @ 265
0023000 ; A d g \0 \0 360 235 277 P d ` \0 \0 360 224
0023020 277 \b \0 \0 P 020 g \0 \0 360 262 023 ` \0 \0 232
0023040 Q d ` \0 \0 360 224 277 \b \0 \0 Q 020 P R 360
0023060 241 P 200 Q A B \v \0 \0 020 i 360 262 0 A d
0023100 g \0 \0 360 235 277 R d ` \0 \0 360 224 277 \b \0
0023120 \0 R 020 g \0 \0 360 242 A 263 > ` \0 \0 232 S
0023140 d ` \0 \0 360 224 277 \b \0 \0 S 020 @ d 004 `
0023160 \0 \0 360 263 301 d 004 l 004 360 262 # A \n \0 \0
0023200 265 003 202 261 \0 300 @ g \0 \0 \n \0 \0 A \n \0
0023220 \0 265 003 202 261 \0 257 @ B \n \0 \0 020 005 \a 242
0023240 261 \0 210 A 233 A g \0 \0 360 245 @ B \n \0 \0
0023260 277 ` \0 \0 037 d T 024 006 277 d @ 024 004 277 d
0023300 g \0 \0 024 . 277 d g \0 \0 024 , 277 d ` \0
0023320 \0 024 & 277 d g \0 \0 024 " 277 d g \0 \0 024
0023340 277 d j 317 030 001 277 d ` \0 \0 315 037 277 d
0023360 j 315 035 277 d ` \0 \0 315 034 277 d h 024 030 277
0023400 d l \b 317 024 \a 277 d j 317 004 R 277 d k 317
0023420 004 @ 277 d k 317 004 0 277 d h 024 002 277 b \0
0023440 g \0 \0 \n \0 \0 @ 020 A g \0 \0 360 244 A 222
0023460 261 377 g @ d 004 ` \0 \0 360 242 261 377 ] 006 \0
0023500 \0 311 \0 020 \0 ( 4 4 7 Q \ S E T A
0023520 C C E S S 2 6 1 Q \ F I L E
0023540 . N O T . O P E N 2 3 5 Q \
0023560 F I L E . N O T . O P E N 2 2
0023600 2 Q \ S E A R C H O P E N F I
0023620 L E S 2 1 6 Q \ G E T F I L
0023640 E N A M E 2 0 1 Q \ S E A R
0023660 C H O P E N F I L E S 1 5 3 Q
0023700 \ C R E A T E . T T Y D I S P
0023720 L A Y S T R E A M 1 2 2 Q \
0023740 C R E A T E . T T Y D I S P L A
0023760 Y S T R E A M 7 2 Q \ I O M
0024000 O D E P 5 4 Q \ C R E A T E
0024020 . T T Y D I S P L A Y S T R E A
0024040 M 2 5 Q \ C R E A T E . T T
0024060 Y D I S P L A Y S T R E A M ) \r
0024100 ( 5 0 2 Q W I N D O W 4 7 2
0024120 Q 004 003 W I N D O W T Y P E #
0024140 4 5 5 Q O U T P U T 4 4 4 Q
0024160 I N P U T 3 7 1 Q \ S T R
0024200 E A M . D E F A U L T . M A X B
0024220 U F F E R S 3 5 5 Q F I L E
0024240 L I N E L E N G T H 3 4 0 Q
0024260 \ F I L E O U T C H A R F N 3
0024300 3 1 Q \ E O S E R R O R 3 2
0024320 2 Q \ N O I M A G E O P S 3
0024340 1 3 Q \ S T R E A M . N O T .
0024360 O P E N 3 0 4 Q \ S T R E A
0024400 M . N O T . O P E N 2 6 5 Q
0024420 004 003 S T R E A M T Y P E # 2 5
0024440 2 Q I N P U T 2 1 3 Q O L
0024460 D 1 6 3 Q 004 003 S T R E A M T
0024500 Y P E # 1 4 5 Q \ D E F A U
0024520 L T T T Y D I S P L A Y S T R E
0024540 A M 1 3 7 Q \ D E F A U L T
0024560 T T Y D I S P L A Y S T R E A M
0024600 1 2 7 Q O U T P U T 1 1 4
0024620 Q \ D E F A U L T L I N E B U
0024640 F 1 0 4 Q I N P U T 4 6 Q
0024660 \ D E F A U L T T T Y D I S P
0024700 L A Y S T R E A M 4 0 Q \ D
0024720 E F A U L T T T Y D I S P L A Y
0024740 S T R E A M 3 2 Q O U T P U
0024760 T 1 7 Q \ D E F A U L T L I
0025000 N E B U F 7 I N P U T ) \r (
0025020 ) \r \ R E S E T O F D S A 0 0 0
0025040 1 D 1 \r ( F 0 \ T E R M .
0025060 O F D F 1 \ P R I M O U T
0025100 . O F D F 2 \ D R I B B L
0025120 E . O F D F 3 \ L I N E B
0025140 U F . O F D F 4 \ P R I M
0025160 I N . O F D ) \0 016 \0 005 \0 \0 \b \0
0025200 \0 P c 002 S c \b h c 004 020 \0 ( 2 \
0025220 O P E N L I N E B U F ) \r N I L
0025240 \r ( ) \r \ R E S E T O F D S D
0025260 1 \r N I L \0 , 001 \0 \0 \0 g \0 \0 \t
0025300 \0 \0 ` \0 \0 260 032 d 001 021 001 \0 H 006 \0 \0
0025320 h 024 002 277 H \t \0 \0 277 H \t \0 \0 023 002 003
0025340 265 347 h 027 \0 \0 020 \0 ( 4 0 Q \ S E
0025360 T A C C E S S 3 3 Q F O R G
0025400 E T P A G E S 5 M A P . P R
0025420 O C E S S E S ) \r ( 5 1 Q \ O
0025440 P E N F I L E S 2 3 Q S T R
0025460 E A M 1 0 Q \ O P E N F I L
0025500 E S 2 \ R E S E T O F D S A
0025520 0 0 0 1 ) \r ( ) \r \ S E A R C H
0025540 O P E N F I L E S D 1 \r ( L
0025560 ( 1 A C C E S S 0 N A M E
0025600 ) ) \0 + 002 \0 \0 002 ` \0 \0 021 021 001 H
0025620 003 265 004 h 020 001 271 @ I 006 \0 \0 311 004 265 003
0025640 I 360 232 A 226 I A i \v \0 \0 020 I 020 H 002
0025660 X 260 337 \0 ( 4 1 Q \ I O M O D E
0025700 P ) \r ( 2 2 Q S T R E A M 2
0025720 \ O P E N F I L E S ) \r ( ) \r
0025740 ( P R E T T Y C O M P R I N T
0025760 A O F D C O M S ) \r ( R P A Q Q
0026000 A O F D C O M S ( ( * O p
0026020 e n f i l e d e s c r i p t
0026040 o r s . T h i s f i l e i
0026060 s s h a r e d w i t h V A
0026100 X . ) ( C O M S ( F N S C
0026120 L O S E A L L C L O S E F \r
0026140 E O F C L O S E F I N P U T
0026160 O P E N P O U T P U T P O S
0026200 I T I O N R A N D A C C E S S
0026220 P \ I O M O D E P W H E N C
0026240 L O S E ) ( F N S S T R E A
0026260 M A D D P R O P ) ( I N I T V
0026300 A R S ( \r D E F A U L T E O F
0026320 C L O S E ( Q U O T E N I L
0026340 L ) ) ( \ O P E N F I L E S )
0026360 ) ( G L O B A L V A R S D E
0026400 F A U L T E O F C L O S E \ O
0026420 P E N F I L E S ) ) ( C O M S
0026440 ( * S T R E A M \r i n t e
0026460 r f a c e t o R e a d a n
0026500 d W r i t e t o r a n d o
0026520 m m e m o r y ) ( D E C L A
0026540 R E : D O N T C O P Y ( E X
0026560 P O R T ( R E C O R D S B A
0026600 S E B Y T E S T R E A M ) ) )
0026620 ( \r F N S \ B A S E B Y T E S
0026640 . I O . I N I T \ M A K E B A
0026660 S E B Y T E S T R E A M \ M B
0026700 S . O U T C H A R F N \ B A S
0026720 E B Y T E S . N A M E . F R O M
0026740 . S T R E A M \ B A S E B Y T
0026760 E S . B O U T \r \ B A S E B Y
0027000 T E S . S E T F I L E P T R \
0027020 B A S E B Y T E S . R E A D P
0027040 \ B A S E B Y T E S . B I N \
0027060 B A S E B Y T E S . P E E K B I
0027100 N \ B A S E B Y T E S . T R U
0027120 N C A T E F N \r \ B A S E B Y
0027140 T E S . O P E N F N \ B A S E
0027160 B Y T E S . B L O C K I O ) (
0027200 G L O B A L V A R S \ B A S E
0027220 B Y T E S D E V I C E ) ( D E
0027240 C L A R E : D O N T E V A L @
0027260 L O A D ( P ( \r \ B A S E B
0027300 Y T E S . I O . I N I T ) ) )
0027320 ( F N S O P E N S T R I N G S
0027340 T R E A M ) ) ( C O M S ( *
0027360 S T R E A M i n t e r f a c
0027400 e f o r o l d - s t y l e
0027420 s t r i n g s ) ( F N S \r \
0027440 S T R I N G S T R E A M . I N I
0027460 T ) ( D E C L A R E : D O N
0027500 T E V A L @ L O A D D O C O P
0027520 Y ( P ( \ S T R I N G S T R
0027540 E A M . I N I T ) ) ) ) ( C O
0027560 M S ( F N S G E T S T R E A
0027600 M \r \ A D D O F D \ C L E A
0027620 R O F D \ D E L E T E O F D
0027640 \ G E T S T R E A M \ R E S E
0027660 T O F D S \ S E A R C H O P E
0027700 N F I L E S ) ( D E C L A R E
0027720 : D O N T C O P Y ( E X P O
0027740 R T ( \r M A C R O S \ I N S
0027760 T R E A M A R G \ O U T S T R
0030000 E A M A R G \ S T R E A M A R
0030020 G ) ) ) ( M A C R O S G E T
0030040 O F D \ G E T O F D ) ( D E
0030060 C L A R E : D O N T E V A L @
0030100 L O A D ( P ( \r M O V D ?
0030120 ( Q U O T E G E T S T R E A M
0030140 ) ( Q U O T E G E T O F D )
0030160 ) ( M O V D ? ( Q U O T E
0030200 \ G E T S T R E A M ) ( Q U O
0030220 T E \ G E T O F D ) ) ) ) )
0030240 ( L O C A L V A R S . T )
0030260 \r ( D E C L A R E : D O N T E
0030300 V A L @ L O A D D O E V A L @
0030320 C O M P I L E D O N T C O P Y
0030340 C O M P I L E R V A R S ( A
0030360 D D V A R S ( N L A M A ) (
0030400 N L A M L ) ( L A M A W H E
0030420 N C L O S E ) \r ) ) ) ) \r ( R P
0030440 A Q ? D E F A U L T E O F C L
0030460 O S E ( Q U O T E N I L L )
0030500 ) \r ( R P A Q ? \ O P E N F I
0030520 L E S ) \r ( \ B A S E B Y T E S
0030540 . I O . I N I T ) \r ( \ S T R I
0030560 N G S T R E A M . I N I T ) \r (
0030600 P U T P R O P S G E T O F D
0030620 M A C R O ( = . G E T S T
0030640 R E A M ) ) \r ( P U T P R O P S
0030660 \ G E T O F D M A C R O (
0030700 = . \ G E T S T R E A M ) )
0030720 \r ( M O V D ? ( Q U O T E G
0030740 E T S T R E A M ) ( Q U O T E
0030760 G E T O F D ) ) \r ( M O V D ?
0031000 ( Q U O T E \ G E T S T R E
0031020 A M ) ( Q U O T E \ G E T O
0031040 F D ) ) \r ( P U T P R O P S A
0031060 O F D C O P Y R I G H T ( "
0031100 X e r o x C o r p o r a t i o
0031120 n " 1 9 8 1 1 9 8 2 1 9 8
0031140 3 1 9 8 4 1 9 8 5 ) ) \r N I
0031160 L \r
0031162