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