$ od -c -N 50000 [eris]<LispCore>INTERNAL>library>PCEERD.DCOM!1
0000000 ( F I L E C R E A T E D " 2 9
0000020 - J u l - 8 6 1 5 : 2 2 : 5 8
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 > P C E > P C E E R D . ; 1 4
0000120 ) " 2 9 - J u l - 8 6 0 1 :
0000140 1 3 : 3 4 " \r r e c o m p i l
0000160 e d c h a n g e s : \ P C E
0000200 . E R D . I n i t i n " X e
0000220 r o x L i s p 2 9 - J u l -
0000240 8 6 . . . " d a t e d " 2
0000260 9 - J u l - 8 6 0 1 : 2 5 : 0
0000300 7 " ) \r ( F I L E C R E A T E D
0000320 " 2 9 - J u l - 8 6 1 5 : 2
0000340 1 : 5 8 " { E R I S } < L I S
0000360 P C O R E > P C E > P C E E R D
0000400 . ; 1 4 2 5 1 8 0 c h a n g
0000420 e s t o : ( F N S \ P C E
0000440 . E R D . I n i t ) \r p r e v
0000460 i o u s d a t e : " 2 8 - J
0000500 u l - 8 6 1 5 : 0 0 : 2 2 "
0000520 { E R I S } < L I S P C O R E >
0000540 P C E > P C E E R D . ; 1 3 ) \r
0000560 ( N L S E T Q ( \ P C E . T E
0000600 R M I N A T E ) ) \r P C E . C R
0000620 E A T E . E R D F I L E A 0 0 0
0000640 1 D 1 \r ( N A M E E R R O R
0000660 S E T L ( 0 N I L ) P
0000700 2 B Y T E S P E R C Y L I N D
0000720 E R P 1 L A S T B Y T E O
0000740 N P A G E F 4 S T R E A M
0000760 F 5 R E S E T V A R S L S
0001000 T F 6 N B Y T E S F 7
0001020 A U T O C O N F I R M F L G
0001040 F 1 0 Q C Y L I N D E R S
0001060 F 1 1 Q R E S E T Y ) \0 y
0001100 004 006 002 \0 g \0 \0 T h 032 032 h h 032 032 U
0001120 032 c \n 277 V n 002 \0 V W 020 333 021 023 003 I
0001140 H 363 263 C T I k 331 \n \0 \0 277 T j ! 277
0001160 W 016 263 ' I J \n \0 \0 [ j 360 252 K 005 003
0001200 262 031 K \t \0 \0 262 023 I J 333 i \n \0 \0 277
0001220 o \0 \0 \0 i \n \0 \0 277 \b \0 \0 277 I n 002
0001240 \0 324 Y 260 275 023 W 016 255 o \0 \0 \0 i \n \0
0001260 \0 277 i \t \0 \0 200 h c 022 i 020 \0 ( 1 6
0001300 1 Q T E R P R I 1 5 4 Q P
0001320 R I N 1 1 2 7 Q B L O C K
0001340 1 2 3 Q P R I N 1 1 1 2 Q
0001360 P R I N 1 1 0 1 Q \ F Z E R
0001400 O P 6 4 Q I M O D 4 6 Q
0001420 S E T F I L E P T R ) \r ( 2 C
0001440 L O S E F ? ) \r ( 1 5 0 Q "
0001460 d o n e " 1 1 7 Q " . . . "
0001500 ) \r P C E . C R E A T E . E R D
0001520 F I L E D 1 \r ( P 4 R E S
0001540 E T Z P 3 R E S E T Y P
0001560 2 L I S P X H I S T P 1
0001600 N B Y T E S P 0 S T R E
0001620 A M I 2 A U T O C O N F I
0001640 R M F L G I 1 C Y L I N D
0001660 E R S I 0 F I L E N A M E
0001700 F 5 L I S P X H I S T F
0001720 6 R E S E T V A R S L S T )
0001740 \0 317 005 002 \0 003 021 001 A 3 020 225 k A
0001760 j 330 363 230 o \0 \0 \0 A \n \0 \0 277 A j 330
0002000 b 002 d j k h 032 032 032 \t \0 \0 Y B 263 z
0002020 o \0 \0 \0 i \n \0 \0 277 @ i \n \0 \0 277 o
0002040 \0 \0 \0 i \n \0 \0 277 A i \n \0 \0 277 o \0
0002060 \0 \0 i \n \0 \0 277 I n 002 \0 333 i \n \0 \0
0002100 277 o \0 \0 \0 i \n \0 \0 277 I i \n \0 \0 277
0002120 o \0 \0 \0 i \n \0 \0 277 h d o \0 \0 \0 o
0002140 \0 \0 \0 \f \0 \0 g \0 \0 360 256 o \0 \0 \0 i
0002160 \n \0 \0 277 i \t \0 \0 h 020 i \t \0 \0 277 o
0002200 \0 \0 \0 i \n \0 \0 277 @ g \0 \0 g \0 \0 \v
0002220 \0 \0 X U 021 ! 004 V o \0 \0 \0 g \0 \0 \n
0002240 \0 \0 221 h 202 g \0 \0 \ \n \0 \0 277 L 264 006
0002260 \b \0 \0 h 020 \0 ( 3 1 3 Q E R R O
0002300 R ! 3 0 4 Q R E S E T R E S
0002320 T O R E 2 7 2 Q P C E . C R
0002340 E A T E . E R D F I L E A 0 0 0
0002360 1 2 5 2 Q \ P C E . O P E N
0002400 S T R E A M 2 3 7 Q P R I N
0002420 1 2 2 6 Q T E R P R I 2 2
0002440 0 Q T E R P R I 2 1 3 Q P
0002460 R I N 1 1 7 6 Q A S K U S E
0002500 R 1 6 0 Q P R I N 1 1 4 7
0002520 Q P R I N 1 1 4 1 Q P R I
0002540 N 1 1 3 0 Q P R I N 1 1 1
0002560 6 Q P R I N 1 1 0 5 Q P R
0002600 I N 1 7 7 Q P R I N 1 6 6
0002620 Q P R I N 1 6 0 Q P R I N
0002640 1 4 4 Q \ P C E . E R D . A
0002660 d d r T o F i l e P t r 2 4 Q
0002700 E R R O R ) \r ( 3 0 0 Q E R
0002720 R O R 2 6 7 Q I N T E R N A
0002740 L 2 4 7 Q N E W 2 4 4 Q
0002760 O U T P U T 2 0 1 Q Y e s )
0003000 \r ( 2 6 4 Q ( P C E . C R E
0003020 A T E . E R D F I L E A 0 0 0 1
0003040 ) 2 3 3 Q " C r e a t i n g
0003060 f i l e . . . " 2 0 7 Q "
0003100 a b o r t e d " 1 7 3 Q ( Y
0003120 e s N o ) 1 6 7 Q " " 1
0003140 5 4 Q " b y t e s ( Y / N
0003160 ) ? " 1 3 5 Q " p a g e
0003200 s = " 1 1 2 Q " c y l
0003220 i n d e r s = " 7 3 Q "
0003240 w i t h " 5 4 Q " C r e
0003260 a t e f i l e " 2 0 Q "
0003300 B a d C Y L I N D E R S a r
0003320 g u m e n t " ) \r \ P C E . E R
0003340 D . A d d r T o F i l e P t r
0003360 D 1 \r ( L ( 0 A D D R ) )
0003400 \0 031 \0 \0 \0 001 @ 002 002 001 k 331 @ 002 001 @
0003420 001 l 004 332 330 l 021 332 330 n 002 \0 332 020 \0 N
0003440 I L \r N I L \r ( ) \r \ P C E . E
0003460 R D . C o n f i g u r e D 1 \r
0003500 ( I 0 E R D . C O N F I G )
0003520 \0 p 002 \0 \0 001 \b \0 \0 @ g \0 \0 ' 264
0003540 U @ g \0 \0 ' 264 N @ g \0 \0 ' g \0 \0
0003560 g \0 \0 \v \0 \0 027 \0 \0 k \b \0 \0 361 262 023
0003600 o \0 \0 \0 @ g \0 \0 ' \n \0 \0 277 \b \0 \0
0003620 277 ` \0 \0 g \0 \0 g \0 \0 \v \0 \0 i 027 \0
0003640 \0 ` \0 \0 \b \0 \0 k 330 9 004 021 002 001 H I
0003660 315 005 I 020 027 \0 \0 ` \0 \0 j 315 005 o \0 \0
0003700 \0 j \n \0 \0 020 \0 ( 1 5 5 Q P C E
0003720 . P O K E . W O R D 1 1 7 Q
0003740 \ P C E . E R D . G e t M a x C
0003760 y l i n d e r 1 0 5 Q W H E
0004000 N C L O S E 7 0 Q E R R O R
0004020 ! 6 4 Q E R R O R 4 5 Q
0004040 \ P C E . E R D . G e t M a x C
0004060 y l i n d e r 3 6 Q \ P C E
0004100 . O P E N S T R E A M 2 \ P
0004120 C E . E R D . T e r m i n a t e
0004140 ) \r ( 1 4 2 Q \ P C E . R I G
0004160 I D D I S K . F C B P T R 1 3
0004200 7 Q \ P C E . E R D . e r d P
0004220 r e s e n t 1 1 4 Q \ P C E
0004240 . R I G I D D I S K . F C B P T
0004260 R 1 1 1 Q \ P C E . E R D .
0004300 e r d P r e s e n t 1 0 2 Q
0004320 N O 7 7 Q C L O S E A L L
0004340 7 4 Q \ P C E . E R D . e r d
0004360 S t r e a m 6 0 Q E R D F I
0004400 L E 4 1 Q \ P C E . E R D .
0004420 e r d S t r e a m 3 3 Q O L
0004440 D 3 0 Q B O T H 2 4 Q E
0004460 R D F I L E 1 5 Q E R D F I
0004500 L E 6 R I G I D D I S K ) \r
0004520 ( 1 5 1 Q 3 1 0 0 0 0 0 Q
0004540 5 4 Q " E R D f i l e s m
0004560 a l l e r t h a n o n e c
0004600 y l i n d e r " ) \r \ P C E . E
0004620 R D . F i l e P t r T o A d d r
0004640 D 1 \r ( P 4 R E M A I N D
0004660 E R P 3 S E C P 2 H
0004700 E A D P 1 C Y L P 0
0004720 S E C T O R I N F I L E I 0
0004740 F I L E P T R ) \0 , 005 \0 \0 001
0004760 021 P 004 @ n 002 \0 333 X d l D 333 Y H l
0005000 D \n \0 \0 \ d l 021 333 Z L l 021 \n \0 \0
0005020 k 330 [ I J K h 032 032 032 020 \0 ( 3 7 Q
0005040 I M O D 2 3 Q I M O D ) \r
0005060 N I L \r ( ) \r \ P C E . E R D .
0005100 F o r m a t D r i v e D 1 \r (
0005120 P 0 D I S K A D D R ) \0 %
0005140 001 \0 \0 \0 021 020 \0 \b \0 \0 X d 002 002 k 030
0005160 H 002 j 030 H \b \0 \0 \b \0 \0 H 001 331 k 330
0005200 l D 332 \v \0 \0 j 020 \0 ( 4 1 Q \ P
0005220 C E . E R D . W r i t e S e c t
0005240 o r s P r o c 2 6 Q \ P C E
0005260 . E R D . G e t M a x C y l i n
0005300 d e r 2 3 Q \ P C E . E R D
0005320 . G e t S e c t o r B u f f e r
0005340 5 \ P C E . E R D . G e t D
0005360 i s k B u f f e r A d d r ) \r N
0005400 I L \r ( ) \r \ P C E . E R D . F
0005420 o r m a t T r a c k D 1 \r ( P
0005440 0 D I S K A D D R ) \0 030 001
0005460 \0 \0 \0 021 020 \0 \b \0 \0 X d 002 002 k 030 H
0005500 \b \0 \0 l 021 \v \0 \0 j 020 \0 ( 2 4 Q
0005520 \ P C E . E R D . W r i t e S e
0005540 c t o r s P r o c 1 7 Q \ P
0005560 C E . E R D . G e t S e c t o r
0005600 B u f f e r 5 \ P C E . E R
0005620 D . G e t D i s k B u f f e r A
0005640 d d r ) \r N I L \r ( ) \r \ P C E
0005660 . E R D . G e t D i s k B u f f
0005700 e r A d d r D 1 \r N I L \0 '
0005720 \0 \0 \0 \0 ` \0 \0 312 002 207 ` \0 \0 312 002 \a
0005740 l 300 345 340 340 344 ` \0 \0 312 003 207 ` \0 \0 312
0005760 002 \a l ? 345 h 032 032 032 020 \0 N I L \r (
0006000 3 2 Q \ P C E . R I G I D D I
0006020 S K . F C B P T R 2 4 Q \ P
0006040 C E . R I G I D D I S K . F C B
0006060 P T R 1 0 Q \ P C E . R I G
0006100 I D D I S K . F C B P T R 2
0006120 \ P C E . R I G I D D I S K . F
0006140 C B P T R ) \r ( ) \r \ P C E . E
0006160 R D . G e t M a x C y l i n d e
0006200 r D 1 \r N I L \0 021 \0 \0 \0 \0 `
0006220 \0 \0 g \0 \0 \n \0 \0 \t \0 \0 001 k 331 020 \0
0006240 ( 1 3 Q \ P C E . E R D . F i
0006260 l e P t r T o A d d r 1 0 Q
0006300 G E T F I L E I N F O ) \r ( 5
0006320 L E N G T H 2 \ P C E . E R
0006340 D . e r d S t r e a m ) \r ( ) \r
0006360 \ P C E . E R D . G e t M e m B
0006400 u f f e r P t r D 1 \r ( P 2
0006420 p c A d d r e s s P 1 n
0006440 e w B X R e g P 0 n e w E
0006460 S R e g ) \0 " 003 \0 \0 \0 ` \0 \0 310
0006500 004 9 004 ` \0 \0 310 001 9 004 021 022 002 H l 020
0006520 332 I 330 Z d \t \0 \0 J k 345 032 020 \0 ( 3
0006540 3 Q \ P C E . G E T . P C . P
0006560 T R ) \r ( 1 1 Q \ P C E . R I
0006600 G I D D I S K . F C B P T R 2
0006620 \ P C E . R I G I D D I S K .
0006640 F C B P T R ) \r ( ) \r \ P C E .
0006660 E R D . G e t S e c t o r B u f
0006700 f e r D 1 \r N I L \0 022 \0 \0 \0
0006720 \0 ` \0 \0 265 \v l 200 j \n \0 \0 027 \0 \0 j
0006740 032 020 \0 ( 1 2 Q \ A L L O C B L
0006760 O C K ) \r ( 1 5 Q \ P C E . E
0007000 R D . S e c t o r B u f f e r
0007020 2 \ P C E . E R D . S e c t o
0007040 r B u f f e r ) \r ( ) \r \ P C E
0007060 . E R D . I n c r e m e n t P C
0007100 M e m P t r D 1 \r ( L ( 0
0007120 B U F F E R P T R ) ) \0 \v \0 \0
0007140 \0 001 @ 001 n 001 \0 320 @ 002 032 020 \0 N I L
0007160 \r N I L \r ( ) \r \ P C E . E R D
0007200 . I n i t D 1 \r N I L \0 > \0
0007220 \0 \0 \0 ` \0 \0 264 9 g \0 \0 \t \0 \0 027 \0
0007240 \0 h 027 \0 \0 j 027 \0 \0 g \0 \0 h 032 g \0
0007260 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0
0007300 g \0 \0 g \0 \0 h 032 \r \t \0 \0 027 \0 \0 020
0007320 \0 ( 7 0 Q A D D . P R O C E S
0007340 S 1 2 Q C R E A T E . E V E
0007360 N T ) \r ( 7 3 Q \ P C E . E R
0007400 D . P r o c e s s 6 2 Q \ P
0007420 C E . E R D . I n i t 5 7 Q
0007440 R E S T A R T F O R M 5 4 Q
0007460 H A R D R E S E T 5 1 Q R E
0007500 S T A R T A B L E 4 6 Q D E
0007520 L E T E 4 3 Q A F T E R E X
0007540 I T 4 0 Q P C E - E R D 3
0007560 5 Q N A M E 3 0 Q \ P C E
0007600 . E R D . N o t i f y P r o c e
0007620 d u r e 2 5 Q \ P C E . E R
0007640 D . s t a t u s 2 1 Q \ P C
0007660 E . E R D . g o t U p N o t i f
0007700 y 1 5 Q \ P C E . E R D . C
0007720 o n d i t i o n 7 E R D . C
0007740 o n d i t i o n 2 \ P C E .
0007760 E R D . e r d P r e s e n t ) \r
0010000 ( ) \r \ P C E . E R D . N o t i
0010020 f y D 1 \r N I L \0 % \0 \0 \0 \0
0010040 i 027 \0 \0 ` \0 \0 004 ` \0 \0 360 226 ` \0 \0
0010060 \t \0 \0 020 ` \0 \0 264 \f o \0 \0 \0 ` \0 \0
0010100 \n \0 \0 020 \0 ( 4 2 Q \ P C E . S
0010120 Y S T E M . E R R O R 2 2 Q
0010140 N O T I F Y . E V E N T ) \r ( 3
0010160 7 Q \ P C E . E R D . C o n d
0010200 i t i o n 2 6 Q \ P C E . D
0010220 E B U G . F L G 1 7 Q \ P C
0010240 E . E R D . C o n d i t i o n
0010260 1 2 Q 004 003 E V E N T T Y P E #
0010300 6 \ P C E . E R D . C o n d
0010320 i t i o n 3 \ P C E . E R D
0010340 . g o t U p N o t i f y ) \r (
0010360 3 4 Q " \ P C E . E R D . C o
0010400 n d i t i o n n o t a n e
0010420 v e n t " ) \r \ P C E . E R D .
0010440 N o t i f y P r o c e d u r e
0010460 D 1 \r N I L 001 $ \0 \0 \0 \0 ` \0 \0
0010500 l 200 317 \0 207 ` \0 \0 310 \a 9 006 ` \0 \0 250
0010520 ` \0 \0 \t \0 \0 277 260 365 h 027 \0 \0 277 ` \0
0010540 \0 232 ` \0 \0 312 003 \a l 200 360 263 027 ` \0 \0
0010560 233 ` \0 \0 247 o \0 \0 \0 \t \0 \0 277 l 200 261
0010600 \0 310 ` \0 \0 312 \0 207 d j 360 224 277 j 261 \0
0010620 271 d k 360 236 277 ` \0 \0 ` \0 \0 317 \0 \a 277
0010640 j 261 \0 246 d l 002 360 226 277 \b \0 \0 261 \0 232
0010660 d l 003 360 226 277 \b \0 \0 261 \0 216 d l 004 360
0010700 224 277 j 261 \0 204 d l 005 360 225 277 \b \0 \0 260
0010720 x d l 006 360 225 277 \b \0 \0 260 m d l \a 360
0010740 225 277 \b \0 \0 260 b d l \b 360 225 277 \b \0 \0
0010760 260 W d l \t 360 223 277 j 260 N d l \f 360 223
0011000 277 j 260 E d l \r 360 223 277 j 260 < d l 016
0011020 360 225 277 \b \0 \0 260 1 d l 017 360 225 277 \b \0
0011040 \0 260 & d l 020 360 223 277 j 260 035 l 021 360 222
0011060 j 260 026 ` \0 \0 236 o \0 \0 \0 ` \0 \0 312 \0
0011100 207 \n \0 \0 265 003 k 027 \0 \0 277 ` \0 \0 ` \0
0011120 \0 317 \0 207 277 ` \0 \0 310 \a 9 006 277 261 376 357
0011140 \0 ( 4 0 6 Q \ P C E . S Y S T
0011160 E M . E R R O R 3 4 3 Q \ P
0011200 C E . E R D . W r i t e S e c t
0011220 o r B u f f e r 3 3 0 Q \ P
0011240 C E . E R D . R e a d S e c t o
0011260 r B u f f e r 2 6 2 Q \ P C
0011300 E . E R D . R e t u r n D r i v
0011320 e P a r a m e t e r s 2 4 7 Q
0011340 \ P C E . E R D . F o r m a t
0011360 D r i v e 2 3 4 Q \ P C E .
0011400 E R D . F o r m a t T r a c k
0011420 2 2 1 Q \ P C E . E R D . F o
0011440 r m a t T r a c k 1 7 3 Q \
0011460 P C E . E R D . W r i t e S e c
0011500 t o r s 1 5 7 Q \ P C E . E
0011520 R D . R e a d S e c t o r s 7
0011540 6 Q \ P C E . S Y S T E M . E
0011560 R R O R 3 0 Q A W A I T . E
0011600 V E N T ) \r ( 4 3 2 Q \ P C E
0011620 . R I G I D D I S K . F C B P T
0011640 R 4 2 3 Q \ P C E . E R D .
0011660 s t a t u s 4 2 0 Q \ P C E
0011700 . R I G I D D I S K . F C B P T
0011720 R 4 1 4 Q \ P C E . E R D .
0011740 s t a t u s 4 0 0 Q \ P C E
0011760 . R I G I D D I S K . F C B P T
0012000 R 3 7 0 Q \ P C E . D E B U
0012020 G . F L G 1 3 6 Q \ P C E .
0012040 E R D . s t a t u s 1 3 3 Q
0012060 \ P C E . R I G I D D I S K . F
0012100 C B P T R 1 0 7 Q \ P C E .
0012120 R I G I D D I S K . F C B P T R
0012140 6 6 Q \ P C E . E R D . e r
0012160 d P r e s e n t 6 2 Q \ P C
0012200 E . D E B U G . F L G 4 7 Q
0012220 \ P C E . R I G I D D I S K . F
0012240 C B P T R 4 3 Q \ P C E . E
0012260 R D . e r d P r e s e n t 3 7
0012300 Q \ P C E . E R D . g o t U p
0012320 N o t i f y 2 5 Q \ P C E .
0012340 E R D . C o n d i t i o n 2 1
0012360 Q \ P C E . E R D . g o t U p
0012400 N o t i f y 1 2 Q \ P C E .
0012420 R I G I D D I S K . F C B P T R
0012440 2 \ P C E . R I G I D D I S
0012460 K . F C B P T R ) \r ( 3 7 5 Q
0012500 " U n k n o w n E R D c o
0012520 m m a n d r e c e i v e d "
0012540 7 3 Q " E R D U p n o t i
0012560 f y w h e n E R D i s n
0012600 o t p r e s e n t " ) \r \ P C
0012620 E . E R D . P u t D i s k B u f
0012640 f e r A d d r D 1 \r ( L ( 0
0012660 D I S K A D D R ) ) \0 2 002 \0
0012700 \0 001 ` \0 \0 @ 001 l 377 345 317 002 207 ` \0 \0
0012720 @ 002 001 317 003 207 ` \0 \0 @ 002 002 001 l ? 345
0012740 @ 001 n 003 \0 345 342 342 344 021 002 001 H I 317 002
0012760 \a I 020 \0 N I L \r ( 2 6 Q \ P C
0013000 E . R I G I D D I S K . F C B P
0013020 T R 1 5 Q \ P C E . R I G I
0013040 D D I S K . F C B P T R 2 \
0013060 P C E . R I G I D D I S K . F C
0013100 B P T R ) \r ( ) \r \ P C E . E R
0013120 D . R e a d S e c t o r B u f f
0013140 e r D 1 \r ( P 1 P C M E M
0013160 B U F F E R P T R P 0 L I
0013200 S P B U F F E R P T R ) \0 033 002
0013220 \0 \0 \0 \b \0 \0 \b \0 \0 021 002 001 H 001 H 002
0013240 I 001 I 002 n 002 \0 \r 005 \0 \0 j 020 \0 ( 2
0013260 7 Q \ M O V E B Y T E S 5
0013300 \ P C E . E R D . G e t M e m B
0013320 u f f e r P t r 2 \ P C E .
0013340 E R D . G e t S e c t o r B u f
0013360 f e r ) \r N I L \r ( ) \r \ P C E
0013400 . E R D . R e a d S e c t o r s
0013420 D 1 \r N I L \0 022 \0 \0 \0 \0 \b \0
0013440 \0 \b \0 \0 ` \0 \0 312 \0 \a i \f \0 \0 020 \0
0013460 ( 1 7 Q \ P C E . E R D . R e
0013500 a d S e c t o r s P r o c 5
0013520 \ P C E . E R D . G e t M e m B
0013540 u f f e r P t r 2 \ P C E .
0013560 E R D . G e t D i s k B u f f e
0013600 r A d d r ) \r ( 1 0 Q \ P C E
0013620 . R I G I D D I S K . F C B P T
0013640 R ) \r ( ) \r \ P C E . E R D . R
0013660 e a d S e c t o r s P r o c D
0013700 1 \r ( P 3 X P 0 F I L
0013720 E A D D R I 3 I N C B U F
0013740 F E R P I 2 C N T I 1
0013760 B U F F E R P T R I 0 D
0014000 S K A D D R ) \0 K \a \0 \0 004 @ \t
0014020 \0 \0 021 021 001 ` \0 \0 H \n \0 \0 B k 021 002
0014040 003 K J 363 263 2 ` \0 \0 A 001 A 002 021 003 006
0014060 L 006 \0 \0 311 006 006 \0 \0 311 6 271 L M N n
0014100 002 \0 l 004 I 016 023 C 226 A \t \0 \0 b 002 277
0014120 K k 324 [ 260 316 j 020 \0 ( 7 6 Q \ P
0014140 C E . E R D . I n c r e m e n t
0014160 P C M e m P t r 1 5 Q S E T
0014200 F I L E P T R 3 \ P C E . E
0014220 R D . A d d r T o F i l e P t r
0014240 ) \r ( 5 2 Q F D E V 4 5 Q
0014260 S T R E A M 3 2 Q \ P C E .
0014300 E R D . e r d S t r e a m 1 1
0014320 Q \ P C E . E R D . e r d S t
0014340 r e a m ) \r ( ) \r \ P C E . E R
0014360 D . R e t u r n D r i v e P a r
0014400 a m e t e r s D 1 \r N I L \0
0014420 036 \0 \0 \0 \0 \b \0 \0 l 003 l 021 h 032 032 032
0014440 \t \0 \0 ` \0 \0 ` \0 \0 221 k 200 j 317 003 \a
0014460 j 020 \0 ( 1 5 Q \ P C E . E R D
0014500 . P u t D i s k B u f f e r A d
0014520 d r 2 \ P C E . E R D . G e
0014540 t M a x C y l i n d e r ) \r ( 2
0014560 3 Q \ P C E . E R D . e r d P
0014600 r e s e n t 2 0 Q \ P C E .
0014620 R I G I D D I S K . F C B P T R
0014640 ) \r ( ) \r \ P C E . E R D . T e
0014660 r m i n a t e D 1 \r N I L \0
0014700 @ \0 \0 \0 \0 ` \0 \0 \t \0 \0 264 \n ` \0 \0
0014720 \t \0 \0 277 h 027 \0 \0 d 027 \0 \0 d 027 \0 \0
0014740 j 027 \0 \0 h 027 \0 \0 ` \0 \0 \t \0 \0 264 022
0014760 ` \0 \0 \t \0 \0 264 \n ` \0 \0 \t \0 \0 277 h
0015000 027 \0 \0 020 \0 ( 7 0 Q C L O S E F
0015020 6 0 Q O P E N P 5 0 Q S
0015040 T R E A M P 1 5 Q D E L . P
0015060 R O C E S S 5 P R O C E S S
0015100 P ) \r ( 7 5 Q \ P C E . E R D
0015120 . e r d S t r e a m 6 5 Q \
0015140 P C E . E R D . e r d S t r e a
0015160 m 5 5 Q \ P C E . E R D . e
0015200 r d S t r e a m 4 5 Q \ P C
0015220 E . E R D . e r d S t r e a m
0015240 4 2 Q \ P C E . E R D . P r o
0015260 c e s s 3 6 Q \ P C E . E R
0015300 D . s t a t u s 3 2 Q \ P C
0015320 E . E R D . g o t U p N o t i f
0015340 y 2 6 Q \ P C E . E R D . C
0015360 o n d i t i o n 2 2 Q \ P C
0015400 E . E R D . e r d P r e s e n t
0015420 1 2 Q \ P C E . E R D . P r
0015440 o c e s s 2 \ P C E . E R D
0015460 . P r o c e s s ) \r ( ) \r \ P C
0015500 E . E R D . W r i t e S e c t o
0015520 r B u f f e r D 1 \r ( P 1
0015540 L I S P B U F F E R P T R P
0015560 0 P C M E M B U F F E R P T R
0015600 ) \0 033 002 \0 \0 \0 \b \0 \0 \b \0 \0 021 002
0015620 001 H 001 H 002 I 001 I 002 n 002 \0 \r 005 \0 \0
0015640 j 020 \0 ( 2 7 Q \ M O V E B Y T
0015660 E S 5 \ P C E . E R D . G e
0015700 t S e c t o r B u f f e r 2
0015720 \ P C E . E R D . G e t M e m B
0015740 u f f e r P t r ) \r N I L \r ( )
0015760 \r \ P C E . E R D . W r i t e S
0016000 e c t o r s D 1 \r N I L \0 022
0016020 \0 \0 \0 \0 \b \0 \0 \b \0 \0 ` \0 \0 312 \0 \a
0016040 i \f \0 \0 020 \0 ( 1 7 Q \ P C E .
0016060 E R D . W r i t e S e c t o r s
0016100 P r o c 5 \ P C E . E R D .
0016120 G e t M e m B u f f e r P t r
0016140 2 \ P C E . E R D . G e t D i
0016160 s k B u f f e r A d d r ) \r ( 1
0016200 0 Q \ P C E . R I G I D D I S
0016220 K . F C B P T R ) \r ( ) \r \ P C
0016240 E . E R D . W r i t e S e c t o
0016260 r s P r o c D 1 \r ( P 3 X
0016300 P 0 F I L E A D D R I
0016320 3 I N C B U F F E R P I 2
0016340 C N T I 1 B U F F E R P
0016360 T R I 0 D S K A D D R )
0016400 \0 K \a \0 \0 004 @ \t \0 \0 021 021 001 ` \0 \0
0016420 H \n \0 \0 B k 021 002 003 K J 363 263 2 ` \0
0016440 \0 A 001 A 002 021 003 006 L 006 \0 \0 311 006 006 \0
0016460 \0 311 8 271 L M N n 002 \0 l 004 I 016 023 C
0016500 226 A \t \0 \0 b 002 277 K k 324 [ 260 316 j 020
0016520 \0 ( 7 6 Q \ P C E . E R D . I
0016540 n c r e m e n t P C M e m P t r
0016560 1 5 Q S E T F I L E P T R
0016600 3 \ P C E . E R D . A d d r T
0016620 o F i l e P t r ) \r ( 5 2 Q F
0016640 D E V 4 5 Q S T R E A M 3
0016660 2 Q \ P C E . E R D . e r d S
0016700 t r e a m 1 1 Q \ P C E . E
0016720 R D . e r d S t r e a m ) \r ( )
0016740 \r ( P R E T T Y C O M P R I N T
0016760 P C E E R D C O M S ) \r ( R P
0017000 A Q Q P C E E R D C O M S (
0017020 ( D E C L A R E : F I R S T
0017040 ( P ( * t u r n o f f P
0017060 C E p r o c e s s e s i f
0017100 a l r e a d y l o a d e d a
0017120 n d r u n n i n g ) ( N L S
0017140 E T Q \r ( \ P C E . T E R M I
0017160 N A T E ) ) ) ) ( C O M S (
0017200 * u s e r f u n c t i o n s
0017220 ) ( F N S P C E . C R E A T
0017240 E . E R D F I L E ) ) ( F N S
0017260 \ P C E . E R D . A d d r T o
0017300 F i l e P t r \r \ P C E . E R
0017320 D . C o n f i g u r e \ P C E
0017340 . E R D . F i l e P t r T o A d
0017360 d r \ P C E . E R D . F o r m
0017400 a t D r i v e \ P C E . E R D
0017420 . F o r m a t T r a c k \r \ P
0017440 C E . E R D . G e t D i s k B u
0017460 f f e r A d d r \ P C E . E R
0017500 D . G e t M a x C y l i n d e r
0017520 \ P C E . E R D . G e t M e m
0017540 B u f f e r P t r \ P C E . E
0017560 R D . G e t S e c t o r B u f f
0017600 e r \r \ P C E . E R D . I n c
0017620 r e m e n t P C M e m P t r \
0017640 P C E . E R D . I n i t \ P C
0017660 E . E R D . N o t i f y \ P C
0017700 E . E R D . N o t i f y P r o c
0017720 e d u r e \r \ P C E . E R D .
0017740 P u t D i s k B u f f e r A d d
0017760 r \ P C E . E R D . R e a d S
0020000 e c t o r B u f f e r \ P C E
0020020 . E R D . R e a d S e c t o r s
0020040 \ P C E . E R D . R e a d S e
0020060 c t o r s P r o c \r \ P C E .
0020100 E R D . R e t u r n D r i v e P
0020120 a r a m e t e r s \ P C E . E
0020140 R D . T e r m i n a t e \ P C
0020160 E . E R D . W r i t e S e c t o
0020200 r B u f f e r \ P C E . E R D
0020220 . W r i t e S e c t o r s \r \
0020240 P C E . E R D . W r i t e S e c
0020260 t o r s P r o c ) ( I N I T V
0020300 A R S ( \ P C E . E R D . C o
0020320 n d i t i o n ) ( \ P C E . E
0020340 R D . P r o c e s s ) ( \ P C
0020360 E . E R D . S e c t o r B u f f
0020400 e r ) ( \r \ P C E . E R D . e
0020420 r d P r e s e n t ) ( \ P C E
0020440 . E R D . e r d S t r e a m )
0020460 ( \ P C E . E R D . g o t U p N
0020500 o t i f y ) ( \ P C E . E R D
0020520 . s t a t u s 0 ) ) ( G L O
0020540 B A L V A R S \r \ P C E . E R
0020560 D . C o n d i t i o n \ P C E
0020600 . E R D . P r o c e s s \ P C
0020620 E . E R D . S e c t o r B u f f
0020640 e r \ P C E . E R D . e r d P
0020660 r e s e n t \ P C E . E R D .
0020700 e r d S t r e a m \r \ P C E .
0020720 E R D . g o t U p N o t i f y
0020740 \ P C E . E R D . s t a t u s )
0020760 ( C O N S T A N T S e r d M
0021000 a x H e a d s e r d M a x S e
0021020 c t o r s ) ( D E C L A R E :
0021040 D O N T C O P Y ( \r R E C O
0021060 R D S E R D A d d r E R D B
0021100 u f f e r ) ) ) ) \r ( R P A Q ?
0021120 \ P C E . E R D . C o n d i t
0021140 i o n ) \r ( R P A Q ? \ P C E
0021160 . E R D . P r o c e s s ) \r ( R
0021200 P A Q ? \ P C E . E R D . S e
0021220 c t o r B u f f e r ) \r ( R P A
0021240 Q ? \ P C E . E R D . e r d P
0021260 r e s e n t ) \r ( R P A Q ? \
0021300 P C E . E R D . e r d S t r e a
0021320 m ) \r ( R P A Q ? \ P C E . E
0021340 R D . g o t U p N o t i f y ) \r
0021360 ( R P A Q ? \ P C E . E R D .
0021400 s t a t u s 0 ) \r ( R P A Q Q
0021420 e r d M a x H e a d s 4 ) \r
0021440 ( R P A Q Q e r d M a x S e c
0021460 t o r s 1 7 ) \r ( C O N S T A
0021500 N T S e r d M a x H e a d s
0021520 e r d M a x S e c t o r s ) \r (
0021540 P U T P R O P S P C E E R D
0021560 C O P Y R I G H T ( " X e r o
0021600 x C o r p o r a t i o n " 1
0021620 9 8 6 ) ) \r N I L \r
0021632