$ od -c -N 50000 [eris]<Lisp>Harmony>SOURCES>FILEIO.DCOM!2
0000000 ( F I L E C R E A T E D " 2 7
0000020 - S e p - 8 4 0 9 : 3 6 : 1 3
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 > F I L E I O
0000120 . ; 2 0 ) \r " 2 5 - S e p - 8
0000140 4 1 8 : 3 0 : 1 0 " r e c o
0000160 m p i l e d c h a n g e s :
0000200 C O P Y C H A R S i n " I N
0000220 T E R L I S P - D 2 5 - S e p
0000240 - 8 4 . . . " d a t e d \r
0000260 " 2 5 - S e p - 8 4 1 8 : 5 9
0000300 : 3 8 " ) \r ( F I L E C R E A T
0000320 E D " 2 7 - S e p - 8 4 0 9
0000340 : 3 4 : 0 9 " { E R I S } < L
0000360 I S P C O R E > S O U R C E S >
0000400 F I L E I O . ; 2 0 8 8 6 6 4
0000420 c h a n g e s t o : ( F N
0000440 S C O P Y C H A R S ) \r p r
0000460 e v i o u s d a t e : " 7
0000500 - S e p - 8 4 1 4 : 3 8 : 4 7
0000520 " { E R I S } < L I S P C O R
0000540 E > S O U R C E S > F I L E I O
0000560 . ; 1 9 ) \r ( / D E C L A R E D
0000600 A T A T Y P E ( Q U O T E S
0000620 T R E A M ) ( Q U O T E ( W
0000640 O R D W O R D F L A G F L
0000660 A G F L A G ( B I T S 5 )
0000700 P O I N T E R F L A G F L
0000720 A G F L A G F L A G \r F L
0000740 A G ( B I T S 3 ) P O I N
0000760 T E R P O I N T E R P O I N
0001000 T E R W O R D W O R D P O
0001020 I N T E R P O I N T E R P O
*
0001060 I N T E R W O R D W O R D
0001100 \r B Y T E P O I N T E R W O
0001120 R D W O R D W O R D W O R
0001140 D W O R D W O R D ( B I T
0001160 S 2 ) F L A G ( B I T S
0001200 5 ) P O I N T E R P O I N T
0001220 E R P O I N T E R P O I N T
0001240 E R \r P O I N T E R P O I N
0001260 T E R P O I N T E R P O I N
0001300 T E R W O R D W O R D P O
0001320 I N T E R ) ) ) \r S T R E A M P
0001340 R O P D 1 \r ( L ( 0 X ) )
0001360 \0 " 001 \0 002 \0 e 021 001 \0 H d l 002 361
0001400 227 277 @ A B \v \0 \0 020 l 002 360 264 \b @ A
0001420 \n \0 \0 020 \t \0 \0 020 \0 ( 3 7 Q \ I
0001440 L L E G A L . A R G 3 3 Q G
0001460 E T S T R E A M P R O P 2 0 Q
0001500 P U T S T R E A M P R O P ) \r
0001520 N I L \r ( ) \r G E T S T R E A M
0001540 P R O P D 1 \r ( L ( 1 P R
0001560 O P 0 S T R E A M ) ) \0 031
0001600 \0 \0 \0 002 @ d 004 ` \0 \0 360 245 277 \b \0 \0
0001620 277 @ 006 \0 \0 311 $ A \n \0 \0 020 \0 ( 2 6
0001640 Q L I S T G E T 1 3 Q \ I
0001660 L L E G A L . A R G ) \r ( 2 0 Q
0001700 S T R E A M 5 004 003 S T R E
0001720 A M T Y P E # ) \r ( ) \r P U T S
0001740 T R E A M P R O P D 1 \r ( L
0001760 ( 2 V A L U E 1 P R O P
0002000 0 S T R E A M ) P 1 O L
0002020 D V A L U E ) \0 f 003 \0 \0 003 @ d
0002040 004 ` \0 \0 360 244 \t \0 \0 277 @ 006 \0 \0 311 $
0002060 021 ! 002 H 265 022 B 264 016 @ 006 \0 \0 A B h
0002100 032 032 024 $ h 020 A \n \0 \0 Y B 230 H A B
0002120 \v \0 \0 277 260 - I 264 + H d 001 A 360 262 036
0002140 277 @ 006 \0 \0 H 002 002 024 $ 277 260 026 002 001 A
0002160 360 227 J d 002 002 002 031 277 206 J 002 002 Z 003 265
0002200 356 I 020 \0 ( 6 4 Q L I S T P U T
0002220 5 3 Q L I S T G E T 1 2 Q
0002240 \ I L L E G A L . A R G ) \r (
0002260 1 0 6 Q S T R E A M 3 6 Q
0002300 S T R E A M 1 7 Q S T R E A
0002320 M 5 004 003 S T R E A M T Y P E
0002340 # ) \r ( ) \r S T R E A M P D 1
0002360 \r ( L ( 0 X ) ) \0 \v \0 \0 \0
0002400 001 @ 004 ` \0 \0 360 264 003 @ 020 \0 N I L \r
0002420 ( 4 004 003 S T R E A M T Y P E #
0002440 ) \r ( ) \r \ G E T A C C E S S
0002460 D 1 \r ( L ( 0 S T R E A M )
0002500 ) \0 4 \0 \0 \0 001 @ 006 \0 \0 312 004 R d
0002520 j 360 221 h 020 d k 360 223 g \0 \0 020 d l 002
0002540 360 223 g \0 \0 020 d l 006 360 223 g \0 \0 020 l
0002560 \a 360 223 g \0 \0 020 \b \0 \0 020 \0 ( 6 1 Q
0002600 S H O U L D N T ) \r ( 5 5 Q
0002620 B O T H 4 5 Q O U T P U T
0002640 3 4 Q A P P E N D 2 3 Q I
0002660 N P U T 3 S T R E A M ) \r (
0002700 ) \r \ S E T A C C E S S D 1 \r
0002720 ( L ( 1 A C C E S S 0 S
0002740 T R E A M ) P 0 \ I N T E
0002760 R R U P T A B L E ) 001 336 004 \0 \0
0003000 002 021 @ 003 @ 006 \0 \0 311 006 273 A 265 I @ 006
0003020 \0 \0 j 317 004 R 277 @ 006 \0 \0 @ 006 \0 \0 @
0003040 006 \0 \0 j 317 002 277 j d 360 241 k 200 j Y
0003060 317 002 020 277 I j 360 241 k 200 j 317 002 \0 277 @
0003100 006 \0 \0 @ 006 \0 \0 g \0 \0 024 . 277 g \0 \0
0003120 024 , 261 001 212 g \0 \0 360 262 T @ 006 \0 \0 k
0003140 317 004 R 277 @ 006 \0 \0 K 006 \0 \0 312 \0 @ j
0003160 360 241 k 200 j 317 002 \0 277 @ 006 \0 \0 K 006 \0
0003200 \0 311 036 024 , 277 @ 006 \0 \0 g \0 \0 024 . 277
0003220 @ 006 \0 \0 @ 006 \0 \0 j 317 002 277 j d 360
0003240 241 k 200 j Z 317 002 020 277 J 261 001 2 A d g
0003260 \0 \0 360 262 [ 277 @ 006 \0 \0 l 002 317 004 R 277
0003300 @ 006 \0 \0 K 006 \0 \0 312 \0 P j 360 241 k 200
0003320 j 317 002 020 277 @ 006 \0 \0 K 006 \0 \0 312 \0 `
0003340 j 360 241 k 200 j 317 002 277 @ 006 \0 \0 K 006
0003360 \0 \0 311 024 . 277 @ 006 \0 \0 g \0 \0 024 ,
0003400 277 @ 006 \0 \0 j 317 002 \0 277 j 261 \0 321 g \0
0003420 \0 360 262 Y @ 006 \0 \0 l 006 317 004 R 277 @ 006
0003440 \0 \0 K 006 \0 \0 312 \0 P j 360 241 k 200 j 317
0003460 002 020 277 @ 006 \0 \0 K 006 \0 \0 312 \0 ` j 360
0003500 241 k 200 j 317 002 277 @ 006 \0 \0 K 006 \0 \0
0003520 311 024 . 277 @ 006 \0 \0 g \0 \0 024 , 277 @
0003540 006 \0 \0 j 317 002 \0 277 j 260 s A g \0 \0 360
0003560 262 e @ 006 \0 \0 l \a 317 004 R 277 @ 006 \0 \0
0003600 K 006 \0 \0 312 \0 @ j 360 241 k 200 j 317 002 \0
0003620 277 @ 006 \0 \0 K 006 \0 \0 312 \0 P j 360 241 k
0003640 200 j 317 002 020 277 @ 006 \0 \0 K 006 \0 \0 312 \0
0003660 ` j 360 241 k 200 j 317 002 277 @ 006 \0 \0 K
0003700 006 \0 \0 311 036 024 , 277 @ 006 \0 \0 K 006 \0 \0
0003720 311 024 . 206 o \0 \0 \0 \t \0 \0 A 020 \0 (
0003740 7 3 2 Q R A I D ) \r ( 7 1 6 Q
0003760 F D E V 7 1 2 Q S T R E A
0004000 M 7 0 1 Q F D E V 6 7 5 Q
0004020 S T R E A M 6 5 4 Q F D E
0004040 V 6 5 0 Q S T R E A M 6 2
0004060 7 Q F D E V 6 2 3 Q S T R
0004100 E A M 6 0 2 Q F D E V 5 7
0004120 6 Q S T R E A M 5 6 4 Q S
0004140 T R E A M 5 5 5 Q B O T H
0004160 5 4 1 Q S T R E A M 5 3 2 Q
0004200 \ S T R E A M . N O T . O P E
0004220 N 5 2 7 Q S T R E A M 5 1
0004240 6 Q F D E V 5 1 2 Q S T R
0004260 E A M 4 7 1 Q F D E V 4 6
0004300 5 Q S T R E A M 4 4 4 Q F
0004320 D E V 4 4 0 Q S T R E A M
0004340 4 2 6 Q S T R E A M 4 1 7 Q
0004360 O U T P U T 4 0 3 Q S T R
0004400 E A M 3 7 4 Q \ S T R E A M
0004420 . N O T . O P E N 3 7 1 Q S
0004440 T R E A M 3 6 0 Q F D E V
0004460 3 5 4 Q S T R E A M 3 3 3 Q
0004500 F D E V 3 2 7 Q S T R E A
0004520 M 3 0 6 Q F D E V 3 0 2 Q
0004540 S T R E A M 2 7 0 Q S T R
0004560 E A M 2 6 0 Q A P P E N D
0004600 2 2 6 Q S T R E A M 2 2 2 Q
0004620 S T R E A M 2 1 3 Q \ S T
0004640 R E A M . N O T . O P E N 2 1
0004660 0 Q S T R E A M 1 7 7 Q F
0004700 D E V 1 7 3 Q S T R E A M
0004720 1 5 2 Q F D E V 1 4 6 Q S
0004740 T R E A M 1 3 5 Q S T R E A
0004760 M 1 2 6 Q I N P U T 1 1 6
0005000 Q \ S T R E A M . N O T . O P
0005020 E N 1 1 0 Q \ S T R E A M .
0005040 N O T . O P E N 1 0 5 Q S T
0005060 R E A M 1 0 1 Q S T R E A M
0005100 4 1 Q S T R E A M 3 5 Q
0005120 S T R E A M 3 1 Q S T R E A
0005140 M 2 0 Q S T R E A M 6 S
0005160 T R E A M ) \r ( 7 2 7 Q " I
0005200 l l e g a l s t r e a m a c
0005220 c e s s m o d e " ) \r \ D E F
0005240 I N E D E V I C E D 1 \r ( L
0005260 ( 1 D E V 0 N A M E ) P
0005300 1 \ I N T E R R U P T A B L
0005320 E ) \0 261 002 \0 \0 002 021 020 \0 @ \t \0 \0
0005340 b \0 277 A 265 ' @ ` \0 \0 \n \0 \0 X 262 D
0005360 021 020 001 H ` \0 \0 \n \0 \0 027 \0 \0 277 @ `
0005400 \0 \0 \n \0 \0 027 \0 \0 023 260 ) 004 ` \0 \0 360
0005420 262 T @ ` \0 \0 \n \0 \0 270 021 020 001 A ` \0
0005440 \0 034 253 H 265 030 A ` \0 \0 032 027 \0 \0 277 @
0005460 265 004 @ 020 d ` \0 \0 034 236 260 026 002 ` \0 \0
0005500 \n \0 \0 027 \0 \0 277 260 337 ` \0 \0 032 027 \0 \0
0005520 277 H 265 \r @ h 032 ` \0 \0 032 027 \0 \0 001 A
0005540 031 277 260 320 A 004 l 004 360 234 A \t \0 \0 ` \0
0005560 \0 \n \0 \0 002 265 017 o \0 \0 \0 A \n \0 \0 b
0005600 002 261 377 c b 002 261 377 ^ \0 ( 2 4 5 Q
0005620 E R R O R 2 3 2 Q F A S S O
0005640 C 2 2 4 Q U - C A S E 1 5
0005660 1 Q D R E M O V E 7 7 Q F
0005700 A S S O C 5 3 Q D R E M O V
0005720 E 4 0 Q D R E M O V E 2 3
0005740 Q F A S S O C 6 U - C A S
0005760 E ) \r ( 2 2 7 Q \ D E V I C E
0006000 N A M E T O D E V I C E 2 0 4
0006020 Q \ D E V I C E N A M E T O D
0006040 E V I C E 2 0 0 Q \ D E V I
0006060 C E N A M E T O D E V I C E 1
0006100 6 6 Q \ F I L E D E V I C E N
0006120 A M E S 1 6 2 Q \ F I L E D
0006140 E V I C E N A M E S 1 5 4 Q
0006160 \ F I L E D E V I C E S 1 4 6
0006200 Q \ F I L E D E V I C E S 1
0006220 3 6 Q \ F I L E D E V I C E N
0006240 A M E S 1 2 4 Q \ F I L E D
0006260 E V I C E S 1 2 0 Q \ F I L
0006300 E D E V I C E S 1 0 7 Q \ F
0006320 I L E D E V I C E S 7 4 Q \
0006340 D E V I C E N A M E T O D E V I
0006360 C E 6 5 Q 004 003 F D E V T Y P
0006400 E # 5 6 Q \ F I L E D E V I
0006420 C E N A M E S 5 0 Q \ F I L
0006440 E D E V I C E N A M E S 4 3 Q
0006460 \ D E V I C E N A M E T O D E
0006500 V I C E 3 5 Q \ D E V I C E
0006520 N A M E T O D E V I C E 2 0 Q
0006540 \ D E V I C E N A M E T O D E
0006560 V I C E ) \r ( 2 4 1 Q " I N
0006600 V A L I D F I L E D E V I C
0006620 E " ) \r \ G E T D E V I C E F R
0006640 O M N A M E D 1 \r ( L ( 2
0006660 D O N T C R E A T E 1 N O E
0006700 R R O R 0 N A M E ) ) \0 221
0006720 005 \0 \0 003 021 001 @ d 004 l 004 360 244 005 \a
0006740 262 Q @ \t \0 \0 l { 360 262 034 @ l 002 g \0
0006760 \0 @ h d d i \r 006 \0 \0 265 004 l 002 l 002
0007000 331 \v \0 \0 200 @ X 262 * H ` \0 \0 \n \0 \0
0007020 002 265 R H \t \0 \0 X ` \0 \0 \n \0 \0 002 265
0007040 D B 255 ` \0 \0 021 ! 004 J 003 265 020 h 022 265
0007060 4 A 263 0 @ l 027 \n \0 \0 020 001 [ 006 \0 \0
0007100 311 020 271 H K l 002 I 016 \ 265 \a J 002 Z 260
0007120 333 004 ` \0 \0 360 221 L 273 H K \n \0 \0 277 K
0007140 260 316 h 020 \0 ( 2 1 1 Q \ D E F I
0007160 N E D E V I C E 1 4 5 Q \ L
0007200 I S P E R R O R 1 1 1 Q F A
0007220 S S O C 1 0 2 Q U - C A S E
0007240 7 3 Q F A S S O C 5 7 Q
0007260 S U B A T O M 4 5 Q S T R P
0007300 O S 2 1 Q C H C O N 1 ) \r (
0007320 2 0 0 Q 004 003 F D E V T Y P E #
0007340 1 5 3 Q F D E V 1 2 1 Q
0007360 \ F I L E D E V I C E S 1 0 6
0007400 Q \ D E V I C E N A M E T O D
0007420 E V I C E 7 0 Q \ D E V I C
0007440 E N A M E T O D E V I C E 3 4
0007460 Q } ) \r ( ) \r \ R E M O V E D
0007500 E V I C E D 1 \r ( L ( 0 D
0007520 E V ) P 3 \ I N T E R R U
0007540 P T A B L E ) \0 B 004 \0 \0 001 021 @
0007560 003 ` \0 \0 Y 003 265 022 h X 265 036 @ ` \0 \0
0007600 \n \0 \0 027 \0 \0 @ 020 001 Z 002 @ 360 225 J 265
0007620 352 i 260 347 I 002 260 336 001 ` \0 \0 \n \0 \0 027
0007640 \0 \0 277 H ` \0 \0 \n \0 \0 027 \0 \0 260 307 \0
0007660 ( 7 3 Q D R E M O V E 6 0 Q
0007700 D R E M O V E 2 4 Q D R E
0007720 M O V E ) \r ( 7 6 Q \ D E V I
0007740 C E N A M E T O D E V I C E 7
0007760 0 Q \ D E V I C E N A M E T O
0010000 D E V I C E 6 3 Q \ F I L E
0010020 D E V I C E N A M E S 5 5 Q
0010040 \ F I L E D E V I C E N A M E S
0010060 2 7 Q \ F I L E D E V I C E
0010100 S 2 1 Q \ F I L E D E V I C
0010120 E S 5 \ D E V I C E N A M E
0010140 T O D E V I C E ) \r ( ) \r \ R E
0010160 M O V E D E V I C E . N A M E S
0010200 D 1 \r ( L ( 0 D E V ) )
0010220 \0 8 003 \0 \0 001 ` \0 \0 021 ! 002 H Y 003 265
0010240 021 J 264 \r h ` \0 \0 \n \0 \0 027 \0 \0 h 020
0010260 001 002 @ 360 262 025 I 001 001 ` \0 \0 \n \0 \0 027
0010300 \0 \0 277 I h 030 277 i 272 I 002 260 322 \0 ( 5
0010320 0 Q D R E M O V E 2 4 Q D
0010340 R E M O V E ) \r ( 5 3 Q \ F I
0010360 L E D E V I C E N A M E S 4 5
0010400 Q \ F I L E D E V I C E N A M
0010420 E S 2 7 Q \ D E V I C E N A
0010440 M E T O D E V I C E 2 1 Q \
0010460 D E V I C E N A M E T O D E V I
0010500 C E 2 \ D E V I C E N A M E
0010520 T O D E V I C E ) \r ( ) \r \ C L
0010540 O S E F I L E D 1 \r ( L ( 0
0010560 S T R E A M ) ) \0 : 001 \0 \0 001
0010600 @ d 006 \0 \0 312 004 R k 360 263 027 277 @ 006 \0
0010620 \0 311 & 006 \0 \0 311 002 021 001 \0 @ k H 016 023
0010640 @ 006 \0 \0 311 006 006 \0 \0 311 002 021 001 \0 @ k
0010660 H 016 023 @ \t \0 \0 @ 020 \0 ( 6 6 Q \
0010700 S E T A C C E S S ) \r ( 5 0 Q
0010720 F D E V 4 3 Q S T R E A M
0010740 2 5 Q I M A G E O P S 2 0 Q
0010760 S T R E A M 4 S T R E A M
0011000 ) \r ( ) \r \ D E L E T E F I L E
0011020 D 1 \r ( L ( 1 D E V 0
0011040 F I L E N A M E ) ) \0 " 001 \0 \0
0011060 002 @ \t \0 \0 b \0 A 265 \v d i \n \0 \0 b
0011100 002 d 235 006 \0 \0 311 004 021 001 \0 @ A l 002 H
0011120 016 020 \0 ( 1 5 Q \ G E T D E V I
0011140 C E F R O M N A M E 3 \ A D
0011160 D . C O N N E C T E D . D I R )
0011200 \r ( 2 4 Q F D E V ) \r ( ) \r \
0011220 D E V I C E E V E N T D 1 \r (
0011240 L ( 0 E V E N T ) F 2
0011260 \ O P E N F I L E S ) \0 s 002 001
0011300 \0 001 @ g \0 \0 360 263 025 @ g \0 \0 360 254 @
0011320 g \0 \0 360 246 @ g \0 \0 360 262 9 R 021 021 001
0011340 H 003 265 \b 023 ` \0 \0 260 G 001 Y 006 \0 \0 312
0011360 004 R l 006 345 j 360 263 027 I d 006 \0 \0 312 004
0011400 \0 j 360 230 006 \0 \0 k 317 004 020 277 k 277 H 002
0011420 X 260 320 ` \0 \0 \t \0 \0 260 026 d 001 021 021 001
0011440 H 006 \0 \0 311 \b 271 H @ l 002 I 016 023 002 003
0011460 265 353 h 020 \0 ( 1 2 6 Q R E V E R
0011500 S E ) \r ( 1 4 1 Q F D E V 1
0011520 2 3 Q \ F I L E D E V I C E S
0011540 1 0 4 Q S T R E A M 7 3 Q
0011560 S T R E A M 5 4 Q S T R E
0011600 A M 4 5 Q \ F I L E D E V I
0011620 C E S 2 6 Q B E F O R E S A
0011640 V E V M 2 0 Q B E F O R E S
0011660 Y S O U T 1 2 Q B E F O R E
0011700 M A K E S Y S 3 B E F O R E
0011720 L O G O U T ) \r ( ) \r \ G E N E
0011740 R A T E F I L E S D 1 \r ( L
0011760 ( 2 O P T I O N S 1 D E S
0012000 I R E D P R O P S 0 P A T T
0012020 E R N ) ) \0 036 002 \0 \0 003 @ \t \0 \0
0012040 b \0 d \t \0 \0 021 021 001 H 006 \0 \0 311 \n 271
0012060 H @ A B l 004 I 016 020 \0 ( 1 1 Q \
0012100 G E T D E V I C E F R O M N A M
0012120 E 3 \ A D D . C O N N E C T
0012140 E D . D I R ) \r ( 2 0 Q F D E
0012160 V ) \r ( ) \r \ G E N E R A T E N
0012200 E X T F I L E D 1 \r ( L ( 2
0012220 S C R A T C H L I S T 1 N
0012240 A M E O N L Y 0 G E N O B J
0012260 ) ) \0 021 001 \0 \0 003 @ 001 021 001 \0 @ 002
0012300 002 A B l 003 H 017 016 020 \0 N I L \r N I
0012320 L \r ( ) \r \ G E N E R A T E F I
0012340 L E I N F O D 1 \r ( L ( 1
0012360 A T T R I B U T E 0 G E N O
0012400 B J ) ) \0 021 001 \0 \0 002 @ 002 001 021 001
0012420 \0 @ 002 002 A l 002 H 017 016 020 \0 N I L \r
0012440 N I L \r ( ) \r \ G E T F I L E N
0012460 A M E D 1 \r ( L ( 2 F D E
0012500 V 1 R E C O G 0 N A M E
0012520 ) ) \0 5 002 \0 \0 003 @ \t \0 \0 b \0 021
0012540 001 @ \t \0 \0 X 265 035 B 265 \f @ i \n \0
0012560 \0 b 004 d 262 030 006 \0 \0 311 016 271 @ A B l
0012600 003 I 016 020 006 \0 \0 311 004 265 003 H 020 \0 ( 2
0012620 7 Q \ G E T D E V I C E F R O
0012640 M N A M E 1 4 Q \ S E A R C
0012660 H O P E N F I L E S 3 \ A D
0012700 D . C O N N E C T E D . D I R )
0012720 \r ( 5 5 Q S T R E A M 3 7 Q
0012740 F D E V ) \r ( ) \r \ G E T F I
0012760 L E N A M E . O R . S T R E A M
0013000 D 1 \r ( L ( 2 F D E V 1
0013020 R E C O G 0 N A M E ) )
0013040 \0 ] 001 \0 \0 003 @ d 004 ` \0 \0 360 226 \t \0
0013060 \0 264 I @ 020 004 l 004 360 230 @ d 264 A i 360
0013100 h 360 202 @ 005 \a 262 5 @ \t \0 \0 b \0 d \t
0013120 \0 \0 265 ( B 265 \v @ i \n \0 \0 b 004 d 237
0013140 006 \0 \0 311 016 021 001 \0 @ A B l 003 H 016 022
0013160 b \0 d 225 \t \0 \0 265 003 @ 020 @ h i \v \0
0013200 \0 020 \0 ( 1 3 2 Q \ G E T S T R
0013220 E A M 1 2 0 Q \ S E A R C H
0013240 O P E N F I L E S 6 5 Q \ G
0013260 E T D E V I C E F R O M N A M E
0013300 5 3 Q \ S E A R C H O P E N
0013320 F I L E S 4 5 Q \ A D D . C
0013340 O N N E C T E D . D I R 1 2 Q
0013360 \ G E T A C C E S S ) \r ( 7 4
0013400 Q F D E V 5 004 003 S T R E A
0013420 M T Y P E # ) \r ( ) \r \ O P E N
0013440 F I L E D 1 \r ( L ( 3 P A
0013460 R A M E T E R S 2 R E C O G
0013500 1 A C C E S S 0 N A M E
0013520 ) ) \0 201 004 \0 \0 004 021 @ 003 @ d 004 `
0013540 \0 \0 360 262 033 277 @ d A i \v \0 \0 230 277 @
0013560 A C \v \0 \0 @ 020 Y 006 \0 \0 311 006 206 \t \0
0013600 \0 Y \t \0 \0 X 006 \0 \0 311 022 273 I A B C
0013620 H l 005 K 016 Z 265 \f @ l 027 \n \0 \0 b \0
0013640 260 275 A \n \0 \0 277 J 006 \0 \0 A g \0 \0 360
0013660 226 J 006 \0 \0 310 \n 200 j 315 032 277 J 006 \0 \0
0013700 A g \0 \0 360 226 J 006 \0 \0 310 \v 200 j 315 \0
0013720 277 J A C \v \0 \0 J 020 \0 ( 1 7 5 Q
0013740 \ D O . P A R A M S . A T . O P
0013760 E N 1 1 4 Q \ S E T A C C E
0014000 S S 1 0 4 Q \ L I S P E R R
0014020 O R 5 3 Q \ G E T D E V I C
0014040 E F R O M N A M E 4 7 Q \ A
0014060 D D . C O N N E C T E D . D I R
0014100 3 3 Q \ D O . P A R A M S .
0014120 A T . O P E N 2 3 Q \ I O M
0014140 O D E P ) \r ( 1 6 0 Q S T R E
0014160 A M 1 5 2 Q A P P E N D 1
0014200 4 6 Q S T R E A M 1 3 3 Q
0014220 S T R E A M 1 2 5 Q A P P E
0014240 N D 1 2 1 Q S T R E A M 5
0014260 7 Q F D E V 4 1 Q S T R E
0014300 A M 1 0 Q 004 003 S T R E A M T
0014320 Y P E # ) \r ( ) \r \ D O . P A R
0014340 A M S . A T . O P E N D 1 \r (
0014360 L ( 2 P A R A M E T E R S
0014400 1 A C C E S S 0 S T R E A
0014420 M ) ) \0 : 004 \0 \0 003 B 021 1 003 H 003
0014440 265 004 h 020 001 Y d 003 226 001 272 I 002 003 001 201
0014460 272 i 273 J d g \0 \0 360 225 277 @ g \0 \0 210
0014500 g \0 \0 360 230 @ g \0 \0 K \v \0 \0 277 H 002
0014520 X 260 316 \0 ( 6 2 Q S E T F I L E
0014540 I N F O ) \r ( 5 6 Q E N D O F
0014560 S T R E A M O P 5 0 Q E N D
0014600 O F S T R E A M O P 4 4 Q B
0014620 U F F E R S 3 5 Q B U F F E
0014640 R S ) \r ( ) \r \ R E N A M E F I
0014660 L E D 1 \r ( L ( 1 N E W F
0014700 I L E 0 O L D F I L E ) )
0014720 \0 5 002 \0 \0 002 @ \t \0 \0 b \0 A \t \0 \0
0014740 b 002 @ i \n \0 \0 021 021 001 H 264 030 A i \n
0014760 \0 \0 H 360 236 H 006 \0 \0 311 : 271 @ A H l
0015000 003 I 016 020 @ A \n \0 \0 020 \0 ( 6 2 Q
0015020 \ G E N E R I C . R E N A M E F
0015040 I L E 3 3 Q \ G E T D E V I
0015060 C E F R O M N A M E 2 0 Q \
0015100 G E T D E V I C E F R O M N A M
0015120 E 1 1 Q \ A D D . C O N N E
0015140 C T E D . D I R 3 \ A D D .
0015160 C O N N E C T E D . D I R ) \r (
0015200 4 2 Q F D E V ) \r ( ) \r \ R E
0015220 V A L I D A T E F I L E D 1 \r
0015240 ( L ( 0 S T R E A M ) ) \0
0015260 305 001 \0 \0 001 @ 006 \0 \0 311 006 006 \0 \0 311 026
0015300 021 001 \0 @ 006 \0 \0 311 004 @ \t \0 \0 g \0 \0
0015320 h @ 006 \0 \0 311 006 @ l 006 H 016 022 021 001 \0
0015340 H 265 006 g \0 \0 020 @ 360 221 h 020 @ 006 \0 \0
0015360 H 006 \0 \0 311 \f 024 \f @ 006 \0 \0 H 006 \0 \0
0015400 311 016 024 016 @ 006 \0 \0 H 006 \0 \0 311 020 024 020
0015420 @ 006 \0 \0 H 006 \0 \0 311 022 024 022 @ 006 \0 \0
0015440 H 006 \0 \0 311 024 024 024 @ 006 \0 \0 H 006 \0 \0
0015460 310 026 315 026 @ 006 \0 \0 H 006 \0 \0 310 027 315 027
0015500 H 006 \0 \0 311 \b @ 006 \0 \0 311 \b \n \0 \0 263
0015520 233 @ 006 \0 \0 H 006 \0 \0 311 \b 024 \b @ 006 \0
0015540 \0 H 006 \0 \0 310 \n 315 \n @ 006 \0 \0 H 006 \0
0015560 \0 310 \v 315 \v g \0 \0 020 \0 ( 2 3 1 Q
0015600 E Q U A L 2 7 Q \ G E T A C
0015620 C E S S ) \r ( 3 0 2 Q C H A N
0015640 G E D 2 7 3 Q S T R E A M
0015660 2 6 7 Q S T R E A M 2 5 7 Q
0015700 S T R E A M 2 5 3 Q S T R
0015720 E A M 2 4 3 Q S T R E A M
0015740 2 3 7 Q S T R E A M 2 2 4 Q
0015760 S T R E A M 2 1 6 Q S T R
0016000 E A M 2 0 6 Q S T R E A M
0016020 2 0 2 Q S T R E A M 1 7 2 Q
0016040 S T R E A M 1 6 6 Q S T R
0016060 E A M 1 5 6 Q S T R E A M
0016100 1 5 2 Q S T R E A M 1 4 2 Q
0016120 S T R E A M 1 3 6 Q S T R
0016140 E A M 1 2 6 Q S T R E A M
0016160 1 2 2 Q S T R E A M 1 1 2 Q
0016200 S T R E A M 1 0 6 Q S T R
0016220 E A M 7 6 Q S T R E A M 7
0016240 2 Q S T R E A M 6 0 Q D E
0016260 L E T E D 3 7 Q S T R E A M
0016300 3 2 Q O L D 2 1 Q S T R
0016320 E A M 1 0 Q F D E V 3 S
0016340 T R E A M ) \r ( ) \r \ T R U N C
0016360 A T E F I L E D 1 \r ( L ( 2
0016400 L A S T O F F S E T 1 L A
0016420 S T P A G E 0 S T R E A M )
0016440 ) \0 027 001 \0 \0 003 @ 006 \0 \0 311 006 006 \0
0016460 \0 311 032 021 001 \0 @ A B l 003 H 016 020 \0 N
0016500 I L \r ( 1 0 Q F D E V 3 S
0016520 T R E A M ) \r ( ) \r \ G E N E R
0016540 A T E N O F I L E S D 1 \r ( L
0016560 ( 3 O P T I O N S 2 D E
0016600 S I R E D P R O P S 1 P A T
0016620 T E R N 0 F D E V ) ) \0 p
0016640 002 \0 \0 004 g \0 \0 A \n \0 \0 o \0 \0 \0 A
0016660 \n \0 \0 021 002 001 H 262 030 A H k 331 ) l ;
0016700 360 262 N g \0 \0 A H k 330 \v \0 \0 263 B I
0016720 262 030 A I k 331 ) l ; 360 262 5 g \0 \0 A
0016740 I k 330 \v \0 \0 263 ) g \0 \0 g \0 \0 H 246
0016760 I 244 g \0 \0 260 023 g \0 \0 h g \0 \0 A \f
0017000 \0 \0 b 002 277 g \0 \0 A h 032 032 032 032 020 \b
0017020 \0 \0 020 \0 ( 1 5 5 Q \ N U L L F
0017040 I L E G E N E R A T O R 1 3 5
0017060 Q P A C K F I L E N A M E 1
0017100 0 1 Q S T R P O S 5 0 Q S
0017120 T R P O S 1 6 Q S T R P O S
0017140 6 S T R P O S ) \r ( 1 4 3 Q
0017160 S T A R 1 3 1 Q B O D Y
0017200 1 2 5 Q V E R S I O N 1 2 0
0017220 Q N O S T A R 1 1 1 Q \ N
0017240 O F I L E S I N F O F N 1 0 6
0017260 Q \ N O F I L E S N E X T F I
0017300 L E F N 7 2 Q 033 4 1 Q *
0017320 2 * ) \r ( 1 2 Q ( C O N
0017340 S T A N T ( C H A R A C T E R
0017360 ( C H A R C O D E E S C ) )
0017400 ) ) \r \ N U L L F I L E G E N E
0017420 R A T O R D 1 \r N I L \0 \t \0
0017440 \0 \0 \0 g \0 \0 h h 032 032 020 \0 N I L \r
0017460 ( 2 N I L L ) \r ( ) \r \ N O F
0017500 I L E S N E X T F I L E F N D
0017520 1 \r ( L ( 2 S C R A T C H L
0017540 I S T 1 N A M E O N L Y 0
0017560 G E N F I L E S T A T E ) )
0017600 \0 214 003 \0 \0 003 021 0 002 @ 001 Y d g \0 \0
0017620 360 237 277 @ g \0 \0 030 277 @ 002 001 \t \0 \0 X
0017640 260 Z g \0 \0 360 221 h 020 I d g \0 \0 360 262
0017660 $ 277 @ 002 001 g \0 \0 \n \0 \0 270 @ H g \0
0017700 \0 \n \0 \0 @ 002 001 \t \0 \0 g \0 \0 \n \0 \0
0017720 032 260 & 001 k 330 Z I 002 361 263 037 g \0 \0 J
0017740 g \0 \0 @ 002 001 \f \0 \0 \t \0 \0 X 262 033 I
0017760 H g \0 \0 \n \0 \0 030 277 H 264 026 @ 002 H 031
0020000 A 230 H i \n \0 \0 203 J 260 313 H B \n \0 \0
0020020 020 \0 ( 2 1 1 Q D C H C O N 2
0020040 0 0 Q N A M E F I E L D 1 6
0020060 0 Q F I L E N A M E F I E L D
0020100 1 4 5 Q I N F I L E P 1 4
0020120 2 Q P A C K F I L E N A M E
0020140 1 1 1 Q F I L E N A M E F I E
0020160 L D 1 0 3 Q I N F I L E P
0020200 7 5 Q F I L E N A M E F I E L
0020220 D 6 4 Q F U L L N A M E 3
0020240 0 Q I N F I L E P ) \r ( 1 5 5
0020260 Q V E R S I O N 1 3 4 Q B
0020300 O D Y 1 3 0 Q V E R S I O N
0020320 1 0 6 Q V E R S I O N 7 2
0020340 Q V E R S I O N 6 1 Q O L
0020360 D E S T 4 7 Q S T A R 3 6
0020400 Q D O N E 2 0 Q D O N E
0020420 1 1 Q N O S T A R ) \r ( ) \r \
0020440 N O F I L E S I N F O F N D 1
0020460 \r ( L ( 1 A T T R I B U T E
0020500 0 G E N S T A T E ) ) \0 \t
0020520 \0 \0 \0 002 @ 002 002 A \n \0 \0 020 \0 ( 6
0020540 G E T F I L E I N F O ) \r N I L
0020560 \r ( ) \r \ F I L E . N O T . O P
0020600 E N D 1 \r ( L ( 1 N O E R
0020620 R O R 0 X ) ) \0 034 \0 \0 \0 002
0020640 A h 360 264 027 @ d 004 ` \0 \0 360 227 006 \0 \0
0020660 311 004 265 003 @ l \r \n \0 \0 020 \0 ( 3 1 Q
0020700 \ L I S P E R R O R ) \r ( 1 7
0020720 Q S T R E A M 1 2 Q 004 003 S
0020740 T R E A M T Y P E # ) \r ( ) \r \
0020760 F I L E . W O N T . O P E N D
0021000 1 \r ( L ( 0 X ) ) \0 027 \0 \0
0021020 \0 001 @ d 004 ` \0 \0 360 227 006 \0 \0 311 004 265
0021040 003 @ l \t \n \0 \0 020 \0 ( 2 4 Q \ L
0021060 I S P E R R O R ) \r ( 1 2 Q S
0021100 T R E A M 5 004 003 S T R E A M
0021120 T Y P E # ) \r ( ) \r \ I L L E G
0021140 A L . D E V I C E O P D 1 \r (
0021160 L ( 0 N ) ) \0 / 006 \0 002 \0 e
0021200 021 001 \0 o \0 \0 \0 H k 021 2 005 J d I 361
0021220 226 277 K 022 \n \0 \0 020 a 275 L 265 \r M h 032
0021240 \ 273 J k 330 Z 260 347 M & 274 260 367 \0 ( 2
0021260 7 Q E R R O R ) \r N I L \r (
0021300 7 " A t t e m p t t o u s
0021320 e u n d e f i n e d d e v i
0021340 c e o p e r a t i o n " ) \r \
0021360 I S . N O T . R A N D A C C E S
0021400 S P D 1 \r ( L ( 0 N ) )
0021420 \0 ! 002 \0 002 \0 e 021 001 \0 @ 021 001 001 o \0
0021440 \0 \0 I d 004 ` \0 \0 360 227 006 \0 \0 311 004 265
0021460 003 I \n \0 \0 020 \0 ( 3 6 Q E R R O
0021500 R ) \r ( 2 6 Q S T R E A M 2
0021520 1 Q 004 003 S T R E A M T Y P E #
0021540 ) \r ( 1 3 Q " F i l e i s
0021560 n o t R A N D A C C E S S P
0021600 " ) \r \ S T R E A M . N O T . O
0021620 P E N D 1 \r ( L ( 0 S T R
0021640 E A M ) ) \0 020 \0 \0 \0 001 @ 006 \0 \0
0021660 311 004 265 003 @ l \r \n \0 \0 020 \0 ( 1 5 Q
0021700 \ L I S P E R R O R ) \r ( 3
0021720 S T R E A M ) \r ( ) \r \ F D E V
0021740 I N S T A N C E A 0 0 0 1 D 1
0021760 \r ( L ( 0 S T R E A M ) )
0022000 \0 031 001 \0 \0 001 @ 006 \0 \0 311 006 006 \0 \0 311
0022020 ( 006 \0 \0 311 002 021 001 \0 @ k H 016 020 \0 N
0022040 I L \r ( 1 5 Q F D E V 1 0 Q
0022060 F D E V 3 S T R E A M ) \r
0022100 ( ) \r \ F D E V I N S T A N C E
0022120 A 0 0 0 3 D 1 \r ( L ( 2 F
0022140 D E V 1 A T T R I B 0 S
0022160 T R E A M ) ) \0 034 001 \0 \0 003 B 006
0022200 \0 \0 311 ( 006 \0 \0 311 \f 021 001 \0 @ A B 006
0022220 \0 \0 311 ( l 003 H 016 020 \0 N I L \r ( 2
0022240 3 Q F D E V 1 0 Q F D E V
0022260 3 F D E V ) \r ( ) \r \ F D E
0022300 V I N S T A N C E A 0 0 0 5 D
0022320 1 \r ( L ( 4 F D E V 3 O
0022340 T H E R I N F O 2 R E C O G
0022360 1 A C C E S S 0 C D N A
0022400 M E ) ) \0 036 001 \0 \0 005 D 006 \0 \0 311
0022420 ( 006 \0 \0 311 022 021 001 \0 @ A B C D 006 \0
0022440 \0 311 ( l 005 H 016 020 \0 N I L \r ( 2 5
0022460 Q F D E V 1 0 Q F D E V
0022500 3 F D E V ) \r ( ) \r \ F D E V
0022520 I N S T A N C E A 0 0 0 7 D 1
0022540 \r ( L ( 2 B U F F E R L I S
0022560 T 1 F I R S T P A G E 0
0022600 S T R E A M ) ) \0 034 001 \0 \0 003 @
0022620 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311 024 021
0022640 001 \0 @ A B l 003 H 016 020 \0 N I L \r (
0022660 1 5 Q F D E V 1 0 Q F D E
0022700 V 3 S T R E A M ) \r ( ) \r \
0022720 F D E V I N S T A N C E A 0 0 0
0022740 9 D 1 \r ( L ( 3 F D E V
0022760 2 V A L U E 1 A T T R I B
0023000 U T E 0 S T R E A M ) ) \0
0023020 035 001 \0 \0 004 C 006 \0 \0 311 ( 006 \0 \0 311 030
0023040 021 001 \0 @ A B C 006 \0 \0 311 ( l 004 H 016
0023060 020 \0 N I L \r ( 2 4 Q F D E V
0023100 1 0 Q F D E V 3 F D E V )
0023120 \r ( ) \r \ F D E V I N S T A N C
0023140 E A 0 0 1 1 D 1 \r ( L ( 2
0023160 L A S T O F F S E T 1 L A S
0023200 T P A G E 0 S T R E A M ) )
0023220 \0 034 001 \0 \0 003 @ 006 \0 \0 311 006 006 \0 \0
0023240 311 ( 006 \0 \0 311 032 021 001 \0 @ A B l 003 H
0023260 016 020 \0 N I L \r ( 1 5 Q F D E V
0023300 1 0 Q F D E V 3 S T R E
0023320 A M ) \r ( ) \r \ F D E V I N S T
0023340 A N C E A 0 0 1 3 D 1 \r ( L
0023360 ( 2 B U F F E R L I S T 1
0023400 F I R S T P A G E 0 S T R E
0023420 A M ) ) \0 034 001 \0 \0 003 @ 006 \0 \0 311
0023440 006 006 \0 \0 311 ( 006 \0 \0 311 034 021 001 \0 @ A
0023460 B l 003 H 016 020 \0 N I L \r ( 1 5 Q
0023500 F D E V 1 0 Q F D E V 3
0023520 S T R E A M ) \r ( ) \r \ F D E V
0023540 I N S T A N C E A 0 0 1 5 D 1
0023560 \r ( L ( 5 O L D S T R E A M
0023600 4 F D E V 3 O T H E R I
0023620 N F O 2 R E C O G 1 A C
0023640 C E S S 0 N A M E ) ) \0 037
0023660 001 \0 \0 006 D 006 \0 \0 311 ( 006 \0 \0 311 026 021
0023700 001 \0 @ A B C D 006 \0 \0 311 ( E l 006 H
0023720 016 020 \0 N I L \r ( 2 5 Q F D E V
0023740 1 0 Q F D E V 3 F D E V
0023760 ) \r ( ) \r \ F D E V I N S T A N
0024000 C E A 0 0 1 7 D 1 \r ( L ( 0
0024020 S T R E A M ) ) \0 031 001 \0 \0 001
0024040 @ 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311 036
0024060 021 001 \0 @ k H 016 020 \0 N I L \r ( 1 5
0024100 Q F D E V 1 0 Q F D E V
0024120 3 S T R E A M ) \r ( ) \r \ F D
0024140 E V I N S T A N C E A 0 0 1 9
0024160 D 1 \r ( L ( 1 B Y T E 0
0024200 S T R E A M ) ) \0 033 001 \0 \0 002 @
0024220 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311 021
0024240 001 \0 @ A l 002 H 016 020 \0 N I L \r ( 1
0024260 5 Q F D E V 1 0 Q F D E V
0024300 3 S T R E A M ) \r ( ) \r \ F
0024320 D E V I N S T A N C E A 0 0 2 1
0024340 D 1 \r ( L ( 1 N O E R R O
0024360 R F L G 0 S T R E A M ) )
0024400 \0 033 001 \0 \0 002 @ 006 \0 \0 311 006 006 \0 \0 311
0024420 ( 006 \0 \0 311 " 021 001 \0 @ A l 002 H 016 020
0024440 \0 N I L \r ( 1 5 Q F D E V 1
0024460 0 Q F D E V 3 S T R E A M
0024500 ) \r ( ) \r \ F D E V I N S T A N
0024520 C E A 0 0 2 3 D 1 \r ( L ( 0
0024540 S T R E A M ) ) \0 031 001 \0 \0 001
0024560 @ 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311 &
0024600 021 001 \0 @ k H 016 020 \0 N I L \r ( 1 5
0024620 Q F D E V 1 0 Q F D E V
0024640 3 S T R E A M ) \r ( ) \r \ F D
0024660 E V I N S T A N C E A 0 0 2 5
0024700 D 1 \r ( L ( 1 I N D X 0
0024720 S T R E A M ) ) \0 033 001 \0 \0 002 @
0024740 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311 . 021
0024760 001 \0 @ A l 002 H 016 020 \0 N I L \r ( 1
0025000 5 Q F D E V 1 0 Q F D E V
0025020 3 S T R E A M ) \r ( ) \r \ F
0025040 D E V I N S T A N C E A 0 0 2 7
0025060 D 1 \r ( L ( 0 S T R E A M
0025100 ) ) \0 031 001 \0 \0 001 @ 006 \0 \0 311 006 006
0025120 \0 \0 311 ( 006 \0 \0 311 0 021 001 \0 @ k H 016
0025140 020 \0 N I L \r ( 1 5 Q F D E V
0025160 1 0 Q F D E V 3 S T R E A
0025200 M ) \r ( ) \r \ F D E V I N S T A
0025220 N C E A 0 0 2 9 D 1 \r ( L (
0025240 0 S T R E A M ) ) \0 031 001 \0 \0
0025260 001 @ 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311
0025300 2 021 001 \0 @ k H 016 020 \0 N I L \r ( 1
0025320 5 Q F D E V 1 0 Q F D E V
0025340 3 S T R E A M ) \r ( ) \r \ F
0025360 D E V I N S T A N C E A 0 0 3 1
0025400 D 1 \r ( L ( 0 S T R E A M
0025420 ) ) \0 031 001 \0 \0 001 @ 006 \0 \0 311 006 006
0025440 \0 \0 311 ( 006 \0 \0 311 4 021 001 \0 @ k H 016
0025460 020 \0 N I L \r ( 1 5 Q F D E V
0025500 1 0 Q F D E V 3 S T R E A
0025520 M ) \r ( ) \r \ F D E V I N S T A
0025540 N C E A 0 0 3 3 D 1 \r ( L (
0025560 3 N B Y T E S 2 O F F S E
0025600 T 1 B A S E 0 S T R E A
0025620 M ) ) \0 035 001 \0 \0 004 @ 006 \0 \0 311 006
0025640 006 \0 \0 311 ( 006 \0 \0 311 6 021 001 \0 @ A B
0025660 C l 004 H 016 020 \0 N I L \r ( 1 5 Q
0025700 F D E V 1 0 Q F D E V 3
0025720 S T R E A M ) \r ( ) \r \ F D E V
0025740 I N S T A N C E A 0 0 3 5 D 1
0025760 \r ( L ( 3 N B Y T E S 2
0026000 O F F S E T 1 B A S E 0
0026020 S T R E A M ) ) \0 035 001 \0 \0 004 @
0026040 006 \0 \0 311 006 006 \0 \0 311 ( 006 \0 \0 311 8 021
0026060 001 \0 @ A B C l 004 H 016 020 \0 N I L \r
0026100 ( 1 5 Q F D E V 1 0 Q F D
0026120 E V 3 S T R E A M ) \r ( ) \r
0026140 \ F D E V I N S T A N C E A 0 0
0026160 3 7 D 1 \r ( L ( 0 S T R E
0026200 A M ) ) \0 031 001 \0 \0 001 @ 006 \0 \0 311
0026220 006 006 \0 \0 311 ( 006 \0 \0 311 * 021 001 \0 @ k
0026240 H 016 020 \0 N I L \r ( 1 5 Q F D E
0026260 V 1 0 Q F D E V 3 S T R
0026300 E A M ) \r ( ) \r \ F D E V I N S
0026320 T A N C E D 1 \r ( L ( 0 F
0026340 D E V ) ) \0 221 001 \0 \0 001 021 020 \0 h
0026360 X d @ 024 ( 277 H g \0 \0 024 002 277 H g \0
0026400 \0 024 \f 277 H g \0 \0 024 022 277 H g \0 \0 024
0026420 024 277 H g \0 \0 024 030 277 H g \0 \0 024 032 277
0026440 H g \0 \0 024 034 277 H g \0 \0 024 026 277 H g
0026460 \0 \0 024 036 277 H g \0 \0 024 277 H g \0 \0
0026500 024 " 277 H g \0 \0 024 & 277 H g \0 \0 024 .
0026520 277 H g \0 \0 024 0 277 H g \0 \0 024 2 277 H
0026540 g \0 \0 024 4 277 H g \0 \0 024 6 277 H g \0
0026560 \0 024 8 277 H g \0 \0 024 * 277 020 \0 N I L
0026600 \r ( 2 1 3 Q \ F D E V I N S T
0026620 A N C E A 0 0 3 7 2 0 4 Q \
0026640 F D E V I N S T A N C E A 0 0 3
0026660 5 1 7 5 Q \ F D E V I N S T
0026700 A N C E A 0 0 3 3 1 6 6 Q \
0026720 F D E V I N S T A N C E A 0 0 3
0026740 1 1 5 7 Q \ F D E V I N S T
0026760 A N C E A 0 0 2 9 1 5 0 Q \
0027000 F D E V I N S T A N C E A 0 0 2
0027020 7 1 4 1 Q \ F D E V I N S T
0027040 A N C E A 0 0 2 5 1 3 2 Q \
0027060 F D E V I N S T A N C E A 0 0 2
0027100 3 1 2 3 Q \ F D E V I N S T
0027120 A N C E A 0 0 2 1 1 1 4 Q \
0027140 F D E V I N S T A N C E A 0 0 1
0027160 9 1 0 5 Q \ F D E V I N S T
0027200 A N C E A 0 0 1 7 7 6 Q \ F
0027220 D E V I N S T A N C E A 0 0 1 5
0027240 6 7 Q \ F D E V I N S T A N
0027260 C E A 0 0 1 3 6 0 Q \ F D E
0027300 V I N S T A N C E A 0 0 1 1 5
0027320 1 Q \ F D E V I N S T A N C E
0027340 A 0 0 0 9 4 2 Q \ F D E V I
0027360 N S T A N C E A 0 0 0 7 3 3 Q
0027400 \ F D E V I N S T A N C E A 0
0027420 0 0 5 2 4 Q \ F D E V I N S
0027440 T A N C E A 0 0 0 3 1 5 Q \
0027460 F D E V I N S T A N C E A 0 0 0
0027500 1 ) \r ( ) \r C N D I R D 1 \r (
0027520 L ( 0 H O S T / D I R ) )
0027540 001 221 \a \0 \0 001 @ i \n \0 \0 027 \0 \0 265 003
0027560 202 261 \0 235 @ d 004 l 004 360 256 d 005 \a 252 277
0027600 o \0 \0 \0 @ \n \0 \0 277 @ ` \0 \0 021 R 006
0027620 @ k ) l { 360 262 ' @ l 002 g \0 \0 @ l
0027640 002 \v \0 \0 265 \n o \0 \0 \0 @ \n \0 \0 ] k
0027660 331 \v \0 \0 271 @ M k 330 \n \0 \0 270 I i \n
0027700 \0 \0 \ 263 027 I h ` \0 \0 i \f \0 \0 ] 265
0027720 ' o \0 \0 \0 @ \n \0 \0 277 g \0 \0 I g \0
0027740 \0 H 263 p L 006 \0 \0 312 \0 j 360 263 ] o
0027760 \0 \0 \0 261 \0 264 i \n \0 \0 \ 262 326 M 271 g
0030000 \0 \0 I g \0 \0 H \f \0 \0 b \0 260 315 d g
0030020 \0 \0 \n \0 \0 027 \0 \0 277 ` \0 \0 g \0 \0 \n
0030040 \0 \0 027 \0 \0 265 \v o \0 \0 \0 027 \0 \0 277 020
0030060 \t \0 \0 j 363 262 362 o \0 \0 \0 ` \0 \0 o \0
0030100 \0 \0 \v \0 \0 027 \0 \0 277 020 g \0 \0 ` \0 \0
0030120 260 Q o \0 \0 \0 H \n \0 \0 262 3 H d \t \0
0030140 \0 k 360 226 277 o \0 \0 \0 260 > m 377 ) l >
0030160 360 262 023 H d \t \0 \0 l 002 360 262 , 277 o \0
0030200 \0 \0 260 % H g \0 \0 \n \0 \0 260 034 H m 377
0030220 ) l > 360 227 g \0 \0 H \n \0 \0 211 g \0 \0
0030240 H g \0 \0 \v \0 \0 \f \0 \0 [ L 006 \0 \0 311
0030260 006 276 K L l 002 N 016 ] 265 \f o \0 \0 \0 K
0030300 \n \0 \0 h 020 i 360 241 M 273 o \0 \0 \0 K \n
0030320 \0 \0 275 K l 002 M k 331 \v \0 \0 271 K M k
0030340 330 \n \0 \0 265 006 o \0 \0 \0 272 I 027 \0 \0 277
0030360 J 027 \0 \0 K 020 \0 ( 5 7 5 Q S U B
0030400 S T R I N G 5 6 5 Q S U B A
0030420 T O M 5 5 3 Q S T R P O S
0030440 5 3 4 Q E R R O R 5 0 3 Q
0030460 P A C K * 5 0 0 Q C O N C A
0030500 T 4 6 5 Q C O N C A T 4 4
0030520 4 Q C O N C A T 4 2 1 Q N
0030540 C H A R S 3 7 2 Q N C H A R
0030560 S 3 6 3 Q S T R P O S 3 3
0030600 6 Q C O N C A T 3 1 4 Q N
0030620 C H A R S 2 7 3 Q F I L E N
0030640 A M E F I E L D 2 5 6 Q F I
0030660 L E N A M E F I E L D 2 4 3 Q
0030700 P A C K * 2 2 3 Q \ G E T
0030720 D E V I C E F R O M N A M E 1
0030740 6 2 Q E R R O R 1 4 7 Q F
0030760 I X S P E L L 1 3 3 Q \ G E
0031000 T D E V I C E F R O M N A M E
0031020 1 2 5 Q S U B A T O M 1 1 5
0031040 Q S U B A T O M 1 0 7 Q L
0031060 I S P E R R O R 7 5 Q S T R
0031100 P O S 4 1 Q L I S P E R R O
0031120 R 4 D I R E C T O R Y N A M
0031140 E ) \r ( 6 1 5 Q \ C O N N E C
0031160 T E D . D I R 6 1 0 Q \ C O
0031200 N N E C T E D . H O S T 5 1 0
0031220 Q F D E V 4 7 5 Q > 4 7
0031240 1 Q < 4 6 1 Q < 4 4 1 Q
0031260 > 3 5 1 Q U S E R N A M E
0031300 3 4 6 Q < 3 4 1 Q \ C O
0031320 N N E C T E D . D I R 3 2 7 Q
0031340 \ C O N N E C T E D . D I R
0031360 3 0 7 Q \ C O N N E C T E D .
0031400 D I R 2 7 6 Q \ C O N N E C
0031420 T E D . D I R 2 7 0 Q D I R
0031440 E C T O R Y 2 6 5 Q \ C O N
0031460 N E C T E D . D I R 2 6 1 Q
0031500 \ C O N N E C T E D . H O S T
0031520 2 5 3 Q H O S T 2 3 7 Q }
0031540 2 3 3 Q { 2 0 1 Q F D E
0031560 V 1 7 2 Q } 1 6 6 Q {
0031600 1 4 3 Q \ F I L E D E V I C E
0031620 N A M E S 6 7 Q } 4 6 Q
0031640 \ C O N N E C T E D . H O S T
0031660 7 \ C O N N E C T E D . D I R
0031700 ) \r ( 6 0 3 Q " " 5 4 7 Q
0031720 " } " 5 3 0 Q " N o n - e
0031740 x i s t e n t d i r e c t o r
0031760 y " 4 3 3 Q " " 4 0 2 Q
0032000 " " 3 5 7 Q " < " 3 3 3 Q
0032020 " > " 3 2 4 Q " < " 3 0
0032040 4 Q " " 2 1 4 Q " " 1 5
0032060 6 Q " U n r e c o g n i z e d
0032100 h o s t " 1 0 3 Q " I L L
0032120 E G A L A R G " 3 5 Q " I
0032140 L L E G A L A R G " ) \r D I R
0032160 E C T O R Y N A M E D 1 \r ( L
0032200 ( 2 C R E A T E ? 1 S T
0032220 R P T R 0 D I R N A M E ) )
0032240 \0 217 003 \0 \0 003 021 0 002 @ d i 360 262 024
0032260 277 g \0 \0 ` \0 \0 g \0 \0 ` \0 \0 \f \0 \0
0032300 260 c 251 ` \0 \0 265 ] g \0 \0 260 X @ \t \0
0032320 \0 d l { 360 251 d l [ 360 244 d l ( 360 223
0032340 277 @ 260 024 277 o \0 \0 \0 ` \0 \0 o \0 \0 \0
0032360 @ \f \0 \0 b \0 i \n \0 \0 Y d 262 / 006 \0
0032400 \0 311 006 272 @ I B l 003 J 016 X d 262 036 i
0032420 360 262 023 g \0 \0 I 006 \0 \0 311 \0 g \0 \0 @
0032440 \f \0 \0 270 A 265 \a H \t \0 \0 020 i 360 262 371
0032460 H \t \0 \0 020 \0 ( 2 1 4 Q M K A T
0032500 O M 2 0 3 Q M K S T R I N G
0032520 1 7 3 Q P A C K F I L E N A
0032540 M E . S T R I N G 1 2 2 Q \
0032560 G E T D E V I C E F R O M N A M
0032600 E 1 1 4 Q C O N C A T 5 1
0032620 Q C H C O N 1 3 0 Q C O N
0032640 C A T ) \r ( 1 6 7 Q D I R E C
0032660 T O R Y 1 6 2 Q F D E V 1
0032700 5 6 Q H O S T 1 3 1 Q F D
0032720 E V 1 0 4 Q \ C O N N E C T
0032740 E D . H O S T 4 3 Q { D S K
0032760 } 3 6 Q L O G I N H O S T /
0033000 D I R 2 5 Q \ C O N N E C T
0033020 E D . D I R 2 2 Q } 1 7 Q
0033040 \ C O N N E C T E D . H O S T
0033060 1 4 Q { ) \r ( 1 1 0 Q "
0033100 } " 1 0 1 Q " { " ) \r D I R
0033120 E C T O R Y N A M E P D 1 \r (
0033140 L ( 1 H O S T N A M E 0
0033160 D I R N A M E ) ) \0 . 003 \0 \0 002
0033200 A 233 g \0 \0 A g \0 \0 @ \f \0 \0 203 @ \t
0033220 \0 \0 021 ! 002 H i \n \0 \0 Y d 236 006 \0 \0
0033240 311 006 272 H I l 002 J 016 264 003 i 020 \0 ( 3
0033260 1 Q \ G E T D E V I C E F R O
0033300 M N A M E 2 1 Q \ A D D . C
0033320 O N N E C T E D . D I R 1 4 Q
0033340 P A C K F I L E N A M E ) \r (
0033360 3 7 Q F D E V 1 0 Q B O D
0033400 Y 4 H O S T ) \r ( ) \r H O S
0033420 T N A M E P D 1 \r ( L ( 0
0033440 N A M E ) ) \0 d 004 \0 \0 001 021 @ 003
0033460 @ d 004 l 004 360 223 \t \0 \0 212 005 \a 264 ; @
0033500 \t \0 \0 \t \0 \0 X d \t \0 \0 l { 360 262 030
0033520 277 H l 002 g \0 \0 H l 002 \v \0 \0 d 262 032
0033540 k 331 \v \0 \0 X ` \0 \0 \n \0 \0 251 ` \0 \0
0033560 Z 003 265 \a h 264 003 i 020 001 [ 006 \0 \0 311 020
0033600 271 H k I 016 225 K 263 360 i 260 353 J 002 260 342
0033620 \0 ( 7 6 Q M E M B 6 7 Q S
0033640 U B A T O M 5 7 Q S T R P O
0033660 S 3 5 Q C H C O N 1 3 0 Q
0033700 M K A T O M 2 5 Q U - C A
0033720 S E 1 4 Q U - C A S E ) \r (
0033740 1 2 0 Q F D E V 1 0 2 Q \
0033760 F I L E D E V I C E S 7 3 Q
0034000 \ F I L E D E V I C E N A M E S
0034020 5 1 Q } ) \r ( ) \r \ A D D .
0034040 C O N N E C T E D . D I R D 1
0034060 \r ( L ( 0 F I L E N A M E )
0034100 ) \0 G \0 \0 \0 001 @ k ) d l { 360 221
0034120 @ 020 l < 360 262 ' g \0 \0 ` \0 \0 g \0 \0
0034140 @ d l 002 ) l > 360 236 277 @ l 003 m 377 \v
0034160 \0 \0 265 006 o \0 \0 \0 \f \0 \0 020 g \0 \0 `
0034200 \0 \0 g \0 \0 ` \0 \0 @ \r 005 \0 \0 020 \0 (
0034220 1 0 4 Q P A C K * 6 2 Q P
0034240 A C K * 5 1 Q S U B A T O M
0034260 ) \r ( 7 7 Q \ C O N N E C T E
0034300 D . D I R 7 4 Q } 7 1 Q
0034320 \ C O N N E C T E D . H O S T
0034340 6 6 Q { 2 7 Q } 2 4 Q
0034360 \ C O N N E C T E D . H O S T
0034400 2 1 Q { ) \r ( 5 7 Q " " )
0034420 \r \ B A C K F I L E P T R D 1
0034440 \r ( L ( 0 S T R E A M ) )
0034460 \0 024 001 \0 \0 001 @ 006 \0 \0 311 006 006 \0 \0 311
0034500 & 021 001 \0 @ k H 016 020 \0 N I L \r ( 1
0034520 0 Q F D E V 3 S T R E A M
0034540 ) \r ( ) \r \ B A C K P E E K B I
0034560 N D 1 \r ( L ( 0 S T R E A
0034600 M ) P 0 \ I N T E R R U P
0034620 T A B L E ) \0 \r 001 \0 \0 001 021 020 \0
0034640 @ \t \0 \0 264 004 @ 020 \0 ( 6 \ B A
0034660 C K F I L E P T R ) \r N I L \r (
0034700 ) \r \ B A C K B I N D 1 \r ( L
0034720 ( 0 S T R E A M ) ) \0 \f \0
0034740 \0 \0 001 @ \t \0 \0 264 006 @ \t \0 \0 020 \0 (
0034760 1 1 Q \ P E E K B I N 3 \
0035000 B A C K F I L E P T R ) \r N I L
0035020 \r ( ) \r B I N D 1 \r ( L ( 0
0035040 S T R E A M ) ) \0 004 \0 \0 \0 001
0035060 @ 020 \0 N I L \r N I L \r ( ) \r \
0035100 B I N D 1 \r ( L ( 0 S T R
0035120 E A M ) ) \0 024 001 \0 \0 001 @ 006 \0 \0
0035140 b \0 006 \0 \0 311 , 021 001 \0 @ k H 016 020 \0
0035160 N I L \r ( 1 0 Q S T R E A M
0035200 3 S T R E A M ) \r ( ) \r \ B I
0035220 N S D 1 \r ( L ( 3 N B Y T
0035240 E S 2 O F F 1 B A S E
0035260 0 S T R E A M ) ) \0 032 001 \0 \0
0035300 004 @ 006 \0 \0 b \0 311 006 006 \0 \0 311 6 021 001
0035320 \0 @ A B C l 004 H 016 020 \0 N I L \r (
0035340 1 2 Q F D E V 3 S T R E A
0035360 M ) \r ( ) \r B O U T D 1 \r ( L
0035400 ( 1 B Y T E 0 S T R E A
0035420 M ) ) \0 \a \0 \0 \0 002 @ A \n \0 \0 020
0035440 \0 ( 4 \ B O U T ) \r N I L \r (
0035460 ) \r \ B O U T D 1 \r ( L ( 1
0035500 B Y T E 0 S T R E A M ) )
0035520 \0 026 001 \0 \0 002 @ 006 \0 \0 b \0 006 \0 \0
0035540 311 . 021 001 \0 @ A l 002 H 016 020 \0 N I L
0035560 \r ( 1 0 Q S T R E A M 3 S
0035600 T R E A M ) \r ( ) \r \ B O U T S
0035620 D 1 \r ( L ( 3 N B Y T E S
0035640 2 O F F 1 B A S E 0
0035660 S T R E A M ) ) \0 032 001 \0 \0 004 @
0035700 006 \0 \0 b \0 311 006 006 \0 \0 311 8 021 001 \0 @
0035720 A B C l 004 H 016 020 \0 N I L \r ( 1 2
0035740 Q F D E V 3 S T R E A M )
0035760 \r ( ) \r C O P Y B Y T E S D 1
0036000 \r ( L ( 3 E N D 2 S T A
0036020 R T 1 D S T F I L 0 S R
0036040 C F I L ) ) \0 270 005 \0 \0 004 @ g \0
0036060 \0 \n \0 \0 A g \0 \0 \n \0 \0 021 2 004 C 262
0036100 ! H B d d 005 001 241 005 002 242 \t \0 \0 \n \0
0036120 \0 277 C d m 377 360 224 277 H \t \0 \0 B 331 200
0036140 B Z d 234 j J 361 230 o \0 \0 \0 J \n \0 \0
0036160 277 H 006 \0 \0 311 006 006 \0 \0 312 \0 p j 360 250
0036200 H I J \v \0 \0 277 260 @ J 265 ? H d 006 \0
0036220 \0 311 006 006 \0 \0 312 \0 020 j 360 263 033 277 H \t
0036240 \0 \0 H 006 \0 \0 311 006 006 \0 \0 311 0 273 H k
0036260 K 016 331 265 026 H 006 \0 \0 311 006 006 \0 \0 311 4
0036300 274 H k L 016 262 026 i 020 d j 361 232 I H
0036320 \n \0 \0 277 k 331 260 363 277 260 356 I H \n \0
0036340 \0 277 260 323 \0 ( 2 6 3 Q \ B O U T
0036360 2 4 5 Q \ B O U T 1 6 4 Q
0036400 \ G E T E O F P T R 1 3 0 Q
0036420 \ B U F F E R E D . C O P Y B
0036440 Y T E S 1 0 2 Q E R R O R
0036460 5 7 Q \ G E T E O F P T R 4
0036500 3 Q \ S E T F I L E P T R 4
0036520 0 Q \ I L L E G A L . A R G
0036540 1 5 Q \ G E T S T R E A M 6
0036560 \ G E T S T R E A M ) \r ( 2 2
0036600 0 Q F D E V 2 1 3 Q S T R
0036620 E A M 1 7 5 Q F D E V 1 7
0036640 0 Q S T R E A M 1 5 0 Q F
0036660 D E V 1 4 3 Q S T R E A M
0036700 1 1 4 Q F D E V 1 0 7 Q S
0036720 T R E A M 1 2 Q O U T P U T
0036740 3 I N P U T ) \r ( 7 6 Q
0036760 " N e g a t i v e n u m b e r
0037000 o f b y t e s t o c o p
0037020 y " ) \r C O P Y C H A R S D 1
0037040 \r ( L ( 3 E N D 2 S T A
0037060 R T 1 D S T F I L 0 S R
0037100 C F I L ) ) 002 ' 025 \0 \0 004 @ \t \0
0037120 \0 A \t \0 \0 j 021 363 021 021 0 024 H 006 \0 \0
0037140 312 030 001 ^ I 006 \0 \0 312 030 001 _ 016 360 231 H
0037160 I B C \f \0 \0 261 001 373 H 006 \0 \0 311 006 006
0037200 \0 \0 312 \0 020 j 360 h 360 [ 224 H \t \0 \0 275
0037220 C 262 ? K 255 o \0 \0 \0 H 006 \0 \0 311 004 \n
0037240 \0 \0 277 B j 330 Z _ 022 d 005 001 241 005 002 224
0037260 j O 022 361 226 B l 033 \n \0 \0 277 H J \n \0
0037300 \0 277 C d m 377 360 263 Q M 361 263 N C 260 L
0037320 B 262 . K 262 ( H 006 \0 \0 311 006 006 \0 \0 311
0037340 0 _ 024 277 H k O 024 016 272 M B J 330 _ 026
0037360 277 d O 026 361 262 % 277 O 026 260 B 260 035 K
0037400 242 261 \0 300 H 006 \0 \0 311 006 006 \0 \0 311 0 _
0037420 030 277 H k O 030 016 Z 277 M 274 J L 361 232 o
0037440 \0 \0 \0 L J 331 \n \0 \0 277 N d j 360 242 261
0037460 \0 265 277 L J 331 d j 361 242 261 001 7 H _
0037500 020 l \r 360 242 261 \0 224 O 016 l 002 360 226 I l
0037520 \r \n \0 \0 277 I l \n 261 \0 204 I H H 006
0037540 \0 \0 312 030 001 _ 036 277 _ 034 d l \r 360 262 +
0037560 277 O 036 d j 360 224 277 l \r 260 0 l 002 360 262
0037600 026 H i \n \0 \0 l \n 360 226 H 277 l \r 260
0037620 033 l \r 260 027 l \r 260 023 l \n 360 232 O 036 k
0037640 360 222 l \r 204 l \n 201 O 034 _ $ 277 _ " 006
0037660 \0 \0 311 _ 277 O " O $ l 002 O 016
0037700 277 H 006 \0 \0 311 006 006 \0 \0 311 4 _ 032 277 H
0037720 k O 032 016 262 207 261 \0 233 I O 020 \n \0 \0 277
0037740 k 261 377 T k 360 262 0 L J 331 d j 361 242 261
0037760 \0 202 H _ 020 l \n 360 262 023 I l \r \n \0
0040000 \0 277 O 016 l 002 360 232 I l \n 202 I O 020 \n
0040020 \0 \0 277 k 260 326 N l 002 360 262 T k L J 331
0040040 _ ( 277 _ & 277 O & O ( 361 263 F I H
0040060 _ 020 d l \r 360 262 + 277 O ( d k 360 263
0040100 k 331 _ ( 277 H _ 020 l \n 360 232 O 016 j
0040120 360 222 l \r 213 l \n 210 I l \r \n \0 \0 277 O
0040140 020 \n \0 \0 277 O ( k 331 _ ( 277 260 272 \b \0
0040160 \0 i 020 \0 ( 1 0 4 3 Q S H O U L
0040200 D N T 1 0 2 6 Q \ B O U T
0040220 1 0 2 0 Q \ B O U T 7 0 4 Q
0040240 \ B O U T 6 6 3 Q \ B O U
0040260 T 6 2 1 Q \ B O U T 4 7 0
0040300 Q \ P E E K B I N 4 0 6 Q
0040320 \ B O U T 3 3 3 Q E R R O R
0040340 1 6 3 Q \ S E T F I L E P T
0040360 R 1 5 5 Q \ L I S P E R R O
0040400 R 1 2 4 Q E R R O R 1 0 1
0040420 Q \ G E T E O F P T R 5 0 Q
0040440 C O P Y B Y T E S 7 \ G E
0040460 T S T R E A M 3 \ G E T S T
0040500 R E A M ) \r ( 5 7 4 Q F D E V
0040520 5 6 7 Q S T R E A M 5 4 4
0040540 Q S T R E A M 4 2 4 Q S T
0040560 R E A M 2 7 7 Q F D E V 2
0040600 7 2 Q S T R E A M 2 2 1 Q
0040620 F D E V 2 1 4 Q S T R E A M
0040640 1 1 7 Q S T R E A M 6 4 Q
0040660 F D E V 5 7 Q S T R E A M
0040700 3 2 Q S T R E A M 2 2 Q
0040720 S T R E A M ) \r ( 3 2 5 Q "
0040740 N e g a t i v e n u m b e r
0040760 o f b y t e s t o c o p y
0041000 " 1 1 3 Q " C O P Y C H A R
0041020 S : S o u r c e f i l e i
0041040 s n o t r a n d o m a c c
0041060 e s s " ) \r C O P Y F I L E A 0
0041100 0 0 1 D 1 \r ( N A M E E R R
0041120 O R S E T L ( 2 E R R O R
0041140 S E T . W 1 E R R O R S E T
0041160 . V 0 E R R O R S E T . U )
0041200 F 0 F R O M F I L E F
0041220 1 R E S E T V A R S L S T F
0041240 2 T O F I L E F 3 R E
0041260 S E T Y ) \0 & \0 004 \0 003 o \0 \0 \0
0041300 P g \0 \0 h d o \0 \0 \0 \r 005 \0 \0 c \0
0041320 h 032 032 Q 032 c 002 277 P R \n \0 \0 c 006 i
0041340 020 \0 ( 4 0 Q \ C O P Y O P E N
0041360 F I L E 2 1 Q O P E N S T R
0041400 E A M ) \r ( 7 I N P U T ) \r (
0041420 1 5 Q ( ( S E Q U E N T I A
0041440 L T ) ) 3 ( P R O G N (
0041460 C L O S E F O L D V A L U E )
0041500 ) ) \r C O P Y F I L E D 1 \r (
0041520 P 1 R E S E T Y P 0 L
0041540 I S P X H I S T I 1 T O F
0041560 I L E I 0 F R O M F I L E
0041600 F 3 L I S P X H I S T F
0041620 4 R E S E T V A R S L S T )
0041640 \0 " 003 002 \0 002 S 021 ! 002 T o \0 \0 \0
0041660 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z \n \0 \0
0041700 J 223 \b \0 \0 020 I 020 \0 ( 3 5 Q E R
0041720 R O R ! 3 0 Q R E S E T R E
0041740 S T O R E 1 6 Q C O P Y F I
0041760 L E A 0 0 0 1 ) \r ( 2 4 Q E R
0042000 R O R 1 3 Q I N T E R N A L
0042020 ) \r ( 1 0 Q ( D U M M Y . F
0042040 O R . E R R O R S E T ) ) \r \ C
0042060 O P Y O P E N F I L E D 1 \r (
0042100 L ( 1 N E W N A M E 0 I
0042120 N S T R E A M ) F 1 2 Q R
0042140 E S E T V A R S L S T ) 001 ( \n
0042160 001 \0 002 021 240 \t @ g \0 \0 \n \0 \0 X 231 g
0042200 \0 \0 H h 032 032 J 032 272 @ g \0 \0 \n \0 \0
0042220 X 231 g \0 \0 H h 032 032 J 032 272 @ g \0 \0
0042240 \n \0 \0 Y 225 I g \0 \0 360 226 @ \t \0 \0 Y
0042260 262 & g \0 \0 I h 032 032 J 032 272 I g \0 \0
0042300 360 262 025 @ g \0 \0 \n \0 \0 X 231 g \0 \0 H
0042320 h 032 032 J 032 272 o \0 \0 \0 A g \0 \0 g \0
0042340 \0 h g \0 \0 J 032 \r 005 \0 \0 [ h 032 032 W
0042360 024 032 c 024 @ 006 \0 \0 311 006 006 \0 \0 311 0 274
0042400 @ k L 016 j 360 245 @ j \n \0 \0 277 I g \0
0042420 \0 360 262 } K g \0 \0 \n \0 \0 H 360 263 r @
0042440 006 \0 \0 g \0 \0 024 " 277 @ 006 \0 \0 312 030 001
0042460 _ 020 277 @ _ 022 262 ^ K O 022 d l \r 360
0042500 262 + 277 O 020 d j 360 224 277 l \r 260 0 l 002
0042520 360 262 026 @ i \n \0 \0 l \n 360 226 @ 277 l
0042540 \r 260 033 l \r 260 027 l \r 260 023 l \n 360 232 O
0042560 020 k 360 222 l \r 204 l \n 201 O 022 _ 016 277 ^
0042600 006 \0 \0 311 275 N O 016 l 002 M 016 260 245 @
0042620 K \n \0 \0 277 K \t \0 \0 020 \0 ( 4 4 5 Q
0042640 C L O S E F 4 4 0 Q C O P
0042660 Y B Y T E S 3 4 4 Q \ P E E
0042700 K B I N 2 4 7 Q G E T F I L
0042720 E I N F O 2 3 0 Q S E T F I
0042740 L E P T R 1 6 7 Q O P E N S
0042760 T R E A M 1 2 6 Q G E T F I
0043000 L E I N F O 7 3 Q \ I N F E
0043020 R . F I L E . T Y P E 5 7 Q
0043040 G E T F I L E I N F O 3 4 Q
0043060 G E T F I L E I N F O 1 1 Q
0043100 G E T F I L E I N F O ) \r ( 4 1
0043120 7 Q S T R E A M 2 7 1 Q S
0043140 T R E A M 2 6 2 Q N I L L
0043160 2 5 7 Q S T R E A M 2 4 4 Q
0043200 E O L 2 3 5 Q T E X T 2
0043220 1 1 Q F D E V 2 0 4 Q S T
0043240 R E A M 1 6 1 Q S E Q U E N
0043260 T I A L 1 5 5 Q N E W 1 5
0043300 2 Q O U T P U T 1 3 3 Q E
0043320 O L 1 2 3 Q E O L 1 1 4 Q
0043340 T E X T 1 0 1 Q T Y P E
0043360 6 5 Q ? 5 4 Q T Y P E 4
0043400 1 Q L E N G T H 3 1 Q L E
0043420 N G T H 1 6 Q C R E A T I O
0043440 N D A T E 6 C R E A T I O N
0043460 D A T E ) \r ( 1 4 6 Q ( A N
0043500 D R E S E T S T A T E ( D E
0043520 L F I L E ( C L O S E F O L
0043540 D V A L U E ) ) ) ) \r \ I N F E
0043560 R . F I L E . T Y P E D 1 \r (
0043600 L ( 0 S T R E A M ) ) \0 =
0043620 002 \0 \0 001 @ \t \0 \0 264 7 @ j \n \0 \0 @
0043640 006 \0 \0 311 " 021 021 001 @ 006 \0 \0 g \0 \0 024
0043660 " @ 265 006 g \0 \0 207 l 177 361 262 365 g \0
0043700 \0 Y @ 006 \0 \0 H 024 " @ j \n \0 \0 I 020
0043720 \0 ( 7 1 Q S E T F I L E P T R
0043740 1 2 Q S E T F I L E P T R
0043760 3 R A N D A C C E S S P ) \r (
0044000 6 1 Q S T R E A M 5 4 Q B
0044020 I N A R Y 4 3 Q T E X T 3
0044040 2 Q N I L L 2 7 Q S T R E
0044060 A M 1 6 Q S T R E A M ) \r (
0044100 ) \r E O F P D 1 \r ( L ( 0
0044120 F I L E ) ) \0 # 002 \0 \0 001 @ g \0
0044140 \0 i \v \0 \0 265 006 @ \t \0 \0 021 021 001 H 006
0044160 \0 \0 311 006 006 \0 \0 311 4 271 H k I 016 020 \0
0044200 ( 1 5 Q \ G E T S T R E A M
0044220 7 \ G E T S T R E A M ) \r ( 3
0044240 1 Q F D E V 2 4 Q S T R E
0044260 A M 3 I N P U T ) \r ( ) \r F
0044300 O R C E O U T P U T D 1 \r ( L
0044320 ( 1 W A I T F O R F I N I S
0044340 H 0 S T R E A M ) ) \0 037 001
0044360 \0 \0 002 @ g \0 \0 \n \0 \0 b \0 d 006 \0 \0
0044400 311 006 006 \0 \0 311 * 021 001 \0 @ A l 002 H 016
0044420 020 \0 ( 6 \ G E T S T R E A M )
0044440 \r ( 2 1 Q F D E V 1 4 Q S
0044460 T R E A M 3 O U T P U T ) \r
0044500 ( ) \r \ F L U S H . O P E N . S
0044520 T R E A M S D 1 \r ( L ( 0
0044540 F D E V ) F 3 \ O P E N F
0044560 I L E S ) \0 9 003 001 \0 001 S 021 ! 002
0044600 H 003 265 004 h 020 001 Y 006 \0 \0 311 006 @ 360 262
0044620 I d 006 \0 \0 312 004 R l 006 345 j 360 256 006
0044640 \0 \0 311 006 006 \0 \0 311 * 272 I k J 016 277 H
0044660 002 X 260 317 \0 N I L \r ( 5 2 Q F D
0044700 E V 4 5 Q S T R E A M 3 1
0044720 Q S T R E A M 1 6 Q S T R
0044740 E A M ) \r ( ) \r G E T E O F P T
0044760 R D 1 \r ( L ( 0 F I L E )
0045000 ) \0 031 002 \0 \0 001 @ \t \0 \0 021 021 001 H
0045020 006 \0 \0 311 006 006 \0 \0 311 2 271 H k I 016 020
0045040 \0 ( 3 \ G E T S T R E A M ) \r
0045060 ( 1 7 Q F D E V 1 2 Q S T
0045100 R E A M ) \r ( ) \r G E T F I L E
0045120 I N F O D 1 \r ( L ( 1 A T
0045140 T R I B 0 F I L E ) ) 001 037
0045160 006 \0 \0 002 @ g \0 \0 \n \0 \0 021 Q 005 H d
0045200 004 ` \0 \0 360 242 261 \0 301 277 A g \0 \0 360 224
0045220 H \t \0 \0 020 H 006 \0 \0 311 006 Y 006 \0 \0 311
0045240 \f 272 H A I l 003 J 016 265 003 202 261 \0 336 A
0045260 g \0 \0 360 247 A d g \0 \0 360 230 277 H 006 \0
0045300 \0 312 024 \a 020 g \0 \0 360 262 % H 006 \0 \0 312
0045320 030 001 d j 360 223 g \0 \0 020 d k 360 223 g \0
0045340 \0 020 l 002 360 223 g \0 \0 020 \b \0 \0 020 A d
0045360 g \0 \0 360 227 277 H 006 \0 \0 310 034 020 g \0 \0
0045400 360 226 H 006 \0 \0 311 " 020 A d g \0 \0 360 233
0045420 277 H \t \0 \0 264 u H \t \0 \0 020 g \0 \0 360
0045440 264 & I 006 \0 \0 311 \f 273 H g \0 \0 I l 003
0045460 K 016 265 \f H \t \0 \0 264 006 H \t \0 \0 d 225
0045500 n 001 377 330 343 342 020 262 D A g \0 \0 360 245 A
0045520 g \0 \0 360 221 h 020 H \t \0 \0 Y 006 \0 \0 311
0045540 \f 274 H A I l 003 L 016 265 ! A g \0 \0 360
0045560 264 032 I 006 \0 \0 311 \f 275 H g \0 \0 I l 003
0045600 M 016 d 225 n 001 377 330 343 342 020 @ l 027 \n \0
0045620 \0 020 \0 ( 4 3 4 Q \ L I S P E R
0045640 R O R 3 4 6 Q \ G E T D E V
0045660 I C E F R O M N A M E 3 1 1 Q
0045700 \ G E T E O F P T R 3 0 3 Q
0045720 R A N D A C C E S S P 2 4 6
0045740 Q \ G E T E O F P T R 2 4 0
0045760 Q R A N D A C C E S S P 1 7
0046000 0 Q S H O U L D N T 3 7 Q
0046020 \ G E T A C C E S S 6 \ G E
0046040 T F I L E N A M E . O R . S T R
0046060 E A M ) \r ( 4 1 0 Q L E N G T
0046100 H 4 0 1 Q F D E V 3 7 2 Q
0046120 S I Z E 3 5 2 Q F D E V
0046140 3 3 6 Q O P E N B Y T E S I Z
0046160 E 3 3 0 Q A C C E S S 2 7
0046200 0 Q L E N G T H 2 6 1 Q F
0046220 D E V 2 5 2 Q S I Z E 2 3
0046240 1 Q L E N G T H 2 2 1 Q S
0046260 T R E A M 2 1 3 Q E N D O F
0046300 S T R E A M O P 2 0 5 Q S T
0046320 R E A M 1 7 6 Q B U F F E R
0046340 S 1 6 4 Q C R L F 1 5 4 Q
0046360 L F 1 4 4 Q C R 1 3 2 Q
0046400 S T R E A M 1 2 3 Q E O L
0046420 1 1 4 Q S T R E A M 1 0 5
0046440 Q O P E N B Y T E S I Z E 7
0046460 6 Q B Y T E S I Z E 5 2 Q
0046500 F D E V 4 4 Q S T R E A M
0046520 3 1 Q A C C E S S 1 7 Q 004
0046540 003 S T R E A M T Y P E # 3 O
0046560 L D ) \r ( ) \r G E T F I L E P T
0046600 R D 1 \r ( L ( 0 F I L E )
0046620 ) \0 031 002 \0 \0 001 @ \t \0 \0 021 021 001 H
0046640 006 \0 \0 311 006 006 \0 \0 311 0 271 H k I 016 020
0046660 \0 ( 3 \ G E T S T R E A M ) \r
0046700 ( 1 7 Q F D E V 1 2 Q S T
0046720 R E A M ) \r ( ) \r S E T F I L E
0046740 I N F O D 1 \r ( L ( 2 V A
0046760 L U E 1 A T T R I B 0 F
0047000 I L E ) ) 001 & 006 \0 \0 003 @ g \0 \0
0047020 \n \0 \0 021 Q 005 H d 004 ` \0 \0 360 242 261 \0
0047040 272 277 A g \0 \0 360 254 A g \0 \0 360 246 A d
0047060 g \0 \0 360 221 h 020 g \0 \0 360 262 + H 006 \0
0047100 \0 B d g \0 \0 360 223 277 j 260 027 g \0 \0 360
0047120 222 l 002 214 B d g \0 \0 360 222 277 k 202 \t \0
0047140 \0 317 030 001 B 020 A d g \0 \0 360 231 277 H 006
0047160 \0 \0 B 024 " B 020 g \0 \0 360 262 026 H 006 \0
0047200 \0 B j 330 272 k J 361 241 J 200 k [ 315 034 K
0047220 020 H 006 \0 \0 311 006 Y 006 \0 \0 311 030 274 H A
0047240 B I l 004 L 016 265 1 A d g \0 \0 360 262 034
0047260 277 H B d d 005 001 241 005 002 227 277 j B 361 241
0047300 B 203 B \t \0 \0 \n \0 \0 020 g \0 \0 360 264 \t
0047320 H B 341 340 \n \0 \0 020 262 R A g \0 \0 360 222
0047340 261 377 U A g \0 \0 360 222 261 377 L A g \0 \0
0047360 360 222 261 377 C H \t \0 \0 Y 006 \0 \0 311 030 275
0047400 H A B I l 004 M 016 265 317 A g \0 \0 360 264
0047420 310 H B d d 005 001 241 005 002 227 277 j B 361 241
0047440 B 203 B \t \0 \0 \n \0 \0 020 @ l 027 \n \0 \0
0047460 020 \0 ( 4 4 3 Q \ L I S P E R R
0047500 O R 4 3 4 Q \ S E T C L O S
0047520 E D F I L E L E N G T H 4 3 1
0047540 Q \ I L L E G A L . A R G 3
0047560 5 4 Q \ G E T D E V I C E F R
0047600 O M N A M E 3 1 2 Q \ S E T
0047620 E O F P T R 2 7 4 Q \ S E T
0047640 E O F P T R 2 7 1 Q \ I L L
0047660 E G A L . A R G 1 2 4 Q \ I
0047700 L L E G A L . A R G 6 \ G E
0047720 T F I L E N A M E . O R . S T R
0047740 E A M ) \r ( 4 0 1 Q L E N G T
0047760 H 3 6 0 Q F D E V 3 4 3 Q
0050000 E O L C O N V E N T I O N 3
0050020 3 2 Q O P E N B Y T E S I Z E
0050040 3 2 1 Q A C C E S S 3 0 0
0050060 Q S I Z E 2 4 0 Q L E N G
0050100 T H 2 1 6 Q F D E V 2 1 0
0050120 Q S T R E A M 1 6 4 Q S T
0050140 R E A M 1 5 5 Q B U F F E R
0050160 S 1 4 5 Q S T R E A M 1 3
0050200 6 Q E N D O F S T R E A M O P
0050220 1 1 4 Q L F 1 0 2 Q C R
0050240 L F 7 1 Q C R 6 4 Q S T
0050260 R E A M 5 5 Q E O L 4 6 Q
0050300 O P E N B Y T E S I Z E 3 7
0050320 Q B Y T E S I Z E 3 1 Q A
0050340 C C E S S 1 7 Q 004 003 S T R E
0050360 A M T Y P E # 3 O L D ) \r (
0050400 ) \r S E T F I L E P T R D 1 \r
0050420 ( L ( 1 A D R 0 F I L E
0050440 ) ) \0 C 002 \0 \0 002 @ \t \0 \0 021 021 001
0050460 H 006 \0 \0 311 006 006 \0 \0 311 . 271 H A d m
0050500 377 360 226 277 d \t \0 \0 260 025 d 005 001 241 005 002
0050520 225 j A 361 241 A 205 A l 033 \n \0 \0 l 002 I
0050540 016 277 H 006 \0 \0 j 315 035 A 020 \0 ( 6 3 Q
0050560 \ L I S P E R R O R 3 6 Q
0050600 \ G E T E O F P T R 3 \ G E
0050620 T S T R E A M ) \r ( 7 4 Q S T
0050640 R E A M 1 7 Q F D E V 1 2
0050660 Q S T R E A M ) \r ( ) \r \ G E
0050700 N E R I C . B I N S D 1 \r ( L
0050720 ( 3 N B Y T E S 2 O F F
0050740 1 B A S E 0 S T R E A M
0050760 ) ) \0 036 002 \0 \0 004 C 021 021 001 H j 361
0051000 262 024 A B @ 307 277 B k 330 b 004 271 H k
0051020 331 X 260 354 I 020 \0 N I L \r N I L \r (
0051040 ) \r \ G E N E R I C . B O U T S
0051060 D 1 \r ( L ( 3 N B Y T E S
0051100 2 O F F 1 B A S E 0
0051120 S T R E A M ) ) \0 002 \0 \0 004 C
0051140 021 021 001 H j 361 262 026 @ A B 302 \n \0 \0 277
0051160 B k 330 b 004 271 H k 331 X 260 352 I 020 \0 (
0051200 1 7 Q \ B O U T ) \r N I L \r (
0051220 ) \r \ G E N E R I C . R E N A M
0051240 E F I L E A 0 0 0 1 D 1 \r ( N
0051260 A M E E R R O R S E T L (
0051300 2 E R R O R S E T . W 1 E
0051320 R R O R S E T . V 0 E R R O
0051340 R S E T . U ) F 0 O L D F
0051360 I L E F 1 N E W F I L E
0051400 F 2 R E S E T V A R S L S T
0051420 F 3 R E S E T Y ) \0 , \0
0051440 004 \0 003 o \0 \0 \0 P g \0 \0 \n \0 \0 c \0
0051460 h 032 032 R 032 c 004 277 P Q \n \0 \0 c 002 264
0051500 \v P \t \0 \0 \t \0 \0 277 Q c 006 i 020 \0 (
0051520 4 4 Q \ D E L E T E F I L E
0051540 4 1 Q C L O S E F 3 1 Q \
0051560 C O P Y O P E N F I L E 1 2 Q
0051600 O P E N S T R E A M ) \r ( 7
0051620 I N P U T ) \r ( 3 ( A N D
0051640 R E S E T S T A T E ( C L O S
0051660 E F ? O L D V A L U E ) ) ) \r
0051700 \ G E N E R I C . R E N A M E F
0051720 I L E D 1 \r ( P 1 R E S E
0051740 T Y P 0 L I S P X H I S T
0051760 I 1 N E W F I L E I 0
0052000 O L D F I L E F 3 L I S
0052020 P X H I S T F 4 R E S E T
0052040 V A R S L S T ) \0 " 003 002 \0 002 S
0052060 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221 h
0052100 202 g \0 \0 Z \n \0 \0 J 223 \b \0 \0 020 I 020
0052120 \0 ( 3 5 Q E R R O R ! 3 0 Q
0052140 R E S E T R E S T O R E 1 6
0052160 Q \ G E N E R I C . R E N A M
0052200 E F I L E A 0 0 0 1 ) \r ( 2 4 Q
0052220 E R R O R 1 3 Q I N T E R
0052240 N A L ) \r ( 1 0 Q ( D U M M
0052260 Y . F O R . E R R O R S E T ) )
0052300 \r \ G E N E R I C . R E A D P
0052320 D 1 \r ( L ( 1 F L G 0 S
0052340 T R E A M ) P 1 \ I N T E
0052360 R R U P T A B L E F 3 \ P
0052400 R I M T E R M S A ) \0 H 003 001 \0
0052420 002 @ 006 \0 \0 311 006 006 \0 \0 311 4 021 001 \0 @
0052440 k H 016 022 h 360 264 1 A h 360 h 360 265 * S
0052460 @ \t \0 \0 302 k 360 h 360 265 036 021 002 @
0052500 @ 006 \0 \0 311 006 006 \0 \0 311 4 272 @ k J 016
0052520 h 360 @ \t \0 \0 277 020 \0 ( 1 0 4 Q \
0052540 B A C K F I L E P T R 4 2 Q
0052560 \ P E E K B I N ) \r ( 6 7 Q F
0052600 D E V 6 2 Q S T R E A M 1
0052620 0 Q F D E V 3 S T R E A M
0052640 ) \r ( ) \r \ E O F . A C T I O N
0052660 D 1 \r ( L ( 0 S T R E A M
0052700 ) ) \0 020 001 \0 \0 001 @ 006 \0 \0 311 " 021
0052720 001 \0 @ k H 017 016 020 \0 N I L \r ( 3
0052740 S T R E A M ) \r ( ) \r \ E O S E
0052760 R R O R D 1 \r ( L ( 0 S T
0053000 R E A M ) ) \0 021 \0 \0 \0 001 @ 006 \0
0053020 \0 311 004 265 003 @ l 020 i \v \0 \0 020 \0 ( 1
0053040 6 Q \ L I S P E R R O R ) \r (
0053060 3 S T R E A M ) \r ( ) \r \ G E
0053100 T E O F P T R D 1 \r ( L ( 0
0053120 S T R E A M ) ) \0 024 001 \0 \0 001
0053140 @ 006 \0 \0 311 006 006 \0 \0 311 2 021 001 \0 @ k
0053160 H 016 020 \0 N I L \r ( 1 0 Q F D E
0053200 V 3 S T R E A M ) \r ( ) \r \
0053220 I N C F I L E P T R D 1 \r ( L
0053240 ( 1 A M O U N T 0 S T R
0053260 E A M ) ) \0 2 001 \0 \0 002 @ d 006 \0
0053300 \0 311 006 006 \0 \0 312 \0 0 j 360 262 035 277 @ d
0053320 006 \0 \0 311 006 006 \0 \0 311 0 021 001 \0 @ k H
0053340 016 022 A 330 \n \0 \0 020 A \n \0 \0 020 \0 ( 5
0053360 7 Q \ P A G E D . I N C F I L
0053400 E P T R 5 2 Q \ S E T F I L
0053420 E P T R ) \r ( 3 3 Q F D E V
0053440 2 6 Q S T R E A M 1 1 Q F
0053460 D E V 4 S T R E A M ) \r ( )
0053500 \r \ P E E K B I N D 1 \r ( L
0053520 ( 1 N O E R R O R F L G 0
0053540 S T R E A M ) ) \0 026 001 \0 \0 002 @
0053560 006 \0 \0 311 006 006 \0 \0 311 " 021 001 \0 @ A l
0053600 002 H 016 020 \0 N I L \r ( 1 0 Q F D
0053620 E V 3 S T R E A M ) \r ( ) \r
0053640 \ S E T C L O S E D F I L E L E
0053660 N G T H D 1 \r ( L ( 1 N B
0053700 Y T E S 0 F I L E N A M E )
0053720 ) \0 031 001 \0 \0 002 @ g \0 \0 g \0 \0 \v
0053740 \0 \0 021 001 \0 H A \n \0 \0 H \t \0 \0 i 020
0053760 \0 ( 2 5 Q \ C L O S E F I L E
0054000 2 1 Q \ S E T E O F P T R
0054020 1 1 Q \ O P E N F I L E ) \r (
0054040 6 O L D 3 B O T H ) \r ( )
0054060 \r \ S E T E O F P T R D 1 \r (
0054100 L ( 1 L E N 0 S T R E A
0054120 M ) ) \0 026 001 \0 \0 002 @ 006 \0 \0 311 006
0054140 006 \0 \0 311 @ 021 001 \0 @ A l 002 H 016 020 \0
0054160 N I L \r ( 1 0 Q F D E V 3
0054200 S T R E A M ) \r ( ) \r \ S E T F
0054220 I L E P T R D 1 \r ( L ( 1
0054240 I N D X 0 S T R E A M ) )
0054260 \0 026 001 \0 \0 002 @ 006 \0 \0 311 006 006 \0 \0 311
0054300 . 021 001 \0 @ A l 002 H 016 020 \0 N I L \r
0054320 ( 1 0 Q F D E V 3 S T R E
0054340 A M ) \r ( ) \r \ F I X P O U T
0054360 D 1 \r ( L ( 1 N 0 S T R
0054400 M ) ) \0 ( \0 \0 \0 002 @ A 343 343 343 l
0054420 377 345 \n \0 \0 @ A 343 343 l 377 345 \n \0 \0 @
0054440 A 343 l 377 345 \n \0 \0 @ A l 377 345 \n \0 \0
0054460 020 \0 ( 4 5 Q \ B O U T 3 5 Q
0054500 \ B O U T 2 4 Q \ B O U T
0054520 1 2 Q \ B O U T ) \r N I L \r
0054540 ( ) \r \ F I X P I N D 1 \r ( L
0054560 ( 0 S T R M ) ) \0 021 \0 \0 \0
0054600 001 @ 341 @ 330 341 341 @ 341 @ 330 344
0054620 020 \0 N I L \r N I L \r ( ) \r \ B U
0054640 F F E R E D . B I N D 1 \r ( L
0054660 ( 0 S T R E A M ) ) \0 I 002
0054700 \0 \0 001 021 001 @ 006 \0 \0 311 002 265 004 260 026
0054720 @ 006 \0 \0 310 \0 X d @ 006 \0 \0 310 001 375 361
0054740 263 037 277 277 @ 006 \0 \0 311 006 006 \0 \0 311 > 271
0054760 @ g \0 \0 l 002 I 016 d i 360 235 277 260 311 @
0055000 006 \0 \0 H k 330 315 \0 277 302 020 \0 N I L \r
0055020 ( 7 7 Q S T R E A M 6 0 Q
0055040 R E A D 5 1 Q F D E V 4 4
0055060 Q S T R E A M 3 0 Q S T R
0055100 E A M 2 0 Q S T R E A M 6
0055120 S T R E A M ) \r ( ) \r \ B U F
0055140 F E R E D . P E E K B I N D 1
0055160 \r ( L ( 1 N O E R R O R F L
0055200 G 0 S T R E A M ) ) \0 ? 001
0055220 \0 \0 002 @ 006 \0 \0 311 002 265 004 260 025 @ 006 \0
0055240 \0 310 \0 d @ 006 \0 \0 310 001 375 361 263 # 277 277
0055260 @ 006 \0 \0 311 006 006 \0 \0 311 > 021 001 \0 @ g
0055300 \0 \0 A l 003 H 016 022 d i 360 223 277 260 306 302
0055320 020 \0 N I L \r ( 5 6 Q R E A D
0055340 4 5 Q F D E V 4 0 Q S T R
0055360 E A M 2 4 Q S T R E A M 1
0055400 5 Q S T R E A M 3 S T R E
0055420 A M ) \r ( ) \r \ B U F F E R E D
0055440 . B O U T D 1 \r ( L ( 1 B
0055460 Y T E 0 S T R E A M ) ) \0
0055500 P 002 \0 \0 002 021 001 @ 006 \0 \0 311 002 265 004
0055520 260 - @ 006 \0 \0 310 \0 X d @ 006 \0 \0 310 0
0055540 375 361 262 031 @ 006 \0 \0 H k 330 315 \0 277 A 307
0055560 277 @ 006 \0 \0 k 317 030 k 020 277 277 @ 006 \0
0055600 \0 311 006 006 \0 \0 311 > 271 @ g \0 \0 l 002 I
0055620 016 277 260 266 \0 N I L \r ( 1 0 7 Q W
0055640 R I T E 1 0 0 Q F D E V 7
0055660 3 Q S T R E A M 5 7 Q S T
0055700 R E A M 4 2 Q S T R E A M
0055720 3 0 Q S T R E A M 2 0 Q S
0055740 T R E A M 6 S T R E A M ) \r
0055760 ( ) \r \ B U F F E R E D . B I N
0056000 S D 1 \r ( L ( 4 N O E R R
0056020 O R F L G 3 N B Y T E S 2
0056040 O F F S E T 1 D B A S E
0056060 0 S T R E A M ) ) \0 201 \a \0 \0
0056100 005 C 021 a 006 @ 006 \0 \0 311 002 [ 262 = @ 006
0056120 \0 \0 310 \0 274 @ 006 \0 \0 310 001 Z L 331 Y H
0056140 361 224 L H Y 330 272 K L A B I \r 005 \0 \0
0056160 277 @ 006 \0 \0 J 315 \0 277 I H 360 221 C 020 B
0056200 I 330 b 004 277 H I 331 270 @ 006 \0 \0 311 006 006
0056220 \0 \0 311 > 276 @ g \0 \0 D l 003 N 016 ] 265
0056240 006 C H 331 020 i 360 263 236 A B M 307 277 B k
0056260 330 b 004 277 H k 331 X j 360 263 303 @ 275 260
0056300 352 \0 ( 5 6 Q \ M O V E B Y T E
0056320 S ) \r ( 1 2 7 Q R E A D 1 2
0056340 0 Q F D E V 1 1 3 Q S T R
0056360 E A M 6 3 Q S T R E A M 2
0056400 7 Q S T R E A M 2 0 Q S T
0056420 R E A M 7 S T R E A M ) \r (
0056440 ) \r \ B U F F E R E D . B O U T
0056460 S D 1 \r ( L ( 3 N B Y T E
0056500 S 2 O F F S E T 1 S B A
0056520 S E 0 S T R E A M ) ) \0 i
0056540 006 \0 \0 004 @ 006 \0 \0 311 006 021 Q 005 @ 006 \0
0056560 \0 311 002 [ 262 F @ 006 \0 \0 310 \0 274 @ 006 \0
0056600 \0 310 0 Z L 331 Y C 361 224 L C Y 330 272 A
0056620 B K L I \r 005 \0 \0 277 @ 006 \0 \0 J 315 \0
0056640 277 @ 006 \0 \0 k 317 030 277 C I 331 b 006 j
0056660 361 241 h 020 B I 330 b 004 277 H 006 \0 \0 311 >
0056700 275 @ g \0 \0 l 002 M 016 277 260 243 \0 ( 6 3
0056720 Q \ M O V E B Y T E S ) \r ( 1
0056740 4 0 Q W R I T E 1 3 1 Q F
0056760 D E V 1 0 0 Q S T R E A M
0057000 7 0 Q S T R E A M 3 4 Q S
0057020 T R E A M 2 5 Q S T R E A M
0057040 1 4 Q S T R E A M 3 S T
0057060 R E A M ) \r ( ) \r \ B U F F E R
0057100 E D . C O P Y B Y T E S D 1 \r
0057120 ( L ( 2 N B Y T E S 1 D
0057140 S T 0 S R C ) ) \0 s \b \0 \0
0057160 003 B h 360 @ 006 \0 \0 311 006 021 b \a @ 006 \0
0057200 \0 311 002 Z 262 G @ 006 \0 \0 310 001 ] @ 006 \0
0057220 \0 310 \0 \ 331 273 B 230 K B 361 224 L B [ 330
0057240 275 A 006 \0 \0 311 006 006 \0 \0 311 8 276 A J L
0057260 K l 004 N 016 277 @ 006 \0 \0 M 315 \0 277 B 232
0057300 K B 360 263 036 B K 331 b 004 277 I 006 \0 \0 311
0057320 > _ 016 277 @ d g \0 \0 H l 003 O 016 016 263
0057340 237 h 020 \0 N I L \r ( 1 4 7 Q R E
0057360 A D 1 3 5 Q F D E V 1 1 0
0057400 Q S T R E A M 7 0 Q F D E
0057420 V 6 3 Q S T R E A M 3 7 Q
0057440 S T R E A M 3 0 Q S T R E
0057460 A M 1 7 Q S T R E A M 6
0057500 S T R E A M ) \r ( ) \r \ N U L L
0057520 D E V I C E A 0 0 1 4 D 1 \r (
0057540 L ( 1 N O E R R O R F L G
0057560 0 S T R E A M ) ) \0 \t \0 \0 \0
0057600 002 A h 360 264 004 @ 020 \0 N I L \r N I
0057620 L \r ( ) \r \ N U L L D E V I C E
0057640 A 0 0 2 0 D 1 \r ( L ( 1 R
0057660 E C O G 0 N A M E ) ) \0 005
0057700 \0 \0 \0 002 g \0 \0 020 \0 N I L \r ( 2
0057720 { N U L L } ) \r ( ) \r \ N U L L
0057740 D E V I C E D 1 \r N I L \0 316
0057760 \0 \0 \0 \0 g \0 \0 ` \0 \0 037 d g \0 \0 024
0060000 \0 277 d k 317 \0 020 277 d k 317 \0 277 d g
0060020 \0 \0 024 002 277 d g \0 \0 024 004 277 d g \0 \0
0060040 024 022 277 d g \0 \0 024 026 277 d g \0 \0 024 036
0060060 277 d g \0 \0 024 277 d g \0 \0 024 " 277 d
0060100 g \0 \0 024 $ 277 d g \0 \0 024 & 277 d g \0
0060120 \0 024 4 277 d g \0 \0 024 : 277 d g \0 \0 024
0060140 016 277 d g \0 \0 024 \b 277 d g \0 \0 024 6 277
0060160 d g \0 \0 024 8 277 d g \0 \0 024 \n 277 d g
0060200 \0 \0 024 0 277 d g \0 \0 024 2 277 d g \0 \0
0060220 024 . 277 d g \0 \0 024 \f 277 d g \0 \0 024 030
0060240 277 d g \0 \0 024 @ 277 d g \0 \0 024 * 277 d
0060260 g \0 \0 024 020 277 d g \0 \0 024 006 277 \n \0 \0
0060300 020 \0 ( 3 1 3 Q \ D E F I N E D
0060320 E V I C E ) \r ( 3 0 5 Q N I L
0060340 L 2 7 6 Q N I L L 2 6 7 Q
0060360 N I L L 2 6 0 Q N I L L
0060400 2 5 1 Q N I L L 2 4 2 Q N
0060420 I L L 2 3 3 Q N I L L 2 2
0060440 4 Q Z E R O 2 1 5 Q Z E R
0060460 O 2 0 6 Q \ N U L L F I L E
0060500 G E N E R A T O R 1 7 7 Q N
0060520 I L L 1 7 0 Q \ E O F . A C
0060540 T I O N 1 6 1 Q N I L L 1
0060560 5 2 Q \ N U L L D E V I C E A
0060600 0 0 2 0 1 4 3 Q N I L L 1
0060620 3 4 Q T R U E 1 2 5 Q N I
0060640 L L 1 1 6 Q N I L L 1 0 7
0060660 Q \ N U L L D E V I C E A 0 0
0060700 1 4 1 0 0 Q N I L L 7 1 Q
0060720 \ E O F . A C T I O N 6 2 Q
0060740 \ N U L L . O P E N F I L E
0060760 5 3 Q \ N U L L . O P E N F I
0061000 L E 4 4 Q N I L L 3 5 Q
0061020 N I L L 1 2 Q N U L L 5
0061040 004 003 F D E V T Y P E # 2 N U
0061060 L L ) \r ( ) \r \ N U L L . O P E
0061100 N F I L E D 1 \r ( L ( 5 O
0061120 L D S T R E A M 4 D E V I C
0061140 E 3 P A R A M E T E R S 2
0061160 R E C O G 1 A C C E S S
0061200 0 N A M E ) ) \0 z \0 \0 \0 006 E
0061220 265 w ` \0 \0 037 d k 317 004 0 277 d g \0 \0
0061240 024 004 277 d D 024 006 277 d g \0 \0 024 . 277 d
0061260 g \0 \0 024 , 277 d ` \0 \0 024 & 277 d g \0
0061300 \0 024 " 277 d g \0 \0 024 277 d j 317 030 001
0061320 277 d ` \0 \0 315 037 277 d j 315 035 277 d ` \0
0061340 \0 315 034 277 d h 024 030 277 d l \b 317 024 \a 277
0061360 d j 317 004 R 277 d k 317 004 @ 277 d h 024 002
0061400 277 d A \n \0 \0 277 020 \0 ( 1 6 6 Q \
0061420 S E T A C C E S S ) \r ( 1 2 1 Q
0061440 \ S T R E A M . D E F A U L T
0061460 . M A X B U F F E R S 1 0 5 Q
0061500 F I L E L I N E L E N G T H
0061520 7 0 Q \ F I L E O U T C H A R
0061540 F N 6 1 Q \ E O S E R R O R
0061560 5 2 Q \ N O I M A G E O P S
0061600 4 3 Q \ S T R E A M . N O T
0061620 . O P E N 3 4 Q \ S T R E A
0061640 M . N O T . O P E N 2 0 Q {
0061660 N U L L } 5 004 003 S T R E A M
0061700 T Y P E # ) \r ( ) \r ( P R E T T
0061720 Y C O M P R I N T F I L E I O
0061740 C O M S ) \r ( R P A Q Q F I L
0061760 E I O C O M S ( ( * D e v i
0062000 c e i n d e p e n d e n t I
0062020 O . T h i s f i l e i s
0062040 u s e d b y V A X ) ( C O
0062060 M S ( * S T R E A M , F D
0062100 E V \r d e c l a r a t i o n s
0062120 ) ( D E C L A R E : F I R S
0062140 T D O C O P Y ( * T h e
0062160 m i c r o c o d e r e l i e s
0062200 o n S T R E A M b e i n g
0062220 o f a p a r t i c u l a r
0062240 t y p e , \r v i z . t h e
0062260 f i r s t t y p e d e c l
0062300 a r e d i n t h e i n i t
0062320 i a l l o a d u p ( a f t e
0062340 r V M E M P A G E P ) ) ( I
0062360 N I T R E C O R D S S T R E A
0062400 M ) ) ( \r S Y S R E C O R D S
0062420 S T R E A M ) ( D E C L A R
0062440 E : D O N T C O P Y ( E X P
0062460 O R T ( R E C O R D S S T R
0062500 E A M ) ( M A C R O S S T R
0062520 E A M O P ) ( C O N S T A N T
0062540 S A p p e n d B i t \r N o B
0062560 i t s R e a d B i t W r i t
0062600 e B i t ( O u t p u t B i t s
0062620 ( L O G O R A p p e n d B i
0062640 t W r i t e B i t ) ) ( B o
0062660 t h B i t s ( L O G O R R e
0062700 a d B i t O u t p u t B i t s
0062720 ) ) ) \r ( M A C R O S A P P
0062740 E N D A B L E A P P E N D O N
0062760 L Y D I R T Y A B L E O P E
0063000 N E D O V E R W R I T E A B L
0063020 E R E A D A B L E R E A D O
0063040 N L Y W R I T E A B L E ) (
0063060 M A C R O S \r T e s t M a s k
0063100 e d ) ( C O N S T A N T S *
0063120 E O L C O N V E N T I O N S )
0063140 ) ) ( F N S S T R E A M P R
0063160 O P G E T S T R E A M P R O P
0063200 P U T S T R E A M P R O P S
0063220 T R E A M P ) ( C O M S \r (
0063240 * N e e d e d b / c o f
0063260 S T R E A M i n i t i a l i z
0063300 a t i o n ) ( I N I T V A R S
0063320 ( F I L E L I N E L E N G T H
0063340 1 0 2 ) ( \ S T R E A M . D
0063360 E F A U L T . M A X B U F F E R
0063400 S 3 ) ) \r ) ( F N S \ G E
0063420 T A C C E S S \ S E T A C C E
0063440 S S ) ( D E C L A R E : D O
0063460 N T C O P Y ( E X P O R T (
0063500 M A C R O S F D E V O P ) (
0063520 R E C O R D S F D E V F I L
0063540 E G E N O B J ) ) ) ( \r I N I
0063560 T R E C O R D S F D E V ) (
0063600 S Y S R E C O R D S F D E V )
0063620 ) ( C O M S ( * D e v i c
0063640 e o p e r a t i o n s ) ( F
0063660 N S \ D E F I N E D E V I C E
0063700 \ G E T D E V I C E F R O M N
0063720 A M E \r \ R E M O V E D E V I
0063740 C E \ R E M O V E D E V I C E
0063760 . N A M E S ) ( F N S \ C L
0064000 O S E F I L E \ D E L E T E F
0064020 I L E \ D E V I C E E V E N T
0064040 \ G E N E R A T E F I L E S
0064060 \r \ G E N E R A T E N E X T F I
0064100 L E \ G E N E R A T E F I L E
0064120 I N F O \ G E T F I L E N A M
0064140 E \ G E T F I L E N A M E . O
0064160 R . S T R E A M \ O P E N F I
0064200 L E \ D O . P A R A M S . A T
0064220 . O P E N \r \ R E N A M E F I
0064240 L E \ R E V A L I D A T E F I
0064260 L E \ T R U N C A T E F I L E
0064300 ) ( C O M S ( * G e n e r
0064320 i c e n u m e r a t o r ) (
0064340 F N S \ G E N E R A T E N O F
0064360 I L E S \r \ N U L L F I L E G
0064400 E N E R A T O R \ N O F I L E
0064420 S N E X T F I L E F N \ N O F
0064440 I L E S I N F O F N ) ( D E C
0064460 L A R E : D O N T C O P Y (
0064500 R E C O R D S N O F I L E G E
0064520 N S T A T E ) ) ) ( \r F N S
0064540 \ F I L E . N O T . O P E N \
0064560 F I L E . W O N T . O P E N \
0064600 I L L E G A L . D E V I C E O P
0064620 \ I S . N O T . R A N D A C C
0064640 E S S P \ S T R E A M . N O T
0064660 . O P E N ) ( A D D V A R S
0064700 ( \r \ F I L E D E V I C E S )
0064720 ( \ F I L E D E V I C E N A M E
0064740 S ) ( \ D E V I C E N A M E T
0064760 O D E V I C E ) ) ( C O M S
0065000 ( * D e v i c e i n s t a n
0065020 c e s ) ( F N S \ F D E V I
0065040 N S T A N C E ) \r ( M A C R O
0065060 S \ I N H E R I T F D E V O P
0065100 . D \ I N H E R I T F D E V O
0065120 P . S ) ) ( I N I T V A R S
0065140 ( L O G I N H O S T / D I R (
0065160 Q U O T E { D S K } ) ) ) (
0065200 G L O B A L V A R S \r L O G I
0065220 N H O S T / D I R \ F I L E D
0065240 E V I C E S \ F I L E D E V I
0065260 C E N A M E S \ D E V I C E N
0065300 A M E T O D E V I C E ) ) ( C
0065320 O M S ( * D i r e c t o r y
0065340 d e f a u l t i n g ) ( F N
0065360 S \r C N D I R D I R E C T O
0065400 R Y N A M E D I R E C T O R Y
0065420 N A M E P H O S T N A M E P
0065440 \ A D D . C O N N E C T E D . D
0065460 I R ) ) ( C O M S ( * B i
0065500 n a r y I / O - P u b l i
0065520 c \r f u n c t i o n s ) ( F
0065540 N S \ B A C K F I L E P T R
0065560 \ B A C K P E E K B I N \ B A
0065600 C K B I N B I N \ B I N \
0065620 B I N S B O U T \ B O U T
0065640 \ B O U T S C O P Y B Y T E S
0065660 \r C O P Y C H A R S C O P Y
0065700 F I L E \ C O P Y O P E N F I
0065720 L E \ I N F E R . F I L E . T
0065740 Y P E E O F P F O R C E O U
0065760 T P U T \ F L U S H . O P E N
0066000 . S T R E A M S G E T E O F P
0066020 T R \r G E T F I L E I N F O
0066040 G E T F I L E P T R S E T F I
0066060 L E I N F O S E T F I L E P T
0066100 R ) ( * G e n e r i c f u
0066120 n c t i o n s ) ( F N S \ G
0066140 E N E R I C . B I N S \ G E N
0066160 E R I C . B O U T S \r \ G E N
0066200 E R I C . R E N A M E F I L E
0066220 \ G E N E R I C . R E A D P )
0066240 ( D E C L A R E : D O N T C O
0066260 P Y ( E X P O R T ( M A C R
0066300 O S \ O U T C H A R ) ) ) (
0066320 D E C L A R E : \r D O N T E V
0066340 A L @ L O A D D O C O P Y (
0066360 P ( M A P C ( Q U O T E (
0066400 ( F O R C E O U T P U T F L U
0066420 S H O U T P U T ) ( F O R C E
0066440 O U T P U T F L U S H M A P )
0066460 ( \ G E N E R I C . B I N S
0066500 \r \ N O N P A G E D B I N S )
0066520 ( \ G E N E R I C . B O U T S
0066540 \ N O N P A G E D B O U T S ) )
0066560 ) ( F U N C T I O N ( L A M
0066600 B D A ( P A I R ) ( P U T D
0066620 ( C A D R P A I R ) ( G E
0066640 T D ( C A R \r P A I R ) )
0066660 T ) ) ) ) ) ) ) ( C O M S (
0066700 * I n t e r n a l f u n c t
0066720 i o n s ) ( F N S \ E O F .
0066740 A C T I O N \ E O S E R R O R
0066760 \ G E T E O F P T R \ I N C
0067000 F I L E P T R \r \ P E E K B I
0067020 N \ S E T C L O S E D F I L E
0067040 L E N G T H \ S E T E O F P T
0067060 R \ S E T F I L E P T R ) (
0067100 F N S \ F I X P O U T \ F I
0067120 X P I N ) ( D E C L A R E :
0067140 D O N T C O P Y ( \r E X P O R
0067160 T ( M A C R O S \ D E C F I
0067200 L E P T R \ G E T F I L E P T
0067220 R \ S I G N E D W I N \ S I
0067240 G N E D W O U T \ W I N \ W
0067260 O U T \ B I N S \ B O U T S
0067300 \ E O F P ) ( \r C O N S T A
0067320 N T S B i t s P e r B y t e
0067340 ( B y t e O f f s e t S i z e
0067360 ( S E L E C T Q ( S Y S T E M
0067400 T Y P E ) ( V A X 1 0 ) 9
0067420 ) ) W o r d s P e r P a g e )
0067440 ( R E C O R D S \r B Y T E P
0067460 T R ) ) ( C O N S T A N T S
0067500 M a x C h a r ) ) ) ( C O M S
0067520 ( * B u f f e r e d I O )
0067540 ( F N S \ B U F F E R E D .
0067560 B I N \ B U F F E R E D . P E
0067600 E K B I N \r \ B U F F E R E D
0067620 . B O U T \ B U F F E R E D .
0067640 B I N S \ B U F F E R E D . B
0067660 O U T S \ B U F F E R E D . C
0067700 O P Y B Y T E S ) ) ( C O M S
0067720 ( * N U L L d e v i c e )
0067740 ( F N S \r \ N U L L D E V I
0067760 C E \ N U L L . O P E N F I L
0070000 E ) ( D E C L A R E : D O N
0070020 T E V A L @ L O A D D O C O P
0070040 Y ( P ( \ N U L L D E V I C
0070060 E ) ) ) ) ( L O C A L V A R S
0070100 . T ) ( \r D E C L A R E :
0070120 D O N T E V A L @ L O A D D
0070140 O E V A L @ C O M P I L E D O
0070160 N T C O P Y C O M P I L E R V
0070200 A R S ( A D D V A R S ( N L
0070220 A M A ) ( N L A M L ) ( L A
0070240 M A \r \ I S . N O T . R A N D
0070260 A C C E S S P \ I L L E G A L
0070300 . D E V I C E O P S T R E A M
0070320 P R O P ) ) ) ) ) \r ( A D D T O
0070340 V A R S Y S T E M R E C L S T
0070360 ( D A T A T Y P E S T R E A
0070400 M ( ( C O F F S E T W O R D
0070420 ) ( C B U F S I Z E W O R D
0070440 ) ( B I N A B L E F L A G )
0070460 ( B O U T A B L E F L A G )
0070500 \r ( E X T E N D A B L E F L
0070520 A G ) ( N I L B I T S 5 )
0070540 ( C B U F P T R P O I N T E
0070560 R ) ( N O N D E F A U L T D A
0070600 T E F L G F L A G ) ( R E V
0070620 A L I D A T E F L G F L A G )
0070640 ( \r M U L T I B U F F E R H I
0070660 N T F L A G ) ( U S E R C L
0070700 O S E A B L E F L A G ) ( U
0070720 S E R V I S I B L E F L A G )
0070740 ( A C C E S S B I T S B I T
0070760 S 3 ) ( F U L L F I L E N A
0071000 M E \r P O I N T E R ) ( D E
0071020 V I C E P O I N T E R ) ( V
0071040 A L I D A T I O N P O I N T E
0071060 R ) ( E P A G E W O R D )
0071100 ( E O F F S E T W O R D ) (
0071120 F 1 P O I N T E R ) ( F 2
0071140 P O I N T E R ) ( \r F 3 P O
0071160 I N T E R ) ( F 4 P O I N T
0071200 E R ) ( F 5 P O I N T E R )
0071220 ( F W 6 W O R D ) ( F W 7
0071240 W O R D ) ( B Y T E S I Z E
0071260 B Y T E ) ( B U F F S P O
0071300 I N T E R ) ( C P A G E \r W
0071320 O R D ) ( F W 8 W O R D )
0071340 ( M A X B U F F E R S W O R D
0071360 ) ( C H A R P O S I T I O N
0071400 W O R D ) ( D I R T Y B I T S
0071420 W O R D ) ( L I N E L E N G
0071440 T H W O R D ) ( \r E O L C O
0071460 N V E N T I O N B I T S 2 )
0071500 ( C B U F D I R T Y F L A G
0071520 ) ( N I L B I T S 5 ) (
0071540 O U T C H A R F N P O I N T E
0071560 R ) ( E N D O F S T R E A M O
0071600 P P O I N T E R ) ( \r O T H
0071620 E R P R O P S P O I N T E R )
0071640 ( I M A G E O P S P O I N T
0071660 E R ) ( I M A G E D A T A P
0071700 O I N T E R ) ( E X T R A S T
0071720 R E A M O P P O I N T E R )
0071740 ( S T R M B I N F N P O I N T
0071760 E R ) \r ( S T R M B O U T F N
0072000 P O I N T E R ) ( C B U F M
0072020 A X S I Z E W O R D ) ( F W
0072040 9 W O R D ) ( F 1 0 P O I
0072060 N T E R ) ) ) ) \r ( R P A Q ?
0072100 F I L E L I N E L E N G T H 1
0072120 0 2 ) \r ( R P A Q ? \ S T R E
0072140 A M . D E F A U L T . M A X B U
0072160 F F E R S 3 ) \r ( / D E C L A
0072200 R E D A T A T Y P E ( Q U O T
0072220 E F D E V ) ( Q U O T E (
0072240 P O I N T E R F L A G F L A
0072260 G F L A G F L A G F L A G
0072300 F L A G F L A G F L A G
0072320 P O I N T E R P O I N T E R \r
0072340 P O I N T E R P O I N T E R
*
0072500 \r P O I N T E R P O I N T E
0072520 R P O I N T E R P O I N T E
*
0072640 R \r P O I N T E R P O I N T
0072660 E R P O I N T E R P O I N T
*
0072740 E R P O I N T E R ) ) ) \r ( A
0072760 D D T O V A R S Y S T E M R E
0073000 C L S T ( D A T A T Y P E F
0073020 D E V ( ( D E V I C E N A M E
0073040 P O I N T E R ) ( R E S E T
0073060 A B L E F L A G ) ( R A N D
0073100 O M A C C E S S P F L A G )
0073120 ( \r N O D I R E C T O R I E S
0073140 F L A G ) ( P A G E M A P P E
0073160 D F L A G ) ( F D B I N A B
0073200 L E F L A G ) ( F D B O U T
0073220 A B L E F L A G ) ( F D E X
0073240 T E N D A B L E F L A G ) (
0073260 B U F F E R E D \r F L A G )
0073300 ( C L O S E F I L E P O I N T
0073320 E R ) ( D E L E T E F I L E
0073340 P O I N T E R ) ( D I R E C T
0073360 O R Y N A M E P P O I N T E R
0073400 ) ( E V E N T F N P O I N T
0073420 E R ) ( \r G E N E R A T E F I
0073440 L E S P O I N T E R ) ( G E
0073460 T F I L E I N F O P O I N T E
0073500 R ) ( G E T F I L E N A M E
0073520 P O I N T E R ) ( H O S T N A
0073540 M E P P O I N T E R ) ( O P
0073560 E N F I L E \r P O I N T E R )
0073600 ( R E A D P A G E S P O I N
0073620 T E R ) ( R E O P E N F I L E
0073640 P O I N T E R ) ( S E T F I
0073660 L E I N F O P O I N T E R )
0073700 ( T R U N C A T E F I L E P O
0073720 I N T E R ) ( \r W R I T E P A
0073740 G E S P O I N T E R ) ( B I
0073760 N P O I N T E R ) ( B O U T
0074000 P O I N T E R ) ( P E E K B
0074020 I N P O I N T E R ) ( R E A
0074040 D P P O I N T E R ) ( B A C
0074060 K F I L E P T R \r P O I N T E
0074100 R ) ( D E V I C E I N F O P
0074120 O I N T E R ) ( F O R C E O U
0074140 T P U T P O I N T E R ) ( L
0074160 A S T C P O I N T E R ) ( S
0074200 E T F I L E P T R P O I N T E
0074220 R ) ( G E T F I L E P T R \r
0074240 P O I N T E R ) ( G E T E O F
0074260 P T R P O I N T E R ) ( E O
0074300 F P P O I N T E R ) ( B L O
0074320 C K I N P O I N T E R ) ( B
0074340 L O C K O U T P O I N T E R )
0074360 ( R E N A M E F I L E P O I
0074400 N T E R ) \r ( R E L E A S E B
0074420 U F F E R P O I N T E R ) (
0074440 G E T N E X T B U F F E R P O
0074460 I N T E R ) ( S E T E O F P T
0074500 R P O I N T E R ) ( F R E E
0074520 P A G E C O U N T P O I N T E
0074540 R ) ( \r M A K E D I R E C T O
0074560 R Y P O I N T E R ) ( N I L
0074600 P O I N T E R ) ) ) ) \r ( A D
0074620 D T O V A R \ F I L E D E V I
0074640 C E S ) \r ( A D D T O V A R \
0074660 F I L E D E V I C E N A M E S )
0074700 \r ( A D D T O V A R \ D E V I
0074720 C E N A M E T O D E V I C E ) \r
0074740 ( P U T P R O P S \ I N H E R
0074760 I T F D E V O P . D M A C R O
0075000 ( X ( S U B P A I R ( Q U
0075020 O T E ( N E W A R G S O P N
0075040 A M E . A R G S ) ) ( C O
0075060 N S ( S U B S T ( Q U O T E
0075100 ( \r f e t c h D E V I C E I
0075120 N F O o f F D E V ) ) ( Q
0075140 U O T E F D E V ) ( C D R
0075160 X ) ) X ) ( Q U O T E ( F
0075200 U N C T I O N ( L A M B D A
0075220 A R G S ( F D E V O P ( Q U
0075240 O T E \r O P N A M E ) ( f e
0075260 t c h D E V I C E I N F O o
0075300 f F D E V ) . N E W A R G
0075320 S ) ) ) ) ) ) ) \r ( P U T P R O
0075340 P S \ I N H E R I T F D E V O
0075360 P . S M A C R O ( ( O P N A
0075400 M E . A R G S ) ( F U N C
0075420 T I O N ( L A M B D A A R G
0075440 S ( F D E V O P ( Q U O T E
0075460 O P N A M E ) ( f e t c h \r
0075500 D E V I C E I N F O o f (
0075520 f e t c h D E V I C E o f
0075540 S T R E A M ) ) . A R G S )
0075560 ) ) ) ) \r ( R P A Q ? L O G I
0075600 N H O S T / D I R ( Q U O T E
0075620 { D S K } ) ) \r ( M A P C (
0075640 Q U O T E ( ( F O R C E O U T
0075660 P U T F L U S H O U T P U T )
0075700 ( F O R C E O U T P U T F L
0075720 U S H M A P ) ( \ G E N E R I
0075740 C . B I N S \ N O N P A G E D
0075760 B I N S ) ( \r \ G E N E R I C
0076000 . B O U T S \ N O N P A G E D
0076020 B O U T S ) ) ) ( F U N C T I
0076040 O N ( L A M B D A ( P A I R
0076060 ) ( P U T D ( C A D R P A
0076100 I R ) ( G E T D ( C A R P
0076120 A I R ) ) T ) ) ) ) \r ( \ N U
0076140 L L D E V I C E ) \r ( P U T P R
0076160 O P S F I L E I O C O P Y R
0076200 I G H T ( " X e r o x C o r
0076220 p o r a t i o n " 1 9 8 1 1
0076240 9 8 2 1 9 8 3 1 9 8 4 ) ) \r
0076260 N I L \r
0076264