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