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