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