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